Mercurial > gftp.yaz
annotate lib/rfc2068.c @ 369:c63208a1f0f1
2003-1-18 Brian Masney <masneyb@gftp.org>
* lib/misc.c (gftp_build_path) - when checking for already existing
/'s, not only look at the end of the currently built string, but look
at the beginning of the token that is about to be added
(from Aurelien Jarno <aurel32@debian.org>)
* lib/rfc2068.c (rfc2068_list_files) - if the current directory is /,
just send the hostname over to the HTTP server. This was broken on some
HTTP servers.
(from Aurelien Jarno <aurel32@debian.org>)
author | masneyb |
---|---|
date | Sun, 18 Jan 2004 20:30:08 +0000 |
parents | eedc2c5727fa |
children | 44b792841e3f |
rev | line source |
---|---|
1 | 1 /*****************************************************************************/ |
2 /* rfc2068.c - General purpose routines for the HTTP protocol */ | |
122 | 3 /* Copyright (C) 1998-2003 Brian Masney <masneyb@gftp.org> */ |
1 | 4 /* */ |
5 /* This program is free software; you can redistribute it and/or modify */ | |
6 /* it under the terms of the GNU General Public License as published by */ | |
7 /* the Free Software Foundation; either version 2 of the License, or */ | |
8 /* (at your option) any later version. */ | |
9 /* */ | |
10 /* This program is distributed in the hope that it will be useful, */ | |
11 /* but WITHOUT ANY WARRANTY; without even the implied warranty of */ | |
12 /* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ | |
13 /* GNU General Public License for more details. */ | |
14 /* */ | |
15 /* You should have received a copy of the GNU General Public License */ | |
16 /* along with this program; if not, write to the Free Software */ | |
17 /* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111 USA */ | |
18 /*****************************************************************************/ | |
19 | |
20 #include "gftp.h" | |
168 | 21 #include "httpcommon.h" |
22 | |
33 | 23 static const char cvsid[] = "$Id$"; |
1 | 24 |
122 | 25 static gftp_config_vars config_vars[] = |
26 { | |
227 | 27 {"", N_("HTTP"), gftp_option_type_notebook, NULL, NULL, |
28 GFTP_CVARS_FLAGS_SHOW_BOOKMARK, NULL, GFTP_PORT_GTK, NULL}, | |
122 | 29 |
30 {"http_proxy_host", N_("Proxy hostname:"), | |
31 gftp_option_type_text, "", NULL, 0, | |
32 N_("Firewall hostname"), GFTP_PORT_ALL, 0}, | |
33 {"http_proxy_port", N_("Proxy port:"), | |
34 gftp_option_type_int, GINT_TO_POINTER(80), NULL, 0, | |
35 N_("Port to connect to on the firewall"), GFTP_PORT_ALL, NULL}, | |
36 {"http_proxy_username", N_("Proxy username:"), | |
37 gftp_option_type_text, "", NULL, 0, | |
38 N_("Your firewall username"), GFTP_PORT_ALL, NULL}, | |
39 {"http_proxy_password", N_("Proxy password:"), | |
40 gftp_option_type_hidetext, "", NULL, 0, | |
41 N_("Your firewall password"), GFTP_PORT_ALL, NULL}, | |
42 | |
43 {"use_http11", N_("Use HTTP/1.1"), | |
227 | 44 gftp_option_type_checkbox, GINT_TO_POINTER(1), NULL, |
45 GFTP_CVARS_FLAGS_SHOW_BOOKMARK, | |
122 | 46 N_("Do you want to use HTTP/1.1 or HTTP/1.0"), GFTP_PORT_ALL, NULL}, |
227 | 47 |
122 | 48 {NULL, NULL, 0, NULL, NULL, 0, NULL, 0, NULL} |
49 }; | |
50 | |
48 | 51 |
219 | 52 static int |
53 rfc2068_connect (gftp_request * request) | |
54 { | |
55 char *proxy_hostname, *proxy_config; | |
56 rfc2068_params * params; | |
325 | 57 intptr_t proxy_port; |
58 int ret; | |
219 | 59 |
60 g_return_val_if_fail (request != NULL, GFTP_EFATAL); | |
61 g_return_val_if_fail (request->protonum == GFTP_HTTP_NUM, GFTP_EFATAL); | |
62 g_return_val_if_fail (request->hostname != NULL, GFTP_EFATAL); | |
63 | |
64 params = request->protocol_data; | |
65 | |
66 if (request->datafd > 0) | |
67 return (0); | |
68 | |
69 gftp_lookup_request_option (request, "proxy_config", &proxy_config); | |
70 gftp_lookup_request_option (request, "http_proxy_host", &proxy_hostname); | |
71 gftp_lookup_request_option (request, "http_proxy_port", &proxy_port); | |
72 | |
73 if (proxy_config != NULL && strcmp (proxy_config, "ftp") == 0) | |
74 { | |
75 g_free (request->url_prefix); | |
76 request->url_prefix = g_strdup ("ftp"); | |
77 } | |
78 | |
79 if ((ret = gftp_connect_server (request, request->url_prefix, proxy_hostname, | |
80 proxy_port)) < 0) | |
81 return (ret); | |
82 | |
83 if (request->directory && *request->directory == '\0') | |
84 { | |
85 g_free (request->directory); | |
86 request->directory = NULL; | |
87 } | |
88 | |
89 if (!request->directory) | |
90 request->directory = g_strdup ("/"); | |
91 | |
92 return (0); | |
93 } | |
94 | |
95 | |
58 | 96 static off_t |
48 | 97 rfc2068_read_response (gftp_request * request) |
98 { | |
99 rfc2068_params * params; | |
207 | 100 char tempstr[8192]; |
168 | 101 int ret, chunked; |
48 | 102 |
103 params = request->protocol_data; | |
209 | 104 *tempstr = '\0'; |
168 | 105 chunked = 0; |
106 params->chunk_size = 0; | |
107 params->content_length = 0; | |
209 | 108 params->eof = 0; |
207 | 109 |
105 | 110 if (request->last_ftp_response) |
111 { | |
112 g_free (request->last_ftp_response); | |
113 request->last_ftp_response = NULL; | |
114 } | |
48 | 115 |
207 | 116 if (params->extra_read_buffer != NULL) |
117 { | |
118 g_free (params->extra_read_buffer); | |
119 params->extra_read_buffer = NULL; | |
209 | 120 params->extra_read_buffer_len = 0; |
207 | 121 } |
122 | |
105 | 123 do |
124 { | |
168 | 125 if ((ret = gftp_get_line (request, ¶ms->rbuf, tempstr, |
169 | 126 sizeof (tempstr), request->datafd)) < 0) |
105 | 127 return (ret); |
48 | 128 |
105 | 129 if (request->last_ftp_response == NULL) |
130 request->last_ftp_response = g_strdup (tempstr); | |
131 | |
132 if (*tempstr != '\0') | |
133 { | |
186 | 134 request->logging_function (gftp_logging_recv, request, "%s\n", |
105 | 135 tempstr); |
48 | 136 |
105 | 137 if (strncmp (tempstr, "Content-Length:", 15) == 0) |
244 | 138 params->content_length = gftp_parse_file_size (tempstr + 16); |
168 | 139 else if (strcmp (tempstr, "Transfer-Encoding: chunked") == 0) |
140 chunked = 1; | |
105 | 141 } |
48 | 142 } |
105 | 143 while (*tempstr != '\0'); |
48 | 144 |
168 | 145 if (chunked) |
146 { | |
147 if ((ret = gftp_get_line (request, ¶ms->rbuf, tempstr, | |
169 | 148 sizeof (tempstr), request->datafd)) < 0) |
168 | 149 return (ret); |
150 | |
151 if (sscanf ((char *) tempstr, "%lx", ¶ms->chunk_size) != 1) | |
152 { | |
186 | 153 request->logging_function (gftp_logging_recv, request, |
209 | 154 _("Received wrong response from server, disconnecting\nInvalid chunk size '%s' returned by the remote server\n"), |
155 tempstr); | |
168 | 156 gftp_disconnect (request); |
157 return (GFTP_EFATAL); | |
158 } | |
159 | |
160 if (params->chunk_size == 0) | |
161 return (0); | |
162 | |
163 params->chunk_size -= params->rbuf->cur_bufsize; | |
164 if (params->chunk_size < 0) | |
165 { | |
207 | 166 params->extra_read_buffer_len = params->chunk_size * -1; |
209 | 167 params->chunk_size = 0; |
207 | 168 params->extra_read_buffer = g_malloc (params->extra_read_buffer_len + 1); |
169 memcpy (params->extra_read_buffer, params->rbuf->curpos + (params->rbuf->cur_bufsize - params->extra_read_buffer_len), params->extra_read_buffer_len); | |
170 params->extra_read_buffer[params->extra_read_buffer_len] = '\0'; | |
171 params->rbuf->cur_bufsize -= params->extra_read_buffer_len; | |
209 | 172 params->rbuf->curpos[params->rbuf->cur_bufsize] = '\0'; |
168 | 173 } |
174 } | |
175 | |
176 params->chunked_transfer = chunked; | |
177 return (params->content_length > 0 ? params->content_length : params->chunk_size); | |
48 | 178 } |
179 | |
180 | |
58 | 181 static off_t |
168 | 182 rfc2068_send_command (gftp_request * request, const void *command, size_t len) |
48 | 183 { |
122 | 184 char *tempstr, *str, *proxy_hostname, *proxy_username, *proxy_password; |
325 | 185 intptr_t proxy_port; |
186 int conn_ret; | |
58 | 187 ssize_t ret; |
48 | 188 |
84 | 189 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
190 g_return_val_if_fail (request->protonum == GFTP_HTTP_NUM, GFTP_EFATAL); | |
191 g_return_val_if_fail (command != NULL, GFTP_EFATAL); | |
48 | 192 |
219 | 193 if (request->datafd < 0 && (conn_ret = rfc2068_connect (request)) != 0) |
194 return (conn_ret); | |
195 | |
168 | 196 tempstr = g_strdup_printf ("%sUser-Agent: %s\nHost: %s\n", (char *) command, |
122 | 197 gftp_version, request->hostname); |
48 | 198 |
186 | 199 request->logging_function (gftp_logging_send, request, |
58 | 200 "%s", tempstr); |
201 | |
168 | 202 ret = request->write_function (request, tempstr, strlen (tempstr), |
169 | 203 request->datafd); |
58 | 204 g_free (tempstr); |
205 | |
206 if (ret < 0) | |
84 | 207 return (ret); |
48 | 208 |
122 | 209 gftp_lookup_request_option (request, "http_proxy_host", &proxy_hostname); |
210 gftp_lookup_request_option (request, "http_proxy_port", &proxy_port); | |
211 gftp_lookup_request_option (request, "http_proxy_username", &proxy_username); | |
212 gftp_lookup_request_option (request, "http_proxy_password", &proxy_password); | |
213 | |
214 if (request->use_proxy && proxy_username != NULL && *proxy_username != '\0') | |
48 | 215 { |
122 | 216 tempstr = g_strconcat (proxy_username, ":", proxy_password, NULL); |
48 | 217 str = base64_encode (tempstr); |
218 g_free (tempstr); | |
219 | |
186 | 220 request->logging_function (gftp_logging_send, request, |
48 | 221 "Proxy-authorization: Basic xxxx:xxxx\n"); |
169 | 222 ret = gftp_writefmt (request, request->datafd, |
58 | 223 "Proxy-authorization: Basic %s\n", str); |
48 | 224 g_free (str); |
58 | 225 if (ret < 0) |
168 | 226 return (ret); |
48 | 227 } |
228 | |
229 if (request->username != NULL && *request->username != '\0') | |
230 { | |
231 tempstr = g_strconcat (request->username, ":", request->password, NULL); | |
232 str = base64_encode (tempstr); | |
233 g_free (tempstr); | |
234 | |
186 | 235 request->logging_function (gftp_logging_send, request, |
48 | 236 "Authorization: Basic xxxx\n"); |
169 | 237 ret = gftp_writefmt (request, request->datafd, |
58 | 238 "Authorization: Basic %s\n", str); |
48 | 239 g_free (str); |
58 | 240 if (ret < 0) |
84 | 241 return (ret); |
48 | 242 } |
243 | |
169 | 244 if ((ret = request->write_function (request, "\n", 1, request->datafd)) < 0) |
84 | 245 return (ret); |
58 | 246 |
48 | 247 return (rfc2068_read_response (request)); |
1 | 248 } |
249 | |
250 | |
251 static void | |
252 rfc2068_disconnect (gftp_request * request) | |
253 { | |
254 g_return_if_fail (request != NULL); | |
255 g_return_if_fail (request->protonum == GFTP_HTTP_NUM); | |
256 | |
169 | 257 if (request->datafd > 0) |
1 | 258 { |
186 | 259 request->logging_function (gftp_logging_misc, request, |
1 | 260 _("Disconnecting from site %s\n"), |
261 request->hostname); | |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
262 |
169 | 263 if (close (request->datafd) < 0) |
186 | 264 request->logging_function (gftp_logging_error, request, |
58 | 265 _("Error closing file descriptor: %s\n"), |
266 g_strerror (errno)); | |
267 | |
169 | 268 request->datafd = -1; |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
269 } |
1 | 270 } |
271 | |
272 | |
58 | 273 static off_t |
274 rfc2068_get_file (gftp_request * request, const char *filename, int fd, | |
1 | 275 off_t startsize) |
276 { | |
303 | 277 char *tempstr, *oldstr, *hf; |
325 | 278 int restarted; |
279 intptr_t use_http11; | |
122 | 280 rfc2068_params * params; |
1 | 281 off_t size; |
282 | |
84 | 283 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
284 g_return_val_if_fail (request->protonum == GFTP_HTTP_NUM, GFTP_EFATAL); | |
285 g_return_val_if_fail (filename != NULL, GFTP_EFATAL); | |
1 | 286 |
122 | 287 params = request->protocol_data; |
288 | |
289 gftp_lookup_request_option (request, "use_http11", &use_http11); | |
290 | |
58 | 291 if (fd > 0) |
169 | 292 request->datafd = fd; |
1 | 293 |
303 | 294 hf = gftp_build_path (request->hostname, filename, NULL); |
295 | |
7 | 296 if (request->username == NULL || *request->username == '\0') |
303 | 297 tempstr = g_strconcat ("GET ", request->url_prefix, "://", hf, |
1 | 298 use_http11 ? " HTTP/1.1\n" : " HTTP/1.0\n", NULL); |
299 else | |
122 | 300 tempstr = g_strconcat ("GET ", request->url_prefix, "://", |
303 | 301 request->username, "@", hf, |
1 | 302 use_http11 ? " HTTP/1.1\n" : " HTTP/1.0\n", NULL); |
303 | |
303 | 304 g_free (hf); |
1 | 305 |
168 | 306 if (use_http11 && startsize > 0) |
1 | 307 { |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
308 #if defined (_LARGEFILE_SOURCE) |
186 | 309 request->logging_function (gftp_logging_misc, request, |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
310 _("Starting the file transfer at offset %lld\n"), |
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
311 startsize); |
168 | 312 |
313 oldstr = tempstr; | |
314 tempstr = g_strdup_printf ("%sRange: bytes=%lld-\n", tempstr, startsize); | |
315 g_free (oldstr); | |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
316 #else |
186 | 317 request->logging_function (gftp_logging_misc, request, |
1 | 318 _("Starting the file transfer at offset %ld\n"), |
319 startsize); | |
168 | 320 |
321 oldstr = tempstr; | |
322 tempstr = g_strdup_printf ("%sRange: bytes=%ld-\n", tempstr, startsize); | |
323 g_free (oldstr); | |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
324 #endif |
1 | 325 } |
326 | |
168 | 327 size = rfc2068_send_command (request, tempstr, strlen (tempstr)); |
1 | 328 g_free (tempstr); |
58 | 329 if (size < 0) |
84 | 330 return (size); |
1 | 331 |
332 restarted = 0; | |
333 if (strlen (request->last_ftp_response) > 9 | |
334 && strncmp (request->last_ftp_response + 9, "206", 3) == 0) | |
335 restarted = 1; | |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
336 else if (strlen (request->last_ftp_response) < 9 || |
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
337 strncmp (request->last_ftp_response + 9, "200", 3) != 0) |
1 | 338 { |
186 | 339 request->logging_function (gftp_logging_error, request, |
1 | 340 _("Cannot retrieve file %s\n"), filename); |
84 | 341 return (GFTP_ERETRYABLE); |
1 | 342 } |
343 | |
168 | 344 params->read_bytes = 0; |
345 | |
1 | 346 return (restarted ? size + startsize : size); |
347 } | |
348 | |
349 | |
58 | 350 static ssize_t |
1 | 351 rfc2068_get_next_file_chunk (gftp_request * request, char *buf, size_t size) |
352 { | |
353 rfc2068_params * params; | |
354 size_t len; | |
355 | |
84 | 356 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
357 g_return_val_if_fail (request->protonum == GFTP_HTTP_NUM, GFTP_EFATAL); | |
1 | 358 |
359 params = request->protocol_data; | |
304 | 360 if (params->rbuf != NULL && params->rbuf->curpos != NULL) |
361 { | |
362 len = params->rbuf->cur_bufsize > size ? size : params->rbuf->cur_bufsize; | |
363 memcpy (buf, params->rbuf->curpos, len); | |
1 | 364 |
304 | 365 if (len == params->rbuf->cur_bufsize) |
366 gftp_free_getline_buffer (¶ms->rbuf); | |
367 else | |
368 { | |
369 params->rbuf->curpos += len; | |
370 params->rbuf->cur_bufsize -= len; | |
371 } | |
1 | 372 |
304 | 373 return (len); |
374 } | |
375 | |
376 return (request->read_function (request, buf, size, request->datafd)); | |
1 | 377 } |
378 | |
379 | |
380 static int | |
381 rfc2068_end_transfer (gftp_request * request) | |
382 { | |
383 rfc2068_params * params; | |
384 | |
84 | 385 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
386 g_return_val_if_fail (request->protonum == GFTP_HTTP_NUM, GFTP_EFATAL); | |
1 | 387 |
169 | 388 if (request->datafd < 0) |
84 | 389 return (GFTP_EFATAL); |
1 | 390 |
207 | 391 gftp_disconnect (request); |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
392 |
1 | 393 params = request->protocol_data; |
168 | 394 params->content_length = 0; |
395 params->chunked_transfer = 0; | |
396 params->chunk_size = 0; | |
209 | 397 params->eof = 0; |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
398 |
1 | 399 return (0); |
400 } | |
401 | |
402 | |
403 static int | |
404 rfc2068_list_files (gftp_request * request) | |
405 { | |
406 rfc2068_params *params; | |
303 | 407 char *tempstr, *hd; |
325 | 408 intptr_t use_http11; |
58 | 409 off_t ret; |
1 | 410 |
84 | 411 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
412 g_return_val_if_fail (request->protonum == GFTP_HTTP_NUM, GFTP_EFATAL); | |
1 | 413 |
414 params = request->protocol_data; | |
122 | 415 gftp_lookup_request_option (request, "use_http11", &use_http11); |
416 | |
369 | 417 if (strncmp (request->directory, "/", strlen (request->directory)) == 0) |
418 hd = g_strdup (request->hostname); | |
419 else | |
420 hd = gftp_build_path (request->hostname, request->directory, NULL); | |
303 | 421 |
7 | 422 if (request->username == NULL || *request->username == '\0') |
303 | 423 tempstr = g_strconcat ("GET ", request->url_prefix, "://", hd, |
1 | 424 use_http11 ? "/ HTTP/1.1\n" : "/ HTTP/1.0\n", NULL); |
425 else | |
122 | 426 tempstr = g_strconcat ("GET ", request->url_prefix, "://", |
303 | 427 request->username, "@", hd, |
1 | 428 use_http11 ? "/ HTTP/1.1\n" : "/ HTTP/1.0\n", NULL); |
429 | |
303 | 430 g_free (hd); |
1 | 431 |
168 | 432 ret = rfc2068_send_command (request, tempstr, strlen (tempstr)); |
1 | 433 g_free (tempstr); |
58 | 434 if (ret < 0) |
84 | 435 return ((int) ret); |
1 | 436 |
437 params->read_bytes = 0; | |
438 if (strlen (request->last_ftp_response) > 9 && | |
439 strncmp (request->last_ftp_response + 9, "200", 3) == 0) | |
440 { | |
186 | 441 request->logging_function (gftp_logging_misc, request, |
1 | 442 _("Retrieving directory listing...\n")); |
443 return (0); | |
444 } | |
168 | 445 |
207 | 446 gftp_end_transfer (request); |
447 | |
84 | 448 return (GFTP_ERETRYABLE); |
1 | 449 } |
450 | |
451 | |
452 static off_t | |
453 rfc2068_get_file_size (gftp_request * request, const char *filename) | |
454 { | |
122 | 455 rfc2068_params *params; |
303 | 456 char *tempstr, *hf; |
325 | 457 intptr_t use_http11; |
58 | 458 off_t size; |
1 | 459 |
84 | 460 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
461 g_return_val_if_fail (request->protonum == GFTP_HTTP_NUM, GFTP_EFATAL); | |
462 g_return_val_if_fail (filename != NULL, GFTP_EFATAL); | |
1 | 463 |
122 | 464 params = request->protocol_data; |
465 gftp_lookup_request_option (request, "use_http11", &use_http11); | |
466 | |
303 | 467 hf = gftp_build_path (request->hostname, filename, NULL); |
468 | |
7 | 469 if (request->username == NULL || *request->username == '\0') |
303 | 470 tempstr = g_strconcat ("HEAD ", request->url_prefix, "://", hf, |
1 | 471 use_http11 ? " HTTP/1.1\n" : " HTTP/1.0\n", NULL); |
472 else | |
219 | 473 tempstr = g_strconcat ("HEAD ", request->url_prefix, "://", |
303 | 474 request->username, "@", hf, |
1 | 475 use_http11 ? " HTTP/1.1\n" : " HTTP/1.0\n", NULL); |
476 | |
303 | 477 g_free (hf); |
1 | 478 |
168 | 479 size = rfc2068_send_command (request, tempstr, strlen (tempstr)); |
1 | 480 g_free (tempstr); |
481 return (size); | |
482 } | |
483 | |
484 | |
485 static int | |
486 parse_html_line (char *tempstr, gftp_file * fle) | |
487 { | |
207 | 488 char *stpos, *kpos, *mpos, *pos; |
1 | 489 long units; |
490 | |
491 memset (fle, 0, sizeof (*fle)); | |
492 | |
493 if ((pos = strstr (tempstr, "<A HREF=")) == NULL && | |
494 (pos = strstr (tempstr, "<a href=")) == NULL) | |
495 return (0); | |
496 | |
497 /* Find the filename */ | |
498 while (*pos != '"' && *pos != '\0') | |
499 pos++; | |
500 if (*pos == '\0') | |
501 return (0); | |
502 pos++; | |
503 | |
504 for (stpos = pos; *pos != '"' && *pos != '\0'; pos++); | |
505 if (*pos == '\0') | |
506 return (0); | |
507 *pos = '\0'; | |
508 | |
509 /* Copy file attributes. Just about the only thing we can get is whether it | |
510 is a directory or not */ | |
511 if (*(pos - 1) == '/') | |
512 { | |
336 | 513 fle->attribs = g_strdup ("drwxr-xr-x"); |
1 | 514 *(pos - 1) = '\0'; |
515 fle->isdir = 1; | |
516 } | |
336 | 517 else |
518 fle->attribs = g_strdup ("-rw-r--r--"); | |
1 | 519 |
520 /* Copy filename */ | |
521 if (strchr (stpos, '/') != NULL || strncmp (stpos, "mailto:", 7) == 0 || | |
522 *stpos == '\0' || *stpos == '?') | |
523 return (0); | |
524 | |
105 | 525 fle->file = g_strdup (stpos); |
1 | 526 |
527 if (*(pos - 1) == '\0') | |
528 *(pos - 1) = '/'; | |
529 *pos = '"'; | |
530 pos++; | |
531 | |
532 /* Skip whitespace and html tags after file and before date */ | |
533 stpos = pos; | |
534 if ((pos = strstr (stpos, "</A>")) == NULL && | |
535 (pos = strstr (stpos, "</a>")) == NULL) | |
536 return (0); | |
537 | |
538 pos += 4; | |
539 | |
105 | 540 while (*pos == ' ' || *pos == '\t' || *pos == '.' || *pos == '<') |
1 | 541 { |
542 if (*pos == '<') | |
543 { | |
544 if (strncmp (pos, "<A ", 3) == 0 || strncmp (pos, "<a ", 3) == 0) | |
545 { | |
546 stpos = pos; | |
547 if ((pos = strstr (stpos, "</A>")) == NULL | |
548 && (pos = strstr (stpos, "</a>")) == NULL) | |
549 return (0); | |
550 pos += 4; | |
551 } | |
552 else | |
553 { | |
554 while (*pos != '>' && *pos != '\0') | |
555 pos++; | |
556 if (*pos == '\0') | |
557 return (0); | |
558 } | |
559 } | |
560 pos++; | |
561 } | |
562 | |
102 | 563 if (*pos == '[') |
564 pos++; | |
1 | 565 |
102 | 566 fle->datetime = parse_time (pos, &pos); |
1 | 567 |
168 | 568 fle->user = g_strdup (_("<unknown>")); |
569 fle->group = g_strdup (_("<unknown>")); | |
570 | |
105 | 571 if (pos == NULL) |
572 return (1); | |
573 | |
1 | 574 while (*pos == ' ' || *pos == ']') |
575 pos++; | |
576 | |
577 /* Get the size */ | |
207 | 578 |
579 kpos = strchr (pos, 'k'); | |
580 mpos = strchr (pos, 'M'); | |
581 if (kpos == NULL) | |
582 stpos = mpos; | |
583 else if (mpos == NULL) | |
584 stpos = kpos; | |
585 else if (kpos < stpos) | |
586 stpos = kpos; | |
587 else | |
588 stpos = mpos; | |
589 | |
1 | 590 if (stpos == NULL || !isdigit (*(stpos - 1))) |
591 return (1); /* Return successfully | |
592 since we got the file */ | |
207 | 593 |
1 | 594 if (*stpos == 'k') |
595 units = 1024; | |
596 else | |
597 units = 1048576; | |
598 | |
599 fle->size = 0; | |
600 | |
601 while (*(stpos - 1) != ' ' && *(stpos - 1) != '\t' && stpos > tempstr) | |
602 { | |
603 stpos--; | |
207 | 604 if ((*stpos == '.') && isdigit (*(stpos + 1))) |
1 | 605 { /* found decimal point */ |
244 | 606 fle->size = units * gftp_parse_file_size (stpos + 1) / 10;; |
1 | 607 } |
608 } | |
609 | |
244 | 610 fle->size += units * gftp_parse_file_size (stpos); |
168 | 611 |
1 | 612 return (1); |
613 } | |
614 | |
615 | |
168 | 616 int |
58 | 617 rfc2068_get_next_file (gftp_request * request, gftp_file * fle, int fd) |
1 | 618 { |
48 | 619 rfc2068_params * params; |
219 | 620 char tempstr[8192]; |
168 | 621 ssize_t len; |
84 | 622 int ret; |
1 | 623 |
84 | 624 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
625 g_return_val_if_fail (request->protonum == GFTP_HTTP_NUM, GFTP_EFATAL); | |
626 g_return_val_if_fail (fle != NULL, GFTP_EFATAL); | |
48 | 627 |
628 params = request->protocol_data; | |
629 if (request->last_dir_entry) | |
630 { | |
631 g_free (request->last_dir_entry); | |
632 request->last_dir_entry = NULL; | |
633 } | |
634 | |
105 | 635 if (fd < 0) |
169 | 636 fd = request->datafd; |
105 | 637 |
48 | 638 while (1) |
639 { | |
168 | 640 if ((ret = gftp_get_line (request, ¶ms->rbuf, tempstr, sizeof (tempstr), fd)) <= 0) |
84 | 641 return (ret); |
1 | 642 |
48 | 643 if (parse_html_line (tempstr, fle) == 0 || fle->file == NULL) |
644 gftp_file_destroy (fle); | |
645 else | |
646 break; | |
647 } | |
648 | |
649 if (fle->file == NULL) | |
1 | 650 { |
48 | 651 gftp_file_destroy (fle); |
105 | 652 return (0); |
1 | 653 } |
654 | |
48 | 655 len = strlen (tempstr); |
656 if (!request->cached) | |
657 { | |
60 | 658 request->last_dir_entry = g_strdup_printf ("%s\n", tempstr); |
659 request->last_dir_entry_len = len + 1; | |
48 | 660 } |
219 | 661 |
58 | 662 return (len); |
48 | 663 } |
1 | 664 |
665 | |
48 | 666 static int |
667 rfc2068_chdir (gftp_request * request, const char *directory) | |
668 { | |
204 | 669 char *tempstr, *olddir; |
670 | |
84 | 671 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
672 g_return_val_if_fail (request->protonum == GFTP_HTTP_NUM, GFTP_EFATAL); | |
673 g_return_val_if_fail (directory != NULL, GFTP_EFATAL); | |
48 | 674 |
675 if (request->directory != directory) | |
676 { | |
204 | 677 olddir = request->directory; |
678 | |
219 | 679 if (*directory != '/' && request->directory != NULL) |
204 | 680 { |
681 tempstr = g_strconcat (request->directory, "/", directory, NULL); | |
682 request->directory = expand_path (tempstr); | |
683 g_free (tempstr); | |
684 } | |
685 else | |
686 request->directory = expand_path (directory); | |
687 | |
688 if (olddir != NULL) | |
689 g_free (olddir); | |
48 | 690 } |
691 return (0); | |
692 } | |
693 | |
694 | |
177 | 695 static int |
58 | 696 rfc2068_set_config_options (gftp_request * request) |
697 { | |
177 | 698 return (0); |
58 | 699 } |
700 | |
701 | |
87 | 702 static void |
703 rfc2068_destroy (gftp_request * request) | |
704 { | |
207 | 705 rfc2068_params * params; |
706 | |
707 params = request->protocol_data; | |
708 | |
87 | 709 if (request->url_prefix) |
710 { | |
711 g_free (request->url_prefix); | |
712 request->url_prefix = NULL; | |
713 } | |
207 | 714 |
715 if (params->rbuf != NULL) | |
716 gftp_free_getline_buffer (¶ms->rbuf); | |
717 | |
718 if (params->extra_read_buffer != NULL) | |
719 { | |
720 g_free (params->extra_read_buffer); | |
721 params->extra_read_buffer = NULL; | |
209 | 722 params->extra_read_buffer_len = 0; |
207 | 723 } |
87 | 724 } |
725 | |
726 | |
168 | 727 static ssize_t |
728 rfc2068_chunked_read (gftp_request * request, void *ptr, size_t size, int fd) | |
729 { | |
303 | 730 size_t read_size, begin_ptr_len, current_size, crlfsize; |
731 rfc2068_params * params; | |
215 | 732 char *stpos, *crlfpos; |
209 | 733 void *read_ptr_pos; |
168 | 734 ssize_t retval; |
735 | |
736 params = request->protocol_data; | |
303 | 737 params->read_ref_cnt++; |
168 | 738 |
207 | 739 if (params->extra_read_buffer != NULL) |
168 | 740 { |
209 | 741 g_return_val_if_fail (params->extra_read_buffer_len <= size, GFTP_EFATAL); |
742 | |
743 memcpy (ptr, params->extra_read_buffer, params->extra_read_buffer_len); | |
744 | |
745 begin_ptr_len = params->extra_read_buffer_len; | |
746 read_ptr_pos = (char *) ptr + begin_ptr_len; | |
747 | |
748 /* Check for end of chunk */ | |
749 if (begin_ptr_len > 5 && strncmp ("\r\n0\r\n", (char *) ptr, 5) == 0) | |
750 read_size = 0; | |
751 else | |
752 read_size = size - begin_ptr_len; | |
753 | |
754 g_free (params->extra_read_buffer); | |
755 params->extra_read_buffer = NULL; | |
756 params->extra_read_buffer_len = 0; | |
207 | 757 } |
758 else | |
759 { | |
209 | 760 begin_ptr_len = 0; |
761 read_ptr_pos = ptr; | |
762 | |
207 | 763 read_size = size; |
764 if (params->content_length > 0) | |
765 { | |
766 if (params->content_length == params->read_bytes) | |
303 | 767 { |
768 params->read_ref_cnt--; | |
769 return (0); | |
770 } | |
168 | 771 |
207 | 772 if (read_size + params->read_bytes > params->content_length) |
773 read_size = params->content_length - params->read_bytes; | |
774 } | |
775 else if (params->chunked_transfer && params->chunk_size > 0 && | |
776 params->chunk_size < read_size) | |
777 read_size = params->chunk_size; | |
168 | 778 } |
779 | |
209 | 780 if (read_size > 0 && !params->eof) |
781 { | |
293 | 782 if (size == read_size) |
783 read_size--; /* decrement by one so that we can put the NUL character | |
784 in the buffer */ | |
785 | |
303 | 786 retval = params->real_read_function (request, read_ptr_pos, read_size, |
787 fd); | |
209 | 788 |
303 | 789 if (retval <= 0) |
790 { | |
791 params->read_ref_cnt--; | |
792 return (retval); | |
793 } | |
794 else if (retval > 0) | |
209 | 795 params->read_bytes += retval; |
796 | |
303 | 797 if (params->chunk_size > 0) |
209 | 798 { |
799 params->chunk_size -= retval; | |
303 | 800 params->read_ref_cnt--; |
209 | 801 return (retval); |
802 } | |
803 | |
804 retval += begin_ptr_len; | |
805 } | |
806 else | |
807 retval = begin_ptr_len; | |
168 | 808 |
215 | 809 ((char *) ptr)[retval] = '\0'; |
810 | |
303 | 811 if (!params->chunked_transfer) |
812 { | |
813 params->read_ref_cnt--; | |
814 return (retval); | |
815 } | |
168 | 816 |
209 | 817 stpos = (char *) ptr; |
818 while (params->chunk_size == 0) | |
168 | 819 { |
215 | 820 current_size = retval - (stpos - (char *) ptr); |
303 | 821 if (current_size == 0) |
822 break; | |
823 | |
824 if (*stpos == '\r' && *(stpos + 1) == '\n') | |
825 crlfpos = strstr (stpos + 2, "\r\n"); | |
826 else | |
827 crlfpos = NULL; | |
828 | |
829 if (crlfpos == NULL) | |
215 | 830 { |
831 /* The current chunk size is split between multiple packets. | |
832 Save this chunk and read the next */ | |
833 | |
834 params->extra_read_buffer = g_malloc (current_size + 1); | |
835 memcpy (params->extra_read_buffer, stpos, current_size); | |
836 params->extra_read_buffer[current_size] = '\0'; | |
837 params->extra_read_buffer_len = current_size; | |
838 retval -= current_size; | |
839 | |
840 if (retval == 0) | |
303 | 841 { |
842 /* Don't let a hostile web server send us in an infinite recursive | |
843 loop */ | |
215 | 844 |
303 | 845 if (params->read_ref_cnt > 2) |
846 { | |
847 request->logging_function (gftp_logging_error, request, _("Received wrong response from server, disconnecting\n")); | |
848 gftp_disconnect (request); | |
849 params->read_ref_cnt--; | |
850 return (GFTP_EFATAL); | |
851 } | |
209 | 852 |
303 | 853 retval = rfc2068_chunked_read (request, ptr, size, fd); |
854 } | |
855 | |
856 params->read_ref_cnt--; | |
857 return (retval); | |
209 | 858 } |
168 | 859 |
215 | 860 *crlfpos = '\0'; |
861 crlfpos++; /* advance to line feed */ | |
209 | 862 |
863 if (sscanf (stpos + 2, "%lx", ¶ms->chunk_size) != 1) | |
864 { | |
865 request->logging_function (gftp_logging_recv, request, | |
866 _("Received wrong response from server, disconnecting\nInvalid chunk size '%s' returned by the remote server\n"), | |
867 stpos + 2); | |
868 gftp_disconnect (request); | |
303 | 869 params->read_ref_cnt--; |
209 | 870 return (GFTP_EFATAL); |
871 } | |
872 | |
303 | 873 crlfsize = crlfpos - (char *) stpos + 1; |
874 retval -= crlfsize; | |
875 current_size -= crlfsize; | |
215 | 876 |
209 | 877 if (params->chunk_size == 0) |
878 { | |
879 if (params->eof) | |
303 | 880 { |
881 params->read_ref_cnt--; | |
882 return (0); | |
883 } | |
209 | 884 |
885 params->eof = 1; | |
303 | 886 params->read_ref_cnt--; |
209 | 887 return (retval); |
888 } | |
889 | |
303 | 890 memmove (stpos, crlfpos + 1, current_size + 1); |
209 | 891 |
303 | 892 if (params->chunk_size < current_size) |
209 | 893 { |
303 | 894 stpos += params->chunk_size; |
209 | 895 params->chunk_size = 0; |
168 | 896 } |
303 | 897 else |
898 params->chunk_size -= current_size; | |
168 | 899 } |
900 | |
303 | 901 params->read_ref_cnt--; |
168 | 902 return (retval); |
903 } | |
904 | |
905 | |
122 | 906 void |
907 rfc2068_register_module (void) | |
908 { | |
909 gftp_register_config_vars (config_vars); | |
910 } | |
911 | |
912 | |
173 | 913 int |
48 | 914 rfc2068_init (gftp_request * request) |
915 { | |
168 | 916 rfc2068_params * params; |
917 | |
173 | 918 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
1 | 919 |
48 | 920 request->protonum = GFTP_HTTP_NUM; |
921 request->init = rfc2068_init; | |
309 | 922 request->copy_param_options = NULL; |
168 | 923 request->read_function = rfc2068_chunked_read; |
924 request->write_function = gftp_fd_write; | |
87 | 925 request->destroy = rfc2068_destroy; |
48 | 926 request->connect = rfc2068_connect; |
168 | 927 request->post_connect = NULL; |
48 | 928 request->disconnect = rfc2068_disconnect; |
929 request->get_file = rfc2068_get_file; | |
930 request->put_file = NULL; | |
931 request->transfer_file = NULL; | |
932 request->get_next_file_chunk = rfc2068_get_next_file_chunk; | |
933 request->put_next_file_chunk = NULL; | |
934 request->end_transfer = rfc2068_end_transfer; | |
935 request->abort_transfer = rfc2068_end_transfer; /* NOTE: uses end_transfer */ | |
936 request->list_files = rfc2068_list_files; | |
937 request->get_next_file = rfc2068_get_next_file; | |
938 request->get_file_size = rfc2068_get_file_size; | |
939 request->chdir = rfc2068_chdir; | |
940 request->rmdir = NULL; | |
941 request->rmfile = NULL; | |
942 request->mkdir = NULL; | |
943 request->rename = NULL; | |
944 request->chmod = NULL; | |
945 request->site = NULL; | |
58 | 946 request->parse_url = NULL; |
63 | 947 request->swap_socks = NULL; |
58 | 948 request->set_config_options = rfc2068_set_config_options; |
87 | 949 request->url_prefix = g_strdup ("http"); |
48 | 950 request->need_hostport = 1; |
951 request->need_userpass = 0; | |
952 request->use_cache = 1; | |
105 | 953 request->always_connected = 1; |
168 | 954 |
48 | 955 request->protocol_data = g_malloc0 (sizeof (rfc2068_params)); |
168 | 956 params = request->protocol_data; |
957 params->real_read_function = gftp_fd_read; | |
958 | |
177 | 959 return (gftp_set_config_options (request)); |
48 | 960 } |
1 | 961 |