xref: /third_party/curl/src/tool_util.c (revision 13498266) 
1/***************************************************************************
2 *                                  _   _ ____  _
3 *  Project                     ___| | | |  _ \| |
4 *                             / __| | | | |_) | |
5 *                            | (__| |_| |  _ <| |___
6 *                             \___|\___/|_| \_\_____|
7 *
8 * Copyright (C) Daniel Stenberg, <daniel@haxx.se>, et al.
9 *
10 * This software is licensed as described in the file COPYING, which
11 * you should have received as part of this distribution. The terms
12 * are also available at https://curl.se/docs/copyright.html.
13 *
14 * You may opt to use, copy, modify, merge, publish, distribute and/or sell
15 * copies of the Software, and permit persons to whom the Software is
16 * furnished to do so, under the terms of the COPYING file.
17 *
18 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
19 * KIND, either express or implied.
20 *
21 * SPDX-License-Identifier: curl
22 *
23 ***************************************************************************/
24#include "tool_setup.h"
25
26#if defined(HAVE_STRCASECMP) && defined(HAVE_STRINGS_H)
27#include <strings.h>
28#endif
29
30#include "tool_util.h"
31
32#include "memdebug.h" /* keep this as LAST include */
33
34#if defined(_WIN32)
35
36/* In case of bug fix this function has a counterpart in timeval.c */
37struct timeval tvnow(void)
38{
39  struct timeval now;
40  if(tool_isVistaOrGreater) { /* QPC timer might have issues pre-Vista */
41    LARGE_INTEGER count;
42    QueryPerformanceCounter(&count);
43    now.tv_sec = (long)(count.QuadPart / tool_freq.QuadPart);
44    now.tv_usec = (long)((count.QuadPart % tool_freq.QuadPart) * 1000000 /
45                         tool_freq.QuadPart);
46  }
47  else {
48    /* Disable /analyze warning that GetTickCount64 is preferred  */
49#if defined(_MSC_VER)
50#pragma warning(push)
51#pragma warning(disable:28159)
52#endif
53    DWORD milliseconds = GetTickCount();
54#if defined(_MSC_VER)
55#pragma warning(pop)
56#endif
57
58    now.tv_sec = (long)(milliseconds / 1000);
59    now.tv_usec = (long)((milliseconds % 1000) * 1000);
60  }
61  return now;
62}
63
64#elif defined(HAVE_CLOCK_GETTIME_MONOTONIC)
65
66struct timeval tvnow(void)
67{
68  /*
69  ** clock_gettime() is granted to be increased monotonically when the
70  ** monotonic clock is queried. Time starting point is unspecified, it
71  ** could be the system start-up time, the Epoch, or something else,
72  ** in any case the time starting point does not change once that the
73  ** system has started up.
74  */
75  struct timeval now;
76  struct timespec tsnow;
77  if(0 == clock_gettime(CLOCK_MONOTONIC, &tsnow)) {
78    now.tv_sec = tsnow.tv_sec;
79    now.tv_usec = (int)(tsnow.tv_nsec / 1000);
80  }
81  /*
82  ** Even when the configure process has truly detected monotonic clock
83  ** availability, it might happen that it is not actually available at
84  ** run-time. When this occurs simply fallback to other time source.
85  */
86#ifdef HAVE_GETTIMEOFDAY
87  else
88    (void)gettimeofday(&now, NULL);
89#else
90  else {
91    now.tv_sec = time(NULL);
92    now.tv_usec = 0;
93  }
94#endif
95  return now;
96}
97
98#elif defined(HAVE_GETTIMEOFDAY)
99
100struct timeval tvnow(void)
101{
102  /*
103  ** gettimeofday() is not granted to be increased monotonically, due to
104  ** clock drifting and external source time synchronization it can jump
105  ** forward or backward in time.
106  */
107  struct timeval now;
108  (void)gettimeofday(&now, NULL);
109  return now;
110}
111
112#else
113
114struct timeval tvnow(void)
115{
116  /*
117  ** time() returns the value of time in seconds since the Epoch.
118  */
119  struct timeval now;
120  now.tv_sec = time(NULL);
121  now.tv_usec = 0;
122  return now;
123}
124
125#endif
126
127/*
128 * Make sure that the first argument is the more recent time, as otherwise
129 * we'll get a weird negative time-diff back...
130 *
131 * Returns: the time difference in number of milliseconds.
132 */
133long tvdiff(struct timeval newer, struct timeval older)
134{
135  return (long)(newer.tv_sec-older.tv_sec)*1000+
136    (long)(newer.tv_usec-older.tv_usec)/1000;
137}
138
139/* Case insensitive compare. Accept NULL pointers. */
140int struplocompare(const char *p1, const char *p2)
141{
142  if(!p1)
143    return p2? -1: 0;
144  if(!p2)
145    return 1;
146#ifdef HAVE_STRCASECMP
147  return strcasecmp(p1, p2);
148#elif defined(HAVE_STRCMPI)
149  return strcmpi(p1, p2);
150#elif defined(HAVE_STRICMP)
151  return stricmp(p1, p2);
152#else
153  return strcmp(p1, p2);
154#endif
155}
156
157/* Indirect version to use as qsort callback. */
158int struplocompare4sort(const void *p1, const void *p2)
159{
160  return struplocompare(* (char * const *) p1, * (char * const *) p2);
161}
162