Mercurial > gftp.yaz
annotate lib/misc.c @ 168:c505d9ba9d53
2003-6-6 Brian Masney <masneyb@gftp.org>
* lib/gftp.h - if USE_SSL is defined, include the OpenSSL headers.
Added read_function, write_function and post_connect function pointers
to gftp_request structure. Added SSL object to gftp_request structure
if USE_SSL is defined. Added protocol number and init function
declarations for the HTTPS protocol
* lib/options.h - added HTTPS to the list of supported protocols
* lib/protocols.c lib/cache.c lib/rfc2068.c lib/rfc959.c lib/sshv2.c -
renamed gftp_read(), gftp_write() and gftp_set_sockblocking() to
gftp_fd_read(), gftp_fd_write() and gftp_fd_set_sockblocking()
respectively
* lib/bookmark.c lib/local.c
* lib/misc.c lib/rfc2068.c - moved base64_encode() to misc.c
* lib/protocols.c - improved parsing of URLs. Rather than calling
gftp_read() or gftp_write() directly, call the read_function or
write_function that is set in the request structure. Expanded tabs
to spaces. Cleanup for parsing of timestamps. In
gftp_connect_server(), if a post_connect function pointer is set,
call it after we are connected to the server. Improvements to
gftp_get_line ().
* lib/httpcommon.h lib/rfc2068.c - moved rfc2068_params structure to
httpcommon.h. Fix for chunked file transfers, they were not handled
at all before. Made the I/O calls a little more generic so that we can
read from either a socket or a SSL connection.
* lib/sslcommon.c - added generic SSL layer
* lib/https.c - added support for the HTTPS protocol. It piggy backs
off of the existing HTTP support and uses the generic SSL layer
* src/gtk/bookmarks.c src/gtk/chmod_dialog.c src/gtk/gftp-gtk.c
src/gtk/menu-items.c src/gtk/misc-gtk.c src/gtk/options_dialog.c
src/gtk/view_dialog.c - set the window icon name to the gFTP <version>
* configure.in - added lib back to SUBDIRS (oops)
* lib/Makefile.am - added https.c, sslcommon.c and httpcommon.h
author | masneyb |
---|---|
date | Sun, 08 Jun 2003 15:04:40 +0000 |
parents | 12a043d992a1 |
children | 4c288d05b26a |
rev | line source |
---|---|
1 | 1 /*****************************************************************************/ |
2 /* misc.c - general purpose routines */ | |
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 | |
102 | 20 static const char cvsid[] = "$Id$"; |
21 | |
1 | 22 #include "gftp.h" |
23 #include "options.h" | |
24 | |
87 | 25 /* FIXME - this isn't right for all locales. Use glib's printf instead */ |
1 | 26 char * |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
13
diff
changeset
|
27 insert_commas (off_t number, char *dest_str, size_t dest_len) |
1 | 28 { |
29 char *frompos, *topos, src[50], *dest; | |
30 int len, num, rem, i; | |
31 | |
32 if (dest_str != NULL) | |
33 *dest_str = '\0'; | |
56 | 34 len = (number > 0 ? log10 (number) : 0) + 2; |
1 | 35 |
36 if (len <= 0) | |
37 { | |
38 if (dest_str != NULL) | |
39 strncpy (dest_str, "0", dest_len); | |
40 else | |
56 | 41 dest_str = g_strdup ("0"); |
1 | 42 return (dest_str); |
43 } | |
44 | |
45 len += len / 3; | |
46 if (dest_str != NULL && len > dest_len) | |
47 { | |
48 | |
49 for (i=0; i<dest_len - 1; i++) | |
50 dest_str[i] = 'X'; | |
51 dest_str[dest_len - 1] = '\0'; | |
52 return (dest_str); | |
53 } | |
54 | |
55 if (dest_str == NULL) | |
56 dest = g_malloc0 (len); | |
57 else | |
58 dest = dest_str; | |
59 | |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
13
diff
changeset
|
60 #if defined (_LARGEFILE_SOURCE) |
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
13
diff
changeset
|
61 g_snprintf (src, sizeof (src), "%lld", number); |
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
13
diff
changeset
|
62 #else |
1 | 63 g_snprintf (src, sizeof (src), "%ld", number); |
14
83090328581e
* More largefile support. Hopefully all that is left is the configure stuff
masneyb
parents:
13
diff
changeset
|
64 #endif |
1 | 65 |
66 num = strlen (src) / 3 - 1; | |
67 rem = strlen (src) % 3; | |
68 frompos = src; | |
69 topos = dest; | |
70 for (i = 0; i < rem; i++) | |
71 *topos++ = *frompos++; | |
72 | |
73 if (*frompos != '\0') | |
74 { | |
75 if (rem != 0) | |
76 *topos++ = ','; | |
77 while (num > 0) | |
78 { | |
79 for (i = 0; i < 3; i++) | |
80 *topos++ = *frompos++; | |
81 *topos++ = ','; | |
82 num--; | |
83 } | |
84 for (i = 0; i < 3; i++) | |
85 *topos++ = *frompos++; | |
86 } | |
87 *topos = '\0'; | |
88 return (dest); | |
89 } | |
90 | |
91 | |
92 char * | |
93 alltrim (char *str) | |
94 { | |
95 char *pos, *newpos; | |
96 int diff; | |
97 | |
98 pos = str + strlen (str) - 1; | |
87 | 99 while (pos >= str && (*pos == ' ' || *pos == '\t')) |
1 | 100 *pos-- = '\0'; |
101 | |
102 pos = str; | |
103 diff = 0; | |
104 while (*pos++ == ' ') | |
105 diff++; | |
106 | |
107 if (diff == 0) | |
108 return (str); | |
109 | |
110 pos = str + diff; | |
111 newpos = str; | |
112 while (*pos != '\0') | |
113 *newpos++ = *pos++; | |
114 *newpos = '\0'; | |
115 | |
116 return (str); | |
117 } | |
118 | |
119 | |
120 char * | |
121 expand_path (const char *src) | |
122 { | |
123 char *str, *pos, *endpos, *prevpos, *newstr, *tempstr, tempchar; | |
124 struct passwd *pw; | |
125 | |
126 pw = NULL; | |
124 | 127 str = g_strdup (src); |
1 | 128 |
129 if (*str == '~') | |
130 { | |
131 if (*(str + 1) == '/' || *(str + 1) == '\0') | |
132 pw = getpwuid (geteuid ()); | |
133 else | |
134 { | |
135 if ((pos = strchr (str, '/')) != NULL) | |
136 *pos = '\0'; | |
137 | |
138 pw = getpwnam (str + 1); | |
139 | |
140 if (pos != NULL) | |
141 *pos = '/'; | |
142 } | |
143 } | |
144 | |
145 endpos = str; | |
146 newstr = NULL; | |
147 while ((pos = strchr (endpos, '/')) != NULL) | |
148 { | |
149 pos++; | |
150 while (*pos == '/') | |
151 pos++; | |
152 if ((endpos = strchr (pos, '/')) == NULL) | |
153 endpos = pos + strlen (pos); | |
154 tempchar = *endpos; | |
155 *endpos = '\0'; | |
156 if (strcmp (pos, "..") == 0) | |
157 { | |
158 *(pos - 1) = '\0'; | |
159 if (newstr != NULL && (prevpos = strrchr (newstr, '/')) != NULL) | |
160 *prevpos = '\0'; | |
161 } | |
162 else if (strcmp (pos, ".") != 0) | |
163 { | |
164 if (newstr == NULL) | |
56 | 165 newstr = g_strdup (pos - 1); |
1 | 166 else |
167 { | |
168 tempstr = g_strconcat (newstr, pos - 1, NULL); | |
169 g_free (newstr); | |
170 newstr = tempstr; | |
171 } | |
172 } | |
173 *endpos = tempchar; | |
174 if (*endpos == '\0') | |
175 break; | |
176 endpos = pos + 1; | |
177 } | |
178 | |
179 if (newstr == NULL || *newstr == '\0') | |
180 { | |
181 if (newstr != NULL) | |
182 g_free (newstr); | |
183 newstr = g_malloc0 (2); | |
184 *newstr = '/'; | |
185 } | |
186 | |
187 g_free (str); | |
188 | |
189 if (pw != NULL) | |
190 { | |
191 if ((pos = strchr (newstr, '/')) == NULL) | |
124 | 192 str = g_strdup (pw->pw_dir); |
1 | 193 else |
194 str = g_strconcat (pw->pw_dir, pos, NULL); | |
195 | |
196 g_free (newstr); | |
197 newstr = str; | |
198 } | |
199 | |
200 return (newstr); | |
201 } | |
202 | |
203 | |
204 void | |
205 remove_double_slashes (char *string) | |
206 { | |
207 char *newpos, *oldpos; | |
87 | 208 size_t len; |
1 | 209 |
210 oldpos = newpos = string; | |
211 while (*oldpos != '\0') | |
212 { | |
213 *newpos++ = *oldpos++; | |
214 if (*oldpos == '\0') | |
215 break; | |
216 while (*(newpos - 1) == '/' && *(oldpos) == '/') | |
217 oldpos++; | |
218 } | |
219 *newpos = '\0'; | |
87 | 220 |
221 len = strlen (string); | |
222 if (string[len - 1] == '/') | |
223 string[len - 1] = '\0'; | |
1 | 224 } |
225 | |
226 | |
227 void | |
228 make_nonnull (char **str) | |
229 { | |
230 if (*str == NULL) | |
231 *str = g_malloc0 (1); | |
232 } | |
233 | |
234 | |
235 int | |
236 copyfile (char *source, char *dest) | |
237 { | |
58 | 238 int srcfd, destfd; |
1 | 239 char buf[8192]; |
58 | 240 ssize_t n; |
1 | 241 |
58 | 242 if ((srcfd = open (source, O_RDONLY)) == -1) |
243 { | |
244 printf (_("Error: Cannot open local file %s: %s\n"), | |
245 source, g_strerror (errno)); | |
246 exit (1); | |
247 } | |
1 | 248 |
58 | 249 if ((destfd = open (dest, O_WRONLY | O_CREAT, S_IRUSR | S_IWUSR)) == -1) |
1 | 250 { |
58 | 251 printf (_("Error: Cannot open local file %s: %s\n"), |
252 dest, g_strerror (errno)); | |
253 close (srcfd); | |
254 exit (1); | |
1 | 255 } |
256 | |
58 | 257 while ((n = read (srcfd, buf, sizeof (buf))) > 0) |
258 { | |
259 if (write (destfd, buf, n) == -1) | |
260 { | |
261 printf (_("Error: Could not write to socket: %s\n"), | |
262 g_strerror (errno)); | |
263 exit (1); | |
264 } | |
265 } | |
1 | 266 |
58 | 267 if (n == -1) |
268 { | |
269 printf (_("Error: Could not read from socket: %s\n"), g_strerror (errno)); | |
270 exit (1); | |
271 } | |
272 | |
87 | 273 if (close (srcfd) == -1) |
274 { | |
275 printf (_("Error closing file descriptor: %s\n"), g_strerror (errno)); | |
276 exit (1); | |
277 } | |
278 | |
279 if (close (destfd) == -1) | |
280 { | |
281 printf (_("Error closing file descriptor: %s\n"), g_strerror (errno)); | |
282 exit (1); | |
283 } | |
1 | 284 |
285 return (1); | |
286 } | |
287 | |
288 | |
87 | 289 /* FIXME - is there a replacement for this */ |
1 | 290 int |
291 gftp_match_filespec (char *filename, char *filespec) | |
292 { | |
293 char *filepos, *wcpos, *pos, *newpos, search_str[20]; | |
294 size_t len, curlen; | |
295 | |
296 if (filename == NULL || *filename == '\0' || | |
297 filespec == NULL || *filespec == '\0') | |
298 return(1); | |
299 | |
300 filepos = filename; | |
301 wcpos = filespec; | |
302 while(1) | |
303 { | |
304 if (*wcpos == '\0') | |
305 return (1); | |
306 else if (*filepos == '\0') | |
307 return(0); | |
308 else if(*wcpos == '?') | |
309 { | |
310 wcpos++; | |
311 filepos++; | |
312 } | |
313 else if(*wcpos == '*' && *(wcpos+1) == '\0') | |
314 return(1); | |
315 else if(*wcpos == '*') | |
316 { | |
317 len = sizeof (search_str); | |
318 for (pos = wcpos + 1, newpos = search_str, curlen = 0; | |
319 *pos != '*' && *pos != '?' && *pos != '\0' && curlen < len; | |
320 curlen++, *newpos++ = *pos++); | |
321 *newpos = '\0'; | |
322 | |
323 if ((filepos = strstr (filepos, search_str)) == NULL) | |
324 return(0); | |
325 wcpos += curlen + 1; | |
326 filepos += curlen; | |
327 } | |
328 else if(*wcpos++ != *filepos++) | |
329 return(0); | |
330 } | |
331 return (1); | |
332 } | |
333 | |
334 | |
335 int | |
336 gftp_parse_command_line (int *argc, char ***argv) | |
337 { | |
338 if (*argc > 1) | |
339 { | |
87 | 340 if (strcmp (argv[0][1], "--help") == 0 || |
341 strcmp (argv[0][1], "-h") == 0) | |
1 | 342 gftp_usage (); |
87 | 343 else if (strcmp (argv[0][1], "--version") == 0 || |
344 strcmp (argv[0][1], "-v") == 0) | |
1 | 345 { |
122 | 346 printf ("%s\n", gftp_version); |
1 | 347 exit (0); |
348 } | |
349 } | |
350 return (0); | |
351 } | |
352 | |
353 | |
354 void | |
355 gftp_usage (void) | |
356 { | |
162 | 357 printf (_("usage: gftp [[protocol://][user[:pass]@]site[:port][/directory]]\n")); |
1 | 358 exit (0); |
359 } | |
360 | |
361 | |
362 char * | |
363 get_xpm_path (char *filename, int quit_on_err) | |
364 { | |
365 char *tempstr, *exfile; | |
366 | |
367 tempstr = g_strconcat (BASE_CONF_DIR, "/", filename, NULL); | |
368 exfile = expand_path (tempstr); | |
369 g_free (tempstr); | |
370 if (access (exfile, F_OK) != 0) | |
371 { | |
372 g_free (exfile); | |
373 tempstr = g_strconcat (SHARE_DIR, "/", filename, NULL); | |
374 exfile = expand_path (tempstr); | |
375 g_free (tempstr); | |
376 if (access (exfile, F_OK) != 0) | |
377 { | |
378 g_free (exfile); | |
379 exfile = g_strconcat ("/usr/share/icons/", filename, NULL); | |
380 if (access (exfile, F_OK) != 0) | |
381 { | |
382 g_free (exfile); | |
383 if (!quit_on_err) | |
384 return (NULL); | |
87 | 385 |
1 | 386 printf (_("gFTP Error: Cannot find file %s in %s or %s\n"), |
387 filename, SHARE_DIR, BASE_CONF_DIR); | |
87 | 388 exit (1); |
1 | 389 } |
390 } | |
391 } | |
392 return (exfile); | |
393 } | |
394 | |
395 | |
396 gint | |
397 string_hash_compare (gconstpointer path1, gconstpointer path2) | |
398 { | |
399 return (strcmp ((char *) path1, (char *) path2) == 0); | |
400 } | |
401 | |
402 | |
403 guint | |
404 string_hash_function (gconstpointer key) | |
405 { | |
59 | 406 guint ret; |
407 int i; | |
408 | |
409 ret = 0; | |
87 | 410 for (i=0; ((char *) key)[i] != '\0' && i < 3; i++) |
59 | 411 ret += ((char *) key)[i]; |
412 | |
413 return (ret); | |
1 | 414 } |
415 | |
416 | |
417 void | |
418 free_file_list (GList * filelist) | |
419 { | |
420 gftp_file * tempfle; | |
421 GList * templist; | |
422 | |
423 templist = filelist; | |
424 while (templist != NULL) | |
425 { | |
426 tempfle = templist->data; | |
427 free_fdata (tempfle); | |
428 templist = templist->next; | |
429 } | |
430 g_list_free (filelist); | |
431 } | |
432 | |
433 | |
434 void | |
435 free_fdata (gftp_file * fle) | |
436 { | |
437 if (fle->file) | |
438 g_free (fle->file); | |
439 if (fle->user) | |
440 g_free (fle->user); | |
441 if (fle->group) | |
442 g_free (fle->group); | |
443 if (fle->attribs) | |
444 g_free (fle->attribs); | |
445 if (fle->destfile) | |
446 g_free (fle->destfile); | |
58 | 447 if (fle->fd > 0) |
102 | 448 close (fle->fd); |
1 | 449 g_free (fle); |
450 } | |
451 | |
452 | |
453 gftp_file * | |
454 copy_fdata (gftp_file * fle) | |
455 { | |
456 gftp_file * newfle; | |
457 | |
458 newfle = g_malloc0 (sizeof (*newfle)); | |
459 memcpy (newfle, fle, sizeof (*newfle)); | |
460 | |
461 if (fle->file) | |
87 | 462 newfle->file = g_strdup (fle->file); |
1 | 463 |
464 if (fle->user) | |
87 | 465 newfle->user = g_strdup (fle->user); |
1 | 466 |
467 if (fle->group) | |
87 | 468 newfle->group = g_strdup (fle->group); |
1 | 469 |
470 if (fle->attribs) | |
87 | 471 newfle->attribs = g_strdup (fle->attribs); |
1 | 472 |
473 if (fle->destfile) | |
87 | 474 newfle->destfile = g_strdup (fle->destfile); |
475 | |
1 | 476 return (newfle); |
477 } | |
478 | |
479 | |
480 int | |
481 compare_request (gftp_request * request1, gftp_request * request2, | |
482 int compare_dirs) | |
483 { | |
484 char *strarr[3][2]; | |
485 int i, ret; | |
486 | |
487 ret = 1; | |
87 | 488 if (request1->protonum == request2->protonum && |
1 | 489 request1->port == request2->port) |
490 { | |
491 strarr[0][0] = request1->hostname; | |
492 strarr[0][1] = request2->hostname; | |
493 strarr[1][0] = request1->username; | |
494 strarr[1][1] = request2->username; | |
495 if (compare_dirs) | |
496 { | |
497 strarr[2][0] = request1->directory; | |
498 strarr[2][1] = request2->directory; | |
499 } | |
500 else | |
501 strarr[2][0] = strarr[2][1] = ""; | |
502 | |
503 for (i = 0; i < 3; i++) | |
504 { | |
505 if ((strarr[i][0] && !strarr[i][1]) || | |
506 (!strarr[i][0] && strarr[i][1])) | |
507 { | |
508 ret = 0; | |
509 break; | |
510 } | |
511 | |
512 if (strarr[i][0] && strarr[i][1] && | |
513 strcmp (strarr[i][0], strarr[i][1]) != 0) | |
514 { | |
515 ret = 0; | |
516 break; | |
517 } | |
518 } | |
519 } | |
520 else | |
521 ret = 0; | |
522 return (ret); | |
523 } | |
524 | |
525 | |
129 | 526 gftp_transfer * |
527 gftp_tdata_new (void) | |
528 { | |
529 gftp_transfer * tdata; | |
530 | |
531 tdata = g_malloc0 (sizeof (*tdata)); | |
168 | 532 g_static_mutex_init (&tdata->statmutex); |
533 g_static_mutex_init (&tdata->structmutex); | |
129 | 534 return (tdata); |
535 } | |
536 | |
537 | |
1 | 538 void |
539 free_tdata (gftp_transfer * tdata) | |
540 { | |
541 if (tdata->fromreq != NULL) | |
67 | 542 gftp_request_destroy (tdata->fromreq, 1); |
1 | 543 if (tdata->toreq != NULL) |
67 | 544 gftp_request_destroy (tdata->toreq, 1); |
1 | 545 free_file_list (tdata->files); |
546 g_free (tdata); | |
547 } | |
548 | |
549 | |
136 | 550 void |
551 gftp_copy_local_options (gftp_request * dest, gftp_request * source) | |
552 { | |
553 int i; | |
554 | |
555 if (source->local_options_vars == NULL) | |
556 { | |
557 dest->local_options_vars = NULL; | |
558 dest->num_local_options_vars = 0; | |
559 dest->local_options_hash = NULL; | |
560 return; | |
561 } | |
562 | |
563 dest->local_options_hash = g_hash_table_new (string_hash_function, | |
564 string_hash_compare); | |
565 | |
566 for (i=0; source->local_options_vars[i].key != NULL; i++); | |
567 | |
568 dest->local_options_vars = g_malloc (sizeof (gftp_config_vars) * (i + 1)); | |
569 memcpy (dest, source, sizeof (gftp_config_vars) * (i + 1)); | |
570 dest->num_local_options_vars = i; | |
571 | |
572 for (i=0; dest->local_options_vars[i].key != NULL; i++) | |
573 { | |
574 g_hash_table_insert (dest->local_options_hash, | |
575 dest->local_options_vars[i].key, | |
576 &dest->local_options_vars[i]); | |
577 } | |
578 } | |
579 | |
580 | |
1 | 581 gftp_request * |
151 | 582 copy_request (gftp_request * req, int copy_local_options) |
1 | 583 { |
584 gftp_request * newreq; | |
585 | |
66 | 586 newreq = gftp_request_new (); |
1 | 587 |
588 if (req->hostname) | |
56 | 589 newreq->hostname = g_strdup (req->hostname); |
1 | 590 if (req->username) |
56 | 591 newreq->username = g_strdup (req->username); |
1 | 592 if (req->password) |
56 | 593 newreq->password = g_strdup (req->password); |
1 | 594 if (req->account) |
56 | 595 newreq->account = g_strdup (req->account); |
1 | 596 if (req->directory) |
56 | 597 newreq->directory = g_strdup (req->directory); |
66 | 598 newreq->port = req->port; |
599 newreq->use_proxy = req->use_proxy; | |
600 newreq->logging_function = req->logging_function; | |
151 | 601 newreq->free_hostp = 0; |
602 newreq->hostp = req->hostp; | |
603 | |
604 if (copy_local_options) | |
605 gftp_copy_local_options (newreq, req); | |
1 | 606 |
607 req->init (newreq); | |
608 | |
609 return (newreq); | |
610 } | |
611 | |
612 | |
16 | 613 static gint |
614 gftp_file_sort_function_as (gconstpointer a, gconstpointer b) | |
615 { | |
616 const gftp_file * f1, * f2; | |
617 | |
618 f1 = a; | |
619 f2 = b; | |
620 return (strcmp (f1->file, f2->file)); | |
621 } | |
622 | |
623 | |
624 static gint | |
625 gftp_file_sort_function_ds (gconstpointer a, gconstpointer b) | |
626 { | |
627 const gftp_file * f1, * f2; | |
628 gint ret; | |
629 | |
630 f1 = a; | |
631 f2 = b; | |
632 ret = strcmp (f1->file, f2->file); | |
84 | 633 return (ret * -1); |
16 | 634 } |
635 | |
636 | |
637 static gint | |
638 gftp_user_sort_function_as (gconstpointer a, gconstpointer b) | |
639 { | |
640 const gftp_file * f1, * f2; | |
641 | |
642 f1 = a; | |
643 f2 = b; | |
644 return (strcmp (f1->user, f2->user)); | |
645 } | |
646 | |
647 | |
648 static gint | |
649 gftp_user_sort_function_ds (gconstpointer a, gconstpointer b) | |
650 { | |
651 const gftp_file * f1, * f2; | |
652 gint ret; | |
653 | |
654 f1 = a; | |
655 f2 = b; | |
656 ret = strcmp (f1->user, f2->user); | |
84 | 657 return (ret * -1); |
16 | 658 } |
659 | |
660 | |
661 static gint | |
662 gftp_group_sort_function_as (gconstpointer a, gconstpointer b) | |
663 { | |
664 const gftp_file * f1, * f2; | |
665 | |
666 f1 = a; | |
667 f2 = b; | |
668 return (strcmp (f1->group, f2->group)); | |
669 } | |
670 | |
671 | |
672 static gint | |
673 gftp_group_sort_function_ds (gconstpointer a, gconstpointer b) | |
674 { | |
675 const gftp_file * f1, * f2; | |
676 gint ret; | |
677 | |
678 f1 = a; | |
679 f2 = b; | |
680 ret = strcmp (f1->group, f2->group); | |
84 | 681 return (ret * -1); |
16 | 682 } |
683 | |
684 | |
685 static gint | |
686 gftp_attribs_sort_function_as (gconstpointer a, gconstpointer b) | |
687 { | |
688 const gftp_file * f1, * f2; | |
689 | |
690 f1 = a; | |
691 f2 = b; | |
692 return (strcmp (f1->attribs, f2->attribs)); | |
693 } | |
694 | |
695 | |
696 static gint | |
697 gftp_attribs_sort_function_ds (gconstpointer a, gconstpointer b) | |
698 { | |
699 const gftp_file * f1, * f2; | |
700 gint ret; | |
701 | |
702 f1 = a; | |
703 f2 = b; | |
704 ret = strcmp (f1->attribs, f2->attribs); | |
84 | 705 return (ret * -1); |
16 | 706 } |
707 | |
708 | |
709 static gint | |
710 gftp_size_sort_function_as (gconstpointer a, gconstpointer b) | |
711 { | |
712 const gftp_file * f1, * f2; | |
713 | |
714 f1 = a; | |
715 f2 = b; | |
716 if (f1->size < f2->size) | |
717 return (-1); | |
718 else if (f1->size == f2->size) | |
719 return (0); | |
720 else | |
721 return (1); | |
722 } | |
723 | |
724 | |
725 static gint | |
726 gftp_size_sort_function_ds (gconstpointer a, gconstpointer b) | |
727 { | |
728 const gftp_file * f1, * f2; | |
729 | |
730 f1 = a; | |
731 f2 = b; | |
732 if (f1->size < f2->size) | |
733 return (1); | |
734 else if (f1->size == f2->size) | |
735 return (0); | |
736 else | |
737 return (-1); | |
738 } | |
739 | |
740 | |
741 static gint | |
742 gftp_datetime_sort_function_as (gconstpointer a, gconstpointer b) | |
743 { | |
744 const gftp_file * f1, * f2; | |
745 | |
746 f1 = a; | |
747 f2 = b; | |
748 if (f1->datetime < f2->datetime) | |
749 return (-1); | |
750 else if (f1->datetime == f2->datetime) | |
751 return (0); | |
752 else | |
753 return (1); | |
754 } | |
755 | |
756 | |
757 static gint | |
758 gftp_datetime_sort_function_ds (gconstpointer a, gconstpointer b) | |
759 { | |
760 const gftp_file * f1, * f2; | |
761 | |
762 f1 = a; | |
763 f2 = b; | |
764 if (f1->datetime < f2->datetime) | |
765 return (1); | |
766 else if (f1->datetime == f2->datetime) | |
767 return (0); | |
768 else | |
769 return (-1); | |
770 } | |
771 | |
772 | |
773 GList * | |
774 gftp_sort_filelist (GList * filelist, int column, int asds) | |
775 { | |
776 GList * files, * dirs, * dotdot, * tempitem, * insitem; | |
777 GCompareFunc sortfunc; | |
778 gftp_file * tempfle; | |
122 | 779 int sort_dirs_first; |
16 | 780 |
781 files = dirs = dotdot = NULL; | |
782 | |
783 if (column == GFTP_SORT_COL_FILE) | |
784 sortfunc = asds ? gftp_file_sort_function_as : gftp_file_sort_function_ds; | |
785 else if (column == GFTP_SORT_COL_SIZE) | |
786 sortfunc = asds ? gftp_size_sort_function_as : gftp_size_sort_function_ds; | |
787 else if (column == GFTP_SORT_COL_USER) | |
788 sortfunc = asds ? gftp_user_sort_function_as : gftp_user_sort_function_ds; | |
789 else if (column == GFTP_SORT_COL_GROUP) | |
790 sortfunc = asds ? | |
791 gftp_group_sort_function_as : gftp_group_sort_function_ds; | |
792 else if (column == GFTP_SORT_COL_DATETIME) | |
793 sortfunc = asds ? | |
122 | 794 gftp_datetime_sort_function_as : gftp_datetime_sort_function_ds; |
795 else if (column == GFTP_SORT_COL_ATTRIBS) | |
16 | 796 sortfunc = asds ? |
797 gftp_attribs_sort_function_as : gftp_attribs_sort_function_ds; | |
122 | 798 else /* Don't sort */ |
799 return (filelist); | |
800 | |
801 sort_dirs_first = 1; | |
802 gftp_lookup_global_option ("sort_dirs_first", &sort_dirs_first); | |
16 | 803 |
804 for (tempitem = filelist; tempitem != NULL; ) | |
805 { | |
806 tempfle = tempitem->data; | |
807 insitem = tempitem; | |
808 tempitem = tempitem->next; | |
809 insitem->next = NULL; | |
810 | |
811 if (dotdot == NULL && strcmp (tempfle->file, "..") == 0) | |
812 dotdot = insitem; | |
813 else if (sort_dirs_first && tempfle->isdir) | |
814 { | |
815 insitem->next = dirs; | |
816 dirs = insitem; | |
817 } | |
818 else | |
819 { | |
820 insitem->next = files; | |
821 files = insitem; | |
822 } | |
823 } | |
824 | |
825 if (dirs != NULL) | |
826 dirs = g_list_sort (dirs, sortfunc); | |
827 if (files != NULL) | |
828 files = g_list_sort (files, sortfunc); | |
829 | |
830 filelist = dotdot; | |
831 | |
832 if (filelist == NULL) | |
833 filelist = dirs; | |
834 else | |
835 filelist = g_list_concat (filelist, dirs); | |
836 | |
837 if (filelist == NULL) | |
838 filelist = files; | |
839 else | |
840 filelist = g_list_concat (filelist, files); | |
841 | |
39 | 842 /* I haven't check this, but I'm pretty sure some older versions of glib |
843 had a bug that the prev pointer wasn't being sent to NULL */ | |
844 filelist->prev = NULL; | |
16 | 845 return (filelist); |
846 } | |
847 | |
125 | 848 |
849 mode_t | |
850 gftp_parse_attribs (char *attribs) | |
851 { | |
852 mode_t mode; | |
853 int cur; | |
854 | |
855 cur = 0; | |
856 if (attribs[1] == 'r') | |
857 cur += 4; | |
858 if (attribs[2] == 'w') | |
859 cur += 2; | |
860 if (attribs[3] == 'x' || | |
861 attribs[3] == 's') | |
862 cur += 1; | |
863 mode = cur; | |
864 | |
865 cur = 0; | |
866 if (attribs[4] == 'r') | |
867 cur += 4; | |
868 if (attribs[5] == 'w') | |
869 cur += 2; | |
870 if (attribs[6] == 'x' || | |
871 attribs[6] == 's') | |
872 cur += 1; | |
873 mode = (mode * 10) + cur; | |
874 | |
875 cur = 0; | |
876 if (attribs[7] == 'r') | |
877 cur += 4; | |
878 if (attribs[8] == 'w') | |
879 cur += 2; | |
880 if (attribs[9] == 'x' || | |
881 attribs[9] == 's') | |
882 cur += 1; | |
883 mode = (mode * 10) + cur; | |
884 | |
885 return (mode); | |
886 } | |
887 | |
888 | |
131 | 889 char * |
890 gftp_gen_ls_string (gftp_file * fle, char *file_prefixstr, char *file_suffixstr) | |
891 { | |
892 char *tempstr1, *tempstr2, *ret, tstr[50]; | |
893 struct tm *lt; | |
894 time_t t; | |
895 | |
896 lt = localtime (&fle->datetime); | |
897 | |
898 tempstr1 = g_strdup_printf ("%10s %8s %8s", fle->attribs, fle->user, | |
899 fle->group); | |
900 | |
901 if (fle->attribs && (*fle->attribs == 'b' || *fle->attribs == 'c')) | |
902 tempstr2 = g_strdup_printf ("%d, %d", major (fle->size), minor (fle->size)); | |
903 else | |
904 { | |
905 #if defined (_LARGEFILE_SOURCE) | |
906 tempstr2 = g_strdup_printf ("%11lld", fle->size); | |
907 #else | |
908 tempstr2 = g_strdup_printf ("%11ld", fle->size); | |
909 #endif | |
910 } | |
911 | |
912 time (&t); | |
913 | |
914 if (fle->datetime > t || t - 3600*24*90 > fle->datetime) | |
915 strftime (tstr, sizeof (tstr), "%b %d %Y", lt); | |
916 else | |
917 strftime (tstr, sizeof (tstr), "%b %d %H:%M", lt); | |
918 | |
919 if (file_prefixstr == NULL) | |
920 file_prefixstr = ""; | |
921 if (file_suffixstr == NULL) | |
922 file_suffixstr = ""; | |
923 | |
924 ret = g_strdup_printf ("%s %s %s %s%s%s", tempstr1, tempstr2, tstr, | |
925 file_prefixstr, fle->file, file_suffixstr); | |
926 | |
927 g_free (tempstr1); | |
928 g_free (tempstr2); | |
929 | |
930 return (ret); | |
931 } | |
932 | |
933 | |
125 | 934 #if !defined (HAVE_GETADDRINFO) || !defined (HAVE_GAI_STRERROR) |
935 | |
936 struct hostent * | |
937 r_gethostbyname (const char *name, struct hostent *result_buf, int *h_errnop) | |
938 { | |
939 static GStaticMutex hostfunclock = G_STATIC_MUTEX_INIT; | |
940 struct hostent *hent; | |
941 | |
942 if (g_thread_supported ()) | |
943 g_static_mutex_lock (&hostfunclock); | |
944 | |
945 if ((hent = gethostbyname (name)) == NULL) | |
946 { | |
947 if (h_errnop) | |
948 *h_errnop = h_errno; | |
949 } | |
950 else | |
951 { | |
952 *result_buf = *hent; | |
953 hent = result_buf; | |
954 } | |
955 | |
956 if (g_thread_supported ()) | |
957 g_static_mutex_unlock (&hostfunclock); | |
958 | |
959 return (hent); | |
960 } | |
961 | |
962 #endif /* !HAVE_GETADDRINFO */ | |
963 | |
964 struct servent * | |
965 r_getservbyname (const char *name, const char *proto, | |
966 struct servent *result_buf, int *h_errnop) | |
967 { | |
968 static GStaticMutex servfunclock = G_STATIC_MUTEX_INIT; | |
969 struct servent *sent; | |
970 | |
971 if (g_thread_supported ()) | |
972 g_static_mutex_lock (&servfunclock); | |
973 | |
974 if ((sent = getservbyname (name, proto)) == NULL) | |
975 { | |
976 if (h_errnop) | |
977 *h_errnop = h_errno; | |
978 } | |
979 else | |
980 { | |
981 *result_buf = *sent; | |
982 sent = result_buf; | |
983 } | |
984 | |
985 if (g_thread_supported ()) | |
986 g_static_mutex_unlock (&servfunclock); | |
987 return (sent); | |
988 } | |
989 | |
168 | 990 |
991 char * | |
992 base64_encode (char *str) | |
993 { | |
994 | |
995 /* The standard to Base64 encoding can be found in RFC2045 */ | |
996 | |
997 char *newstr, *newpos, *fillpos, *pos; | |
998 unsigned char table[64], encode[3]; | |
999 int i, num; | |
1000 | |
1001 for (i = 0; i < 26; i++) | |
1002 { | |
1003 table[i] = 'A' + i; | |
1004 table[i + 26] = 'a' + i; | |
1005 } | |
1006 | |
1007 for (i = 0; i < 10; i++) | |
1008 table[i + 52] = '0' + i; | |
1009 | |
1010 table[62] = '+'; | |
1011 table[63] = '-'; | |
1012 | |
1013 num = strlen (str) / 3; | |
1014 if (strlen (str) % 3 > 0) | |
1015 num++; | |
1016 newstr = g_malloc (num * 4 + 1); | |
1017 newstr[num * 4] = '\0'; | |
1018 newpos = newstr; | |
1019 | |
1020 pos = str; | |
1021 while (*pos != '\0') | |
1022 { | |
1023 memset (encode, 0, sizeof (encode)); | |
1024 for (i = 0; i < 3 && *pos != '\0'; i++) | |
1025 encode[i] = *pos++; | |
1026 | |
1027 fillpos = newpos; | |
1028 *newpos++ = table[encode[0] >> 2]; | |
1029 *newpos++ = table[(encode[0] & 3) << 4 | encode[1] >> 4]; | |
1030 *newpos++ = table[(encode[1] & 0xF) << 2 | encode[2] >> 6]; | |
1031 *newpos++ = table[encode[2] & 0x3F]; | |
1032 while (i < 3) | |
1033 fillpos[++i] = '='; | |
1034 } | |
1035 return (newstr); | |
1036 } | |
1037 |