1 /***************************************************************************
2  *                                  _   _ ____  _
3  *  Project                     ___| | | |  _ \| |
4  *                             / __| | | | |_) | |
5  *                            | (__| |_| |  _ <| |___
6  *                             \___|\___/|_| \_\_____|
7  *
8  * Copyright (C) 1998 - 2017, 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.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 #include "testtrace.h"
25 #include "memdebug.h"
26 
27 #ifdef LIB585
28 
29 static int counter;
30 
tst_opensocket(void * clientp,curlsocktype purpose,struct curl_sockaddr * addr)31 static curl_socket_t tst_opensocket(void *clientp,
32                                     curlsocktype purpose,
33                                     struct curl_sockaddr *addr)
34 {
35   (void)clientp;
36   (void)purpose;
37   printf("[OPEN] counter: %d\n", ++counter);
38   return socket(addr->family, addr->socktype, addr->protocol);
39 }
40 
tst_closesocket(void * clientp,curl_socket_t sock)41 static int tst_closesocket(void *clientp, curl_socket_t sock)
42 {
43   (void)clientp;
44   printf("[CLOSE] counter: %d\n", counter--);
45   return sclose(sock);
46 }
47 
setupcallbacks(CURL * curl)48 static void setupcallbacks(CURL *curl)
49 {
50   curl_easy_setopt(curl, CURLOPT_OPENSOCKETFUNCTION, tst_opensocket);
51   curl_easy_setopt(curl, CURLOPT_CLOSESOCKETFUNCTION, tst_closesocket);
52   counter = 0;
53 }
54 
55 #else
56 #define setupcallbacks(x) Curl_nop_stmt
57 #endif
58 
59 
test(char * URL)60 int test(char *URL)
61 {
62   CURLcode res;
63   CURL *curl;
64   char *ipstr = NULL;
65 
66   if(curl_global_init(CURL_GLOBAL_ALL) != CURLE_OK) {
67     fprintf(stderr, "curl_global_init() failed\n");
68     return TEST_ERR_MAJOR_BAD;
69   }
70 
71   curl = curl_easy_init();
72   if(!curl) {
73     fprintf(stderr, "curl_easy_init() failed\n");
74     curl_global_cleanup();
75     return TEST_ERR_MAJOR_BAD;
76   }
77 
78   test_setopt(curl, CURLOPT_URL, URL);
79   test_setopt(curl, CURLOPT_HEADER, 1L);
80 
81   libtest_debug_config.nohex = 1;
82   libtest_debug_config.tracetime = 1;
83   test_setopt(curl, CURLOPT_DEBUGDATA, &libtest_debug_config);
84   test_setopt(curl, CURLOPT_DEBUGFUNCTION, libtest_debug_cb);
85   test_setopt(curl, CURLOPT_VERBOSE, 1L);
86 
87   if(libtest_arg3 && !strcmp(libtest_arg3, "activeftp"))
88     test_setopt(curl, CURLOPT_FTPPORT, "-");
89 
90   setupcallbacks(curl);
91 
92   res = curl_easy_perform(curl);
93 
94   if(!res) {
95     res = curl_easy_getinfo(curl, CURLINFO_PRIMARY_IP, &ipstr);
96     if(libtest_arg2) {
97       FILE *moo = fopen(libtest_arg2, "wb");
98       if(moo) {
99         curl_off_t time_namelookup;
100         curl_off_t time_connect;
101         curl_off_t time_pretransfer;
102         curl_off_t time_starttransfer;
103         curl_off_t time_total;
104         fprintf(moo, "IP: %s\n", ipstr);
105         curl_easy_getinfo(curl, CURLINFO_NAMELOOKUP_TIME_T, &time_namelookup);
106         curl_easy_getinfo(curl, CURLINFO_CONNECT_TIME_T, &time_connect);
107         curl_easy_getinfo(curl, CURLINFO_PRETRANSFER_TIME_T,
108                           &time_pretransfer);
109         curl_easy_getinfo(curl, CURLINFO_STARTTRANSFER_TIME_T,
110                           &time_starttransfer);
111         curl_easy_getinfo(curl, CURLINFO_TOTAL_TIME_T, &time_total);
112 
113         /* since the timing will always vary we only compare relative
114            differences between these 5 times */
115         if(time_namelookup > time_connect) {
116           fprintf(moo, "namelookup vs connect: %" CURL_FORMAT_CURL_OFF_T
117                   ".%06ld %" CURL_FORMAT_CURL_OFF_T ".%06ld\n",
118                   (time_namelookup / 1000000),
119                   (long)(time_namelookup % 1000000),
120                   (time_connect / 1000000), (long)(time_connect % 1000000));
121         }
122         if(time_connect > time_pretransfer) {
123           fprintf(moo, "connect vs pretransfer: %" CURL_FORMAT_CURL_OFF_T
124                   ".%06ld %" CURL_FORMAT_CURL_OFF_T ".%06ld\n",
125                   (time_connect / 1000000), (long)(time_connect % 1000000),
126                   (time_pretransfer / 1000000),
127                   (long)(time_pretransfer % 1000000));
128         }
129         if(time_pretransfer > time_starttransfer) {
130           fprintf(moo, "pretransfer vs starttransfer: %" CURL_FORMAT_CURL_OFF_T
131                   ".%06ld %" CURL_FORMAT_CURL_OFF_T ".%06ld\n",
132                   (time_pretransfer / 1000000),
133                   (long)(time_pretransfer % 1000000),
134                   (time_starttransfer / 1000000),
135                   (long)(time_starttransfer % 1000000));
136         }
137         if(time_starttransfer > time_total) {
138           fprintf(moo, "starttransfer vs total: %" CURL_FORMAT_CURL_OFF_T
139                   ".%06ld %" CURL_FORMAT_CURL_OFF_T ".%06ld\n",
140                   (time_starttransfer / 1000000),
141                   (long)(time_starttransfer % 1000000),
142                   (time_total / 1000000), (long)(time_total % 1000000));
143         }
144 
145         fclose(moo);
146       }
147     }
148   }
149 
150 test_cleanup:
151 
152   curl_easy_cleanup(curl);
153   curl_global_cleanup();
154 
155   return (int)res;
156 }
157