Telnet服务器

开发平台：
Unix_Linux

file.c：源码内容
							#include <stdio.h>
#include <sys/stat.h>
#include <sys/types.h>
#include <varargs.h>
#define MAXARGS     100
/*   isfile is called by
 *   isfile(filenamecomp1, filecomp2,  filecomp3, ..., (char *)0);
 *   extern "C" int isfile(const char *, const char *[]) ;
*/
char    FILEBUF[4096];
static char DOLLAR_[8192];
char   *
getstream(fp)
FILE   *fp;
{
	return fgets(DOLLAR_, sizeof(DOLLAR_) - 1, fp);
}
/*
    The same as sprintf, but return the new string
    fileglue("%s/%s",home,".newsrc");
*/
char   *
fileglue(va_alist)
va_dcl
{
	va_list ap;
	register char *fmt;
	static char *newstring;
	static char gluebuffer[8192];
	va_start(ap);
	fmt = va_arg(ap, char *);
	vsprintf(gluebuffer, fmt, ap);
	newstring = gluebuffer;
	va_end(ap);
	return newstring;
}
long
filesize(filename)
char   *filename;
{
	struct stat st;
	if (stat(filename, &st))
		return 0;
	return st.st_size;
}
int 
iszerofile(filename)
char   *filename;
{
	struct stat st;
	if (stat(filename, &st))
		return 0;
	if (st.st_size == 0)
		return 1;
	return 0;
}
int 
isfile(filename)
char   *filename;
{
	struct stat st;
	if (stat(filename, &st))
		return 0;
	if (!S_ISREG(st.st_mode))
		return 0;
	return 1;
}
int 
isfilev(va_alist)
va_dcl
{
	va_list ap;
	struct stat st;
	char   *p;
	va_start(ap);
	FILEBUF[0] = '';
	while ((p = va_arg(ap, char *)) != (char *) 0) {
		strcat(FILEBUF, p);
	}
	printf("file %sn", FILEBUF);
	va_end(ap);
	return isfile(FILEBUF);
}
int 
isdir(filename)
char   *filename;
{
	struct stat st;
	if (stat(filename, &st))
		return 0;
	if (!S_ISDIR(st.st_mode))
		return 0;
	return 1;
}
int 
isdirv(va_alist)
va_dcl
{
	va_list ap;
	struct stat st;
	char   *p;
	va_start(ap);
	FILEBUF[0] = '';
	while ((p = va_arg(ap, char *)) != (char *) 0) {
		strcat(FILEBUF, p);
	}
	va_end(ap);
	return isdir(FILEBUF);
}
unsigned long 
mtime(filename)
char   *filename;
{
	struct stat st;
	if (stat(filename, &st))
		return 0;
	return st.st_mtime;
}
unsigned long 
mtimev(va_alist)
va_dcl
{
	va_list ap;
	struct stat st;
	char   *p;
	va_start(ap);
	FILEBUF[0] = '';
	while ((p = va_arg(ap, char *)) != (char *) 0) {
		strcat(FILEBUF, p);
	}
	va_end(ap);
	return mtime(FILEBUF);
}
unsigned long 
atime(filename)
char   *filename;
{
	struct stat st;
	if (stat(filename, &st))
		return 0;
	return st.st_atime;
}
unsigned long 
atimev(va_alist)
va_dcl
{
	va_list ap;
	struct stat st;
	char   *p;
	va_start(ap);
	FILEBUF[0] = '';
	while ((p = va_arg(ap, char *)) != (char *) 0) {
		strcat(FILEBUF, p);
	}
	va_end(ap);
	return atime(FILEBUF);
}
/*#undef TEST*/
#ifdef TEST
main(argc, argv)
int     argc;
char  **argv;
{
	int     i;
	if (argc > 3) {
		if (isfilev(argv[1], argv[2], (char *) 0))
			printf("%s %s %s is filen", argv[1], argv[2], argv[3]);
		if (isdirv(argv[1], argv[2], (char *) 0))
			printf("%s %s %s is dirn", argv[1], argv[2], argv[3]);
		printf("mtime %dn", mtimev(argv[1], argv[2], (char *) 0));
		printf("atime %dn", atimev(argv[1], argv[2], (char *) 0));
	}
	printf("fileglue %sn", fileglue("%s/%s", "home", ".test"));
}
#endif

						