113498266Sopenharmony_ci/***************************************************************************
213498266Sopenharmony_ci *                                  _   _ ____  _
313498266Sopenharmony_ci *  Project                     ___| | | |  _ \| |
413498266Sopenharmony_ci *                             / __| | | | |_) | |
513498266Sopenharmony_ci *                            | (__| |_| |  _ <| |___
613498266Sopenharmony_ci *                             \___|\___/|_| \_\_____|
713498266Sopenharmony_ci *
813498266Sopenharmony_ci * Copyright (C) Daniel Stenberg, <daniel@haxx.se>, et al.
913498266Sopenharmony_ci *
1013498266Sopenharmony_ci * This software is licensed as described in the file COPYING, which
1113498266Sopenharmony_ci * you should have received as part of this distribution. The terms
1213498266Sopenharmony_ci * are also available at https://curl.se/docs/copyright.html.
1313498266Sopenharmony_ci *
1413498266Sopenharmony_ci * You may opt to use, copy, modify, merge, publish, distribute and/or sell
1513498266Sopenharmony_ci * copies of the Software, and permit persons to whom the Software is
1613498266Sopenharmony_ci * furnished to do so, under the terms of the COPYING file.
1713498266Sopenharmony_ci *
1813498266Sopenharmony_ci * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
1913498266Sopenharmony_ci * KIND, either express or implied.
2013498266Sopenharmony_ci *
2113498266Sopenharmony_ci * SPDX-License-Identifier: curl
2213498266Sopenharmony_ci *
2313498266Sopenharmony_ci ***************************************************************************/
2413498266Sopenharmony_ci#include <stdio.h>
2513498266Sopenharmony_ci
2613498266Sopenharmony_ci#include <curl/curl.h>
2713498266Sopenharmony_ci
2813498266Sopenharmony_ci/* <DESC>
2913498266Sopenharmony_ci * Similar to ftpget.c but also stores the received response-lines
3013498266Sopenharmony_ci * in a separate file using our own callback!
3113498266Sopenharmony_ci * </DESC>
3213498266Sopenharmony_ci */
3313498266Sopenharmony_cistatic size_t
3413498266Sopenharmony_ciwrite_response(void *ptr, size_t size, size_t nmemb, void *data)
3513498266Sopenharmony_ci{
3613498266Sopenharmony_ci  FILE *writehere = (FILE *)data;
3713498266Sopenharmony_ci  return fwrite(ptr, size, nmemb, writehere);
3813498266Sopenharmony_ci}
3913498266Sopenharmony_ci
4013498266Sopenharmony_ci#define FTPBODY "ftp-list"
4113498266Sopenharmony_ci#define FTPHEADERS "ftp-responses"
4213498266Sopenharmony_ci
4313498266Sopenharmony_ciint main(void)
4413498266Sopenharmony_ci{
4513498266Sopenharmony_ci  CURL *curl;
4613498266Sopenharmony_ci  CURLcode res;
4713498266Sopenharmony_ci  FILE *ftpfile;
4813498266Sopenharmony_ci  FILE *respfile;
4913498266Sopenharmony_ci
5013498266Sopenharmony_ci  /* local file name to store the file as */
5113498266Sopenharmony_ci  ftpfile = fopen(FTPBODY, "wb"); /* b is binary, needed on win32 */
5213498266Sopenharmony_ci
5313498266Sopenharmony_ci  /* local file name to store the FTP server's response lines in */
5413498266Sopenharmony_ci  respfile = fopen(FTPHEADERS, "wb"); /* b is binary, needed on win32 */
5513498266Sopenharmony_ci
5613498266Sopenharmony_ci  curl = curl_easy_init();
5713498266Sopenharmony_ci  if(curl) {
5813498266Sopenharmony_ci    /* Get a file listing from sunet */
5913498266Sopenharmony_ci    curl_easy_setopt(curl, CURLOPT_URL, "ftp://ftp.example.com/");
6013498266Sopenharmony_ci    curl_easy_setopt(curl, CURLOPT_WRITEDATA, ftpfile);
6113498266Sopenharmony_ci    /* If you intend to use this on windows with a libcurl DLL, you must use
6213498266Sopenharmony_ci       CURLOPT_WRITEFUNCTION as well */
6313498266Sopenharmony_ci    curl_easy_setopt(curl, CURLOPT_HEADERFUNCTION, write_response);
6413498266Sopenharmony_ci    curl_easy_setopt(curl, CURLOPT_HEADERDATA, respfile);
6513498266Sopenharmony_ci    res = curl_easy_perform(curl);
6613498266Sopenharmony_ci    /* Check for errors */
6713498266Sopenharmony_ci    if(res != CURLE_OK)
6813498266Sopenharmony_ci      fprintf(stderr, "curl_easy_perform() failed: %s\n",
6913498266Sopenharmony_ci              curl_easy_strerror(res));
7013498266Sopenharmony_ci
7113498266Sopenharmony_ci    /* always cleanup */
7213498266Sopenharmony_ci    curl_easy_cleanup(curl);
7313498266Sopenharmony_ci  }
7413498266Sopenharmony_ci
7513498266Sopenharmony_ci  fclose(ftpfile); /* close the local file */
7613498266Sopenharmony_ci  fclose(respfile); /* close the response file */
7713498266Sopenharmony_ci
7813498266Sopenharmony_ci  return 0;
7913498266Sopenharmony_ci}
80