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