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 "test.h"
25
26 #ifdef HAVE_FCNTL_H
27 #include <fcntl.h>
28 #endif
29
30 #include "memdebug.h"
31
32 /*
33 * From "KNOWN_BUGS" April 2009:
34
35 59. If the CURLOPT_PORT option is used on an FTP URL like
36 "ftp://example.com/file;type=A" the ";type=A" is stripped off.
37
38 */
39
test(char * URL)40 CURLcode test(char *URL)
41 {
42 CURL *curl;
43 CURLcode res = CURLE_OK;
44
45 if(curl_global_init(CURL_GLOBAL_ALL) != CURLE_OK) {
46 fprintf(stderr, "curl_global_init() failed\n");
47 return TEST_ERR_MAJOR_BAD;
48 }
49
50 /* get a curl handle */
51 curl = curl_easy_init();
52 if(!curl) {
53 fprintf(stderr, "curl_easy_init() failed\n");
54 curl_global_cleanup();
55 return TEST_ERR_MAJOR_BAD;
56 }
57
58 /* enable verbose */
59 test_setopt(curl, CURLOPT_VERBOSE, 1L);
60
61 /* set port number */
62 test_setopt(curl, CURLOPT_PORT, strtol(libtest_arg2, NULL, 10));
63
64 /* specify target */
65 test_setopt(curl, CURLOPT_URL, URL);
66
67 /* Now run off and do what you've been told! */
68 res = curl_easy_perform(curl);
69
70 test_cleanup:
71
72 curl_easy_cleanup(curl);
73 curl_global_cleanup();
74
75 return res;
76 }
77
