freebsd-nq/lib/libftp/utils/mirror.c
1995-05-30 05:51:47 +00:00

93 lines
1.3 KiB
C

/* Mirror directrory structure to another host */
#include <stdio.h>
#include <sys/types.h>
#include <sys/dir.h>
#include <sys/stat.h>
#include <syslog.h>
#include <FtpLibrary.h>
/* Usage: mirror <local_dir> <host> <user> <passwd> <remote_dir> */
FTP *ftp;
main(int a,char **b)
{
#define LOCAL_DIR b[1]
#define HOST b[2]
#define USER b[3]
#define PASSWD b[4]
#define REMOTE_DIR b[5]
if ( a < 5 )
quit("Usage: mirror <local_dir> <host> <user> <passwd> <remote_dir>");
FtplibDebug(yes);
FtpLogin(&ftp,HOST,USER,PASSWD,NULL);
FtpChdir(ftp,REMOTE_DIR);
FtpBinary(ftp);
doit(LOCAL_DIR);
exit(0);
}
doit(char *dirname)
{
DIR *dp;
struct direct *de;
char n[256],fn[256];
struct stat st;
if ( (dp=opendir(dirname)) == NULL )
{
log(dirname);
return;
}
while ( (de = readdir(dp)) != NULL )
{
if ( de -> d_name[0] == '.' )
continue;
sprintf(fn,"%s/%s",dirname,de->d_name);
if ( stat(fn,&st) != 0 ) {
log(fn);
continue;
}
if ( S_ISDIR (st.st_mode) )
{
FtpCommand(ftp,"MKD %s",fn,0,EOF); /* Ignore errors (0,EOF) */
doit(fn);
continue;
}
if ( st.st_size != FtpSize(ftp,fn))
FtpPut(ftp,fn,fn);
}
closedir(dp);
}
quit(char *s)
{
log(s);
exit(1);
}
log(char *s)
{
perror(s);
}