Mercurial > gftp.yaz
annotate lib/rfc2068.c @ 521:739afd9df73c
2004-7-27 Brian Masney <masneyb@gftp.org>
* lib/rfc959.c src/gtk/misc-gtk.c src/gtk/view_dialog.c - fixed more
comparsions between signed and unsigned integers
* lib/sshv2.c (sshv2_buffer_get_int32) - allow an expected response
value of 0. If it does not match, call sshv2_wrong_response().
SSH_FX_OK is set to 0, so this value was not being checked
* src/gtk/gtkui.c src/text/textui.c src/uicommon/gftpui.h - renamed the
clear_cache argument of gftpui_refresh() to clear_cache_entry. There is
already a function named clear_cache()
author | masneyb |
---|---|
date | Wed, 28 Jul 2004 02:47:25 +0000 |
parents | c6a6e908dbaf |
children | bccfdbfaac00 |
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; | |
325 | 56 intptr_t proxy_port; |
57 int ret; | |
219 | 58 |
59 g_return_val_if_fail (request != NULL, GFTP_EFATAL); | |
60 g_return_val_if_fail (request->hostname != NULL, GFTP_EFATAL); | |
61 | |
62 if (request->datafd > 0) | |
63 return (0); | |
64 | |
65 gftp_lookup_request_option (request, "proxy_config", &proxy_config); | |
66 gftp_lookup_request_option (request, "http_proxy_host", &proxy_hostname); | |
67 gftp_lookup_request_option (request, "http_proxy_port", &proxy_port); | |
68 | |
69 if (proxy_config != NULL && strcmp (proxy_config, "ftp") == 0) | |
70 { | |
71 g_free (request->url_prefix); | |
72 request->url_prefix = g_strdup ("ftp"); | |
73 } | |
74 | |
75 if ((ret = gftp_connect_server (request, request->url_prefix, proxy_hostname, | |
76 proxy_port)) < 0) | |
77 return (ret); | |
78 | |
79 if (request->directory && *request->directory == '\0') | |
80 { | |
81 g_free (request->directory); | |
82 request->directory = NULL; | |
83 } | |
84 | |
85 if (!request->directory) | |
86 request->directory = g_strdup ("/"); | |
87 | |
88 return (0); | |
89 } | |
90 | |
91 | |
58 | 92 static off_t |
48 | 93 rfc2068_read_response (gftp_request * request) |
94 { | |
95 rfc2068_params * params; | |
207 | 96 char tempstr[8192]; |
168 | 97 int ret, chunked; |
48 | 98 |
99 params = request->protocol_data; | |
209 | 100 *tempstr = '\0'; |
168 | 101 chunked = 0; |
102 params->chunk_size = 0; | |
103 params->content_length = 0; | |
209 | 104 params->eof = 0; |
207 | 105 |
105 | 106 if (request->last_ftp_response) |
107 { | |
108 g_free (request->last_ftp_response); | |
109 request->last_ftp_response = NULL; | |
110 } | |
48 | 111 |
207 | 112 if (params->extra_read_buffer != NULL) |
113 { | |
114 g_free (params->extra_read_buffer); | |
115 params->extra_read_buffer = NULL; | |
209 | 116 params->extra_read_buffer_len = 0; |
207 | 117 } |
118 | |
105 | 119 do |
120 { | |
168 | 121 if ((ret = gftp_get_line (request, ¶ms->rbuf, tempstr, |
169 | 122 sizeof (tempstr), request->datafd)) < 0) |
105 | 123 return (ret); |
48 | 124 |
105 | 125 if (request->last_ftp_response == NULL) |
126 request->last_ftp_response = g_strdup (tempstr); | |
127 | |
128 if (*tempstr != '\0') | |
129 { | |
186 | 130 request->logging_function (gftp_logging_recv, request, "%s\n", |
105 | 131 tempstr); |
48 | 132 |
105 | 133 if (strncmp (tempstr, "Content-Length:", 15) == 0) |
244 | 134 params->content_length = gftp_parse_file_size (tempstr + 16); |
168 | 135 else if (strcmp (tempstr, "Transfer-Encoding: chunked") == 0) |
136 chunked = 1; | |
105 | 137 } |
48 | 138 } |
105 | 139 while (*tempstr != '\0'); |
48 | 140 |
168 | 141 if (chunked) |
142 { | |
143 if ((ret = gftp_get_line (request, ¶ms->rbuf, tempstr, | |
169 | 144 sizeof (tempstr), request->datafd)) < 0) |
168 | 145 return (ret); |
146 | |
516 | 147 #ifdef _LARGEFILE_SOURCE |
148 ret = sscanf (tempstr, "%llx", ¶ms->chunk_size); | |
149 #else | |
150 ret = sscanf (tempstr, "%lx", ¶ms->chunk_size); | |
151 #endif | |
152 | |
153 if (ret != 1) | |
168 | 154 { |
186 | 155 request->logging_function (gftp_logging_recv, request, |
209 | 156 _("Received wrong response from server, disconnecting\nInvalid chunk size '%s' returned by the remote server\n"), |
157 tempstr); | |
168 | 158 gftp_disconnect (request); |
159 return (GFTP_EFATAL); | |
160 } | |
161 | |
162 if (params->chunk_size == 0) | |
163 return (0); | |
164 | |
165 params->chunk_size -= params->rbuf->cur_bufsize; | |
166 if (params->chunk_size < 0) | |
167 { | |
207 | 168 params->extra_read_buffer_len = params->chunk_size * -1; |
209 | 169 params->chunk_size = 0; |
207 | 170 params->extra_read_buffer = g_malloc (params->extra_read_buffer_len + 1); |
171 memcpy (params->extra_read_buffer, params->rbuf->curpos + (params->rbuf->cur_bufsize - params->extra_read_buffer_len), params->extra_read_buffer_len); | |
172 params->extra_read_buffer[params->extra_read_buffer_len] = '\0'; | |
173 params->rbuf->cur_bufsize -= params->extra_read_buffer_len; | |
209 | 174 params->rbuf->curpos[params->rbuf->cur_bufsize] = '\0'; |
168 | 175 } |
176 } | |
177 | |
178 params->chunked_transfer = chunked; | |
179 return (params->content_length > 0 ? params->content_length : params->chunk_size); | |
48 | 180 } |
181 | |
182 | |
58 | 183 static off_t |
168 | 184 rfc2068_send_command (gftp_request * request, const void *command, size_t len) |
48 | 185 { |
122 | 186 char *tempstr, *str, *proxy_hostname, *proxy_username, *proxy_password; |
325 | 187 intptr_t proxy_port; |
188 int conn_ret; | |
58 | 189 ssize_t ret; |
48 | 190 |
84 | 191 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
192 g_return_val_if_fail (command != NULL, GFTP_EFATAL); | |
48 | 193 |
219 | 194 if (request->datafd < 0 && (conn_ret = rfc2068_connect (request)) != 0) |
195 return (conn_ret); | |
196 | |
168 | 197 tempstr = g_strdup_printf ("%sUser-Agent: %s\nHost: %s\n", (char *) command, |
122 | 198 gftp_version, request->hostname); |
48 | 199 |
186 | 200 request->logging_function (gftp_logging_send, request, |
58 | 201 "%s", tempstr); |
202 | |
168 | 203 ret = request->write_function (request, tempstr, strlen (tempstr), |
169 | 204 request->datafd); |
58 | 205 g_free (tempstr); |
206 | |
207 if (ret < 0) | |
84 | 208 return (ret); |
48 | 209 |
122 | 210 gftp_lookup_request_option (request, "http_proxy_host", &proxy_hostname); |
211 gftp_lookup_request_option (request, "http_proxy_port", &proxy_port); | |
212 gftp_lookup_request_option (request, "http_proxy_username", &proxy_username); | |
213 gftp_lookup_request_option (request, "http_proxy_password", &proxy_password); | |
214 | |
215 if (request->use_proxy && proxy_username != NULL && *proxy_username != '\0') | |
48 | 216 { |
122 | 217 tempstr = g_strconcat (proxy_username, ":", proxy_password, NULL); |
48 | 218 str = base64_encode (tempstr); |
219 g_free (tempstr); | |
220 | |
186 | 221 request->logging_function (gftp_logging_send, request, |
48 | 222 "Proxy-authorization: Basic xxxx:xxxx\n"); |
169 | 223 ret = gftp_writefmt (request, request->datafd, |
58 | 224 "Proxy-authorization: Basic %s\n", str); |
48 | 225 g_free (str); |
58 | 226 if (ret < 0) |
168 | 227 return (ret); |
48 | 228 } |
229 | |
230 if (request->username != NULL && *request->username != '\0') | |
231 { | |
232 tempstr = g_strconcat (request->username, ":", request->password, NULL); | |
233 str = base64_encode (tempstr); | |
234 g_free (tempstr); | |
235 | |
186 | 236 request->logging_function (gftp_logging_send, request, |
48 | 237 "Authorization: Basic xxxx\n"); |
169 | 238 ret = gftp_writefmt (request, request->datafd, |
58 | 239 "Authorization: Basic %s\n", str); |
48 | 240 g_free (str); |
58 | 241 if (ret < 0) |
84 | 242 return (ret); |
48 | 243 } |
244 | |
169 | 245 if ((ret = request->write_function (request, "\n", 1, request->datafd)) < 0) |
84 | 246 return (ret); |
58 | 247 |
48 | 248 return (rfc2068_read_response (request)); |
1 | 249 } |
250 | |
251 | |
252 static void | |
253 rfc2068_disconnect (gftp_request * request) | |
254 { | |
255 g_return_if_fail (request != NULL); | |
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; |
460 | 278 rfc2068_params * params; |
325 | 279 intptr_t use_http11; |
460 | 280 int restarted; |
281 size_t len; | |
1 | 282 off_t size; |
283 | |
84 | 284 g_return_val_if_fail (request != NULL, 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"), |
518 | 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; | |
460 | 333 len = strlen (request->last_ftp_response); |
334 if (len > 9 && strncmp (request->last_ftp_response + 9, "206", 3) == 0) | |
1 | 335 restarted = 1; |
460 | 336 else if (len < 9 || strncmp (request->last_ftp_response + 9, "200", 3) != 0) |
1 | 337 { |
186 | 338 request->logging_function (gftp_logging_error, request, |
1 | 339 _("Cannot retrieve file %s\n"), filename); |
84 | 340 return (GFTP_ERETRYABLE); |
1 | 341 } |
342 | |
168 | 343 params->read_bytes = 0; |
344 | |
1 | 345 return (restarted ? size + startsize : size); |
346 } | |
347 | |
348 | |
58 | 349 static ssize_t |
1 | 350 rfc2068_get_next_file_chunk (gftp_request * request, char *buf, size_t size) |
351 { | |
352 rfc2068_params * params; | |
353 size_t len; | |
354 | |
84 | 355 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
1 | 356 |
357 params = request->protocol_data; | |
304 | 358 if (params->rbuf != NULL && params->rbuf->curpos != NULL) |
359 { | |
360 len = params->rbuf->cur_bufsize > size ? size : params->rbuf->cur_bufsize; | |
361 memcpy (buf, params->rbuf->curpos, len); | |
1 | 362 |
304 | 363 if (len == params->rbuf->cur_bufsize) |
364 gftp_free_getline_buffer (¶ms->rbuf); | |
365 else | |
366 { | |
367 params->rbuf->curpos += len; | |
368 params->rbuf->cur_bufsize -= len; | |
369 } | |
1 | 370 |
304 | 371 return (len); |
372 } | |
373 | |
374 return (request->read_function (request, buf, size, request->datafd)); | |
1 | 375 } |
376 | |
377 | |
378 static int | |
379 rfc2068_end_transfer (gftp_request * request) | |
380 { | |
381 rfc2068_params * params; | |
382 | |
84 | 383 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
1 | 384 |
169 | 385 if (request->datafd < 0) |
84 | 386 return (GFTP_EFATAL); |
1 | 387 |
207 | 388 gftp_disconnect (request); |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
389 |
1 | 390 params = request->protocol_data; |
168 | 391 params->content_length = 0; |
392 params->chunked_transfer = 0; | |
393 params->chunk_size = 0; | |
209 | 394 params->eof = 0; |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
7
diff
changeset
|
395 |
1 | 396 return (0); |
397 } | |
398 | |
399 | |
400 static int | |
401 rfc2068_list_files (gftp_request * request) | |
402 { | |
403 rfc2068_params *params; | |
303 | 404 char *tempstr, *hd; |
325 | 405 intptr_t use_http11; |
58 | 406 off_t ret; |
1 | 407 |
84 | 408 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
1 | 409 |
410 params = request->protocol_data; | |
122 | 411 gftp_lookup_request_option (request, "use_http11", &use_http11); |
412 | |
369 | 413 if (strncmp (request->directory, "/", strlen (request->directory)) == 0) |
414 hd = g_strdup (request->hostname); | |
415 else | |
416 hd = gftp_build_path (request->hostname, request->directory, NULL); | |
303 | 417 |
7 | 418 if (request->username == NULL || *request->username == '\0') |
303 | 419 tempstr = g_strconcat ("GET ", request->url_prefix, "://", hd, |
1 | 420 use_http11 ? "/ HTTP/1.1\n" : "/ HTTP/1.0\n", NULL); |
421 else | |
122 | 422 tempstr = g_strconcat ("GET ", request->url_prefix, "://", |
303 | 423 request->username, "@", hd, |
1 | 424 use_http11 ? "/ HTTP/1.1\n" : "/ HTTP/1.0\n", NULL); |
425 | |
303 | 426 g_free (hd); |
1 | 427 |
168 | 428 ret = rfc2068_send_command (request, tempstr, strlen (tempstr)); |
1 | 429 g_free (tempstr); |
58 | 430 if (ret < 0) |
84 | 431 return ((int) ret); |
1 | 432 |
433 params->read_bytes = 0; | |
434 if (strlen (request->last_ftp_response) > 9 && | |
435 strncmp (request->last_ftp_response + 9, "200", 3) == 0) | |
436 { | |
186 | 437 request->logging_function (gftp_logging_misc, request, |
1 | 438 _("Retrieving directory listing...\n")); |
439 return (0); | |
440 } | |
168 | 441 |
207 | 442 gftp_end_transfer (request); |
443 | |
84 | 444 return (GFTP_ERETRYABLE); |
1 | 445 } |
446 | |
447 | |
448 static off_t | |
449 rfc2068_get_file_size (gftp_request * request, const char *filename) | |
450 { | |
303 | 451 char *tempstr, *hf; |
325 | 452 intptr_t use_http11; |
58 | 453 off_t size; |
1 | 454 |
84 | 455 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
456 g_return_val_if_fail (filename != NULL, GFTP_EFATAL); | |
1 | 457 |
122 | 458 gftp_lookup_request_option (request, "use_http11", &use_http11); |
459 | |
303 | 460 hf = gftp_build_path (request->hostname, filename, NULL); |
461 | |
7 | 462 if (request->username == NULL || *request->username == '\0') |
303 | 463 tempstr = g_strconcat ("HEAD ", request->url_prefix, "://", hf, |
1 | 464 use_http11 ? " HTTP/1.1\n" : " HTTP/1.0\n", NULL); |
465 else | |
219 | 466 tempstr = g_strconcat ("HEAD ", request->url_prefix, "://", |
303 | 467 request->username, "@", hf, |
1 | 468 use_http11 ? " HTTP/1.1\n" : " HTTP/1.0\n", NULL); |
469 | |
303 | 470 g_free (hf); |
1 | 471 |
168 | 472 size = rfc2068_send_command (request, tempstr, strlen (tempstr)); |
1 | 473 g_free (tempstr); |
474 return (size); | |
475 } | |
476 | |
477 | |
478 static int | |
479 parse_html_line (char *tempstr, gftp_file * fle) | |
480 { | |
207 | 481 char *stpos, *kpos, *mpos, *pos; |
1 | 482 long units; |
483 | |
484 memset (fle, 0, sizeof (*fle)); | |
485 | |
486 if ((pos = strstr (tempstr, "<A HREF=")) == NULL && | |
487 (pos = strstr (tempstr, "<a href=")) == NULL) | |
488 return (0); | |
489 | |
490 /* Find the filename */ | |
491 while (*pos != '"' && *pos != '\0') | |
492 pos++; | |
493 if (*pos == '\0') | |
494 return (0); | |
495 pos++; | |
496 | |
497 for (stpos = pos; *pos != '"' && *pos != '\0'; pos++); | |
498 if (*pos == '\0') | |
499 return (0); | |
500 *pos = '\0'; | |
501 | |
502 /* Copy file attributes. Just about the only thing we can get is whether it | |
503 is a directory or not */ | |
504 if (*(pos - 1) == '/') | |
505 { | |
499 | 506 fle->st_mode = S_IFDIR | S_IRUSR | S_IWUSR | S_IXUSR | S_IRGRP | S_IXGRP | S_IROTH | S_IXOTH; |
1 | 507 *(pos - 1) = '\0'; |
508 } | |
336 | 509 else |
499 | 510 fle->st_mode = S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH; |
1 | 511 |
512 /* Copy filename */ | |
513 if (strchr (stpos, '/') != NULL || strncmp (stpos, "mailto:", 7) == 0 || | |
514 *stpos == '\0' || *stpos == '?') | |
515 return (0); | |
516 | |
105 | 517 fle->file = g_strdup (stpos); |
1 | 518 |
519 if (*(pos - 1) == '\0') | |
520 *(pos - 1) = '/'; | |
521 *pos = '"'; | |
522 pos++; | |
523 | |
524 /* Skip whitespace and html tags after file and before date */ | |
525 stpos = pos; | |
526 if ((pos = strstr (stpos, "</A>")) == NULL && | |
527 (pos = strstr (stpos, "</a>")) == NULL) | |
528 return (0); | |
529 | |
530 pos += 4; | |
531 | |
105 | 532 while (*pos == ' ' || *pos == '\t' || *pos == '.' || *pos == '<') |
1 | 533 { |
534 if (*pos == '<') | |
535 { | |
536 if (strncmp (pos, "<A ", 3) == 0 || strncmp (pos, "<a ", 3) == 0) | |
537 { | |
538 stpos = pos; | |
539 if ((pos = strstr (stpos, "</A>")) == NULL | |
540 && (pos = strstr (stpos, "</a>")) == NULL) | |
541 return (0); | |
542 pos += 4; | |
543 } | |
544 else | |
545 { | |
546 while (*pos != '>' && *pos != '\0') | |
547 pos++; | |
548 if (*pos == '\0') | |
549 return (0); | |
550 } | |
551 } | |
552 pos++; | |
553 } | |
554 | |
102 | 555 if (*pos == '[') |
556 pos++; | |
1 | 557 |
102 | 558 fle->datetime = parse_time (pos, &pos); |
1 | 559 |
168 | 560 fle->user = g_strdup (_("<unknown>")); |
561 fle->group = g_strdup (_("<unknown>")); | |
562 | |
105 | 563 if (pos == NULL) |
564 return (1); | |
565 | |
1 | 566 while (*pos == ' ' || *pos == ']') |
567 pos++; | |
568 | |
569 /* Get the size */ | |
207 | 570 |
571 kpos = strchr (pos, 'k'); | |
572 mpos = strchr (pos, 'M'); | |
427 | 573 |
574 if (kpos != NULL && (mpos == NULL || (kpos < mpos))) | |
207 | 575 stpos = kpos; |
576 else | |
577 stpos = mpos; | |
578 | |
1 | 579 if (stpos == NULL || !isdigit (*(stpos - 1))) |
580 return (1); /* Return successfully | |
581 since we got the file */ | |
207 | 582 |
1 | 583 if (*stpos == 'k') |
584 units = 1024; | |
585 else | |
586 units = 1048576; | |
587 | |
588 fle->size = 0; | |
589 | |
590 while (*(stpos - 1) != ' ' && *(stpos - 1) != '\t' && stpos > tempstr) | |
591 { | |
592 stpos--; | |
207 | 593 if ((*stpos == '.') && isdigit (*(stpos + 1))) |
1 | 594 { /* found decimal point */ |
244 | 595 fle->size = units * gftp_parse_file_size (stpos + 1) / 10;; |
1 | 596 } |
597 } | |
598 | |
244 | 599 fle->size += units * gftp_parse_file_size (stpos); |
168 | 600 |
1 | 601 return (1); |
602 } | |
603 | |
604 | |
168 | 605 int |
58 | 606 rfc2068_get_next_file (gftp_request * request, gftp_file * fle, int fd) |
1 | 607 { |
48 | 608 rfc2068_params * params; |
219 | 609 char tempstr[8192]; |
518 | 610 size_t len; |
84 | 611 int ret; |
1 | 612 |
84 | 613 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
614 g_return_val_if_fail (fle != NULL, GFTP_EFATAL); | |
48 | 615 |
616 params = request->protocol_data; | |
617 if (request->last_dir_entry) | |
618 { | |
619 g_free (request->last_dir_entry); | |
620 request->last_dir_entry = NULL; | |
621 } | |
622 | |
105 | 623 if (fd < 0) |
169 | 624 fd = request->datafd; |
105 | 625 |
48 | 626 while (1) |
627 { | |
168 | 628 if ((ret = gftp_get_line (request, ¶ms->rbuf, tempstr, sizeof (tempstr), fd)) <= 0) |
84 | 629 return (ret); |
1 | 630 |
48 | 631 if (parse_html_line (tempstr, fle) == 0 || fle->file == NULL) |
632 gftp_file_destroy (fle); | |
633 else | |
634 break; | |
635 } | |
636 | |
637 if (fle->file == NULL) | |
1 | 638 { |
48 | 639 gftp_file_destroy (fle); |
105 | 640 return (0); |
1 | 641 } |
642 | |
48 | 643 len = strlen (tempstr); |
644 if (!request->cached) | |
645 { | |
60 | 646 request->last_dir_entry = g_strdup_printf ("%s\n", tempstr); |
647 request->last_dir_entry_len = len + 1; | |
48 | 648 } |
219 | 649 |
58 | 650 return (len); |
48 | 651 } |
1 | 652 |
653 | |
48 | 654 static int |
655 rfc2068_chdir (gftp_request * request, const char *directory) | |
656 { | |
204 | 657 char *tempstr, *olddir; |
658 | |
84 | 659 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
660 g_return_val_if_fail (directory != NULL, GFTP_EFATAL); | |
48 | 661 |
662 if (request->directory != directory) | |
663 { | |
204 | 664 olddir = request->directory; |
665 | |
219 | 666 if (*directory != '/' && request->directory != NULL) |
204 | 667 { |
668 tempstr = g_strconcat (request->directory, "/", directory, NULL); | |
669 request->directory = expand_path (tempstr); | |
670 g_free (tempstr); | |
671 } | |
672 else | |
673 request->directory = expand_path (directory); | |
674 | |
675 if (olddir != NULL) | |
676 g_free (olddir); | |
48 | 677 } |
678 return (0); | |
679 } | |
680 | |
681 | |
177 | 682 static int |
58 | 683 rfc2068_set_config_options (gftp_request * request) |
684 { | |
177 | 685 return (0); |
58 | 686 } |
687 | |
688 | |
87 | 689 static void |
690 rfc2068_destroy (gftp_request * request) | |
691 { | |
207 | 692 rfc2068_params * params; |
693 | |
694 params = request->protocol_data; | |
695 | |
87 | 696 if (request->url_prefix) |
697 { | |
698 g_free (request->url_prefix); | |
699 request->url_prefix = NULL; | |
700 } | |
207 | 701 |
702 if (params->rbuf != NULL) | |
703 gftp_free_getline_buffer (¶ms->rbuf); | |
704 | |
705 if (params->extra_read_buffer != NULL) | |
706 { | |
707 g_free (params->extra_read_buffer); | |
708 params->extra_read_buffer = NULL; | |
209 | 709 params->extra_read_buffer_len = 0; |
207 | 710 } |
87 | 711 } |
712 | |
713 | |
168 | 714 static ssize_t |
715 rfc2068_chunked_read (gftp_request * request, void *ptr, size_t size, int fd) | |
716 { | |
303 | 717 size_t read_size, begin_ptr_len, current_size, crlfsize; |
718 rfc2068_params * params; | |
215 | 719 char *stpos, *crlfpos; |
209 | 720 void *read_ptr_pos; |
168 | 721 ssize_t retval; |
516 | 722 size_t sret; |
723 int ret; | |
168 | 724 |
725 params = request->protocol_data; | |
303 | 726 params->read_ref_cnt++; |
168 | 727 |
207 | 728 if (params->extra_read_buffer != NULL) |
168 | 729 { |
209 | 730 g_return_val_if_fail (params->extra_read_buffer_len <= size, GFTP_EFATAL); |
731 | |
732 memcpy (ptr, params->extra_read_buffer, params->extra_read_buffer_len); | |
733 | |
734 begin_ptr_len = params->extra_read_buffer_len; | |
735 read_ptr_pos = (char *) ptr + begin_ptr_len; | |
736 | |
737 /* Check for end of chunk */ | |
738 if (begin_ptr_len > 5 && strncmp ("\r\n0\r\n", (char *) ptr, 5) == 0) | |
739 read_size = 0; | |
740 else | |
741 read_size = size - begin_ptr_len; | |
742 | |
743 g_free (params->extra_read_buffer); | |
744 params->extra_read_buffer = NULL; | |
745 params->extra_read_buffer_len = 0; | |
207 | 746 } |
747 else | |
748 { | |
209 | 749 begin_ptr_len = 0; |
750 read_ptr_pos = ptr; | |
751 | |
207 | 752 read_size = size; |
753 if (params->content_length > 0) | |
754 { | |
755 if (params->content_length == params->read_bytes) | |
303 | 756 { |
757 params->read_ref_cnt--; | |
758 return (0); | |
759 } | |
168 | 760 |
207 | 761 if (read_size + params->read_bytes > params->content_length) |
762 read_size = params->content_length - params->read_bytes; | |
763 } | |
764 else if (params->chunked_transfer && params->chunk_size > 0 && | |
765 params->chunk_size < read_size) | |
766 read_size = params->chunk_size; | |
168 | 767 } |
768 | |
209 | 769 if (read_size > 0 && !params->eof) |
770 { | |
293 | 771 if (size == read_size) |
772 read_size--; /* decrement by one so that we can put the NUL character | |
773 in the buffer */ | |
774 | |
303 | 775 retval = params->real_read_function (request, read_ptr_pos, read_size, |
776 fd); | |
209 | 777 |
303 | 778 if (retval <= 0) |
779 { | |
780 params->read_ref_cnt--; | |
781 return (retval); | |
782 } | |
209 | 783 |
516 | 784 params->read_bytes += retval; |
303 | 785 if (params->chunk_size > 0) |
209 | 786 { |
787 params->chunk_size -= retval; | |
303 | 788 params->read_ref_cnt--; |
209 | 789 return (retval); |
790 } | |
791 | |
516 | 792 sret = retval + begin_ptr_len; |
209 | 793 } |
794 else | |
516 | 795 sret = begin_ptr_len; |
168 | 796 |
516 | 797 ((char *) ptr)[sret] = '\0'; |
215 | 798 |
303 | 799 if (!params->chunked_transfer) |
800 { | |
801 params->read_ref_cnt--; | |
516 | 802 return (sret); |
303 | 803 } |
168 | 804 |
209 | 805 stpos = (char *) ptr; |
806 while (params->chunk_size == 0) | |
168 | 807 { |
516 | 808 current_size = sret - (stpos - (char *) ptr); |
303 | 809 if (current_size == 0) |
810 break; | |
811 | |
812 if (*stpos == '\r' && *(stpos + 1) == '\n') | |
813 crlfpos = strstr (stpos + 2, "\r\n"); | |
814 else | |
815 crlfpos = NULL; | |
816 | |
817 if (crlfpos == NULL) | |
215 | 818 { |
819 /* The current chunk size is split between multiple packets. | |
820 Save this chunk and read the next */ | |
821 | |
822 params->extra_read_buffer = g_malloc (current_size + 1); | |
823 memcpy (params->extra_read_buffer, stpos, current_size); | |
824 params->extra_read_buffer[current_size] = '\0'; | |
825 params->extra_read_buffer_len = current_size; | |
516 | 826 sret -= current_size; |
215 | 827 |
516 | 828 if (sret == 0) |
303 | 829 { |
830 /* Don't let a hostile web server send us in an infinite recursive | |
831 loop */ | |
215 | 832 |
303 | 833 if (params->read_ref_cnt > 2) |
834 { | |
835 request->logging_function (gftp_logging_error, request, _("Received wrong response from server, disconnecting\n")); | |
836 gftp_disconnect (request); | |
837 params->read_ref_cnt--; | |
838 return (GFTP_EFATAL); | |
839 } | |
209 | 840 |
303 | 841 retval = rfc2068_chunked_read (request, ptr, size, fd); |
516 | 842 if (retval < 0) |
843 return (retval); | |
844 | |
845 sret = retval; | |
303 | 846 } |
847 | |
848 params->read_ref_cnt--; | |
516 | 849 return (sret); |
209 | 850 } |
168 | 851 |
215 | 852 *crlfpos = '\0'; |
853 crlfpos++; /* advance to line feed */ | |
209 | 854 |
516 | 855 #ifdef _LARGEFILE_SOURCE |
856 ret = sscanf (stpos + 2, "%llx", ¶ms->chunk_size); | |
857 #else | |
858 ret = sscanf (stpos + 2, "%lx", ¶ms->chunk_size); | |
859 #endif | |
860 | |
861 if (ret != 1) | |
209 | 862 { |
863 request->logging_function (gftp_logging_recv, request, | |
864 _("Received wrong response from server, disconnecting\nInvalid chunk size '%s' returned by the remote server\n"), | |
865 stpos + 2); | |
866 gftp_disconnect (request); | |
303 | 867 params->read_ref_cnt--; |
209 | 868 return (GFTP_EFATAL); |
869 } | |
870 | |
516 | 871 crlfsize = crlfpos - stpos + 1; |
872 sret -= crlfsize; | |
303 | 873 current_size -= crlfsize; |
215 | 874 |
209 | 875 if (params->chunk_size == 0) |
876 { | |
877 if (params->eof) | |
303 | 878 { |
879 params->read_ref_cnt--; | |
880 return (0); | |
881 } | |
209 | 882 |
883 params->eof = 1; | |
303 | 884 params->read_ref_cnt--; |
516 | 885 return (sret); |
209 | 886 } |
887 | |
303 | 888 memmove (stpos, crlfpos + 1, current_size + 1); |
209 | 889 |
303 | 890 if (params->chunk_size < current_size) |
209 | 891 { |
303 | 892 stpos += params->chunk_size; |
209 | 893 params->chunk_size = 0; |
168 | 894 } |
303 | 895 else |
896 params->chunk_size -= current_size; | |
168 | 897 } |
898 | |
303 | 899 params->read_ref_cnt--; |
516 | 900 return (sret); |
168 | 901 } |
902 | |
903 | |
122 | 904 void |
905 rfc2068_register_module (void) | |
906 { | |
907 gftp_register_config_vars (config_vars); | |
908 } | |
909 | |
910 | |
173 | 911 int |
48 | 912 rfc2068_init (gftp_request * request) |
913 { | |
168 | 914 rfc2068_params * params; |
915 | |
173 | 916 g_return_val_if_fail (request != NULL, GFTP_EFATAL); |
1 | 917 |
48 | 918 request->protonum = GFTP_HTTP_NUM; |
919 request->init = rfc2068_init; | |
309 | 920 request->copy_param_options = NULL; |
168 | 921 request->read_function = rfc2068_chunked_read; |
922 request->write_function = gftp_fd_write; | |
87 | 923 request->destroy = rfc2068_destroy; |
48 | 924 request->connect = rfc2068_connect; |
168 | 925 request->post_connect = NULL; |
48 | 926 request->disconnect = rfc2068_disconnect; |
927 request->get_file = rfc2068_get_file; | |
928 request->put_file = NULL; | |
929 request->transfer_file = NULL; | |
930 request->get_next_file_chunk = rfc2068_get_next_file_chunk; | |
931 request->put_next_file_chunk = NULL; | |
932 request->end_transfer = rfc2068_end_transfer; | |
933 request->abort_transfer = rfc2068_end_transfer; /* NOTE: uses end_transfer */ | |
500 | 934 request->stat_filename = NULL; |
48 | 935 request->list_files = rfc2068_list_files; |
936 request->get_next_file = rfc2068_get_next_file; | |
485 | 937 request->get_next_dirlist_line = NULL; |
48 | 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 |