02ace70617
components of the system. The license is poorly worded, though I have an (email only) release from the author for unlimited FreeBSD use. I will try to get something more concrete, though the author's remote location makes this difficult. Submitted by: Oleg Orel <orel@oea.ihep.su>
143 lines
2.8 KiB
C
143 lines
2.8 KiB
C
/*
|
|
Library for ftpd clients.(libftp)
|
|
Copyright by Oleg Orel
|
|
All rights reserved.
|
|
|
|
This library is desined for free, non-commercial software creation.
|
|
It is changeable and can be improved. The author would greatly appreciate
|
|
any advises, new components and patches of the existing programs.
|
|
Commercial usage is also possible with participation of it's author.
|
|
|
|
|
|
|
|
*/
|
|
|
|
#include "FtpLibrary.h"
|
|
#include <pwd.h>
|
|
|
|
static FTP *ftp_table[256];
|
|
static STATUS syntax();
|
|
|
|
FILE * FtpFullOpen(char * file , char * mode )
|
|
{
|
|
FTP *ftp;
|
|
FILE *tmp;
|
|
String Host,User,Passwd,RemoteFile;
|
|
STATUS i;
|
|
|
|
if ( ! FtpFullSyntax (file,Host,User,Passwd,RemoteFile))
|
|
{
|
|
tmp=fopen(file,mode);
|
|
if (tmp==NULL) return tmp;
|
|
ftp_table[(int)fileno(tmp)] = NULL;
|
|
return tmp;
|
|
}
|
|
if ( FtpError(i=FtpLogin(&ftp,Host,User,Passwd,NULL)))
|
|
return NULL;
|
|
|
|
if (mode[1]=='b') FtpBinary(ftp);
|
|
|
|
switch(mode[0])
|
|
{
|
|
case 'r':
|
|
if (FtpError(FtpOpenRead(ftp,RemoteFile)))
|
|
return NULL;
|
|
ftp_table[fileno(FTPDATA(ftp))] = ftp;
|
|
return FTPDATA(ftp);
|
|
case 'w':
|
|
if (FtpError(FtpOpenWrite(ftp,RemoteFile)))
|
|
return NULL;
|
|
ftp_table[fileno(FTPDATA(ftp))] = ftp;
|
|
return FTPDATA(ftp);
|
|
case 'a':
|
|
if (FtpError(FtpOpenAppend(ftp,RemoteFile)))
|
|
return NULL;
|
|
ftp_table[fileno(FTPDATA(ftp))] = ftp;
|
|
return FTPDATA(ftp);
|
|
}
|
|
/* Error Mode */
|
|
return NULL;
|
|
}
|
|
|
|
STATUS FtpFullClose(FILE *f)
|
|
{
|
|
FTP *ftp=ftp_table[(int)fileno(f)];
|
|
if (ftp == NULL)
|
|
return fclose(f);
|
|
FtpClose(ftp);
|
|
return FtpQuickBye(ftp);
|
|
}
|
|
|
|
|
|
/* Format of ftp's file [user[/passord]@]hostname:filename_with_path */
|
|
|
|
STATUS FtpFullSyntax ( String source ,
|
|
String host ,
|
|
String user ,
|
|
String passwd ,
|
|
String file)
|
|
|
|
{
|
|
char *in,*out;
|
|
String tmp;
|
|
|
|
host[0] = user[0] = passwd[0] = file[0] = '\0';
|
|
|
|
for ( in=source, out = user;
|
|
*in !='\0' && *in != '/' && *in!='@' && *in!=':' ;
|
|
*out++ = *in++);
|
|
*out = '\0';
|
|
|
|
if ( *in == '\0' ) return 0;
|
|
|
|
if ( *in == ':' )
|
|
{
|
|
strcpy(host,user);
|
|
strcpy(user,"anonymous");
|
|
gethostname(tmp, sizeof tmp);
|
|
sprintf(passwd,"%s@%s",
|
|
getpwuid(getuid())->pw_name,gethostbyname(tmp)->h_name);
|
|
goto file;
|
|
}
|
|
|
|
if ( *in == '/' )
|
|
{
|
|
for ( in++, out = passwd;
|
|
*in !='\0' && *in!='@' ;
|
|
*out++ = *in++);
|
|
*out = '\0';
|
|
if ( *in == '\0' ) return 0;
|
|
}
|
|
else
|
|
{
|
|
gethostname(tmp, sizeof tmp);
|
|
sprintf(passwd,"%s@%s",
|
|
getpwuid(getuid())->pw_name,gethostbyname(tmp)->h_name);
|
|
}
|
|
|
|
|
|
for ( in++, out = host;
|
|
*in !='\0' && *in!=':' ;
|
|
*out++ = *in++);
|
|
*out = '\0';
|
|
|
|
if ( *in == '\0' ) return 0;
|
|
|
|
file:
|
|
|
|
for ( in++, out = file;
|
|
*in !='\0';
|
|
*out++ = *in++);
|
|
*out = '\0';
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|