wget/src/ftp-ls.c

5 This file is part of GNU Wget.
94 ftp_parse_unix_ls (const char *file, int ignore_perms)
110   fp = fopen (file, "rb");
113       logprintf (LOG_NOTQUIET, "%s: %s\n", file, strerror (errno));
118   /* Line loop to end of file: */
139       /* Decide whether we deal with a file or a directory.  */
191          position wrt the file name is "known").  When a month name is
193          characters are parsed to get the file size.
283           else if (next == 2)    /* The file name */
288               /* Since the file name may contain a SPC, it is possible
293                   /* So we have a SPC in the file name.  Restore the
296                   /* If the file is a symbolic link, it should have a
308                       /* And separate it from the file name.  */
400              that the file was from the previous year.  E.g. if today
401              is 97-01-12, and you see a file of Dec 15th, its year is
426 ftp_parse_winnt_ls (const char *file)
437   fp = fopen (file, "rb");
440       logprintf (LOG_NOTQUIET, "%s: %s\n", file, strerror (errno));
445   /* Line loop to end of file: */
507       /* Third column: Either file length, or <DIR>. We also set the
563 /* Convert the VMS-style directory listing stored in "file" to a
576    Added code to eliminate "^" escape characters from ODS5 extended file
587    Delete ODS5 extended file name escape characters ("^") in the
672 ftp_parse_vms_ls (const char *file)
684   fp = fopen (file, "r");
687       logprintf (LOG_NOTQUIET, "%s: %s\n", file, strerror (errno));
737   /* Read remainder of file until the next blank line or EOF. */
743       /* The first token is the file name.  After a long name, other
751       DEBUGP(("file name:   '%s'\n", tok));
759          ODS5 extended file names may contain escaped semi-colons, so
773          Eliminate "^" escape characters from ODS5 extended file name.
777       DEBUGP(("file name-^: '%s'\n", tok));
779       /* Differentiate between a directory and any other file.  A VMS
780          listing may not include file protections (permissions).  Set a
781          default permissions value (according to the file type), which
783          ".DIR;1" file type and version number, as the plain name is
816       /* VMS reports file sizes in (512-byte) disk blocks, not bytes,
843               /* Blank line.  End of significant file listing. */
850               DEBUGP(("Non-blank in column 1.  Must be a new file name?\n"));
1015               /* Blank line.  End of significant file listing. */
1034 ftp_parse_ls (const char *file, const enum stype system_type)
1039       return ftp_parse_unix_ls (file, 0);
1045         fp = fopen (file, "rb");
1048           logprintf (LOG_NOTQUIET, "%s: %s\n", file, strerror (errno));
1053         /* If the first character of the file is '0'-'9', it's WINNT
1056           return ftp_parse_winnt_ls (file);
1058           return ftp_parse_unix_ls (file, 1);
1061       return ftp_parse_vms_ls (file);
1063       return ftp_parse_unix_ls (file, 1);
1067       return ftp_parse_unix_ls (file, 0);
1078 ftp_index (const char *file, struct url *u, struct fileinfo *f)
1083   char *htclfile;               /* HTML-clean file name */
1084   char *urlclfile;              /* URL-clean file name */
1088       fp = fopen (file, "wb");
1091           logprintf (LOG_NOTQUIET, "%s: %s\n", file, strerror (errno));
1167        * we use urlclfile for the file component. Anyway, this is safer