Home | History | Annotate | Line # | Download | only in ftpd
conf.c revision 1.31.2.3
      1  1.31.2.3       jmc /*	$NetBSD: conf.c,v 1.31.2.3 2004/08/26 05:00:02 jmc Exp $	*/
      2       1.1     lukem 
      3       1.1     lukem /*-
      4  1.31.2.3       jmc  * Copyright (c) 1997-2004 The NetBSD Foundation, Inc.
      5       1.1     lukem  * All rights reserved.
      6       1.1     lukem  *
      7       1.1     lukem  * This code is derived from software contributed to The NetBSD Foundation
      8       1.1     lukem  * by Simon Burge and Luke Mewburn.
      9       1.1     lukem  *
     10       1.1     lukem  * Redistribution and use in source and binary forms, with or without
     11       1.1     lukem  * modification, are permitted provided that the following conditions
     12       1.1     lukem  * are met:
     13       1.1     lukem  * 1. Redistributions of source code must retain the above copyright
     14       1.1     lukem  *    notice, this list of conditions and the following disclaimer.
     15       1.1     lukem  * 2. Redistributions in binary form must reproduce the above copyright
     16       1.1     lukem  *    notice, this list of conditions and the following disclaimer in the
     17       1.1     lukem  *    documentation and/or other materials provided with the distribution.
     18       1.1     lukem  * 3. All advertising materials mentioning features or use of this software
     19       1.1     lukem  *    must display the following acknowledgement:
     20       1.1     lukem  *        This product includes software developed by the NetBSD
     21       1.1     lukem  *        Foundation, Inc. and its contributors.
     22       1.1     lukem  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23       1.1     lukem  *    contributors may be used to endorse or promote products derived
     24       1.1     lukem  *    from this software without specific prior written permission.
     25       1.1     lukem  *
     26       1.1     lukem  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27       1.1     lukem  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28       1.1     lukem  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29       1.4       jtc  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30       1.4       jtc  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31       1.1     lukem  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32       1.1     lukem  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33       1.1     lukem  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34       1.1     lukem  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35       1.1     lukem  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36       1.1     lukem  * POSSIBILITY OF SUCH DAMAGE.
     37       1.1     lukem  */
     38       1.1     lukem 
     39       1.2  christos #include <sys/cdefs.h>
     40       1.1     lukem #ifndef lint
     41  1.31.2.3       jmc __RCSID("$NetBSD: conf.c,v 1.31.2.3 2004/08/26 05:00:02 jmc Exp $");
     42       1.1     lukem #endif /* not lint */
     43       1.1     lukem 
     44       1.1     lukem #include <sys/types.h>
     45       1.1     lukem #include <sys/param.h>
     46  1.31.2.2     lukem #include <sys/socket.h>
     47       1.1     lukem #include <sys/stat.h>
     48       1.1     lukem 
     49      1.24     lukem #include <ctype.h>
     50       1.1     lukem #include <errno.h>
     51      1.25     lukem #include <fcntl.h>
     52       1.1     lukem #include <glob.h>
     53  1.31.2.2     lukem #include <netdb.h>
     54      1.25     lukem #include <signal.h>
     55       1.1     lukem #include <stdio.h>
     56       1.2  christos #include <stdlib.h>
     57       1.1     lukem #include <string.h>
     58       1.1     lukem #include <stringlist.h>
     59       1.1     lukem #include <syslog.h>
     60      1.23     lukem #include <time.h>
     61      1.23     lukem #include <unistd.h>
     62      1.23     lukem #include <util.h>
     63      1.18  explorer 
     64      1.18  explorer #ifdef KERBEROS5
     65      1.21  christos #include <krb5/krb5.h>
     66      1.18  explorer #endif
     67       1.1     lukem 
     68       1.1     lukem #include "extern.h"
     69       1.1     lukem #include "pathnames.h"
     70       1.1     lukem 
     71      1.30     lukem static char *strend(const char *, char *);
     72      1.30     lukem static int filetypematch(char *, int);
     73      1.15     lukem 
     74       1.1     lukem 
     75  1.31.2.2     lukem 		/* class defaults */
     76  1.31.2.2     lukem #define DEFAULT_LIMIT		-1		/* unlimited connections */
     77  1.31.2.2     lukem #define DEFAULT_MAXFILESIZE	-1		/* unlimited file size */
     78  1.31.2.2     lukem #define DEFAULT_MAXTIMEOUT	7200		/* 2 hours */
     79  1.31.2.2     lukem #define DEFAULT_TIMEOUT		900		/* 15 minutes */
     80  1.31.2.2     lukem #define DEFAULT_UMASK		027		/* 15 minutes */
     81  1.31.2.2     lukem 
     82       1.1     lukem /*
     83      1.25     lukem  * Initialise curclass to an `empty' state
     84       1.1     lukem  */
     85       1.1     lukem void
     86      1.30     lukem init_curclass(void)
     87       1.1     lukem {
     88       1.1     lukem 	struct ftpconv	*conv, *cnext;
     89       1.1     lukem 
     90      1.23     lukem 	for (conv = curclass.conversions; conv != NULL; conv = cnext) {
     91       1.1     lukem 		REASSIGN(conv->suffix, NULL);
     92       1.1     lukem 		REASSIGN(conv->types, NULL);
     93       1.1     lukem 		REASSIGN(conv->disable, NULL);
     94       1.1     lukem 		REASSIGN(conv->command, NULL);
     95       1.1     lukem 		cnext = conv->next;
     96       1.1     lukem 		free(conv);
     97       1.1     lukem 	}
     98      1.28     lukem 
     99  1.31.2.2     lukem 	memset((char *)&curclass.advertise, 0, sizeof(curclass.advertise));
    100  1.31.2.2     lukem 	curclass.advertise.su_len = 0;		/* `not used' */
    101  1.31.2.1     lukem 	REASSIGN(curclass.chroot, NULL);
    102      1.25     lukem 	REASSIGN(curclass.classname, NULL);
    103       1.1     lukem 	curclass.conversions =	NULL;
    104       1.1     lukem 	REASSIGN(curclass.display, NULL);
    105  1.31.2.1     lukem 	REASSIGN(curclass.homedir, NULL);
    106  1.31.2.2     lukem 	curclass.limit =	DEFAULT_LIMIT;
    107      1.25     lukem 	REASSIGN(curclass.limitfile, NULL);
    108  1.31.2.2     lukem 	curclass.maxfilesize =	DEFAULT_MAXFILESIZE;
    109      1.24     lukem 	curclass.maxrateget =	0;
    110      1.24     lukem 	curclass.maxrateput =	0;
    111  1.31.2.2     lukem 	curclass.maxtimeout =	DEFAULT_MAXTIMEOUT;
    112      1.24     lukem 	REASSIGN(curclass.motd, xstrdup(_PATH_FTPLOGINMESG));
    113       1.1     lukem 	REASSIGN(curclass.notify, NULL);
    114      1.28     lukem 	curclass.portmin =	0;
    115      1.28     lukem 	curclass.portmax =	0;
    116      1.24     lukem 	curclass.rateget =	0;
    117      1.24     lukem 	curclass.rateput =	0;
    118  1.31.2.2     lukem 	curclass.timeout =	DEFAULT_TIMEOUT;
    119  1.31.2.1     lukem 	    /* curclass.type is set elsewhere */
    120  1.31.2.2     lukem 	curclass.umask =	DEFAULT_UMASK;
    121  1.31.2.3       jmc 	curclass.mmapsize =	0;
    122  1.31.2.3       jmc 	curclass.readsize =	0;
    123  1.31.2.3       jmc 	curclass.writesize =	0;
    124  1.31.2.3       jmc 	curclass.sendbufsize =	0;
    125  1.31.2.3       jmc 	curclass.sendlowat =	0;
    126  1.31.2.2     lukem 
    127  1.31.2.2     lukem 	CURCLASS_FLAGS_SET(checkportcmd);
    128  1.31.2.3       jmc 	CURCLASS_FLAGS_CLR(denyquick);
    129  1.31.2.2     lukem 	CURCLASS_FLAGS_SET(modify);
    130  1.31.2.2     lukem 	CURCLASS_FLAGS_SET(passive);
    131  1.31.2.3       jmc 	CURCLASS_FLAGS_CLR(private);
    132  1.31.2.2     lukem 	CURCLASS_FLAGS_CLR(sanenames);
    133  1.31.2.2     lukem 	CURCLASS_FLAGS_SET(upload);
    134      1.25     lukem }
    135      1.25     lukem 
    136      1.25     lukem /*
    137      1.25     lukem  * Parse the configuration file, looking for the named class, and
    138      1.25     lukem  * define curclass to contain the appropriate settings.
    139      1.25     lukem  */
    140      1.25     lukem void
    141      1.30     lukem parse_conf(const char *findclass)
    142      1.25     lukem {
    143      1.25     lukem 	FILE		*f;
    144      1.25     lukem 	char		*buf, *p;
    145      1.25     lukem 	size_t		 len;
    146  1.31.2.2     lukem 	LLT		 llval;
    147  1.31.2.2     lukem 	int		 none, match;
    148  1.31.2.3       jmc 	char		*endp, errbuf[100];
    149      1.26     lukem 	char		*class, *word, *arg, *template;
    150      1.25     lukem 	const char	*infile;
    151      1.25     lukem 	size_t		 line;
    152      1.25     lukem 	struct ftpconv	*conv, *cnext;
    153      1.25     lukem 
    154      1.25     lukem 	init_curclass();
    155      1.25     lukem 	REASSIGN(curclass.classname, xstrdup(findclass));
    156  1.31.2.2     lukem 			/* set more guest defaults */
    157       1.1     lukem 	if (strcasecmp(findclass, "guest") == 0) {
    158  1.31.2.2     lukem 		CURCLASS_FLAGS_CLR(modify);
    159       1.1     lukem 		curclass.umask = 0707;
    160       1.1     lukem 	}
    161       1.1     lukem 
    162       1.6     lukem 	infile = conffilename(_PATH_FTPDCONF);
    163       1.1     lukem 	if ((f = fopen(infile, "r")) == NULL)
    164       1.1     lukem 		return;
    165       1.1     lukem 
    166       1.1     lukem 	line = 0;
    167      1.26     lukem 	template = NULL;
    168      1.23     lukem 	for (;
    169      1.23     lukem 	    (buf = fparseln(f, &len, &line, NULL, FPARSELN_UNESCCOMM |
    170  1.31.2.3       jmc 			    FPARSELN_UNESCCONT | FPARSELN_UNESCESC)) != NULL;
    171      1.23     lukem 	    free(buf)) {
    172       1.1     lukem 		none = match = 0;
    173      1.23     lukem 		p = buf;
    174       1.5     lukem 		if (len < 1)
    175       1.5     lukem 			continue;
    176      1.23     lukem 		if (p[len - 1] == '\n')
    177      1.23     lukem 			p[--len] = '\0';
    178      1.23     lukem 		if (EMPTYSTR(p))
    179       1.1     lukem 			continue;
    180       1.1     lukem 
    181      1.23     lukem 		NEXTWORD(p, word);
    182      1.23     lukem 		NEXTWORD(p, class);
    183      1.23     lukem 		NEXTWORD(p, arg);
    184       1.1     lukem 		if (EMPTYSTR(word) || EMPTYSTR(class))
    185       1.1     lukem 			continue;
    186       1.1     lukem 		if (strcasecmp(class, "none") == 0)
    187       1.1     lukem 			none = 1;
    188      1.27     lukem 		if (! (strcasecmp(class, findclass) == 0 ||
    189      1.27     lukem 		       (template != NULL && strcasecmp(class, template) == 0) ||
    190      1.27     lukem 		       none ||
    191      1.27     lukem 		       strcasecmp(class, "all") == 0) )
    192       1.1     lukem 			continue;
    193       1.1     lukem 
    194  1.31.2.3       jmc #define CONF_FLAG(Field)						\
    195  1.31.2.3       jmc 	do {								\
    196  1.31.2.3       jmc 		if (none ||						\
    197  1.31.2.3       jmc 		    (!EMPTYSTR(arg) && strcasecmp(arg, "off") == 0))	\
    198  1.31.2.3       jmc 			CURCLASS_FLAGS_CLR(Field);			\
    199  1.31.2.3       jmc 		else							\
    200  1.31.2.3       jmc 			CURCLASS_FLAGS_SET(Field);			\
    201  1.31.2.2     lukem 	} while (0)
    202  1.31.2.2     lukem 
    203  1.31.2.3       jmc #define CONF_STRING(Field)						\
    204  1.31.2.3       jmc 	do {								\
    205  1.31.2.3       jmc 		if (none || EMPTYSTR(arg))				\
    206  1.31.2.3       jmc 			arg = NULL;					\
    207  1.31.2.3       jmc 		else							\
    208  1.31.2.3       jmc 			arg = xstrdup(arg);				\
    209  1.31.2.3       jmc 		REASSIGN(curclass.Field, arg);				\
    210  1.31.2.2     lukem 	} while (0)
    211  1.31.2.2     lukem 
    212  1.31.2.3       jmc #define CONF_LL(Field,Arg,Min,Max)					\
    213  1.31.2.3       jmc 	do {								\
    214  1.31.2.3       jmc 		if (none || EMPTYSTR(Arg))				\
    215  1.31.2.3       jmc 			goto nextline;					\
    216  1.31.2.3       jmc 		llval = strsuftollx(#Field, Arg, Min, Max,		\
    217  1.31.2.3       jmc 		    errbuf, sizeof(errbuf));				\
    218  1.31.2.3       jmc 		if (errbuf[0]) {					\
    219  1.31.2.3       jmc 			syslog(LOG_WARNING, "%s line %d: %s",		\
    220  1.31.2.3       jmc 			    infile, (int)line, errbuf);			\
    221  1.31.2.3       jmc 			goto nextline;					\
    222  1.31.2.3       jmc 		}							\
    223  1.31.2.3       jmc 		curclass.Field = llval;					\
    224  1.31.2.3       jmc 	} while(0)
    225  1.31.2.2     lukem 
    226  1.31.2.2     lukem 		if (0)  {
    227  1.31.2.2     lukem 			/* no-op */
    228  1.31.2.2     lukem 
    229  1.31.2.3       jmc 		} else if ((strcasecmp(word, "advertise") == 0)
    230  1.31.2.3       jmc 			|| (strcasecmp(word, "advertize") == 0)) {
    231  1.31.2.2     lukem 			struct addrinfo	hints, *res;
    232  1.31.2.2     lukem 			int		error;
    233  1.31.2.2     lukem 
    234  1.31.2.2     lukem 			memset((char *)&curclass.advertise, 0,
    235  1.31.2.2     lukem 			    sizeof(curclass.advertise));
    236  1.31.2.2     lukem 			curclass.advertise.su_len = 0;
    237  1.31.2.2     lukem 			if (none || EMPTYSTR(arg))
    238  1.31.2.2     lukem 				continue;
    239  1.31.2.2     lukem 			res = NULL;
    240  1.31.2.2     lukem 			memset(&hints, 0, sizeof(hints));
    241  1.31.2.2     lukem 					/*
    242  1.31.2.2     lukem 					 * only get addresses of the family
    243  1.31.2.2     lukem 					 * that we're listening on
    244  1.31.2.2     lukem 					 */
    245  1.31.2.2     lukem 			hints.ai_family = ctrl_addr.su_family;
    246  1.31.2.2     lukem 			hints.ai_socktype = SOCK_STREAM;
    247  1.31.2.2     lukem 			error = getaddrinfo(arg, "0", &hints, &res);
    248  1.31.2.2     lukem 			if (error) {
    249  1.31.2.2     lukem 				syslog(LOG_WARNING, "%s line %d: %s",
    250  1.31.2.2     lukem 				    infile, (int)line, gai_strerror(error));
    251  1.31.2.2     lukem  advertiseparsefail:
    252  1.31.2.2     lukem 				if (res)
    253  1.31.2.2     lukem 					freeaddrinfo(res);
    254  1.31.2.2     lukem 				continue;
    255  1.31.2.2     lukem 			}
    256  1.31.2.2     lukem 			if (res->ai_next) {
    257  1.31.2.2     lukem 				syslog(LOG_WARNING,
    258  1.31.2.2     lukem     "%s line %d: multiple addresses returned for `%s'; please be more specific",
    259  1.31.2.2     lukem 				    infile, (int)line, arg);
    260  1.31.2.2     lukem 				goto advertiseparsefail;
    261  1.31.2.2     lukem 			}
    262  1.31.2.2     lukem 			if (sizeof(curclass.advertise) < res->ai_addrlen || (
    263  1.31.2.2     lukem #ifdef INET6
    264  1.31.2.2     lukem 			    res->ai_family != AF_INET6 &&
    265  1.31.2.2     lukem #endif
    266  1.31.2.2     lukem 			    res->ai_family != AF_INET)) {
    267  1.31.2.2     lukem 				syslog(LOG_WARNING,
    268  1.31.2.2     lukem     "%s line %d: unsupported protocol %d for `%s'",
    269  1.31.2.2     lukem 				    infile, (int)line, res->ai_family, arg);
    270  1.31.2.2     lukem 				goto advertiseparsefail;
    271  1.31.2.2     lukem 			}
    272  1.31.2.2     lukem 			memcpy(&curclass.advertise, res->ai_addr,
    273  1.31.2.2     lukem 			    res->ai_addrlen);
    274  1.31.2.2     lukem 			curclass.advertise.su_len = res->ai_addrlen;
    275  1.31.2.2     lukem 			freeaddrinfo(res);
    276  1.31.2.2     lukem 
    277  1.31.2.2     lukem 		} else if (strcasecmp(word, "checkportcmd") == 0) {
    278  1.31.2.2     lukem 			CONF_FLAG(checkportcmd);
    279      1.23     lukem 
    280  1.31.2.1     lukem 		} else if (strcasecmp(word, "chroot") == 0) {
    281  1.31.2.2     lukem 			CONF_STRING(chroot);
    282  1.31.2.1     lukem 
    283      1.24     lukem 		} else if (strcasecmp(word, "classtype") == 0) {
    284      1.24     lukem 			if (!none && !EMPTYSTR(arg)) {
    285      1.24     lukem 				if (strcasecmp(arg, "GUEST") == 0)
    286      1.24     lukem 					curclass.type = CLASS_GUEST;
    287      1.24     lukem 				else if (strcasecmp(arg, "CHROOT") == 0)
    288      1.24     lukem 					curclass.type = CLASS_CHROOT;
    289      1.24     lukem 				else if (strcasecmp(arg, "REAL") == 0)
    290      1.24     lukem 					curclass.type = CLASS_REAL;
    291      1.24     lukem 				else {
    292      1.24     lukem 					syslog(LOG_WARNING,
    293      1.24     lukem 				    "%s line %d: unknown class type `%s'",
    294      1.24     lukem 					    infile, (int)line, arg);
    295      1.24     lukem 					continue;
    296      1.24     lukem 				}
    297      1.24     lukem 			}
    298      1.24     lukem 
    299       1.9     lukem 		} else if (strcasecmp(word, "conversion") == 0) {
    300       1.5     lukem 			char *suffix, *types, *disable, *convcmd;
    301       1.5     lukem 
    302       1.1     lukem 			if (EMPTYSTR(arg)) {
    303       1.1     lukem 				syslog(LOG_WARNING,
    304       1.1     lukem 				    "%s line %d: %s requires a suffix",
    305      1.23     lukem 				    infile, (int)line, word);
    306       1.1     lukem 				continue;	/* need a suffix */
    307       1.1     lukem 			}
    308      1.23     lukem 			NEXTWORD(p, types);
    309      1.23     lukem 			NEXTWORD(p, disable);
    310      1.23     lukem 			convcmd = p;
    311       1.1     lukem 			if (convcmd)
    312       1.1     lukem 				convcmd += strspn(convcmd, " \t");
    313      1.23     lukem 			suffix = xstrdup(arg);
    314       1.1     lukem 			if (none || EMPTYSTR(types) ||
    315       1.1     lukem 			    EMPTYSTR(disable) || EMPTYSTR(convcmd)) {
    316       1.1     lukem 				types = NULL;
    317       1.1     lukem 				disable = NULL;
    318       1.1     lukem 				convcmd = NULL;
    319       1.1     lukem 			} else {
    320      1.23     lukem 				types = xstrdup(types);
    321      1.23     lukem 				disable = xstrdup(disable);
    322      1.23     lukem 				convcmd = xstrdup(convcmd);
    323       1.1     lukem 			}
    324       1.1     lukem 			for (conv = curclass.conversions; conv != NULL;
    325       1.1     lukem 			    conv = conv->next) {
    326       1.5     lukem 				if (strcmp(conv->suffix, suffix) == 0)
    327       1.1     lukem 					break;
    328       1.1     lukem 			}
    329       1.1     lukem 			if (conv == NULL) {
    330       1.1     lukem 				conv = (struct ftpconv *)
    331       1.1     lukem 				    calloc(1, sizeof(struct ftpconv));
    332       1.1     lukem 				if (conv == NULL) {
    333       1.1     lukem 					syslog(LOG_WARNING, "can't malloc");
    334       1.1     lukem 					continue;
    335       1.1     lukem 				}
    336      1.23     lukem 				conv->next = NULL;
    337      1.23     lukem 				for (cnext = curclass.conversions;
    338      1.23     lukem 				    cnext != NULL; cnext = cnext->next)
    339      1.23     lukem 					if (cnext->next == NULL)
    340      1.23     lukem 						break;
    341      1.23     lukem 				if (cnext != NULL)
    342      1.23     lukem 					cnext->next = conv;
    343      1.23     lukem 				else
    344      1.23     lukem 					curclass.conversions = conv;
    345       1.1     lukem 			}
    346       1.5     lukem 			REASSIGN(conv->suffix, suffix);
    347       1.1     lukem 			REASSIGN(conv->types, types);
    348       1.1     lukem 			REASSIGN(conv->disable, disable);
    349       1.1     lukem 			REASSIGN(conv->command, convcmd);
    350      1.23     lukem 
    351  1.31.2.3       jmc 		} else if (strcasecmp(word, "denyquick") == 0) {
    352  1.31.2.3       jmc 			CONF_FLAG(denyquick);
    353  1.31.2.3       jmc 
    354       1.1     lukem 		} else if (strcasecmp(word, "display") == 0) {
    355  1.31.2.2     lukem 			CONF_STRING(display);
    356      1.23     lukem 
    357  1.31.2.1     lukem 		} else if (strcasecmp(word, "homedir") == 0) {
    358  1.31.2.2     lukem 			CONF_STRING(homedir);
    359  1.31.2.1     lukem 
    360      1.25     lukem 		} else if (strcasecmp(word, "limit") == 0) {
    361  1.31.2.2     lukem 			curclass.limit = DEFAULT_LIMIT;
    362  1.31.2.2     lukem 			REASSIGN(curclass.limitfile, NULL);
    363  1.31.2.3       jmc 			CONF_LL(limit, arg, -1, LLTMAX);
    364      1.26     lukem 			REASSIGN(curclass.limitfile,
    365      1.26     lukem 			    EMPTYSTR(p) ? NULL : xstrdup(p));
    366      1.25     lukem 
    367  1.31.2.2     lukem 		} else if (strcasecmp(word, "maxfilesize") == 0) {
    368  1.31.2.2     lukem 			curclass.maxfilesize = DEFAULT_MAXFILESIZE;
    369  1.31.2.3       jmc 			CONF_LL(maxfilesize, arg, -1, LLTMAX);
    370  1.31.2.2     lukem 
    371       1.1     lukem 		} else if (strcasecmp(word, "maxtimeout") == 0) {
    372  1.31.2.2     lukem 			curclass.maxtimeout = DEFAULT_MAXTIMEOUT;
    373  1.31.2.3       jmc 			CONF_LL(maxtimeout, arg,
    374  1.31.2.3       jmc 			    MIN(30, curclass.timeout), LLTMAX);
    375  1.31.2.3       jmc 
    376  1.31.2.3       jmc 		} else if (strcasecmp(word, "mmapsize") == 0) {
    377  1.31.2.3       jmc 			curclass.mmapsize = 0;
    378  1.31.2.3       jmc 			CONF_LL(mmapsize, arg, 0, LLTMAX);
    379  1.31.2.3       jmc 
    380  1.31.2.3       jmc 		} else if (strcasecmp(word, "readsize") == 0) {
    381  1.31.2.3       jmc 			curclass.readsize = 0;
    382  1.31.2.3       jmc 			CONF_LL(readsize, arg, 0, LLTMAX);
    383  1.31.2.3       jmc 
    384  1.31.2.3       jmc 		} else if (strcasecmp(word, "writesize") == 0) {
    385  1.31.2.3       jmc 			curclass.writesize = 0;
    386  1.31.2.3       jmc 			CONF_LL(writesize, arg, 0, LLTMAX);
    387  1.31.2.3       jmc 
    388  1.31.2.3       jmc 		} else if (strcasecmp(word, "sendbufsize") == 0) {
    389  1.31.2.3       jmc 			curclass.sendbufsize = 0;
    390  1.31.2.3       jmc 			CONF_LL(sendbufsize, arg, 0, LLTMAX);
    391  1.31.2.3       jmc 
    392  1.31.2.3       jmc 		} else if (strcasecmp(word, "sendlowat") == 0) {
    393  1.31.2.3       jmc 			curclass.sendlowat = 0;
    394  1.31.2.3       jmc 			CONF_LL(sendlowat, arg, 0, LLTMAX);
    395      1.23     lukem 
    396       1.1     lukem 		} else if (strcasecmp(word, "modify") == 0) {
    397  1.31.2.2     lukem 			CONF_FLAG(modify);
    398      1.23     lukem 
    399      1.24     lukem 		} else if (strcasecmp(word, "motd") == 0) {
    400  1.31.2.2     lukem 			CONF_STRING(motd);
    401      1.24     lukem 
    402       1.1     lukem 		} else if (strcasecmp(word, "notify") == 0) {
    403  1.31.2.2     lukem 			CONF_STRING(notify);
    404      1.23     lukem 
    405      1.14        tv 		} else if (strcasecmp(word, "passive") == 0) {
    406  1.31.2.2     lukem 			CONF_FLAG(passive);
    407      1.28     lukem 
    408      1.28     lukem 		} else if (strcasecmp(word, "portrange") == 0) {
    409  1.31.2.3       jmc 			long minport, maxport;
    410      1.28     lukem 
    411  1.31.2.2     lukem 			curclass.portmin = 0;
    412  1.31.2.2     lukem 			curclass.portmax = 0;
    413  1.31.2.2     lukem 			if (none || EMPTYSTR(arg))
    414      1.28     lukem 				continue;
    415  1.31.2.3       jmc 			if (EMPTYSTR(p)) {
    416      1.28     lukem 				syslog(LOG_WARNING,
    417      1.28     lukem 				   "%s line %d: missing maxport argument",
    418      1.28     lukem 				   infile, (int)line);
    419      1.28     lukem 				continue;
    420      1.28     lukem 			}
    421  1.31.2.3       jmc 			minport = strsuftollx("minport", arg, IPPORT_RESERVED,
    422  1.31.2.3       jmc 			    IPPORT_ANONMAX, errbuf, sizeof(errbuf));
    423  1.31.2.3       jmc 			if (errbuf[0]) {
    424  1.31.2.3       jmc 				syslog(LOG_WARNING, "%s line %d: %s",
    425  1.31.2.3       jmc 				    infile, (int)line, errbuf);
    426      1.28     lukem 				continue;
    427      1.28     lukem 			}
    428  1.31.2.3       jmc 			maxport = strsuftollx("maxport", p, IPPORT_RESERVED,
    429  1.31.2.3       jmc 			    IPPORT_ANONMAX, errbuf, sizeof(errbuf));
    430  1.31.2.3       jmc 			if (errbuf[0]) {
    431  1.31.2.3       jmc 				syslog(LOG_WARNING, "%s line %d: %s",
    432  1.31.2.3       jmc 				    infile, (int)line, errbuf);
    433      1.28     lukem 				continue;
    434      1.28     lukem 			}
    435      1.28     lukem 			if (minport >= maxport) {
    436      1.28     lukem 				syslog(LOG_WARNING,
    437  1.31.2.3       jmc 				    "%s line %d: minport %ld >= maxport %ld",
    438      1.28     lukem 				    infile, (int)line, minport, maxport);
    439      1.28     lukem 				continue;
    440      1.28     lukem 			}
    441  1.31.2.3       jmc 			curclass.portmin = (int)minport;
    442  1.31.2.3       jmc 			curclass.portmax = (int)maxport;
    443  1.31.2.3       jmc 
    444  1.31.2.3       jmc 		} else if (strcasecmp(word, "private") == 0) {
    445  1.31.2.3       jmc 			CONF_FLAG(private);
    446      1.23     lukem 
    447      1.24     lukem 		} else if (strcasecmp(word, "rateget") == 0) {
    448  1.31.2.3       jmc 			curclass.maxrateget = curclass.rateget = 0;
    449  1.31.2.3       jmc 			CONF_LL(rateget, arg, 0, LLTMAX);
    450  1.31.2.3       jmc 			curclass.maxrateget = curclass.rateget;
    451      1.24     lukem 
    452      1.24     lukem 		} else if (strcasecmp(word, "rateput") == 0) {
    453  1.31.2.3       jmc 			curclass.maxrateput = curclass.rateput = 0;
    454  1.31.2.3       jmc 			CONF_LL(rateput, arg, 0, LLTMAX);
    455  1.31.2.3       jmc 			curclass.maxrateput = curclass.rateput;
    456  1.31.2.2     lukem 
    457  1.31.2.2     lukem 		} else if (strcasecmp(word, "sanenames") == 0) {
    458  1.31.2.2     lukem 			CONF_FLAG(sanenames);
    459      1.24     lukem 
    460       1.1     lukem 		} else if (strcasecmp(word, "timeout") == 0) {
    461  1.31.2.2     lukem 			curclass.timeout = DEFAULT_TIMEOUT;
    462  1.31.2.3       jmc 			CONF_LL(timeout, arg, 30, curclass.maxtimeout);
    463      1.23     lukem 
    464      1.26     lukem 		} else if (strcasecmp(word, "template") == 0) {
    465      1.26     lukem 			if (none)
    466      1.26     lukem 				continue;
    467      1.26     lukem 			REASSIGN(template, EMPTYSTR(arg) ? NULL : xstrdup(arg));
    468      1.26     lukem 
    469       1.1     lukem 		} else if (strcasecmp(word, "umask") == 0) {
    470  1.31.2.3       jmc 			u_long fumask;
    471       1.1     lukem 
    472  1.31.2.2     lukem 			curclass.umask = DEFAULT_UMASK;
    473       1.1     lukem 			if (none || EMPTYSTR(arg))
    474       1.1     lukem 				continue;
    475  1.31.2.3       jmc 			errno = 0;
    476  1.31.2.3       jmc 			endp = NULL;
    477  1.31.2.3       jmc 			fumask = strtoul(arg, &endp, 8);
    478  1.31.2.3       jmc 			if (errno || *arg == '\0' || *endp != '\0' ||
    479  1.31.2.3       jmc 			    fumask > 0777) {
    480       1.1     lukem 				syslog(LOG_WARNING,
    481       1.1     lukem 				    "%s line %d: invalid umask %s",
    482      1.23     lukem 				    infile, (int)line, arg);
    483       1.1     lukem 				continue;
    484       1.1     lukem 			}
    485  1.31.2.3       jmc 			curclass.umask = (mode_t)fumask;
    486      1.23     lukem 
    487      1.24     lukem 		} else if (strcasecmp(word, "upload") == 0) {
    488  1.31.2.2     lukem 			CONF_FLAG(upload);
    489  1.31.2.2     lukem 			if (! CURCLASS_FLAGS_ISSET(upload))
    490  1.31.2.2     lukem 				CURCLASS_FLAGS_CLR(modify);
    491      1.24     lukem 
    492       1.1     lukem 		} else {
    493       1.1     lukem 			syslog(LOG_WARNING,
    494       1.1     lukem 			    "%s line %d: unknown directive '%s'",
    495      1.23     lukem 			    infile, (int)line, word);
    496       1.1     lukem 			continue;
    497       1.1     lukem 		}
    498  1.31.2.3       jmc  nextline:
    499  1.31.2.3       jmc 		;
    500       1.1     lukem 	}
    501      1.26     lukem 	REASSIGN(template, NULL);
    502       1.1     lukem 	fclose(f);
    503       1.1     lukem }
    504       1.1     lukem 
    505       1.1     lukem /*
    506       1.1     lukem  * Show file listed in curclass.display first time in, and list all the
    507  1.31.2.2     lukem  * files named in curclass.notify in the current directory.
    508  1.31.2.2     lukem  * Send back responses with the prefix `code' + "-".
    509  1.31.2.2     lukem  * If code == -1, flush the internal cache of directory names and return.
    510       1.1     lukem  */
    511       1.1     lukem void
    512      1.30     lukem show_chdir_messages(int code)
    513       1.1     lukem {
    514       1.1     lukem 	static StringList *slist = NULL;
    515       1.1     lukem 
    516       1.1     lukem 	struct stat st;
    517       1.1     lukem 	struct tm *t;
    518       1.1     lukem 	glob_t	 gl;
    519       1.1     lukem 	time_t	 now, then;
    520       1.1     lukem 	int	 age;
    521  1.31.2.3       jmc 	char	 curwd[MAXPATHLEN];
    522       1.1     lukem 	char	*cp, **rlist;
    523       1.1     lukem 
    524  1.31.2.2     lukem 	if (code == -1) {
    525  1.31.2.2     lukem 		if (slist != NULL)
    526  1.31.2.2     lukem 			sl_free(slist, 1);
    527  1.31.2.2     lukem 		slist = NULL;
    528  1.31.2.2     lukem 		return;
    529  1.31.2.2     lukem 	}
    530  1.31.2.2     lukem 
    531      1.29     lukem 	if (quietmessages)
    532      1.29     lukem 		return;
    533      1.29     lukem 
    534       1.1     lukem 		/* Setup list for directory cache */
    535       1.1     lukem 	if (slist == NULL)
    536       1.1     lukem 		slist = sl_init();
    537      1.22     lukem 	if (slist == NULL) {
    538      1.22     lukem 		syslog(LOG_WARNING, "can't allocate memory for stringlist");
    539      1.22     lukem 		return;
    540      1.22     lukem 	}
    541       1.1     lukem 
    542       1.1     lukem 		/* Check if this directory has already been visited */
    543  1.31.2.3       jmc 	if (getcwd(curwd, sizeof(curwd) - 1) == NULL) {
    544      1.13     mouse 		syslog(LOG_WARNING, "can't getcwd: %s", strerror(errno));
    545       1.1     lukem 		return;
    546       1.1     lukem 	}
    547  1.31.2.3       jmc 	if (sl_find(slist, curwd) != NULL)
    548       1.1     lukem 		return;
    549       1.1     lukem 
    550  1.31.2.3       jmc 	cp = xstrdup(curwd);
    551      1.22     lukem 	if (sl_add(slist, cp) == -1)
    552      1.22     lukem 		syslog(LOG_WARNING, "can't add `%s' to stringlist", cp);
    553       1.1     lukem 
    554       1.1     lukem 		/* First check for a display file */
    555  1.31.2.1     lukem 	(void)display_file(curclass.display, code);
    556       1.1     lukem 
    557       1.1     lukem 		/* Now see if there are any notify files */
    558      1.24     lukem 	if (EMPTYSTR(curclass.notify))
    559       1.1     lukem 		return;
    560       1.1     lukem 
    561  1.31.2.3       jmc 	memset(&gl, 0, sizeof(gl));
    562  1.31.2.3       jmc 	if (glob(curclass.notify, GLOB_BRACE|GLOB_LIMIT, NULL, &gl) != 0
    563  1.31.2.2     lukem 	    || gl.gl_matchc == 0) {
    564  1.31.2.2     lukem 		globfree(&gl);
    565       1.1     lukem 		return;
    566  1.31.2.2     lukem 	}
    567       1.1     lukem 	time(&now);
    568       1.1     lukem 	for (rlist = gl.gl_pathv; *rlist != NULL; rlist++) {
    569       1.1     lukem 		if (stat(*rlist, &st) != 0)
    570       1.1     lukem 			continue;
    571       1.7   mycroft 		if (!S_ISREG(st.st_mode))
    572       1.1     lukem 			continue;
    573       1.1     lukem 		then = st.st_mtime;
    574      1.20     lukem 		if (code != 0) {
    575  1.31.2.1     lukem 			reply(-code, "%s", "");
    576      1.20     lukem 			code = 0;
    577      1.20     lukem 		}
    578      1.31     lukem 		reply(-code, "Please read the file %s", *rlist);
    579       1.1     lukem 		t = localtime(&now);
    580       1.1     lukem 		age = 365 * t->tm_year + t->tm_yday;
    581       1.1     lukem 		t = localtime(&then);
    582       1.1     lukem 		age -= 365 * t->tm_year + t->tm_yday;
    583      1.31     lukem 		reply(-code, "  it was last modified on %.24s - %d day%s ago",
    584      1.19     lukem 		    ctime(&then), age, PLURAL(age));
    585       1.1     lukem 	}
    586       1.1     lukem 	globfree(&gl);
    587       1.1     lukem }
    588       1.1     lukem 
    589      1.24     lukem int
    590  1.31.2.1     lukem display_file(const char *file, int code)
    591      1.24     lukem {
    592      1.24     lukem 	FILE   *f;
    593  1.31.2.3       jmc 	char   *buf, *p;
    594  1.31.2.3       jmc 	char	curwd[MAXPATHLEN];
    595      1.24     lukem 	size_t	len;
    596  1.31.2.2     lukem 	off_t	lastnum;
    597      1.24     lukem 	time_t	now;
    598      1.29     lukem 
    599  1.31.2.2     lukem 	lastnum = 0;
    600      1.29     lukem 	if (quietmessages)
    601      1.29     lukem 		return (0);
    602      1.24     lukem 
    603      1.24     lukem 	if (EMPTYSTR(file))
    604      1.24     lukem 		return(0);
    605      1.24     lukem 	if ((f = fopen(file, "r")) == NULL)
    606      1.24     lukem 		return (0);
    607  1.31.2.1     lukem 	reply(-code, "%s", "");
    608      1.24     lukem 
    609      1.24     lukem 	for (;
    610      1.24     lukem 	    (buf = fparseln(f, &len, NULL, "\0\0\0", 0)) != NULL; free(buf)) {
    611      1.24     lukem 		if (len > 0)
    612      1.24     lukem 			if (buf[len - 1] == '\n')
    613      1.24     lukem 				buf[--len] = '\0';
    614      1.31     lukem 		cprintf(stdout, "    ");
    615      1.24     lukem 
    616      1.24     lukem 		for (p = buf; *p; p++) {
    617      1.24     lukem 			if (*p == '%') {
    618      1.24     lukem 				p++;
    619      1.24     lukem 				switch (*p) {
    620      1.25     lukem 
    621      1.25     lukem 				case 'c':
    622      1.31     lukem 					cprintf(stdout, "%s",
    623      1.25     lukem 					    curclass.classname ?
    624      1.25     lukem 					    curclass.classname : "<unknown>");
    625      1.25     lukem 					break;
    626      1.25     lukem 
    627      1.24     lukem 				case 'C':
    628  1.31.2.3       jmc 					if (getcwd(curwd, sizeof(curwd)-1)
    629  1.31.2.3       jmc 					    == NULL){
    630      1.24     lukem 						syslog(LOG_WARNING,
    631      1.24     lukem 						    "can't getcwd: %s",
    632      1.24     lukem 						    strerror(errno));
    633      1.24     lukem 						continue;
    634      1.24     lukem 					}
    635  1.31.2.3       jmc 					cprintf(stdout, "%s", curwd);
    636      1.24     lukem 					break;
    637      1.25     lukem 
    638      1.24     lukem 				case 'E':
    639  1.31.2.2     lukem 					if (! EMPTYSTR(emailaddr))
    640  1.31.2.2     lukem 						cprintf(stdout, "%s",
    641  1.31.2.2     lukem 						    emailaddr);
    642      1.24     lukem 					break;
    643      1.25     lukem 
    644      1.24     lukem 				case 'L':
    645      1.31     lukem 					cprintf(stdout, "%s", hostname);
    646      1.24     lukem 					break;
    647      1.25     lukem 
    648      1.25     lukem 				case 'M':
    649  1.31.2.2     lukem 					if (curclass.limit == -1) {
    650      1.31     lukem 						cprintf(stdout, "unlimited");
    651  1.31.2.2     lukem 						lastnum = 0;
    652  1.31.2.2     lukem 					} else {
    653  1.31.2.3       jmc 						cprintf(stdout, LLF,
    654  1.31.2.3       jmc 						    (LLT)curclass.limit);
    655  1.31.2.2     lukem 						lastnum = curclass.limit;
    656  1.31.2.2     lukem 					}
    657      1.25     lukem 					break;
    658      1.25     lukem 
    659      1.25     lukem 				case 'N':
    660  1.31.2.2     lukem 					cprintf(stdout, "%d", connections);
    661  1.31.2.2     lukem 					lastnum = connections;
    662      1.25     lukem 					break;
    663      1.25     lukem 
    664      1.24     lukem 				case 'R':
    665      1.31     lukem 					cprintf(stdout, "%s", remotehost);
    666      1.24     lukem 					break;
    667      1.25     lukem 
    668  1.31.2.2     lukem 				case 's':
    669  1.31.2.2     lukem 					if (lastnum != 1)
    670  1.31.2.2     lukem 						cprintf(stdout, "s");
    671  1.31.2.2     lukem 					break;
    672  1.31.2.2     lukem 
    673  1.31.2.2     lukem 				case 'S':
    674  1.31.2.2     lukem 					if (lastnum != 1)
    675  1.31.2.2     lukem 						cprintf(stdout, "S");
    676  1.31.2.2     lukem 					break;
    677  1.31.2.2     lukem 
    678      1.24     lukem 				case 'T':
    679      1.24     lukem 					now = time(NULL);
    680      1.31     lukem 					cprintf(stdout, "%.24s", ctime(&now));
    681      1.24     lukem 					break;
    682      1.25     lukem 
    683      1.24     lukem 				case 'U':
    684      1.31     lukem 					cprintf(stdout, "%s",
    685      1.24     lukem 					    pw ? pw->pw_name : "<unknown>");
    686      1.24     lukem 					break;
    687      1.25     lukem 
    688      1.24     lukem 				case '%':
    689      1.31     lukem 					CPUTC('%', stdout);
    690      1.24     lukem 					break;
    691      1.25     lukem 
    692      1.24     lukem 				}
    693      1.31     lukem 			} else
    694      1.31     lukem 				CPUTC(*p, stdout);
    695      1.24     lukem 		}
    696      1.31     lukem 		cprintf(stdout, "\r\n");
    697      1.24     lukem 	}
    698      1.24     lukem 
    699      1.24     lukem 	(void)fflush(stdout);
    700      1.24     lukem 	(void)fclose(f);
    701      1.24     lukem 	return (1);
    702  1.31.2.1     lukem }
    703  1.31.2.1     lukem 
    704  1.31.2.1     lukem /*
    705  1.31.2.1     lukem  * Parse src, expanding '%' escapes, into dst (which must be at least
    706  1.31.2.1     lukem  * MAXPATHLEN long).
    707  1.31.2.1     lukem  */
    708  1.31.2.1     lukem void
    709  1.31.2.1     lukem format_path(char *dst, const char *src)
    710  1.31.2.1     lukem {
    711  1.31.2.1     lukem 	size_t len;
    712  1.31.2.1     lukem 	const char *p;
    713  1.31.2.1     lukem 
    714  1.31.2.1     lukem 	dst[0] = '\0';
    715  1.31.2.1     lukem 	len = 0;
    716  1.31.2.1     lukem 	if (src == NULL)
    717  1.31.2.1     lukem 		return;
    718  1.31.2.1     lukem 	for (p = src; *p && len < MAXPATHLEN; p++) {
    719  1.31.2.1     lukem 		if (*p == '%') {
    720  1.31.2.1     lukem 			p++;
    721  1.31.2.1     lukem 			switch (*p) {
    722  1.31.2.1     lukem 
    723  1.31.2.1     lukem 			case 'c':
    724  1.31.2.1     lukem 				len += strlcpy(dst + len, curclass.classname,
    725  1.31.2.1     lukem 				    MAXPATHLEN - len);
    726  1.31.2.1     lukem 				break;
    727  1.31.2.1     lukem 
    728  1.31.2.1     lukem 			case 'd':
    729  1.31.2.1     lukem 				len += strlcpy(dst + len, pw->pw_dir,
    730  1.31.2.1     lukem 				    MAXPATHLEN - len);
    731  1.31.2.1     lukem 				break;
    732  1.31.2.1     lukem 
    733  1.31.2.1     lukem 			case 'u':
    734  1.31.2.1     lukem 				len += strlcpy(dst + len, pw->pw_name,
    735  1.31.2.1     lukem 				    MAXPATHLEN - len);
    736  1.31.2.1     lukem 				break;
    737  1.31.2.1     lukem 
    738  1.31.2.1     lukem 			case '%':
    739  1.31.2.1     lukem 				dst[len++] = '%';
    740  1.31.2.1     lukem 				break;
    741  1.31.2.1     lukem 
    742  1.31.2.1     lukem 			}
    743  1.31.2.1     lukem 		} else
    744  1.31.2.1     lukem 			dst[len++] = *p;
    745  1.31.2.1     lukem 	}
    746  1.31.2.1     lukem 	if (len < MAXPATHLEN)
    747  1.31.2.1     lukem 		dst[len] = '\0';
    748  1.31.2.1     lukem 	dst[MAXPATHLEN - 1] = '\0';
    749      1.24     lukem }
    750      1.24     lukem 
    751       1.1     lukem /*
    752      1.23     lukem  * Find s2 at the end of s1.  If found, return a string up to (but
    753       1.1     lukem  * not including) s2, otherwise returns NULL.
    754       1.1     lukem  */
    755       1.1     lukem static char *
    756      1.30     lukem strend(const char *s1, char *s2)
    757       1.1     lukem {
    758      1.25     lukem 	static	char buf[MAXPATHLEN];
    759       1.1     lukem 
    760       1.1     lukem 	char	*start;
    761       1.1     lukem 	size_t	l1, l2;
    762       1.1     lukem 
    763       1.1     lukem 	l1 = strlen(s1);
    764       1.1     lukem 	l2 = strlen(s2);
    765       1.1     lukem 
    766  1.31.2.3       jmc 	if (l2 >= l1 || l1 >= sizeof(buf))
    767       1.1     lukem 		return(NULL);
    768       1.1     lukem 
    769      1.24     lukem 	strlcpy(buf, s1, sizeof(buf));
    770       1.1     lukem 	start = buf + (l1 - l2);
    771       1.1     lukem 
    772       1.1     lukem 	if (strcmp(start, s2) == 0) {
    773       1.1     lukem 		*start = '\0';
    774       1.1     lukem 		return(buf);
    775       1.1     lukem 	} else
    776       1.1     lukem 		return(NULL);
    777       1.1     lukem }
    778       1.1     lukem 
    779       1.1     lukem static int
    780      1.30     lukem filetypematch(char *types, int mode)
    781       1.1     lukem {
    782       1.1     lukem 	for ( ; types[0] != '\0'; types++)
    783       1.1     lukem 		switch (*types) {
    784       1.1     lukem 		  case 'd':
    785       1.1     lukem 			if (S_ISDIR(mode))
    786       1.1     lukem 				return(1);
    787       1.1     lukem 			break;
    788       1.1     lukem 		  case 'f':
    789       1.1     lukem 			if (S_ISREG(mode))
    790       1.1     lukem 				return(1);
    791       1.1     lukem 			break;
    792       1.1     lukem 		}
    793       1.1     lukem 	return(0);
    794       1.1     lukem }
    795       1.1     lukem 
    796       1.1     lukem /*
    797       1.1     lukem  * Look for a conversion.  If we succeed, return a pointer to the
    798       1.1     lukem  * command to execute for the conversion.
    799       1.1     lukem  *
    800       1.1     lukem  * The command is stored in a static array so there's no memory
    801       1.1     lukem  * leak problems, and not too much to change in ftpd.c.  This
    802       1.1     lukem  * routine doesn't need to be re-entrant unless we start using a
    803       1.1     lukem  * multi-threaded ftpd, and that's not likely for a while...
    804       1.1     lukem  */
    805      1.23     lukem char **
    806      1.30     lukem do_conversion(const char *fname)
    807       1.1     lukem {
    808       1.1     lukem 	struct ftpconv	*cp;
    809       1.1     lukem 	struct stat	 st;
    810       1.1     lukem 	int		 o_errno;
    811       1.3  christos 	char		*base = NULL;
    812      1.23     lukem 	char		*cmd, *p, *lp, **argv;
    813      1.23     lukem 	StringList	*sl;
    814       1.1     lukem 
    815       1.1     lukem 	o_errno = errno;
    816      1.23     lukem 	sl = NULL;
    817      1.23     lukem 	cmd = NULL;
    818       1.1     lukem 	for (cp = curclass.conversions; cp != NULL; cp = cp->next) {
    819       1.5     lukem 		if (cp->suffix == NULL) {
    820       1.5     lukem 			syslog(LOG_WARNING,
    821       1.5     lukem 			    "cp->suffix==NULL in conv list; SHOULDN'T HAPPEN!");
    822       1.5     lukem 			continue;
    823       1.5     lukem 		}
    824       1.1     lukem 		if ((base = strend(fname, cp->suffix)) == NULL)
    825       1.1     lukem 			continue;
    826       1.5     lukem 		if (cp->types == NULL || cp->disable == NULL ||
    827       1.1     lukem 		    cp->command == NULL)
    828       1.1     lukem 			continue;
    829       1.1     lukem 					/* Is it enabled? */
    830       1.1     lukem 		if (strcmp(cp->disable, ".") != 0 &&
    831       1.1     lukem 		    stat(cp->disable, &st) == 0)
    832       1.1     lukem 				continue;
    833       1.1     lukem 					/* Does the base exist? */
    834       1.1     lukem 		if (stat(base, &st) < 0)
    835       1.1     lukem 			continue;
    836       1.1     lukem 					/* Is the file type ok */
    837       1.1     lukem 		if (!filetypematch(cp->types, st.st_mode))
    838       1.1     lukem 			continue;
    839       1.1     lukem 		break;			/* "We have a winner!" */
    840       1.1     lukem 	}
    841       1.1     lukem 
    842       1.1     lukem 	/* If we got through the list, no conversion */
    843      1.23     lukem 	if (cp == NULL)
    844      1.23     lukem 		goto cleanup_do_conv;
    845      1.23     lukem 
    846      1.23     lukem 	/* Split up command into an argv */
    847      1.23     lukem 	if ((sl = sl_init()) == NULL)
    848      1.23     lukem 		goto cleanup_do_conv;
    849      1.23     lukem 	cmd = xstrdup(cp->command);
    850      1.23     lukem 	p = cmd;
    851      1.23     lukem 	while (p) {
    852      1.23     lukem 		NEXTWORD(p, lp);
    853      1.23     lukem 		if (strcmp(lp, "%s") == 0)
    854      1.23     lukem 			lp = base;
    855      1.23     lukem 		if (sl_add(sl, xstrdup(lp)) == -1)
    856      1.23     lukem 			goto cleanup_do_conv;
    857       1.1     lukem 	}
    858       1.1     lukem 
    859      1.23     lukem 	if (sl_add(sl, NULL) == -1)
    860      1.23     lukem 		goto cleanup_do_conv;
    861      1.23     lukem 	argv = sl->sl_str;
    862      1.23     lukem 	free(cmd);
    863      1.23     lukem 	free(sl);
    864      1.23     lukem 	return(argv);
    865      1.23     lukem 
    866      1.23     lukem  cleanup_do_conv:
    867      1.23     lukem 	if (sl)
    868      1.23     lukem 		sl_free(sl, 1);
    869      1.23     lukem 	free(cmd);
    870      1.23     lukem 	errno = o_errno;
    871      1.23     lukem 	return(NULL);
    872      1.24     lukem }
    873      1.24     lukem 
    874      1.24     lukem /*
    875      1.26     lukem  * Count the number of current connections, reading from
    876      1.26     lukem  *	/var/run/ftpd.pids-<class>
    877      1.26     lukem  * Does a kill -0 on each pid in that file, and only counts
    878      1.26     lukem  * processes that exist (or frees the slot if it doesn't).
    879      1.26     lukem  * Adds getpid() to the first free slot. Truncates the file
    880      1.26     lukem  * if possible.
    881      1.26     lukem  */
    882      1.25     lukem void
    883      1.30     lukem count_users(void)
    884      1.25     lukem {
    885      1.25     lukem 	char	fn[MAXPATHLEN];
    886      1.25     lukem 	int	fd, i, last;
    887      1.25     lukem 	size_t	count;
    888      1.25     lukem 	pid_t  *pids, mypid;
    889      1.25     lukem 	struct stat sb;
    890      1.25     lukem 
    891      1.25     lukem 	(void)strlcpy(fn, _PATH_CLASSPIDS, sizeof(fn));
    892      1.25     lukem 	(void)strlcat(fn, curclass.classname, sizeof(fn));
    893      1.25     lukem 	pids = NULL;
    894      1.25     lukem 	connections = 1;
    895      1.25     lukem 
    896  1.31.2.2     lukem 	if ((fd = open(fn, O_RDWR | O_CREAT, 0600)) == -1)
    897      1.25     lukem 		return;
    898  1.31.2.2     lukem 	if (lockf(fd, F_TLOCK, 0) == -1)
    899  1.31.2.2     lukem 		goto cleanup_count;
    900      1.25     lukem 	if (fstat(fd, &sb) == -1)
    901      1.25     lukem 		goto cleanup_count;
    902      1.25     lukem 	if ((pids = malloc(sb.st_size + sizeof(pid_t))) == NULL)
    903      1.25     lukem 		goto cleanup_count;
    904      1.25     lukem 	count = read(fd, pids, sb.st_size);
    905      1.25     lukem 	if (count < 0 || count != sb.st_size)
    906      1.25     lukem 		goto cleanup_count;
    907      1.25     lukem 	count /= sizeof(pid_t);
    908      1.25     lukem 	mypid = getpid();
    909      1.25     lukem 	last = 0;
    910      1.25     lukem 	for (i = 0; i < count; i++) {
    911      1.25     lukem 		if (pids[i] == 0)
    912      1.25     lukem 			continue;
    913      1.25     lukem 		if (kill(pids[i], 0) == -1 && errno != EPERM) {
    914      1.25     lukem 			if (mypid != 0) {
    915      1.25     lukem 				pids[i] = mypid;
    916      1.25     lukem 				mypid = 0;
    917      1.25     lukem 				last = i;
    918      1.25     lukem 			}
    919      1.25     lukem 		} else {
    920      1.25     lukem 			connections++;
    921      1.25     lukem 			last = i;
    922      1.25     lukem 		}
    923      1.25     lukem 	}
    924      1.25     lukem 	if (mypid != 0) {
    925      1.25     lukem 		if (pids[last] != 0)
    926      1.25     lukem 			last++;
    927      1.25     lukem 		pids[last] = mypid;
    928      1.25     lukem 	}
    929      1.25     lukem 	count = (last + 1) * sizeof(pid_t);
    930      1.25     lukem 	if (lseek(fd, 0, SEEK_SET) == -1)
    931      1.25     lukem 		goto cleanup_count;
    932      1.25     lukem 	if (write(fd, pids, count) == -1)
    933      1.25     lukem 		goto cleanup_count;
    934      1.25     lukem 	(void)ftruncate(fd, count);
    935      1.25     lukem 
    936      1.25     lukem  cleanup_count:
    937  1.31.2.2     lukem 	if (lseek(fd, 0, SEEK_SET) != -1)
    938  1.31.2.2     lukem 		(void)lockf(fd, F_ULOCK, 0);
    939      1.25     lukem 	close(fd);
    940      1.25     lukem 	REASSIGN(pids, NULL);
    941       1.1     lukem }
    942