1/***************************************************************************
2 *                                  _   _ ____  _
3 *  Project                     ___| | | |  _ \| |
4 *                             / __| | | | |_) | |
5 *                            | (__| |_| |  _ <| |___
6 *                             \___|\___/|_| \_\_____|
7 *
8 * Copyright (C) 1998 - 2011, 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 http://curl.haxx.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 ***************************************************************************/
22#include "test.h"
23
24#ifdef HAVE_LOCALE_H
25#  include <locale.h> /* for setlocale() */
26#endif
27
28#ifdef HAVE_IO_H
29#  include <io.h> /* for setmode() */
30#endif
31
32#ifdef HAVE_FCNTL_H
33#  include <fcntl.h> /* for setmode() */
34#endif
35
36#ifdef CURLDEBUG
37#  define MEMDEBUG_NODEFINES
38#  include "memdebug.h"
39#endif
40
41int select_wrapper(int nfds, fd_set *rd, fd_set *wr, fd_set *exc,
42                   struct timeval *tv)
43{
44  if(nfds < 0) {
45    SET_SOCKERRNO(EINVAL);
46    return -1;
47  }
48#ifdef USE_WINSOCK
49  /*
50   * Winsock select() requires that at least one of the three fd_set
51   * pointers is not NULL and points to a non-empty fdset. IOW Winsock
52   * select() can not be used to sleep without a single fd_set.
53   */
54  if(!nfds) {
55    Sleep(1000*tv->tv_sec + tv->tv_usec/1000);
56    return 0;
57  }
58#endif
59  return select(nfds, rd, wr, exc, tv);
60}
61
62char *libtest_arg2=NULL;
63char *libtest_arg3=NULL;
64int test_argc;
65char **test_argv;
66
67struct timeval tv_test_start; /* for test timing */
68
69#ifdef UNITTESTS
70int unitfail; /* for unittests */
71#endif
72
73#ifdef CURLDEBUG
74static void memory_tracking_init(void)
75{
76  char *env;
77  /* if CURL_MEMDEBUG is set, this starts memory tracking message logging */
78  env = curl_getenv("CURL_MEMDEBUG");
79  if(env) {
80    /* use the value as file name */
81    char fname[CURL_MT_LOGFNAME_BUFSIZE];
82    if(strlen(env) >= CURL_MT_LOGFNAME_BUFSIZE)
83      env[CURL_MT_LOGFNAME_BUFSIZE-1] = '\0';
84    strcpy(fname, env);
85    curl_free(env);
86    curl_memdebug(fname);
87    /* this weird stuff here is to make curl_free() get called
88       before curl_memdebug() as otherwise memory tracking will
89       log a free() without an alloc! */
90  }
91  /* if CURL_MEMLIMIT is set, this enables fail-on-alloc-number-N feature */
92  env = curl_getenv("CURL_MEMLIMIT");
93  if(env) {
94    char *endptr;
95    long num = strtol(env, &endptr, 10);
96    if((endptr != env) && (endptr == env + strlen(env)) && (num > 0))
97      curl_memlimit(num);
98    curl_free(env);
99  }
100}
101#else
102#  define memory_tracking_init() Curl_nop_stmt
103#endif
104
105int main(int argc, char **argv)
106{
107  char *URL;
108
109#ifdef O_BINARY
110#  ifdef __HIGHC__
111  _setmode(stdout, O_BINARY);
112#  else
113  setmode(fileno(stdout), O_BINARY);
114#  endif
115#endif
116
117  memory_tracking_init();
118
119  /*
120   * Setup proper locale from environment. This is needed to enable locale-
121   * specific behaviour by the C library in order to test for undesired side
122   * effects that could cause in libcurl.
123   */
124#ifdef HAVE_SETLOCALE
125  setlocale(LC_ALL, "");
126#endif
127
128  if(argc< 2 ) {
129    fprintf(stderr, "Pass URL as argument please\n");
130    return 1;
131  }
132
133  test_argc = argc;
134  test_argv = argv;
135
136  if(argc>2)
137    libtest_arg2=argv[2];
138
139  if(argc>3)
140    libtest_arg3=argv[3];
141
142  URL = argv[1]; /* provide this to the rest */
143
144  fprintf(stderr, "URL: %s\n", URL);
145
146  return test(URL);
147}
148