1/***************************************************************************
2 * _ _ ____ _
3 * Project ___| | | | _ \| |
4 * / __| | | | |_) | |
5 * | (__| |_| | _ <| |___
6 * \___|\___/|_| \_\_____|
7 *
8 * Copyright (C) 1998 - 2021, 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 ***************************************************************************/
22#include "test.h"
23
24#include "testtrace.h"
25#include "memdebug.h"
26
27#ifdef LIB585
28
29static int counter;
30
31static 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
41static 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
48static 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
60int 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
150test_cleanup:
151
152 curl_easy_cleanup(curl);
153 curl_global_cleanup();
154
155 return (int)res;
156}
157