arping: change a few message strings to be closer to iputils arping
[oweals/busybox.git] / networking / ftpgetput.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * ftpget
4  *
5  * Mini implementation of FTP to retrieve a remote file.
6  *
7  * Copyright (C) 2002 Jeff Angielski, The PTR Group <jeff@theptrgroup.com>
8  * Copyright (C) 2002 Glenn McGrath
9  *
10  * Based on wget.c by Chip Rosenthal Covad Communications
11  * <chip@laserlink.net>
12  *
13  * Licensed under GPLv2 or later, see file LICENSE in this source tree.
14  */
15 //config:config FTPGET
16 //config:       bool "ftpget (8 kb)"
17 //config:       default y
18 //config:       help
19 //config:       Retrieve a remote file via FTP.
20 //config:
21 //config:config FTPPUT
22 //config:       bool "ftpput (7.7 kb)"
23 //config:       default y
24 //config:       help
25 //config:       Store a remote file via FTP.
26 //config:
27 //config:config FEATURE_FTPGETPUT_LONG_OPTIONS
28 //config:       bool "Enable long options in ftpget/ftpput"
29 //config:       default y
30 //config:       depends on LONG_OPTS && (FTPGET || FTPPUT)
31
32 //applet:IF_FTPGET(APPLET_ODDNAME(ftpget, ftpgetput, BB_DIR_USR_BIN, BB_SUID_DROP, ftpget))
33 //applet:IF_FTPPUT(APPLET_ODDNAME(ftpput, ftpgetput, BB_DIR_USR_BIN, BB_SUID_DROP, ftpput))
34
35 //kbuild:lib-$(CONFIG_FTPGET) += ftpgetput.o
36 //kbuild:lib-$(CONFIG_FTPPUT) += ftpgetput.o
37
38 //usage:#define ftpget_trivial_usage
39 //usage:       "[OPTIONS] HOST [LOCAL_FILE] REMOTE_FILE"
40 //usage:#define ftpget_full_usage "\n\n"
41 //usage:       "Download a file via FTP\n"
42 //usage:     "\n        -c      Continue previous transfer"
43 //usage:     "\n        -v      Verbose"
44 //usage:     "\n        -u USER Username"
45 //usage:     "\n        -p PASS Password"
46 //usage:     "\n        -P NUM  Port"
47 //usage:
48 //usage:#define ftpput_trivial_usage
49 //usage:       "[OPTIONS] HOST [REMOTE_FILE] LOCAL_FILE"
50 //usage:#define ftpput_full_usage "\n\n"
51 //usage:       "Upload a file to a FTP server\n"
52 //usage:     "\n        -v      Verbose"
53 //usage:     "\n        -u USER Username"
54 //usage:     "\n        -p PASS Password"
55 //usage:     "\n        -P NUM  Port number"
56
57 #include "libbb.h"
58 #include "common_bufsiz.h"
59
60 struct globals {
61         const char *user;
62         const char *password;
63         struct len_and_sockaddr *lsa;
64         FILE *control_stream;
65         int verbose_flag;
66         int do_continue;
67         char buf[4]; /* actually [BUFSZ] */
68 } FIX_ALIASING;
69 #define G (*(struct globals*)bb_common_bufsiz1)
70 enum { BUFSZ = COMMON_BUFSIZE - offsetof(struct globals, buf) };
71 #define user           (G.user          )
72 #define password       (G.password      )
73 #define lsa            (G.lsa           )
74 #define control_stream (G.control_stream)
75 #define verbose_flag   (G.verbose_flag  )
76 #define do_continue    (G.do_continue   )
77 #define buf            (G.buf           )
78 #define INIT_G() do { \
79         setup_common_bufsiz(); \
80         BUILD_BUG_ON(sizeof(G) > COMMON_BUFSIZE); \
81 } while (0)
82
83
84 static void ftp_die(const char *msg) NORETURN;
85 static void ftp_die(const char *msg)
86 {
87         char *cp = buf; /* buf holds peer's response */
88
89         /* Guard against garbage from remote server */
90         while (*cp >= ' ' && *cp < '\x7f')
91                 cp++;
92         *cp = '\0';
93         bb_error_msg_and_die("unexpected server response%s%s: %s",
94                         (msg ? " to " : ""), (msg ? msg : ""), buf);
95 }
96
97 static int ftpcmd(const char *s1, const char *s2)
98 {
99         unsigned n;
100
101         if (verbose_flag) {
102                 bb_error_msg("cmd %s %s", s1, s2);
103         }
104
105         if (s1) {
106                 fprintf(control_stream, (s2 ? "%s %s\r\n" : "%s %s\r\n"+3),
107                                                 s1, s2);
108                 fflush(control_stream);
109         }
110
111         do {
112                 strcpy(buf, "EOF"); /* for ftp_die */
113                 if (fgets(buf, BUFSZ - 2, control_stream) == NULL) {
114                         ftp_die(NULL);
115                 }
116         } while (!isdigit(buf[0]) || buf[3] != ' ');
117
118         buf[3] = '\0';
119         n = xatou(buf);
120         buf[3] = ' ';
121         return n;
122 }
123
124 static void ftp_login(void)
125 {
126         /* Connect to the command socket */
127         control_stream = fdopen(xconnect_stream(lsa), "r+");
128         if (control_stream == NULL) {
129                 /* fdopen failed - extremely unlikely */
130                 bb_perror_nomsg_and_die();
131         }
132
133         if (ftpcmd(NULL, NULL) != 220) {
134                 ftp_die(NULL);
135         }
136
137         /*  Login to the server */
138         switch (ftpcmd("USER", user)) {
139         case 230:
140                 break;
141         case 331:
142                 if (ftpcmd("PASS", password) != 230) {
143                         ftp_die("PASS");
144                 }
145                 break;
146         default:
147                 ftp_die("USER");
148         }
149
150         ftpcmd("TYPE I", NULL);
151 }
152
153 static int xconnect_ftpdata(void)
154 {
155         int port_num;
156
157         if (ENABLE_FEATURE_IPV6 && ftpcmd("EPSV", NULL) == 229) {
158                 /* good */
159         } else if (ftpcmd("PASV", NULL) != 227) {
160                 ftp_die("PASV");
161         }
162         port_num = parse_pasv_epsv(buf);
163         if (port_num < 0)
164                 ftp_die("PASV");
165
166         set_nport(&lsa->u.sa, htons(port_num));
167         return xconnect_stream(lsa);
168 }
169
170 static int pump_data_and_QUIT(int from, int to)
171 {
172         /* copy the file */
173         if (bb_copyfd_eof(from, to) == -1) {
174                 /* error msg is already printed by bb_copyfd_eof */
175                 return EXIT_FAILURE;
176         }
177
178         /* close data connection */
179         close(from); /* don't know which one is that, so we close both */
180         close(to);
181
182         /* does server confirm that transfer is finished? */
183         if (ftpcmd(NULL, NULL) != 226) {
184                 ftp_die(NULL);
185         }
186         ftpcmd("QUIT", NULL);
187
188         return EXIT_SUCCESS;
189 }
190
191 #if !ENABLE_FTPGET
192 int ftp_receive(const char *local_path, char *server_path);
193 #else
194 static
195 int ftp_receive(const char *local_path, char *server_path)
196 {
197         int fd_data;
198         int fd_local = -1;
199         off_t beg_range = 0;
200
201         /* connect to the data socket */
202         fd_data = xconnect_ftpdata();
203
204         if (ftpcmd("SIZE", server_path) != 213) {
205                 do_continue = 0;
206         }
207
208         if (LONE_DASH(local_path)) {
209                 fd_local = STDOUT_FILENO;
210                 do_continue = 0;
211         }
212
213         if (do_continue) {
214                 struct stat sbuf;
215                 /* lstat would be wrong here! */
216                 if (stat(local_path, &sbuf) < 0) {
217                         bb_perror_msg_and_die("stat");
218                 }
219                 if (sbuf.st_size > 0) {
220                         beg_range = sbuf.st_size;
221                 } else {
222                         do_continue = 0;
223                 }
224         }
225
226         if (do_continue) {
227                 sprintf(buf, "REST %"OFF_FMT"u", beg_range);
228                 if (ftpcmd(buf, NULL) != 350) {
229                         do_continue = 0;
230                 }
231         }
232
233         if (ftpcmd("RETR", server_path) > 150) {
234                 ftp_die("RETR");
235         }
236
237         /* create local file _after_ we know that remote file exists */
238         if (fd_local == -1) {
239                 fd_local = xopen(local_path,
240                         do_continue ? (O_APPEND | O_WRONLY)
241                                     : (O_CREAT | O_TRUNC | O_WRONLY)
242                 );
243         }
244
245         return pump_data_and_QUIT(fd_data, fd_local);
246 }
247 #endif
248
249 #if !ENABLE_FTPPUT
250 int ftp_send(const char *server_path, char *local_path);
251 #else
252 static
253 int ftp_send(const char *server_path, char *local_path)
254 {
255         int fd_data;
256         int fd_local;
257         int response;
258
259         /* connect to the data socket */
260         fd_data = xconnect_ftpdata();
261
262         /* get the local file */
263         fd_local = STDIN_FILENO;
264         if (NOT_LONE_DASH(local_path))
265                 fd_local = xopen(local_path, O_RDONLY);
266
267         response = ftpcmd("STOR", server_path);
268         switch (response) {
269         case 125:
270         case 150:
271                 break;
272         default:
273                 ftp_die("STOR");
274         }
275
276         return pump_data_and_QUIT(fd_local, fd_data);
277 }
278 #endif
279
280 #if ENABLE_FEATURE_FTPGETPUT_LONG_OPTIONS
281 static const char ftpgetput_longopts[] ALIGN1 =
282         "continue\0" Required_argument "c"
283         "verbose\0"  No_argument       "v"
284         "username\0" Required_argument "u"
285         "password\0" Required_argument "p"
286         "port\0"     Required_argument "P"
287         ;
288 #endif
289
290 int ftpgetput_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
291 int ftpgetput_main(int argc UNUSED_PARAM, char **argv)
292 {
293         const char *port = "ftp";
294         /* socket to ftp server */
295
296 #if ENABLE_FTPPUT && !ENABLE_FTPGET
297 # define ftp_action ftp_send
298 #elif ENABLE_FTPGET && !ENABLE_FTPPUT
299 # define ftp_action ftp_receive
300 #else
301         int (*ftp_action)(const char *, char *) = ftp_send;
302
303         /* Check to see if the command is ftpget or ftput */
304         if (applet_name[3] == 'g') {
305                 ftp_action = ftp_receive;
306         }
307 #endif
308
309         INIT_G();
310         /* Set default values */
311         user = "anonymous";
312         password = "busybox@";
313
314         /*
315          * Decipher the command line
316          */
317         /* must have 2 to 3 params; -v and -c count */
318 #define OPTSTRING "^cvu:p:P:" "\0" "-2:?3:vv:cc"
319 #if ENABLE_FEATURE_FTPGETPUT_LONG_OPTIONS
320         getopt32long(argv, OPTSTRING, ftpgetput_longopts,
321 #else
322         getopt32(argv, OPTSTRING,
323 #endif
324                         &user, &password, &port, &verbose_flag, &do_continue
325         );
326         argv += optind;
327
328         /* We want to do exactly _one_ DNS lookup, since some
329          * sites (i.e. ftp.us.debian.org) use round-robin DNS
330          * and we want to connect to only one IP... */
331         lsa = xhost2sockaddr(argv[0], bb_lookup_port(port, "tcp", 21));
332         if (verbose_flag) {
333                 printf("Connecting to %s (%s)\n", argv[0],
334                         xmalloc_sockaddr2dotted(&lsa->u.sa));
335         }
336
337         ftp_login();
338         return ftp_action(argv[1], argv[2] ? argv[2] : argv[1]);
339 }