|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T u
Length: 667 (0x29b)
Types: TextFile
Names: »uucp.c«
└─⟦9ae75bfbd⟧ Bits:30007242 EUUGD3: Starter Kit
└─⟦3658e588a⟧ »EurOpenD3/mail/mh/mh-6.7.tar.Z«
└─⟦c75e36ecb⟧
└─⟦this⟧ »mh-6.7/mts/mh/uucp.c«
/* uucp.c - various parameters for rmail */
/* LINTLIBRARY */
#include "../h/strings.h"
#include <stdio.h>
#define NOTOK (-1)
#define OK 0
#define SYSFILE "/usr/lib/uucp/L.sys"
/* \f
*/
int uucpsite (system)
register char *system;
{
register char *bp;
char buffer[BUFSIZ];
register FILE *fp;
if ((fp = fopen (SYSFILE, "r")) == NULL)
return NOTOK;
while (fgets (buffer, sizeof buffer, fp)) {
if (strncmp (buffer, "xxx", 3) == 0
|| (bp = index (buffer, ' ')) == NULL)
continue;
*bp = NULL;
if (strcmp (buffer, system) == 0) {
(void) fclose (fp);
return OK;
}
}
(void) fclose (fp);
return NOTOK;
}