uclient-fetch.c

   1 /*
   2  * uclient - ustream based protocol client library
   3  *
   4  * Copyright (C) 2014 Felix Fietkau <nbd@openwrt.org>
   5  *
   6  * Permission to use, copy, modify, and/or distribute this software for any
   7  * purpose with or without fee is hereby granted, provided that the above
   8  * copyright notice and this permission notice appear in all copies.
   9  *
  10  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  11  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  12  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  13  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  14  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  15  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  16  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  17  */
  18
  19 #include <unistd.h>
  20 #include <stdio.h>
  21 #include <dlfcn.h>
  22 #include <getopt.h>
  23 #include <fcntl.h>
  24
  25 #include <libubox/blobmsg.h>
  26
  27 #include "uclient.h"
  28 #include "uclient-utils.h"
  29
  30 #ifdef __APPLE__
  31 #define LIB_EXT "dylib"
  32 #else
  33 #define LIB_EXT "so"
  34 #endif
  35
  36 static struct ustream_ssl_ctx *ssl_ctx;
  37 static const struct ustream_ssl_ops *ssl_ops;
  38 static int quiet = false;
  39 static bool verify = true;
  40 static const char *output_file;
  41 static int output_fd = -1;
  42 static int error_ret;
  43 static int out_bytes;
  44 static char *username;
  45 static char *password;
  46 static char *auth_str;
  47
  48 static int open_output_file(const char *path, bool create)
  49 {
  50         char *filename;
  51         int flags = O_WRONLY;
  52         int ret;
  53
  54         if (create)
  55                 flags |= O_CREAT | O_EXCL;
  56
  57         if (output_file) {
  58                 if (!strcmp(output_file, "-"))
  59                         return STDOUT_FILENO;
  60
  61                 if (!quiet)
  62                         fprintf(stderr, "Writing to stdout\n");
  63
  64                 unlink(output_file);
  65                 return open(output_file, flags, 0644);
  66         }
  67
  68         filename = uclient_get_url_filename(path, "index.html");
  69         if (!quiet)
  70                 fprintf(stderr, "Writing to '%s'\n", filename);
  71         ret = open(filename, flags, 0644);
  72         free(filename);
  73
  74         return ret;
  75 }
  76
  77 static void request_done(struct uclient *cl)
  78 {
  79         if (output_fd >= 0 && !output_file) {
  80                 close(output_fd);
  81                 output_fd = -1;
  82         }
  83         uclient_disconnect(cl);
  84         uloop_end();
  85 }
  86
  87 static void header_done_cb(struct uclient *cl)
  88 {
  89         static int retries;
  90
  91         if (retries < 10 && uclient_http_redirect(cl)) {
  92                 if (!quiet)
  93                         fprintf(stderr, "Redirected to %s on %s\n", cl->url->location, cl->url->host);
  94
  95                 retries++;
  96                 return;
  97         }
  98
  99         retries = 0;
 100         switch (cl->status_code) {
 101         case 204:
 102         case 200:
 103                 output_fd = open_output_file(cl->url->location, true);
 104                 if (output_fd < 0) {
 105                         if (!quiet)
 106                                 perror("Cannot open output file");
 107                         error_ret = 3;
 108                         request_done(cl);
 109                 }
 110                 break;
 111
 112         default:
 113                 if (!quiet)
 114                         fprintf(stderr, "HTTP error %d\n", cl->status_code);
 115                 request_done(cl);
 116                 error_ret = 8;
 117                 break;
 118         }
 119 }
 120
 121 static void read_data_cb(struct uclient *cl)
 122 {
 123         char buf[256];
 124         int len;
 125
 126         if (output_fd < 0)
 127                 return;
 128
 129         while (1) {
 130                 len = uclient_read(cl, buf, sizeof(buf));
 131                 if (!len)
 132                         return;
 133
 134                 out_bytes += len;
 135                 write(output_fd, buf, len);
 136         }
 137 }
 138
 139 static void msg_connecting(struct uclient *cl)
 140 {
 141         char addr[INET6_ADDRSTRLEN];
 142         int port;
 143
 144         if (quiet)
 145                 return;
 146
 147         uclient_get_addr(addr, &port, &cl->remote_addr);
 148         fprintf(stderr, "Connecting to %s:%d\n", addr, port);
 149 }
 150
 151 static void init_request(struct uclient *cl)
 152 {
 153         out_bytes = 0;
 154         uclient_connect(cl);
 155         msg_connecting(cl);
 156         uclient_http_set_request_type(cl, "GET");
 157         uclient_request(cl);
 158 }
 159
 160 static void eof_cb(struct uclient *cl)
 161 {
 162         if (!cl->data_eof) {
 163                 if (!quiet)
 164                         fprintf(stderr, "Connection reset prematurely\n");
 165                 error_ret = 4;
 166         } else if (!quiet) {
 167                 fprintf(stderr, "Download completed (%d bytes)\n", out_bytes);
 168         }
 169         request_done(cl);
 170 }
 171
 172 static void handle_uclient_error(struct uclient *cl, int code)
 173 {
 174         const char *type = "Unknown error";
 175         bool ignore = false;
 176
 177         switch(code) {
 178         case UCLIENT_ERROR_CONNECT:
 179                 type = "Connection failed";
 180                 error_ret = 4;
 181                 break;
 182         case UCLIENT_ERROR_SSL_INVALID_CERT:
 183                 type = "Invalid SSL certificate";
 184                 ignore = !verify;
 185                 error_ret = 5;
 186                 break;
 187         case UCLIENT_ERROR_SSL_CN_MISMATCH:
 188                 type = "Server hostname does not match SSL certificate";
 189                 ignore = !verify;
 190                 error_ret = 5;
 191                 break;
 192         default:
 193                 error_ret = 1;
 194                 break;
 195         }
 196
 197         if (!quiet)
 198                 fprintf(stderr, "Connection error: %s%s\n", type, ignore ? " (ignored)" : "");
 199
 200         if (ignore)
 201                 error_ret = 0;
 202         else
 203                 request_done(cl);
 204 }
 205
 206 static const struct uclient_cb cb = {
 207         .header_done = header_done_cb,
 208         .data_read = read_data_cb,
 209         .data_eof = eof_cb,
 210         .error = handle_uclient_error,
 211 };
 212
 213 static int usage(const char *progname)
 214 {
 215         fprintf(stderr,
 216                 "Usage: %s [options] <URL>\n"
 217                 "Options:\n"
 218                 "       -q:                             Turn off status messages\n"
 219                 "       -O <file>:                      Redirect output to file (use \"-\" for stdout)\n"
 220                 "\n"
 221                 "HTTPS options:\n"
 222                 "       --ca-certificate=<cert>:        Load CA certificates from file <cert>\n"
 223                 "       --no-check-certificate:         don't validate the server's certificate\n"
 224                 "\n", progname);
 225         return 1;
 226 }
 227
 228
 229 static void init_ustream_ssl(void)
 230 {
 231         void *dlh;
 232
 233         dlh = dlopen("libustream-ssl." LIB_EXT, RTLD_LAZY | RTLD_LOCAL);
 234         if (!dlh)
 235                 return;
 236
 237         ssl_ops = dlsym(dlh, "ustream_ssl_ops");
 238         if (!ssl_ops)
 239                 return;
 240
 241         ssl_ctx = ssl_ops->context_new(false);
 242 }
 243
 244 static int no_ssl(const char *progname)
 245 {
 246         fprintf(stderr, "%s: SSL support not available, please install ustream-ssl\n", progname);
 247         return 1;
 248 }
 249
 250 enum {
 251         L_NO_CHECK_CERTIFICATE,
 252         L_CA_CERTIFICATE,
 253         L_USER,
 254         L_PASSWORD,
 255 };
 256
 257 static const struct option longopts[] = {
 258         [L_NO_CHECK_CERTIFICATE] = { "no-check-certificate", no_argument },
 259         [L_CA_CERTIFICATE] = { "ca-certificate", required_argument },
 260         [L_USER] = { "user", required_argument },
 261         [L_PASSWORD] = { "password", required_argument },
 262         {}
 263 };
 264
 265 int main(int argc, char **argv)
 266 {
 267         const char *progname = argv[0];
 268         struct uclient *cl;
 269         int ch;
 270         int longopt_idx = 0;
 271
 272         init_ustream_ssl();
 273
 274         while ((ch = getopt_long(argc, argv, "qO:", longopts, &longopt_idx)) != -1) {
 275                 switch(ch) {
 276                 case 0:
 277                         switch (longopt_idx) {
 278                         case L_NO_CHECK_CERTIFICATE:
 279                                 verify = false;
 280                                 break;
 281                         case L_CA_CERTIFICATE:
 282                                 if (ssl_ctx)
 283                                         ssl_ops->context_add_ca_crt_file(ssl_ctx, optarg);
 284                                 break;
 285                         case L_USER:
 286                                 if (!strlen(optarg))
 287                                         break;
 288                                 username = strdup(optarg);
 289                                 memset(optarg, '*', strlen(optarg));
 290                                 break;
 291                         case L_PASSWORD:
 292                                 if (!strlen(optarg))
 293                                         break;
 294                                 password = strdup(optarg);
 295                                 memset(optarg, '*', strlen(optarg));
 296                                 break;
 297                         default:
 298                                 return usage(progname);
 299                         }
 300                         break;
 301                 case 'O':
 302                         output_file = optarg;
 303                         break;
 304                 case 'q':
 305                         quiet = true;
 306                         break;
 307                 default:
 308                         return usage(progname);
 309                 }
 310         }
 311
 312         argv += optind;
 313         argc -= optind;
 314
 315         if (argc != 1)
 316                 return usage(progname);
 317
 318         if (!strncmp(argv[0], "https", 5) && !ssl_ctx)
 319                 return no_ssl(progname);
 320
 321         uloop_init();
 322
 323         if (username) {
 324                 if (password)
 325                         asprintf(&auth_str, "%s:%s", username, password);
 326                 else
 327                         auth_str = username;
 328         }
 329
 330         if (!quiet)
 331                 fprintf(stderr, "Downloading '%s'\n", argv[0]);
 332
 333         cl = uclient_new(argv[0], auth_str, &cb);
 334         if (!cl) {
 335                 fprintf(stderr, "Failed to allocate uclient context\n");
 336                 return 1;
 337         }
 338
 339         if (ssl_ctx)
 340                 uclient_http_set_ssl_ctx(cl, ssl_ops, ssl_ctx, verify);
 341
 342         init_request(cl);
 343         uloop_run();
 344         uloop_done();
 345
 346         uclient_free(cl);
 347
 348         if (output_fd >= 0 && output_fd != STDOUT_FILENO)
 349                 close(output_fd);
 350
 351         if (ssl_ctx)
 352                 ssl_ops->context_free(ssl_ctx);
 353
 354         return error_ret;
 355 }