prozilla/libprozilla/src/ftpparse.c

251 lines
7.0 KiB
C
Raw Normal View History

2010-08-31 03:50:41 +02:00
/******************************************************************************
2010-09-01 10:52:02 +02:00
libprozilla - a download accelerator library
Copyright (C) 2001 Kalum Somaratna
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
2010-08-31 03:50:41 +02:00
******************************************************************************/
//Rewrite of the ftp parsing code as we needed to extract the date of
//the file to save it when the downloading is complete.
#include "common.h"
#include "ftpparse.h"
#include "prozilla.h"
2010-09-01 10:52:02 +02:00
/* MultiNet (some spaces removed from examples) */
/* "00README.TXT;1 2 30-DEC-1996 17:44 [SYSTEM] (RWED,RWED,RE,RE)" */
/* "CORE.DIR;1 1 8-SEP-1996 16:09 [SYSTEM] (RWE,RWE,RE,RE)" */
/* and non-MutliNet VMS: */
/* "CII-MANUAL.TEX;1 213/216 29-JAN-1996 03:33:12 [ANONYMOU,ANONYMOUS] (RWED,RWED,,)" */
2010-08-31 03:50:41 +02:00
2010-09-01 10:52:02 +02:00
/* MSDOS format */
/* 04-27-00 09:09PM <DIR> licensed */
/* 07-18-00 10:16AM <DIR> pub */
/* 04-14-00 03:47PM 589 readme.htm */
2010-08-31 03:50:41 +02:00
2010-09-01 10:52:02 +02:00
long getlong(char *buf, int len)
2010-08-31 03:50:41 +02:00
{
long u = 0;
2010-09-01 10:52:02 +02:00
2010-08-31 03:50:41 +02:00
while (len-- > 0)
u = u * 10 + (*buf++ - '0');
return u;
}
/* Find next Field
** ---------------
** Finds the next RFC822 token in a string
** On entry,
** *pstr points to a string containing a word separated
** by white white space "," ";" or "=". The word
** can optionally be quoted using <"> or "<" ">"
** Comments surrrounded by '(' ')' are filtered out
**
2010-09-01 10:52:02 +02:00
** On exit,
2010-08-31 03:50:41 +02:00
** *pstr has been moved to the first delimiter past the
** field
** THE STRING HAS BEEN MUTILATED by a 0 terminator
**
** Returns a pointer to the first word or NULL on error
*/
2010-09-01 10:52:02 +02:00
char * get_nextfield(char ** pstr)
2010-08-31 03:50:41 +02:00
{
2010-09-01 10:52:02 +02:00
char * p = *pstr;
char * start = NULL;
if (!pstr || !*pstr)
return NULL;
while (1)
{
/* Strip white space and other delimiters */
while (*p && (isspace((int)*p) || *p == ',' || *p == ';' || *p == '='))
p++;
if (!*p)
{
*pstr = p;
return NULL; /* No field */
}
if (*p == '"') /* quoted field */
{
start = ++p;
for (; *p && *p != '"'; p++)
if (*p == '\\' && *(p + 1))
p++;
/* Skip escaped chars */
break; /* kr95-10-9: needs to stop here */
}
else if (*p == '<') /* quoted field */
{
start = ++p;
for (; *p && *p != '>'; p++)
if (*p == '\\' && *(p + 1))
p++;
/* Skip escaped chars */
break; /* kr95-10-9: needs to stop here */
}
else if (*p == '(') /* Comment */
{
for (; *p && *p != ')'; p++)
if (*p == '\\' && *(p + 1))
p++;
/* Skip escaped chars */
p++;
}
else /* Spool field */
{
start = p;
while (*p && !isspace((int)*p) && *p != ',' && *p != ';' && *p != '=')
p++;
break; /* Got it */
}
2010-08-31 03:50:41 +02:00
}
2010-09-01 10:52:02 +02:00
if (*p)
*p++ = '\0';
*pstr = p;
return start;
2010-08-31 03:50:41 +02:00
}
2010-09-01 10:52:02 +02:00
uerr_t ftp_parse(ftpparse *fp, char *buf, int len)
2010-08-31 03:50:41 +02:00
{
char *cp;
char *token;
char *ptr;
char *date;
int i;
2010-09-01 10:52:02 +02:00
2010-08-31 03:50:41 +02:00
fp->filename = 0;
fp->namelen = 0;
// fp->flagtrycwd = 0;
// fp->flagtryretr = 0;
//fp->sizetype = FTPPARSE_SIZE_UNKNOWN;
fp->filesize = 0;
// fp->mtimetype = FTPPARSE_MTIME_UNKNOWN;
fp->mtime = 0;
// fp->idtype = FTPPARSE_ID_UNKNOWN;
fp->id = 0;
// fp->idlen = 0;
2010-09-01 10:52:02 +02:00
proz_debug("FTP LIST to be parsed is %s", cp = strdup(buf));
2010-08-31 03:50:41 +02:00
free(cp);
if (len < 2) /* an empty name in EPLF, with no info, could be 2 chars */
2010-09-01 10:52:02 +02:00
return FTPPARSENOTEXIST;
2010-08-31 03:50:41 +02:00
2010-09-01 10:52:02 +02:00
switch (*buf)
{
2010-08-31 03:50:41 +02:00
case 'b':
case 'c':
case 'd':
case 'l':
case 'p':
case 's':
case '-':
2010-09-01 10:52:02 +02:00
/* UNIX-style listing, without inum and without blocks */
/* "-rw-r--r-- 1 root other 531 Jan 29 03:26 README" */
/* "dr-xr-xr-x 2 root other 512 Apr 8 1994 etc" */
/* "dr-xr-xr-x 2 root 512 Apr 8 1994 etc" */
/* "lrwxrwxrwx 1 root other 7 Jan 25 00:17 bin -> usr/bin" */
/* Also produced by Microsoft's FTP servers for Windows: */
/* "---------- 1 owner group 1803128 Jul 10 10:18 ls-lR.Z" */
/* "d--------- 1 owner group 0 May 9 19:45 Softlib" */
/* Also WFTPD for MSDOS: */
/* "-rwxrwxrwx 1 noone nogroup 322 Aug 19 1996 message.ftp" */
/* Also NetWare: */
/* "d [R----F--] supervisor 512 Jan 16 18:53 login" */
/* "- [R----F--] rhesus 214059 Oct 20 15:27 cx.exe" */
/* Also NetPresenz for the Mac: */
/* "-------r-- 326 1391972 1392298 Nov 22 1995 MegaPhone.sit" */
/* "drwxrwxr-x folder 2 May 10 1996 network"
2010-08-31 03:50:41 +02:00
*/
2010-09-01 10:52:02 +02:00
if (*buf == 'd')
fp->filetype = DIRECTORY;
if (*buf == '-')
fp->filetype = DIRECTORY;
if (*buf == 'l')
fp->filetype = SYMBOLIC_LINK;
ptr = cp = strdup(buf);
for (i = 0; i < 4; i++)
{
//add checking
token = get_nextfield(&cp);
if (token == NULL) //failed to parse
return FTPPARSEFAIL;
}
/*
** This field can either be group or size. We find out by looking at the
** next field. If this is a non-digit then this field is the size.
*/
while (*cp && isspace((int)*cp))
cp++;
if (isdigit((int)*cp))
{
token = get_nextfield(&cp);
while (*cp && isspace((int)*cp))
cp++;
}
//if it is a filename
fp->filesize = strtol(token, NULL, 10);
proz_debug("FTP file size is %ld", fp->filesize);
while (*cp && isspace((int)*cp))
cp++;
assert(cp + 12 < ptr + len);
date = cp;
cp += 12;
*cp++ = '\0';
fp->date_str = strdup(date);
proz_debug("LIST date is %s", fp->date_str);
return FTPPARSEOK;
default:
return FTPPARSEFAIL;
2010-08-31 03:50:41 +02:00
}
}
time_t parse_time(const char * str)
{
2010-09-01 10:52:02 +02:00
char * p;
struct tm tm;
time_t t;
2010-08-31 03:50:41 +02:00
2010-09-01 10:52:02 +02:00
if (!str)
2010-08-31 03:50:41 +02:00
return 0;
2010-09-01 10:52:02 +02:00
if ((p = strchr(str, ',')))
{
}
return 0;
2010-08-31 03:50:41 +02:00
}