1  | 
     | 
     | 
    /*	$OpenBSD: sem.c,v 1.36 2015/12/14 05:59:56 mmcc Exp $	*/  | 
    
    
    2  | 
     | 
     | 
    /*	$NetBSD: sem.c,v 1.10 1996/11/11 23:40:11 gwr Exp $	*/  | 
    
    
    3  | 
     | 
     | 
     | 
    
    
    4  | 
     | 
     | 
    /*  | 
    
    
    5  | 
     | 
     | 
     * Copyright (c) 1992, 1993  | 
    
    
    6  | 
     | 
     | 
     *	The Regents of the University of California.  All rights reserved.  | 
    
    
    7  | 
     | 
     | 
     *  | 
    
    
    8  | 
     | 
     | 
     * This software was developed by the Computer Systems Engineering group  | 
    
    
    9  | 
     | 
     | 
     * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and  | 
    
    
    10  | 
     | 
     | 
     * contributed to Berkeley.  | 
    
    
    11  | 
     | 
     | 
     *  | 
    
    
    12  | 
     | 
     | 
     * All advertising materials mentioning features or use of this software  | 
    
    
    13  | 
     | 
     | 
     * must display the following acknowledgement:  | 
    
    
    14  | 
     | 
     | 
     *	This product includes software developed by the University of  | 
    
    
    15  | 
     | 
     | 
     *	California, Lawrence Berkeley Laboratories.  | 
    
    
    16  | 
     | 
     | 
     *  | 
    
    
    17  | 
     | 
     | 
     * Redistribution and use in source and binary forms, with or without  | 
    
    
    18  | 
     | 
     | 
     * modification, are permitted provided that the following conditions  | 
    
    
    19  | 
     | 
     | 
     * are met:  | 
    
    
    20  | 
     | 
     | 
     * 1. Redistributions of source code must retain the above copyright  | 
    
    
    21  | 
     | 
     | 
     *    notice, this list of conditions and the following disclaimer.  | 
    
    
    22  | 
     | 
     | 
     * 2. Redistributions in binary form must reproduce the above copyright  | 
    
    
    23  | 
     | 
     | 
     *    notice, this list of conditions and the following disclaimer in the  | 
    
    
    24  | 
     | 
     | 
     *    documentation and/or other materials provided with the distribution.  | 
    
    
    25  | 
     | 
     | 
     * 3. Neither the name of the University nor the names of its contributors  | 
    
    
    26  | 
     | 
     | 
     *    may be used to endorse or promote products derived from this software  | 
    
    
    27  | 
     | 
     | 
     *    without specific prior written permission.  | 
    
    
    28  | 
     | 
     | 
     *  | 
    
    
    29  | 
     | 
     | 
     * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND  | 
    
    
    30  | 
     | 
     | 
     * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE  | 
    
    
    31  | 
     | 
     | 
     * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE  | 
    
    
    32  | 
     | 
     | 
     * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE  | 
    
    
    33  | 
     | 
     | 
     * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL  | 
    
    
    34  | 
     | 
     | 
     * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS  | 
    
    
    35  | 
     | 
     | 
     * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)  | 
    
    
    36  | 
     | 
     | 
     * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT  | 
    
    
    37  | 
     | 
     | 
     * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY  | 
    
    
    38  | 
     | 
     | 
     * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF  | 
    
    
    39  | 
     | 
     | 
     * SUCH DAMAGE.  | 
    
    
    40  | 
     | 
     | 
     *  | 
    
    
    41  | 
     | 
     | 
     *	from: @(#)sem.c	8.1 (Berkeley) 6/6/93  | 
    
    
    42  | 
     | 
     | 
     */  | 
    
    
    43  | 
     | 
     | 
     | 
    
    
    44  | 
     | 
     | 
    #include <sys/param.h>	/* NODEV */  | 
    
    
    45  | 
     | 
     | 
     | 
    
    
    46  | 
     | 
     | 
    #include <ctype.h>  | 
    
    
    47  | 
     | 
     | 
    #include <err.h>  | 
    
    
    48  | 
     | 
     | 
    #include <stdio.h>  | 
    
    
    49  | 
     | 
     | 
    #include <stdlib.h>  | 
    
    
    50  | 
     | 
     | 
    #include <string.h>  | 
    
    
    51  | 
     | 
     | 
     | 
    
    
    52  | 
     | 
     | 
    #include "config.h"  | 
    
    
    53  | 
     | 
     | 
    #include "sem.h"  | 
    
    
    54  | 
     | 
     | 
     | 
    
    
    55  | 
     | 
     | 
    /*  | 
    
    
    56  | 
     | 
     | 
     * config semantics.  | 
    
    
    57  | 
     | 
     | 
     */  | 
    
    
    58  | 
     | 
     | 
     | 
    
    
    59  | 
     | 
     | 
    #define	NAMESIZE	100	/* local name buffers */  | 
    
    
    60  | 
     | 
     | 
     | 
    
    
    61  | 
     | 
     | 
    const char *s_generic;  | 
    
    
    62  | 
     | 
     | 
    const char *s_nfs;  | 
    
    
    63  | 
     | 
     | 
     | 
    
    
    64  | 
     | 
     | 
    static struct hashtab *attrtab;		/* for attribute lookup */  | 
    
    
    65  | 
     | 
     | 
    static struct hashtab *cfhashtab;	/* for config lookup */  | 
    
    
    66  | 
     | 
     | 
    static struct hashtab *devitab;		/* etc */  | 
    
    
    67  | 
     | 
     | 
     | 
    
    
    68  | 
     | 
     | 
    static struct attr errattr;  | 
    
    
    69  | 
     | 
     | 
    static struct devbase errdev;  | 
    
    
    70  | 
     | 
     | 
    static struct deva errdeva;  | 
    
    
    71  | 
     | 
     | 
    static struct devbase **nextbase;  | 
    
    
    72  | 
     | 
     | 
    static struct deva **nextdeva;  | 
    
    
    73  | 
     | 
     | 
    static struct config **nextcf;  | 
    
    
    74  | 
     | 
     | 
    static struct devi **nextdevi;  | 
    
    
    75  | 
     | 
     | 
    static struct devi **nextpseudo;  | 
    
    
    76  | 
     | 
     | 
     | 
    
    
    77  | 
     | 
     | 
    static int has_errobj(struct nvlist *, void *);  | 
    
    
    78  | 
     | 
     | 
    static struct nvlist *addtoattr(struct nvlist *, struct devbase *);  | 
    
    
    79  | 
     | 
     | 
    static int exclude(struct nvlist *, const char *, const char *);  | 
    
    
    80  | 
     | 
     | 
    static int resolve(struct nvlist **, const char *, const char *,  | 
    
    
    81  | 
     | 
     | 
        struct nvlist *, int);  | 
    
    
    82  | 
     | 
     | 
    static int lresolve(struct nvlist **, const char *, const char *,  | 
    
    
    83  | 
     | 
     | 
        struct nvlist *, int);  | 
    
    
    84  | 
     | 
     | 
    static struct devi *newdevi(const char *, int, struct devbase *d);  | 
    
    
    85  | 
     | 
     | 
    static struct devi *getdevi(const char *);  | 
    
    
    86  | 
     | 
     | 
    static const char *concat(const char *, int);  | 
    
    
    87  | 
     | 
     | 
    static char *extend(char *, const char *);  | 
    
    
    88  | 
     | 
     | 
    static int split(const char *, size_t, char *, size_t, int *);  | 
    
    
    89  | 
     | 
     | 
    static void selectbase(struct devbase *, struct deva *);  | 
    
    
    90  | 
     | 
     | 
    static int onlist(struct nvlist *, void *);  | 
    
    
    91  | 
     | 
     | 
    static const char **fixloc(const char *, struct attr *, struct nvlist *);  | 
    
    
    92  | 
     | 
     | 
     | 
    
    
    93  | 
     | 
     | 
    void  | 
    
    
    94  | 
     | 
     | 
    initsem(void)  | 
    
    
    95  | 
     | 
     | 
    { | 
    
    
    96  | 
     | 
     | 
     | 
    
    
    97  | 
     | 
     | 
    	attrtab = ht_new();  | 
    
    
    98  | 
     | 
     | 
    	errattr.a_name = "<internal>";  | 
    
    
    99  | 
     | 
     | 
     | 
    
    
    100  | 
     | 
     | 
    	allbases = NULL;  | 
    
    
    101  | 
     | 
     | 
    	nextbase = &allbases;  | 
    
    
    102  | 
     | 
     | 
     | 
    
    
    103  | 
     | 
     | 
    	alldevas = NULL;  | 
    
    
    104  | 
     | 
     | 
    	nextdeva = &alldevas;  | 
    
    
    105  | 
     | 
     | 
     | 
    
    
    106  | 
     | 
     | 
    	cfhashtab = ht_new();  | 
    
    
    107  | 
     | 
     | 
    	allcf = NULL;  | 
    
    
    108  | 
     | 
     | 
    	nextcf = &allcf;  | 
    
    
    109  | 
     | 
     | 
     | 
    
    
    110  | 
     | 
     | 
    	devitab = ht_new();  | 
    
    
    111  | 
     | 
     | 
    	alldevi = NULL;  | 
    
    
    112  | 
     | 
     | 
    	nextdevi = &alldevi;  | 
    
    
    113  | 
     | 
     | 
    	errdev.d_name = "<internal>";  | 
    
    
    114  | 
     | 
     | 
     | 
    
    
    115  | 
     | 
     | 
    	allpseudo = NULL;  | 
    
    
    116  | 
     | 
     | 
    	nextpseudo = &allpseudo;  | 
    
    
    117  | 
     | 
     | 
     | 
    
    
    118  | 
     | 
     | 
    	s_generic = intern("generic"); | 
    
    
    119  | 
     | 
     | 
    	s_nfs = intern("nfs"); | 
    
    
    120  | 
     | 
     | 
    }  | 
    
    
    121  | 
     | 
     | 
     | 
    
    
    122  | 
     | 
     | 
    /* Name of include file just ended (set in scan.l) */  | 
    
    
    123  | 
     | 
     | 
    extern const char *lastfile;  | 
    
    
    124  | 
     | 
     | 
     | 
    
    
    125  | 
     | 
     | 
    void  | 
    
    
    126  | 
     | 
     | 
    enddefs(void)  | 
    
    
    127  | 
     | 
     | 
    { | 
    
    
    128  | 
     | 
     | 
    	struct devbase *dev;  | 
    
    
    129  | 
     | 
     | 
     | 
    
    
    130  | 
     | 
     | 
    	for (dev = allbases; dev != NULL; dev = dev->d_next) { | 
    
    
    131  | 
     | 
     | 
    		if (!dev->d_isdef) { | 
    
    
    132  | 
     | 
     | 
    			(void)fprintf(stderr,  | 
    
    
    133  | 
     | 
     | 
    			    "%s: device `%s' used but not defined\n",  | 
    
    
    134  | 
     | 
     | 
    			    lastfile, dev->d_name);  | 
    
    
    135  | 
     | 
     | 
    			errors++;  | 
    
    
    136  | 
     | 
     | 
    			continue;  | 
    
    
    137  | 
     | 
     | 
    		}  | 
    
    
    138  | 
     | 
     | 
    	}  | 
    
    
    139  | 
     | 
     | 
    	if (errors) { | 
    
    
    140  | 
     | 
     | 
    		(void)fprintf(stderr, "*** Stop.\n");  | 
    
    
    141  | 
     | 
     | 
    		exit(1);  | 
    
    
    142  | 
     | 
     | 
    	}  | 
    
    
    143  | 
     | 
     | 
    }  | 
    
    
    144  | 
     | 
     | 
     | 
    
    
    145  | 
     | 
     | 
    void  | 
    
    
    146  | 
     | 
     | 
    setdefmaxusers(int min, int def, int max)  | 
    
    
    147  | 
     | 
     | 
    { | 
    
    
    148  | 
     | 
     | 
     | 
    
    
    149  | 
     | 
     | 
    	if (min < 1 || min > def || def > max)  | 
    
    
    150  | 
     | 
     | 
    		error("maxusers must have 1 <= min <= default <= max"); | 
    
    
    151  | 
     | 
     | 
    	else { | 
    
    
    152  | 
     | 
     | 
    		minmaxusers = min;  | 
    
    
    153  | 
     | 
     | 
    		defmaxusers = def;  | 
    
    
    154  | 
     | 
     | 
    		maxmaxusers = max;  | 
    
    
    155  | 
     | 
     | 
    	}  | 
    
    
    156  | 
     | 
     | 
    }  | 
    
    
    157  | 
     | 
     | 
     | 
    
    
    158  | 
     | 
     | 
    void  | 
    
    
    159  | 
     | 
     | 
    setmaxusers(int n)  | 
    
    
    160  | 
     | 
     | 
    { | 
    
    
    161  | 
     | 
     | 
     | 
    
    
    162  | 
     | 
     | 
    	if (maxusers != 0) { | 
    
    
    163  | 
     | 
     | 
    		warnx("warning: duplicate maxusers parameter, will use latest definition (%d)", n); | 
    
    
    164  | 
     | 
     | 
    	}  | 
    
    
    165  | 
     | 
     | 
    	maxusers = n;  | 
    
    
    166  | 
     | 
     | 
    	if (n < minmaxusers) { | 
    
    
    167  | 
     | 
     | 
    		warnx("warning: minimum of %d maxusers assumed", minmaxusers); | 
    
    
    168  | 
     | 
     | 
    		maxusers = minmaxusers;  | 
    
    
    169  | 
     | 
     | 
    	} else if (n > maxmaxusers) { | 
    
    
    170  | 
     | 
     | 
    		warnx("warning: maxusers (%d) > %d", n, maxmaxusers); | 
    
    
    171  | 
     | 
     | 
    	}  | 
    
    
    172  | 
     | 
     | 
    }  | 
    
    
    173  | 
     | 
     | 
     | 
    
    
    174  | 
     | 
     | 
    /*  | 
    
    
    175  | 
     | 
     | 
     * Define an attribute, optionally with an interface (a locator list).  | 
    
    
    176  | 
     | 
     | 
     * Since an empty locator list is logically different from "no interface",  | 
    
    
    177  | 
     | 
     | 
     * all locator lists include a dummy head node, which we discard here.  | 
    
    
    178  | 
     | 
     | 
     */  | 
    
    
    179  | 
     | 
     | 
    int  | 
    
    
    180  | 
     | 
     | 
    defattr(const char *name, struct nvlist *locs)  | 
    
    
    181  | 
     | 
     | 
    { | 
    
    
    182  | 
     | 
     | 
    	struct attr *a;  | 
    
    
    183  | 
     | 
     | 
    	struct nvlist *nv;  | 
    
    
    184  | 
     | 
     | 
    	int len;  | 
    
    
    185  | 
     | 
     | 
     | 
    
    
    186  | 
     | 
     | 
    	a = emalloc(sizeof *a);  | 
    
    
    187  | 
     | 
     | 
    	if (ht_insert(attrtab, name, a)) { | 
    
    
    188  | 
     | 
     | 
    		free(a);  | 
    
    
    189  | 
     | 
     | 
    		error("attribute `%s' already defined", name); | 
    
    
    190  | 
     | 
     | 
    		nvfreel(locs);  | 
    
    
    191  | 
     | 
     | 
    		return (1);  | 
    
    
    192  | 
     | 
     | 
    	}  | 
    
    
    193  | 
     | 
     | 
    	a->a_name = name;  | 
    
    
    194  | 
     | 
     | 
    	if (locs != NULL) { | 
    
    
    195  | 
     | 
     | 
    		a->a_iattr = 1;  | 
    
    
    196  | 
     | 
     | 
    		a->a_locs = locs->nv_next;  | 
    
    
    197  | 
     | 
     | 
    		nvfree(locs);  | 
    
    
    198  | 
     | 
     | 
    	} else { | 
    
    
    199  | 
     | 
     | 
    		a->a_iattr = 0;  | 
    
    
    200  | 
     | 
     | 
    		a->a_locs = NULL;  | 
    
    
    201  | 
     | 
     | 
    	}  | 
    
    
    202  | 
     | 
     | 
    	len = 0;  | 
    
    
    203  | 
     | 
     | 
    	for (nv = a->a_locs; nv != NULL; nv = nv->nv_next)  | 
    
    
    204  | 
     | 
     | 
    		len++;  | 
    
    
    205  | 
     | 
     | 
    	a->a_loclen = len;  | 
    
    
    206  | 
     | 
     | 
    	a->a_devs = NULL;  | 
    
    
    207  | 
     | 
     | 
    	a->a_refs = NULL;  | 
    
    
    208  | 
     | 
     | 
    	return (0);  | 
    
    
    209  | 
     | 
     | 
    }  | 
    
    
    210  | 
     | 
     | 
     | 
    
    
    211  | 
     | 
     | 
    /*  | 
    
    
    212  | 
     | 
     | 
     * Return true if the given `error object' is embedded in the given  | 
    
    
    213  | 
     | 
     | 
     * pointer list.  | 
    
    
    214  | 
     | 
     | 
     */  | 
    
    
    215  | 
     | 
     | 
    static int  | 
    
    
    216  | 
     | 
     | 
    has_errobj(struct nvlist *nv, void *obj)  | 
    
    
    217  | 
     | 
     | 
    { | 
    
    
    218  | 
     | 
     | 
     | 
    
    
    219  | 
     | 
     | 
    	for (; nv != NULL; nv = nv->nv_next)  | 
    
    
    220  | 
     | 
     | 
    		if (nv->nv_ptr == obj)  | 
    
    
    221  | 
     | 
     | 
    			return (1);  | 
    
    
    222  | 
     | 
     | 
    	return (0);  | 
    
    
    223  | 
     | 
     | 
    }  | 
    
    
    224  | 
     | 
     | 
     | 
    
    
    225  | 
     | 
     | 
    /*  | 
    
    
    226  | 
     | 
     | 
     * Add a device base to a list in an attribute (actually, to any list).  | 
    
    
    227  | 
     | 
     | 
     * Note that this does not check for duplicates, and does reverse the  | 
    
    
    228  | 
     | 
     | 
     * list order, but no one cares anyway.  | 
    
    
    229  | 
     | 
     | 
     */  | 
    
    
    230  | 
     | 
     | 
    static struct nvlist *  | 
    
    
    231  | 
     | 
     | 
    addtoattr(struct nvlist *l, struct devbase *dev)  | 
    
    
    232  | 
     | 
     | 
    { | 
    
    
    233  | 
     | 
     | 
    	struct nvlist *n;  | 
    
    
    234  | 
     | 
     | 
     | 
    
    
    235  | 
     | 
     | 
    	n = newnv(NULL, NULL, dev, 0, l);  | 
    
    
    236  | 
     | 
     | 
    	return (n);  | 
    
    
    237  | 
     | 
     | 
    }  | 
    
    
    238  | 
     | 
     | 
     | 
    
    
    239  | 
     | 
     | 
    /*  | 
    
    
    240  | 
     | 
     | 
     * Define a device.  This may (or may not) also define an interface  | 
    
    
    241  | 
     | 
     | 
     * attribute and/or refer to existing attributes.  | 
    
    
    242  | 
     | 
     | 
     */  | 
    
    
    243  | 
     | 
     | 
    void  | 
    
    
    244  | 
     | 
     | 
    defdev(struct devbase *dev, int ispseudo, struct nvlist *loclist,  | 
    
    
    245  | 
     | 
     | 
        struct nvlist *attrs)  | 
    
    
    246  | 
     | 
     | 
    { | 
    
    
    247  | 
     | 
     | 
    	struct nvlist *nv;  | 
    
    
    248  | 
     | 
     | 
    	struct attr *a;  | 
    
    
    249  | 
     | 
     | 
     | 
    
    
    250  | 
     | 
     | 
    	if (dev == &errdev)  | 
    
    
    251  | 
     | 
     | 
    		goto bad;  | 
    
    
    252  | 
     | 
     | 
    	if (dev->d_isdef) { | 
    
    
    253  | 
     | 
     | 
    		error("redefinition of `%s'", dev->d_name); | 
    
    
    254  | 
     | 
     | 
    		goto bad;  | 
    
    
    255  | 
     | 
     | 
    	}  | 
    
    
    256  | 
     | 
     | 
    	dev->d_isdef = 1;  | 
    
    
    257  | 
     | 
     | 
    	if (has_errobj(attrs, &errattr))  | 
    
    
    258  | 
     | 
     | 
    		goto bad;  | 
    
    
    259  | 
     | 
     | 
     | 
    
    
    260  | 
     | 
     | 
    	/*  | 
    
    
    261  | 
     | 
     | 
    	 * Handle implicit attribute definition from locator list.  Do  | 
    
    
    262  | 
     | 
     | 
    	 * this before scanning the `at' list so that we can have, e.g.:  | 
    
    
    263  | 
     | 
     | 
    	 *	device foo at other, foo { slot = -1 } | 
    
    
    264  | 
     | 
     | 
    	 * (where you can plug in a foo-bus extender to a foo-bus).  | 
    
    
    265  | 
     | 
     | 
    	 */  | 
    
    
    266  | 
     | 
     | 
    	if (loclist != NULL) { | 
    
    
    267  | 
     | 
     | 
    		nv = loclist;  | 
    
    
    268  | 
     | 
     | 
    		loclist = NULL;	/* defattr disposes of them for us */  | 
    
    
    269  | 
     | 
     | 
    		if (defattr(dev->d_name, nv))  | 
    
    
    270  | 
     | 
     | 
    			goto bad;  | 
    
    
    271  | 
     | 
     | 
    		attrs = newnv(dev->d_name, NULL, getattr(dev->d_name), 0,  | 
    
    
    272  | 
     | 
     | 
    		    attrs);  | 
    
    
    273  | 
     | 
     | 
    	}  | 
    
    
    274  | 
     | 
     | 
     | 
    
    
    275  | 
     | 
     | 
    	/* Committed!  Set up fields. */  | 
    
    
    276  | 
     | 
     | 
    	dev->d_ispseudo = ispseudo;  | 
    
    
    277  | 
     | 
     | 
    	dev->d_attrs = attrs;  | 
    
    
    278  | 
     | 
     | 
     | 
    
    
    279  | 
     | 
     | 
    	/*  | 
    
    
    280  | 
     | 
     | 
    	 * For each interface attribute this device refers to, add this  | 
    
    
    281  | 
     | 
     | 
    	 * device to its reference list.  This makes, e.g., finding all  | 
    
    
    282  | 
     | 
     | 
    	 * "scsi"s easier.  | 
    
    
    283  | 
     | 
     | 
    	 */  | 
    
    
    284  | 
     | 
     | 
    	for (nv = attrs; nv != NULL; nv = nv->nv_next) { | 
    
    
    285  | 
     | 
     | 
    		a = nv->nv_ptr;  | 
    
    
    286  | 
     | 
     | 
    		if (a->a_iattr)  | 
    
    
    287  | 
     | 
     | 
    			a->a_refs = addtoattr(a->a_refs, dev);  | 
    
    
    288  | 
     | 
     | 
    	}  | 
    
    
    289  | 
     | 
     | 
    	return;  | 
    
    
    290  | 
     | 
     | 
    bad:  | 
    
    
    291  | 
     | 
     | 
    	nvfreel(loclist);  | 
    
    
    292  | 
     | 
     | 
    	nvfreel(attrs);  | 
    
    
    293  | 
     | 
     | 
    }  | 
    
    
    294  | 
     | 
     | 
     | 
    
    
    295  | 
     | 
     | 
    /*  | 
    
    
    296  | 
     | 
     | 
     * Look up a devbase.  Also makes sure it is a reasonable name,  | 
    
    
    297  | 
     | 
     | 
     * i.e., does not end in a digit or contain special characters.  | 
    
    
    298  | 
     | 
     | 
     */  | 
    
    
    299  | 
     | 
     | 
    struct devbase *  | 
    
    
    300  | 
     | 
     | 
    getdevbase(char *name)  | 
    
    
    301  | 
     | 
     | 
    { | 
    
    
    302  | 
     | 
     | 
    	u_char *p;  | 
    
    
    303  | 
     | 
     | 
    	struct devbase *dev;  | 
    
    
    304  | 
     | 
     | 
     | 
    
    
    305  | 
     | 
     | 
    	p = (u_char *)name;  | 
    
    
    306  | 
     | 
     | 
    	if (!isalpha(*p))  | 
    
    
    307  | 
     | 
     | 
    		goto badname;  | 
    
    
    308  | 
     | 
     | 
    	while (*++p) { | 
    
    
    309  | 
     | 
     | 
    		if (!isalnum(*p) && *p != '_')  | 
    
    
    310  | 
     | 
     | 
    			goto badname;  | 
    
    
    311  | 
     | 
     | 
    	}  | 
    
    
    312  | 
     | 
     | 
    	if (isdigit(*--p)) { | 
    
    
    313  | 
     | 
     | 
    badname:  | 
    
    
    314  | 
     | 
     | 
    		error("bad device base name `%s'", name); | 
    
    
    315  | 
     | 
     | 
    		return (&errdev);  | 
    
    
    316  | 
     | 
     | 
    	}  | 
    
    
    317  | 
     | 
     | 
    	dev = ht_lookup(devbasetab, name);  | 
    
    
    318  | 
     | 
     | 
    	if (dev == NULL) { | 
    
    
    319  | 
     | 
     | 
    		dev = emalloc(sizeof *dev);  | 
    
    
    320  | 
     | 
     | 
    		dev->d_name = name;  | 
    
    
    321  | 
     | 
     | 
    		dev->d_next = NULL;  | 
    
    
    322  | 
     | 
     | 
    		dev->d_isdef = 0;  | 
    
    
    323  | 
     | 
     | 
    		dev->d_major = NODEV;  | 
    
    
    324  | 
     | 
     | 
    		dev->d_attrs = NULL;  | 
    
    
    325  | 
     | 
     | 
    		dev->d_ihead = NULL;  | 
    
    
    326  | 
     | 
     | 
    		dev->d_ipp = &dev->d_ihead;  | 
    
    
    327  | 
     | 
     | 
    		dev->d_ahead = NULL;  | 
    
    
    328  | 
     | 
     | 
    		dev->d_app = &dev->d_ahead;  | 
    
    
    329  | 
     | 
     | 
    		dev->d_umax = 0;  | 
    
    
    330  | 
     | 
     | 
    		*nextbase = dev;  | 
    
    
    331  | 
     | 
     | 
    		nextbase = &dev->d_next;  | 
    
    
    332  | 
     | 
     | 
    		if (ht_insert(devbasetab, name, dev))  | 
    
    
    333  | 
     | 
     | 
    			panic("getdevbase(%s)", name); | 
    
    
    334  | 
     | 
     | 
    	}  | 
    
    
    335  | 
     | 
     | 
    	return (dev);  | 
    
    
    336  | 
     | 
     | 
    }  | 
    
    
    337  | 
     | 
     | 
     | 
    
    
    338  | 
     | 
     | 
    /*  | 
    
    
    339  | 
     | 
     | 
     * Define some of a device's allowable parent attachments.  | 
    
    
    340  | 
     | 
     | 
     * There may be a list of (plain) attributes.  | 
    
    
    341  | 
     | 
     | 
     */  | 
    
    
    342  | 
     | 
     | 
    void  | 
    
    
    343  | 
     | 
     | 
    defdevattach(struct deva *deva, struct devbase *dev, struct nvlist *atlist,  | 
    
    
    344  | 
     | 
     | 
        struct nvlist *attrs)  | 
    
    
    345  | 
     | 
     | 
    { | 
    
    
    346  | 
     | 
     | 
    	struct nvlist *nv;  | 
    
    
    347  | 
     | 
     | 
    	struct attr *a;  | 
    
    
    348  | 
     | 
     | 
    	struct deva *da;  | 
    
    
    349  | 
     | 
     | 
     | 
    
    
    350  | 
     | 
     | 
    	if (dev == &errdev)  | 
    
    
    351  | 
     | 
     | 
    		goto bad;  | 
    
    
    352  | 
     | 
     | 
    	if (deva == NULL)  | 
    
    
    353  | 
     | 
     | 
    		deva = getdevattach(dev->d_name);  | 
    
    
    354  | 
     | 
     | 
    	if (deva == &errdeva)  | 
    
    
    355  | 
     | 
     | 
    		goto bad;  | 
    
    
    356  | 
     | 
     | 
    	if (!dev->d_isdef) { | 
    
    
    357  | 
     | 
     | 
    		error("attaching undefined device `%s'", dev->d_name); | 
    
    
    358  | 
     | 
     | 
    		goto bad;  | 
    
    
    359  | 
     | 
     | 
    	}  | 
    
    
    360  | 
     | 
     | 
    	if (deva->d_isdef) { | 
    
    
    361  | 
     | 
     | 
    		error("redefinition of `%s'", deva->d_name); | 
    
    
    362  | 
     | 
     | 
    		goto bad;  | 
    
    
    363  | 
     | 
     | 
    	}  | 
    
    
    364  | 
     | 
     | 
    	if (dev->d_ispseudo) { | 
    
    
    365  | 
     | 
     | 
    		error("pseudo-devices can't attach"); | 
    
    
    366  | 
     | 
     | 
    		goto bad;  | 
    
    
    367  | 
     | 
     | 
    	}  | 
    
    
    368  | 
     | 
     | 
     | 
    
    
    369  | 
     | 
     | 
    	deva->d_isdef = 1;  | 
    
    
    370  | 
     | 
     | 
    	if (has_errobj(attrs, &errattr))  | 
    
    
    371  | 
     | 
     | 
    		goto bad;  | 
    
    
    372  | 
     | 
     | 
    	for (nv = attrs; nv != NULL; nv = nv->nv_next) { | 
    
    
    373  | 
     | 
     | 
    		a = nv->nv_ptr;  | 
    
    
    374  | 
     | 
     | 
    		if (a == &errattr)  | 
    
    
    375  | 
     | 
     | 
    			continue;		/* already complained */  | 
    
    
    376  | 
     | 
     | 
    		if (a->a_iattr)  | 
    
    
    377  | 
     | 
     | 
    			error("`%s' is not a plain attribute", a->a_name); | 
    
    
    378  | 
     | 
     | 
    	}  | 
    
    
    379  | 
     | 
     | 
     | 
    
    
    380  | 
     | 
     | 
    	/* Committed!  Set up fields. */  | 
    
    
    381  | 
     | 
     | 
    	deva->d_attrs = attrs;  | 
    
    
    382  | 
     | 
     | 
    	deva->d_atlist = atlist;  | 
    
    
    383  | 
     | 
     | 
    	deva->d_devbase = dev;  | 
    
    
    384  | 
     | 
     | 
     | 
    
    
    385  | 
     | 
     | 
    	/*  | 
    
    
    386  | 
     | 
     | 
    	 * Turn the `at' list into interface attributes (map each  | 
    
    
    387  | 
     | 
     | 
    	 * nv_name to an attribute, or to NULL for root), and add  | 
    
    
    388  | 
     | 
     | 
    	 * this device to those attributes, so that children can  | 
    
    
    389  | 
     | 
     | 
    	 * be listed at this particular device if they are supported  | 
    
    
    390  | 
     | 
     | 
    	 * by that attribute.  | 
    
    
    391  | 
     | 
     | 
    	 */  | 
    
    
    392  | 
     | 
     | 
    	for (nv = atlist; nv != NULL; nv = nv->nv_next) { | 
    
    
    393  | 
     | 
     | 
    		if (nv->nv_name == NULL)  | 
    
    
    394  | 
     | 
     | 
    			nv->nv_ptr = a = NULL;	/* at root */  | 
    
    
    395  | 
     | 
     | 
    		else  | 
    
    
    396  | 
     | 
     | 
    			nv->nv_ptr = a = getattr(nv->nv_name);  | 
    
    
    397  | 
     | 
     | 
    		if (a == &errattr)  | 
    
    
    398  | 
     | 
     | 
    			continue;		/* already complained */  | 
    
    
    399  | 
     | 
     | 
     | 
    
    
    400  | 
     | 
     | 
    		/*  | 
    
    
    401  | 
     | 
     | 
    		 * Make sure that an attachment spec doesn't  | 
    
    
    402  | 
     | 
     | 
    		 * already say how to attach to this attribute.  | 
    
    
    403  | 
     | 
     | 
    		 */  | 
    
    
    404  | 
     | 
     | 
    		for (da = dev->d_ahead; da != NULL; da = da->d_bsame)  | 
    
    
    405  | 
     | 
     | 
    			if (onlist(da->d_atlist, a))  | 
    
    
    406  | 
     | 
     | 
    				error("attach at `%s' already done by `%s'", | 
    
    
    407  | 
     | 
     | 
    				    a ? a->a_name : "root", da->d_name);  | 
    
    
    408  | 
     | 
     | 
     | 
    
    
    409  | 
     | 
     | 
    		if (a == NULL)  | 
    
    
    410  | 
     | 
     | 
    			continue;		/* at root; don't add */  | 
    
    
    411  | 
     | 
     | 
    		if (!a->a_iattr)  | 
    
    
    412  | 
     | 
     | 
    			error("%s cannot be at plain attribute `%s'", | 
    
    
    413  | 
     | 
     | 
    			    dev->d_name, a->a_name);  | 
    
    
    414  | 
     | 
     | 
    		else  | 
    
    
    415  | 
     | 
     | 
    			a->a_devs = addtoattr(a->a_devs, dev);  | 
    
    
    416  | 
     | 
     | 
    	}  | 
    
    
    417  | 
     | 
     | 
     | 
    
    
    418  | 
     | 
     | 
    	/* attach to parent */  | 
    
    
    419  | 
     | 
     | 
    	*dev->d_app = deva;  | 
    
    
    420  | 
     | 
     | 
    	dev->d_app = &deva->d_bsame;  | 
    
    
    421  | 
     | 
     | 
    	return;  | 
    
    
    422  | 
     | 
     | 
    bad:  | 
    
    
    423  | 
     | 
     | 
    	nvfreel(atlist);  | 
    
    
    424  | 
     | 
     | 
    	nvfreel(attrs);  | 
    
    
    425  | 
     | 
     | 
    }  | 
    
    
    426  | 
     | 
     | 
     | 
    
    
    427  | 
     | 
     | 
    /*  | 
    
    
    428  | 
     | 
     | 
     * Look up a device attachment.  Also makes sure it is a reasonable  | 
    
    
    429  | 
     | 
     | 
     * name, i.e., does not contain digits or special characters.  | 
    
    
    430  | 
     | 
     | 
     */  | 
    
    
    431  | 
     | 
     | 
    struct deva *  | 
    
    
    432  | 
     | 
     | 
    getdevattach(const char *name)  | 
    
    
    433  | 
     | 
     | 
    { | 
    
    
    434  | 
     | 
     | 
    	u_char *p;  | 
    
    
    435  | 
     | 
     | 
    	struct deva *deva;  | 
    
    
    436  | 
     | 
     | 
     | 
    
    
    437  | 
     | 
     | 
    	p = (u_char *)name;  | 
    
    
    438  | 
     | 
     | 
    	if (!isalpha(*p))  | 
    
    
    439  | 
     | 
     | 
    		goto badname;  | 
    
    
    440  | 
     | 
     | 
    	while (*++p) { | 
    
    
    441  | 
     | 
     | 
    		if (!isalnum(*p) && *p != '_')  | 
    
    
    442  | 
     | 
     | 
    			goto badname;  | 
    
    
    443  | 
     | 
     | 
    	}  | 
    
    
    444  | 
     | 
     | 
    	if (isdigit((unsigned char)*--p)) { | 
    
    
    445  | 
     | 
     | 
    badname:  | 
    
    
    446  | 
     | 
     | 
    		error("bad device attachment name `%s'", name); | 
    
    
    447  | 
     | 
     | 
    		return (&errdeva);  | 
    
    
    448  | 
     | 
     | 
    	}  | 
    
    
    449  | 
     | 
     | 
    	deva = ht_lookup(devatab, name);  | 
    
    
    450  | 
     | 
     | 
    	if (deva == NULL) { | 
    
    
    451  | 
     | 
     | 
    		deva = emalloc(sizeof *deva);  | 
    
    
    452  | 
     | 
     | 
    		deva->d_name = name;  | 
    
    
    453  | 
     | 
     | 
    		deva->d_next = NULL;  | 
    
    
    454  | 
     | 
     | 
    		deva->d_bsame = NULL;  | 
    
    
    455  | 
     | 
     | 
    		deva->d_isdef = 0;  | 
    
    
    456  | 
     | 
     | 
    		deva->d_devbase = NULL;  | 
    
    
    457  | 
     | 
     | 
    		deva->d_atlist = NULL;  | 
    
    
    458  | 
     | 
     | 
    		deva->d_attrs = NULL;  | 
    
    
    459  | 
     | 
     | 
    		deva->d_ihead = NULL;  | 
    
    
    460  | 
     | 
     | 
    		deva->d_ipp = &deva->d_ihead;  | 
    
    
    461  | 
     | 
     | 
    		*nextdeva = deva;  | 
    
    
    462  | 
     | 
     | 
    		nextdeva = &deva->d_next;  | 
    
    
    463  | 
     | 
     | 
    		if (ht_insert(devatab, name, deva))  | 
    
    
    464  | 
     | 
     | 
    			panic("getdeva(%s)", name); | 
    
    
    465  | 
     | 
     | 
    	}  | 
    
    
    466  | 
     | 
     | 
    	return (deva);  | 
    
    
    467  | 
     | 
     | 
    }  | 
    
    
    468  | 
     | 
     | 
     | 
    
    
    469  | 
     | 
     | 
    /*  | 
    
    
    470  | 
     | 
     | 
     * Look up an attribute.  | 
    
    
    471  | 
     | 
     | 
     */  | 
    
    
    472  | 
     | 
     | 
    struct attr *  | 
    
    
    473  | 
     | 
     | 
    getattr(const char *name)  | 
    
    
    474  | 
     | 
     | 
    { | 
    
    
    475  | 
     | 
     | 
    	struct attr *a;  | 
    
    
    476  | 
     | 
     | 
     | 
    
    
    477  | 
     | 
     | 
    	if ((a = ht_lookup(attrtab, name)) == NULL) { | 
    
    
    478  | 
     | 
     | 
    		error("undefined attribute `%s'", name); | 
    
    
    479  | 
     | 
     | 
    		a = &errattr;  | 
    
    
    480  | 
     | 
     | 
    	}  | 
    
    
    481  | 
     | 
     | 
    	return (a);  | 
    
    
    482  | 
     | 
     | 
    }  | 
    
    
    483  | 
     | 
     | 
     | 
    
    
    484  | 
     | 
     | 
    /*  | 
    
    
    485  | 
     | 
     | 
     * Set the major device number for a device, so that it can be used  | 
    
    
    486  | 
     | 
     | 
     * as a root/swap/dumps "on" device in a configuration.  | 
    
    
    487  | 
     | 
     | 
     */  | 
    
    
    488  | 
     | 
     | 
    void  | 
    
    
    489  | 
     | 
     | 
    setmajor(struct devbase *d, int n)  | 
    
    
    490  | 
     | 
     | 
    { | 
    
    
    491  | 
     | 
     | 
     | 
    
    
    492  | 
     | 
     | 
    	if (d != &errdev && d->d_major != NODEV)  | 
    
    
    493  | 
     | 
     | 
    		error("device `%s' is already major %d", | 
    
    
    494  | 
     | 
     | 
    		    d->d_name, d->d_major);  | 
    
    
    495  | 
     | 
     | 
    	else  | 
    
    
    496  | 
     | 
     | 
    		d->d_major = n;  | 
    
    
    497  | 
     | 
     | 
    }  | 
    
    
    498  | 
     | 
     | 
     | 
    
    
    499  | 
     | 
     | 
    static int  | 
    
    
    500  | 
     | 
     | 
    exclude(struct nvlist *nv, const char *name, const char *what)  | 
    
    
    501  | 
     | 
     | 
    { | 
    
    
    502  | 
     | 
     | 
     | 
    
    
    503  | 
     | 
     | 
    	if (nv != NULL) { | 
    
    
    504  | 
     | 
     | 
    		error("%s: swap generic must not specify %s", name, what); | 
    
    
    505  | 
     | 
     | 
    		return (1);  | 
    
    
    506  | 
     | 
     | 
    	}  | 
    
    
    507  | 
     | 
     | 
    	return (0);  | 
    
    
    508  | 
     | 
     | 
    }  | 
    
    
    509  | 
     | 
     | 
     | 
    
    
    510  | 
     | 
     | 
    /*  | 
    
    
    511  | 
     | 
     | 
     * Map things like "ra0b" => makedev(major("ra"), 0*maxpartitions + 'b'-'a'). | 
    
    
    512  | 
     | 
     | 
     * Handle the case where the device number is given but there is no  | 
    
    
    513  | 
     | 
     | 
     * corresponding name, and map NULL to the default.  | 
    
    
    514  | 
     | 
     | 
     */  | 
    
    
    515  | 
     | 
     | 
    static int  | 
    
    
    516  | 
     | 
     | 
    resolve(struct nvlist **nvp, const char *name, const char *what,  | 
    
    
    517  | 
     | 
     | 
        struct nvlist *dflt, int part)  | 
    
    
    518  | 
     | 
     | 
    { | 
    
    
    519  | 
     | 
     | 
    	struct nvlist *nv;  | 
    
    
    520  | 
     | 
     | 
    	struct devbase *dev;  | 
    
    
    521  | 
     | 
     | 
    	const char *cp;  | 
    
    
    522  | 
     | 
     | 
    	int maj, min, l;  | 
    
    
    523  | 
     | 
     | 
    	int unit;  | 
    
    
    524  | 
     | 
     | 
    	char buf[NAMESIZE];  | 
    
    
    525  | 
     | 
     | 
     | 
    
    
    526  | 
     | 
     | 
    	part -= 'a';  | 
    
    
    527  | 
     | 
     | 
    	if ((part >= maxpartitions) || (part < 0))  | 
    
    
    528  | 
     | 
     | 
    		panic("resolve"); | 
    
    
    529  | 
     | 
     | 
    	if ((nv = *nvp) == NULL) { | 
    
    
    530  | 
     | 
     | 
    		dev_t	d = NODEV;  | 
    
    
    531  | 
     | 
     | 
    		/*  | 
    
    
    532  | 
     | 
     | 
    		 * Apply default.  Easiest to do this by number.  | 
    
    
    533  | 
     | 
     | 
    		 * Make sure to retain NODEVness, if this is dflt's disposition.  | 
    
    
    534  | 
     | 
     | 
    		 */  | 
    
    
    535  | 
     | 
     | 
    		if (dflt->nv_int != NODEV) { | 
    
    
    536  | 
     | 
     | 
    			maj = major(dflt->nv_int);  | 
    
    
    537  | 
     | 
     | 
    			min = (minor(dflt->nv_int) / maxpartitions) + part;  | 
    
    
    538  | 
     | 
     | 
    			d = makedev(maj, min);  | 
    
    
    539  | 
     | 
     | 
    		}  | 
    
    
    540  | 
     | 
     | 
    		*nvp = nv = newnv(NULL, NULL, NULL, d, NULL);  | 
    
    
    541  | 
     | 
     | 
    	}  | 
    
    
    542  | 
     | 
     | 
    	if (nv->nv_int != NODEV) { | 
    
    
    543  | 
     | 
     | 
    		/*  | 
    
    
    544  | 
     | 
     | 
    		 * By the numbers.  Find the appropriate major number  | 
    
    
    545  | 
     | 
     | 
    		 * to make a name.  | 
    
    
    546  | 
     | 
     | 
    		 */  | 
    
    
    547  | 
     | 
     | 
    		maj = major(nv->nv_int);  | 
    
    
    548  | 
     | 
     | 
    		min = minor(nv->nv_int);  | 
    
    
    549  | 
     | 
     | 
    		for (dev = allbases; dev != NULL; dev = dev->d_next)  | 
    
    
    550  | 
     | 
     | 
    			if (dev->d_major == maj)  | 
    
    
    551  | 
     | 
     | 
    				break;  | 
    
    
    552  | 
     | 
     | 
    		if (dev == NULL)  | 
    
    
    553  | 
     | 
     | 
    			(void)snprintf(buf, sizeof buf, "<%d/%d>",  | 
    
    
    554  | 
     | 
     | 
    			    maj, min);  | 
    
    
    555  | 
     | 
     | 
    		else  | 
    
    
    556  | 
     | 
     | 
    			(void)snprintf(buf, sizeof buf, "%s%d%c",  | 
    
    
    557  | 
     | 
     | 
    			    dev->d_name, min / maxpartitions,  | 
    
    
    558  | 
     | 
     | 
    			    (min % maxpartitions) + 'a');  | 
    
    
    559  | 
     | 
     | 
    		nv->nv_str = intern(buf);  | 
    
    
    560  | 
     | 
     | 
    		return (0);  | 
    
    
    561  | 
     | 
     | 
    	}  | 
    
    
    562  | 
     | 
     | 
     | 
    
    
    563  | 
     | 
     | 
    	if (nv->nv_str == NULL || nv->nv_str == s_nfs)  | 
    
    
    564  | 
     | 
     | 
    		/*  | 
    
    
    565  | 
     | 
     | 
    		 * NFS spec. Leave as NODEV.  | 
    
    
    566  | 
     | 
     | 
    		 */  | 
    
    
    567  | 
     | 
     | 
    		return (0);  | 
    
    
    568  | 
     | 
     | 
     | 
    
    
    569  | 
     | 
     | 
    	/*  | 
    
    
    570  | 
     | 
     | 
    	 * The normal case: things like "ra2b".  Check for partition  | 
    
    
    571  | 
     | 
     | 
    	 * suffix, remove it if there, and split into name ("ra") and | 
    
    
    572  | 
     | 
     | 
    	 * unit (2).  | 
    
    
    573  | 
     | 
     | 
    	 */  | 
    
    
    574  | 
     | 
     | 
    	l = strlen(nv->nv_str);  | 
    
    
    575  | 
     | 
     | 
    	cp = &nv->nv_str[l];  | 
    
    
    576  | 
     | 
     | 
    	if (l > 1 && *--cp >= 'a' && *cp <= 'a'+maxpartitions &&  | 
    
    
    577  | 
     | 
     | 
    	    isdigit((unsigned char)cp[-1])) { | 
    
    
    578  | 
     | 
     | 
    		l--;  | 
    
    
    579  | 
     | 
     | 
    		part = *cp - 'a';  | 
    
    
    580  | 
     | 
     | 
    	}  | 
    
    
    581  | 
     | 
     | 
    	cp = nv->nv_str;  | 
    
    
    582  | 
     | 
     | 
    	if (split(cp, l, buf, sizeof buf, &unit)) { | 
    
    
    583  | 
     | 
     | 
    		error("%s: invalid %s device name `%s'", name, what, cp); | 
    
    
    584  | 
     | 
     | 
    		return (1);  | 
    
    
    585  | 
     | 
     | 
    	}  | 
    
    
    586  | 
     | 
     | 
    	dev = ht_lookup(devbasetab, intern(buf));  | 
    
    
    587  | 
     | 
     | 
    	if (dev == NULL || dev->d_major == NODEV) { | 
    
    
    588  | 
     | 
     | 
    		error("%s: can't make %s device from `%s'", | 
    
    
    589  | 
     | 
     | 
    		    name, what, nv->nv_str);  | 
    
    
    590  | 
     | 
     | 
    		return (1);  | 
    
    
    591  | 
     | 
     | 
    	}  | 
    
    
    592  | 
     | 
     | 
    	nv->nv_name = dev->d_name;  | 
    
    
    593  | 
     | 
     | 
    	nv->nv_int = makedev(dev->d_major, unit * maxpartitions + part);  | 
    
    
    594  | 
     | 
     | 
    	return (0);  | 
    
    
    595  | 
     | 
     | 
    }  | 
    
    
    596  | 
     | 
     | 
     | 
    
    
    597  | 
     | 
     | 
    static int  | 
    
    
    598  | 
     | 
     | 
    lresolve(struct nvlist **nvp, const char *name, const char *what,  | 
    
    
    599  | 
     | 
     | 
        struct nvlist *dflt, int part)  | 
    
    
    600  | 
     | 
     | 
    { | 
    
    
    601  | 
     | 
     | 
    	int err;  | 
    
    
    602  | 
     | 
     | 
     | 
    
    
    603  | 
     | 
     | 
    	while ((err = resolve(nvp, name, what, dflt, part)) == 0 &&  | 
    
    
    604  | 
     | 
     | 
    	    (*nvp)->nv_next != NULL)  | 
    
    
    605  | 
     | 
     | 
    		nvp = &(*nvp)->nv_next;  | 
    
    
    606  | 
     | 
     | 
    	return (err);  | 
    
    
    607  | 
     | 
     | 
    }  | 
    
    
    608  | 
     | 
     | 
     | 
    
    
    609  | 
     | 
     | 
    /*  | 
    
    
    610  | 
     | 
     | 
     * Add a completed configuration to the list.  | 
    
    
    611  | 
     | 
     | 
     */  | 
    
    
    612  | 
     | 
     | 
    void  | 
    
    
    613  | 
     | 
     | 
    addconf(struct config *cf0)  | 
    
    
    614  | 
     | 
     | 
    { | 
    
    
    615  | 
     | 
     | 
    	struct config *cf;  | 
    
    
    616  | 
     | 
     | 
    	struct nvlist *nv;  | 
    
    
    617  | 
     | 
     | 
    	const char *name;  | 
    
    
    618  | 
     | 
     | 
     | 
    
    
    619  | 
     | 
     | 
    	name = cf0->cf_name;  | 
    
    
    620  | 
     | 
     | 
    	cf = emalloc(sizeof *cf);  | 
    
    
    621  | 
     | 
     | 
    	if (ht_insert(cfhashtab, name, cf)) { | 
    
    
    622  | 
     | 
     | 
    		error("configuration `%s' already defined", name); | 
    
    
    623  | 
     | 
     | 
    		free(cf);  | 
    
    
    624  | 
     | 
     | 
    		goto bad;  | 
    
    
    625  | 
     | 
     | 
    	}  | 
    
    
    626  | 
     | 
     | 
    	*cf = *cf0;  | 
    
    
    627  | 
     | 
     | 
     | 
    
    
    628  | 
     | 
     | 
    	/*  | 
    
    
    629  | 
     | 
     | 
    	 * Look for "swap generic".  | 
    
    
    630  | 
     | 
     | 
    	 */  | 
    
    
    631  | 
     | 
     | 
    	for (nv = cf->cf_swap; nv != NULL; nv = nv->nv_next)  | 
    
    
    632  | 
     | 
     | 
    	    if (nv->nv_str == s_generic)  | 
    
    
    633  | 
     | 
     | 
    		break;  | 
    
    
    634  | 
     | 
     | 
    	if (nv != NULL) { | 
    
    
    635  | 
     | 
     | 
    		/*  | 
    
    
    636  | 
     | 
     | 
    		 * Make sure no root or dump device specified, and no  | 
    
    
    637  | 
     | 
     | 
    		 * other swap devices.  Note single | here (check all).  | 
    
    
    638  | 
     | 
     | 
    		 */  | 
    
    
    639  | 
     | 
     | 
    		nv = cf->cf_swap;  | 
    
    
    640  | 
     | 
     | 
    		if (exclude(cf->cf_root, name, "root device") |  | 
    
    
    641  | 
     | 
     | 
    		    exclude(nv->nv_next, name, "additional swap devices") |  | 
    
    
    642  | 
     | 
     | 
    		    exclude(cf->cf_dump, name, "dump device"))  | 
    
    
    643  | 
     | 
     | 
    			goto bad;  | 
    
    
    644  | 
     | 
     | 
    	} else { | 
    
    
    645  | 
     | 
     | 
    		nv = cf->cf_root;  | 
    
    
    646  | 
     | 
     | 
    		if (nv == NULL) { | 
    
    
    647  | 
     | 
     | 
    			error("%s: no root device specified", name); | 
    
    
    648  | 
     | 
     | 
    			goto bad;  | 
    
    
    649  | 
     | 
     | 
    		}  | 
    
    
    650  | 
     | 
     | 
    		if (resolve(&cf->cf_root, name, "root", nv, 'a') |  | 
    
    
    651  | 
     | 
     | 
    		    lresolve(&cf->cf_swap, name, "swap", nv, 'b') |  | 
    
    
    652  | 
     | 
     | 
    		    resolve(&cf->cf_dump, name, "dumps", nv, 'b'))  | 
    
    
    653  | 
     | 
     | 
    			goto bad;  | 
    
    
    654  | 
     | 
     | 
    	}  | 
    
    
    655  | 
     | 
     | 
    	*nextcf = cf;  | 
    
    
    656  | 
     | 
     | 
    	nextcf = &cf->cf_next;  | 
    
    
    657  | 
     | 
     | 
    	return;  | 
    
    
    658  | 
     | 
     | 
    bad:  | 
    
    
    659  | 
     | 
     | 
    	nvfreel(cf0->cf_root);  | 
    
    
    660  | 
     | 
     | 
    	nvfreel(cf0->cf_swap);  | 
    
    
    661  | 
     | 
     | 
    	nvfreel(cf0->cf_dump);  | 
    
    
    662  | 
     | 
     | 
    }  | 
    
    
    663  | 
     | 
     | 
     | 
    
    
    664  | 
     | 
     | 
    void  | 
    
    
    665  | 
     | 
     | 
    setconf(struct nvlist **npp, const char *what, struct nvlist *v)  | 
    
    
    666  | 
     | 
     | 
    { | 
    
    
    667  | 
     | 
     | 
     | 
    
    
    668  | 
     | 
     | 
    	if (*npp != NULL) { | 
    
    
    669  | 
     | 
     | 
    		error("duplicate %s specification", what); | 
    
    
    670  | 
     | 
     | 
    		nvfreel(v);  | 
    
    
    671  | 
     | 
     | 
    	} else  | 
    
    
    672  | 
     | 
     | 
    		*npp = v;  | 
    
    
    673  | 
     | 
     | 
    }  | 
    
    
    674  | 
     | 
     | 
     | 
    
    
    675  | 
     | 
     | 
    static struct devi *  | 
    
    
    676  | 
     | 
     | 
    newdevi(const char *name, int unit, struct devbase *d)  | 
    
    
    677  | 
     | 
     | 
    { | 
    
    
    678  | 
     | 
     | 
    	struct devi *i;  | 
    
    
    679  | 
     | 
     | 
     | 
    
    
    680  | 
     | 
     | 
    	i = emalloc(sizeof *i);  | 
    
    
    681  | 
     | 
     | 
    	i->i_name = name;  | 
    
    
    682  | 
     | 
     | 
    	i->i_unit = unit;  | 
    
    
    683  | 
     | 
     | 
    	i->i_base = d;  | 
    
    
    684  | 
     | 
     | 
    	i->i_next = NULL;  | 
    
    
    685  | 
     | 
     | 
    	i->i_bsame = NULL;  | 
    
    
    686  | 
     | 
     | 
    	i->i_asame = NULL;  | 
    
    
    687  | 
     | 
     | 
    	i->i_alias = NULL;  | 
    
    
    688  | 
     | 
     | 
    	i->i_at = NULL;  | 
    
    
    689  | 
     | 
     | 
    	i->i_atattr = NULL;  | 
    
    
    690  | 
     | 
     | 
    	i->i_atdev = NULL;  | 
    
    
    691  | 
     | 
     | 
    	i->i_atdeva = NULL;  | 
    
    
    692  | 
     | 
     | 
    	i->i_locs = NULL;  | 
    
    
    693  | 
     | 
     | 
    	i->i_cfflags = 0;  | 
    
    
    694  | 
     | 
     | 
    	i->i_cfindex = -1;  | 
    
    
    695  | 
     | 
     | 
    	i->i_lineno = currentline();  | 
    
    
    696  | 
     | 
     | 
    	if (unit >= d->d_umax)  | 
    
    
    697  | 
     | 
     | 
    		d->d_umax = unit + 1;  | 
    
    
    698  | 
     | 
     | 
    	return (i);  | 
    
    
    699  | 
     | 
     | 
    }  | 
    
    
    700  | 
     | 
     | 
     | 
    
    
    701  | 
     | 
     | 
    /*  | 
    
    
    702  | 
     | 
     | 
     * Enable an already declared but disabled device.  | 
    
    
    703  | 
     | 
     | 
     */  | 
    
    
    704  | 
     | 
     | 
    void  | 
    
    
    705  | 
     | 
     | 
    enabledev(const char *name, const char *at)  | 
    
    
    706  | 
     | 
     | 
    { | 
    
    
    707  | 
     | 
     | 
    	struct devbase *ib, *ab;  | 
    
    
    708  | 
     | 
     | 
    	char atbuf[NAMESIZE];  | 
    
    
    709  | 
     | 
     | 
    	struct attr *attr;  | 
    
    
    710  | 
     | 
     | 
    	struct nvlist *nv;  | 
    
    
    711  | 
     | 
     | 
    	struct devi *i;  | 
    
    
    712  | 
     | 
     | 
    	const char *cp;  | 
    
    
    713  | 
     | 
     | 
    	int atunit;  | 
    
    
    714  | 
     | 
     | 
     | 
    
    
    715  | 
     | 
     | 
    	i = ht_lookup(devitab, name);  | 
    
    
    716  | 
     | 
     | 
    	if (i == NULL) { | 
    
    
    717  | 
     | 
     | 
    		error("invalid device `%s'", name); | 
    
    
    718  | 
     | 
     | 
    		return;  | 
    
    
    719  | 
     | 
     | 
    	}  | 
    
    
    720  | 
     | 
     | 
    	ib = i->i_base;  | 
    
    
    721  | 
     | 
     | 
     | 
    
    
    722  | 
     | 
     | 
    	if (split(at, strlen(at), atbuf, sizeof atbuf, &atunit)) { | 
    
    
    723  | 
     | 
     | 
    		error("invalid attachment name `%s'", at); | 
    
    
    724  | 
     | 
     | 
    		return;  | 
    
    
    725  | 
     | 
     | 
    	}  | 
    
    
    726  | 
     | 
     | 
    	cp = intern(atbuf);  | 
    
    
    727  | 
     | 
     | 
    	ab = ht_lookup(devbasetab, cp);  | 
    
    
    728  | 
     | 
     | 
    	if (ab == NULL) { | 
    
    
    729  | 
     | 
     | 
    		error("invalid attachment device `%s'", cp); | 
    
    
    730  | 
     | 
     | 
    		return;  | 
    
    
    731  | 
     | 
     | 
    	}  | 
    
    
    732  | 
     | 
     | 
    	for (nv = ab->d_attrs; nv != NULL; nv = nv->nv_next) { | 
    
    
    733  | 
     | 
     | 
    		attr = nv->nv_ptr;  | 
    
    
    734  | 
     | 
     | 
    		if (onlist(attr->a_devs, ib))  | 
    
    
    735  | 
     | 
     | 
    			goto foundattachment;  | 
    
    
    736  | 
     | 
     | 
    	}  | 
    
    
    737  | 
     | 
     | 
    	error("%s's cannot attach to %s's", ib->d_name, atbuf); | 
    
    
    738  | 
     | 
     | 
    	return;  | 
    
    
    739  | 
     | 
     | 
     | 
    
    
    740  | 
     | 
     | 
    foundattachment:  | 
    
    
    741  | 
     | 
     | 
    	while (i && i->i_atdev != ab)  | 
    
    
    742  | 
     | 
     | 
    		i = i->i_alias;  | 
    
    
    743  | 
     | 
     | 
    	if (i == NULL) { | 
    
    
    744  | 
     | 
     | 
    		error("%s at %s not found", name, at); | 
    
    
    745  | 
     | 
     | 
    		return;  | 
    
    
    746  | 
     | 
     | 
    	} else  | 
    
    
    747  | 
     | 
     | 
    		i->i_disable = 0; /* Enable */  | 
    
    
    748  | 
     | 
     | 
    }  | 
    
    
    749  | 
     | 
     | 
     | 
    
    
    750  | 
     | 
     | 
    /*  | 
    
    
    751  | 
     | 
     | 
     * Add the named device as attaching to the named attribute (or perhaps  | 
    
    
    752  | 
     | 
     | 
     * another device instead) plus unit number.  | 
    
    
    753  | 
     | 
     | 
     */  | 
    
    
    754  | 
     | 
     | 
    void  | 
    
    
    755  | 
     | 
     | 
    adddev(const char *name, const char *at, struct nvlist *loclist, int flags,  | 
    
    
    756  | 
     | 
     | 
        int disable)  | 
    
    
    757  | 
     | 
     | 
    { | 
    
    
    758  | 
     | 
     | 
    	struct devi *i;	/* the new instance */  | 
    
    
    759  | 
     | 
     | 
    	struct attr *attr;	/* attribute that allows attach */  | 
    
    
    760  | 
     | 
     | 
    	struct devbase *ib;	/* i->i_base */  | 
    
    
    761  | 
     | 
     | 
    	struct devbase *ab;	/* not NULL => at another dev */  | 
    
    
    762  | 
     | 
     | 
    	struct nvlist *nv;  | 
    
    
    763  | 
     | 
     | 
    	struct deva *iba;	/* devbase attachment used */  | 
    
    
    764  | 
     | 
     | 
    	const char *cp;  | 
    
    
    765  | 
     | 
     | 
    	int atunit;  | 
    
    
    766  | 
     | 
     | 
    	char atbuf[NAMESIZE];  | 
    
    
    767  | 
     | 
     | 
    	int hit;  | 
    
    
    768  | 
     | 
     | 
     | 
    
    
    769  | 
     | 
     | 
    	ab = NULL;  | 
    
    
    770  | 
     | 
     | 
    	iba = NULL;  | 
    
    
    771  | 
     | 
     | 
    	if (at == NULL) { | 
    
    
    772  | 
     | 
     | 
    		/* "at root" */  | 
    
    
    773  | 
     | 
     | 
    		if ((i = getdevi(name)) == NULL)  | 
    
    
    774  | 
     | 
     | 
    			goto bad;  | 
    
    
    775  | 
     | 
     | 
    		/*  | 
    
    
    776  | 
     | 
     | 
    		 * Must warn about i_unit > 0 later, after taking care of  | 
    
    
    777  | 
     | 
     | 
    		 * the STAR cases (we could do non-star's here but why  | 
    
    
    778  | 
     | 
     | 
    		 * bother?).  Make sure this device can be at root.  | 
    
    
    779  | 
     | 
     | 
    		 */  | 
    
    
    780  | 
     | 
     | 
    		ib = i->i_base;  | 
    
    
    781  | 
     | 
     | 
    		hit = 0;  | 
    
    
    782  | 
     | 
     | 
    		for (iba = ib->d_ahead; iba != NULL; iba = iba->d_bsame)  | 
    
    
    783  | 
     | 
     | 
    			if (onlist(iba->d_atlist, NULL)) { | 
    
    
    784  | 
     | 
     | 
    				hit = 1;  | 
    
    
    785  | 
     | 
     | 
    				break;  | 
    
    
    786  | 
     | 
     | 
    			}  | 
    
    
    787  | 
     | 
     | 
    		if (!hit) { | 
    
    
    788  | 
     | 
     | 
    			error("%s's cannot attach to the root", ib->d_name); | 
    
    
    789  | 
     | 
     | 
    			goto bad;  | 
    
    
    790  | 
     | 
     | 
    		}  | 
    
    
    791  | 
     | 
     | 
    		attr = &errattr;	/* a convenient "empty" attr */  | 
    
    
    792  | 
     | 
     | 
    	} else { | 
    
    
    793  | 
     | 
     | 
    		if (split(at, strlen(at), atbuf, sizeof atbuf, &atunit)) { | 
    
    
    794  | 
     | 
     | 
    			error("invalid attachment name `%s'", at); | 
    
    
    795  | 
     | 
     | 
    			/* (void)getdevi(name); -- ??? */  | 
    
    
    796  | 
     | 
     | 
    			goto bad;  | 
    
    
    797  | 
     | 
     | 
    		}  | 
    
    
    798  | 
     | 
     | 
    		if ((i = getdevi(name)) == NULL)  | 
    
    
    799  | 
     | 
     | 
    			goto bad;  | 
    
    
    800  | 
     | 
     | 
    		ib = i->i_base;  | 
    
    
    801  | 
     | 
     | 
    		cp = intern(atbuf);  | 
    
    
    802  | 
     | 
     | 
     | 
    
    
    803  | 
     | 
     | 
    		/*  | 
    
    
    804  | 
     | 
     | 
    		 * Devices can attach to two types of things: Attributes,  | 
    
    
    805  | 
     | 
     | 
    		 * and other devices (which have the appropriate attributes  | 
    
    
    806  | 
     | 
     | 
    		 * to allow attachment).  | 
    
    
    807  | 
     | 
     | 
    		 *  | 
    
    
    808  | 
     | 
     | 
    		 * (1) If we're attached to an attribute, then we don't need  | 
    
    
    809  | 
     | 
     | 
    		 *     look at the parent base device to see what attributes  | 
    
    
    810  | 
     | 
     | 
    		 *     it has, and make sure that we can attach to them.  | 
    
    
    811  | 
     | 
     | 
    		 *  | 
    
    
    812  | 
     | 
     | 
    		 * (2) If we're attached to a real device (i.e. named in  | 
    
    
    813  | 
     | 
     | 
    		 *     the config file), we want to remember that so that  | 
    
    
    814  | 
     | 
     | 
    		 *     at cross-check time, if the device we're attached to  | 
    
    
    815  | 
     | 
     | 
    		 *     is missing but other devices which also provide the  | 
    
    
    816  | 
     | 
     | 
    		 *     attribute are present, we don't get a false "OK."  | 
    
    
    817  | 
     | 
     | 
    		 *  | 
    
    
    818  | 
     | 
     | 
    		 * (3) If the thing we're attached to is an attribute  | 
    
    
    819  | 
     | 
     | 
    		 *     but is actually named in the config file, we still  | 
    
    
    820  | 
     | 
     | 
    		 *     have to remember its devbase.  | 
    
    
    821  | 
     | 
     | 
    		 */  | 
    
    
    822  | 
     | 
     | 
     | 
    
    
    823  | 
     | 
     | 
    		/* Figure out parent's devbase, to satisfy case (3). */  | 
    
    
    824  | 
     | 
     | 
    		ab = ht_lookup(devbasetab, cp);  | 
    
    
    825  | 
     | 
     | 
     | 
    
    
    826  | 
     | 
     | 
    		/* Find out if it's an attribute. */  | 
    
    
    827  | 
     | 
     | 
    		attr = ht_lookup(attrtab, cp);  | 
    
    
    828  | 
     | 
     | 
     | 
    
    
    829  | 
     | 
     | 
    		/* Make sure we're _really_ attached to the attr.  Case (1). */  | 
    
    
    830  | 
     | 
     | 
    		if (attr != NULL && onlist(attr->a_devs, ib))  | 
    
    
    831  | 
     | 
     | 
    			goto findattachment;  | 
    
    
    832  | 
     | 
     | 
     | 
    
    
    833  | 
     | 
     | 
    		/*  | 
    
    
    834  | 
     | 
     | 
    		 * Else a real device, and not just an attribute.  Case (2).  | 
    
    
    835  | 
     | 
     | 
    		 *  | 
    
    
    836  | 
     | 
     | 
    		 * Have to work a bit harder to see whether we have  | 
    
    
    837  | 
     | 
     | 
    		 * something like "tg0 at esp0" (where esp is merely  | 
    
    
    838  | 
     | 
     | 
    		 * not an attribute) or "tg0 at nonesuch0" (where  | 
    
    
    839  | 
     | 
     | 
    		 * nonesuch is not even a device).  | 
    
    
    840  | 
     | 
     | 
    		 */  | 
    
    
    841  | 
     | 
     | 
    		if (ab == NULL) { | 
    
    
    842  | 
     | 
     | 
    			error("%s at %s: `%s' unknown", | 
    
    
    843  | 
     | 
     | 
    			    name, at, atbuf);  | 
    
    
    844  | 
     | 
     | 
    			goto bad;  | 
    
    
    845  | 
     | 
     | 
    		}  | 
    
    
    846  | 
     | 
     | 
     | 
    
    
    847  | 
     | 
     | 
    		/*  | 
    
    
    848  | 
     | 
     | 
    		 * See if the named parent carries an attribute  | 
    
    
    849  | 
     | 
     | 
    		 * that allows it to supervise device ib.  | 
    
    
    850  | 
     | 
     | 
    		 */  | 
    
    
    851  | 
     | 
     | 
    		for (nv = ab->d_attrs; nv != NULL; nv = nv->nv_next) { | 
    
    
    852  | 
     | 
     | 
    			attr = nv->nv_ptr;  | 
    
    
    853  | 
     | 
     | 
    			if (onlist(attr->a_devs, ib))  | 
    
    
    854  | 
     | 
     | 
    				goto findattachment;  | 
    
    
    855  | 
     | 
     | 
    		}  | 
    
    
    856  | 
     | 
     | 
    		error("%s's cannot attach to %s's", ib->d_name, atbuf); | 
    
    
    857  | 
     | 
     | 
    		goto bad;  | 
    
    
    858  | 
     | 
     | 
     | 
    
    
    859  | 
     | 
     | 
    findattachment:  | 
    
    
    860  | 
     | 
     | 
    		/* find out which attachment it uses */  | 
    
    
    861  | 
     | 
     | 
    		hit = 0;  | 
    
    
    862  | 
     | 
     | 
    		for (iba = ib->d_ahead; iba != NULL; iba = iba->d_bsame)  | 
    
    
    863  | 
     | 
     | 
    			if (onlist(iba->d_atlist, attr)) { | 
    
    
    864  | 
     | 
     | 
    				hit = 1;  | 
    
    
    865  | 
     | 
     | 
    				break;  | 
    
    
    866  | 
     | 
     | 
    			}  | 
    
    
    867  | 
     | 
     | 
    		if (!hit)  | 
    
    
    868  | 
     | 
     | 
    			panic("adddev: can't figure out attachment"); | 
    
    
    869  | 
     | 
     | 
    	}  | 
    
    
    870  | 
     | 
     | 
    	if ((i->i_locs = fixloc(name, attr, loclist)) == NULL)  | 
    
    
    871  | 
     | 
     | 
    		goto bad;  | 
    
    
    872  | 
     | 
     | 
    	i->i_at = at;  | 
    
    
    873  | 
     | 
     | 
    	i->i_atattr = attr;  | 
    
    
    874  | 
     | 
     | 
    	i->i_atdev = ab;  | 
    
    
    875  | 
     | 
     | 
    	i->i_atdeva = iba;  | 
    
    
    876  | 
     | 
     | 
    	i->i_atunit = atunit;  | 
    
    
    877  | 
     | 
     | 
    	i->i_cfflags = flags;  | 
    
    
    878  | 
     | 
     | 
    	i->i_disable = disable;  | 
    
    
    879  | 
     | 
     | 
     | 
    
    
    880  | 
     | 
     | 
    	*iba->d_ipp = i;  | 
    
    
    881  | 
     | 
     | 
    	iba->d_ipp = &i->i_asame;  | 
    
    
    882  | 
     | 
     | 
     | 
    
    
    883  | 
     | 
     | 
    	selectbase(ib, iba);  | 
    
    
    884  | 
     | 
     | 
    	/* all done, fall into ... */  | 
    
    
    885  | 
     | 
     | 
    bad:  | 
    
    
    886  | 
     | 
     | 
    	nvfreel(loclist);  | 
    
    
    887  | 
     | 
     | 
    	return;  | 
    
    
    888  | 
     | 
     | 
    }  | 
    
    
    889  | 
     | 
     | 
     | 
    
    
    890  | 
     | 
     | 
    void  | 
    
    
    891  | 
     | 
     | 
    addpseudo(const char *name, int number, int disable)  | 
    
    
    892  | 
     | 
     | 
    { | 
    
    
    893  | 
     | 
     | 
    	struct devbase *d;  | 
    
    
    894  | 
     | 
     | 
    	struct devi *i;  | 
    
    
    895  | 
     | 
     | 
     | 
    
    
    896  | 
     | 
     | 
    	d = ht_lookup(devbasetab, name);  | 
    
    
    897  | 
     | 
     | 
    	if (d == NULL) { | 
    
    
    898  | 
     | 
     | 
    		error("undefined pseudo-device %s", name); | 
    
    
    899  | 
     | 
     | 
    		return;  | 
    
    
    900  | 
     | 
     | 
    	}  | 
    
    
    901  | 
     | 
     | 
    	if (!d->d_ispseudo) { | 
    
    
    902  | 
     | 
     | 
    		error("%s is a real device, not a pseudo-device", name); | 
    
    
    903  | 
     | 
     | 
    		return;  | 
    
    
    904  | 
     | 
     | 
    	}  | 
    
    
    905  | 
     | 
     | 
    	if (ht_lookup(devitab, name) != NULL) { | 
    
    
    906  | 
     | 
     | 
    		warnx("warning: duplicate definition of `%s', will use latest definition", name); | 
    
    
    907  | 
     | 
     | 
    		d->d_umax = number;  | 
    
    
    908  | 
     | 
     | 
    		return;  | 
    
    
    909  | 
     | 
     | 
    	}  | 
    
    
    910  | 
     | 
     | 
    	i = newdevi(name, number - 1, d);	/* foo 16 => "foo0..foo15" */  | 
    
    
    911  | 
     | 
     | 
    	if (ht_insert(devitab, name, i))  | 
    
    
    912  | 
     | 
     | 
    		panic("addpseudo(%s)", name); | 
    
    
    913  | 
     | 
     | 
    	i->i_disable = disable;  | 
    
    
    914  | 
     | 
     | 
    	selectbase(d, NULL);  | 
    
    
    915  | 
     | 
     | 
    	*nextpseudo = i;  | 
    
    
    916  | 
     | 
     | 
    	nextpseudo = &i->i_next;  | 
    
    
    917  | 
     | 
     | 
    	npseudo++;  | 
    
    
    918  | 
     | 
     | 
    }  | 
    
    
    919  | 
     | 
     | 
     | 
    
    
    920  | 
     | 
     | 
    /*  | 
    
    
    921  | 
     | 
     | 
     * Define a new instance of a specific device.  | 
    
    
    922  | 
     | 
     | 
     */  | 
    
    
    923  | 
     | 
     | 
    static struct devi *  | 
    
    
    924  | 
     | 
     | 
    getdevi(const char *name)  | 
    
    
    925  | 
     | 
     | 
    { | 
    
    
    926  | 
     | 
     | 
    	struct devi *i, *firsti;  | 
    
    
    927  | 
     | 
     | 
    	struct devbase *d;  | 
    
    
    928  | 
     | 
     | 
    	int unit;  | 
    
    
    929  | 
     | 
     | 
    	char base[NAMESIZE];  | 
    
    
    930  | 
     | 
     | 
     | 
    
    
    931  | 
     | 
     | 
    	if (split(name, strlen(name), base, sizeof base, &unit)) { | 
    
    
    932  | 
     | 
     | 
    		error("invalid device name `%s'", name); | 
    
    
    933  | 
     | 
     | 
    		return (NULL);  | 
    
    
    934  | 
     | 
     | 
    	}  | 
    
    
    935  | 
     | 
     | 
    	d = ht_lookup(devbasetab, intern(base));  | 
    
    
    936  | 
     | 
     | 
    	if (d == NULL) { | 
    
    
    937  | 
     | 
     | 
    		error("%s: unknown device `%s'", name, base); | 
    
    
    938  | 
     | 
     | 
    		return (NULL);  | 
    
    
    939  | 
     | 
     | 
    	}  | 
    
    
    940  | 
     | 
     | 
    	if (d->d_ispseudo) { | 
    
    
    941  | 
     | 
     | 
    		error("%s: %s is a pseudo-device", name, base); | 
    
    
    942  | 
     | 
     | 
    		return (NULL);  | 
    
    
    943  | 
     | 
     | 
    	}  | 
    
    
    944  | 
     | 
     | 
    	firsti = ht_lookup(devitab, name);  | 
    
    
    945  | 
     | 
     | 
    	i = newdevi(name, unit, d);  | 
    
    
    946  | 
     | 
     | 
    	if (firsti == NULL) { | 
    
    
    947  | 
     | 
     | 
    		if (ht_insert(devitab, name, i))  | 
    
    
    948  | 
     | 
     | 
    			panic("getdevi(%s)", name); | 
    
    
    949  | 
     | 
     | 
    		*d->d_ipp = i;  | 
    
    
    950  | 
     | 
     | 
    		d->d_ipp = &i->i_bsame;  | 
    
    
    951  | 
     | 
     | 
    	} else { | 
    
    
    952  | 
     | 
     | 
    		while (firsti->i_alias)  | 
    
    
    953  | 
     | 
     | 
    			firsti = firsti->i_alias;  | 
    
    
    954  | 
     | 
     | 
    		firsti->i_alias = i;  | 
    
    
    955  | 
     | 
     | 
    	}  | 
    
    
    956  | 
     | 
     | 
    	*nextdevi = i;  | 
    
    
    957  | 
     | 
     | 
    	nextdevi = &i->i_next;  | 
    
    
    958  | 
     | 
     | 
    	ndevi++;  | 
    
    
    959  | 
     | 
     | 
    	return (i);  | 
    
    
    960  | 
     | 
     | 
    }  | 
    
    
    961  | 
     | 
     | 
     | 
    
    
    962  | 
     | 
     | 
    static const char *  | 
    
    
    963  | 
     | 
     | 
    concat(const char *name, int c)  | 
    
    
    964  | 
     | 
     | 
    { | 
    
    
    965  | 
     | 
     | 
    	size_t len;  | 
    
    
    966  | 
     | 
     | 
    	char buf[NAMESIZE];  | 
    
    
    967  | 
     | 
     | 
     | 
    
    
    968  | 
     | 
     | 
    	len = strlen(name);  | 
    
    
    969  | 
     | 
     | 
    	if (len + 2 > sizeof(buf)) { | 
    
    
    970  | 
     | 
     | 
    		error("device name `%s%c' too long", name, c); | 
    
    
    971  | 
     | 
     | 
    		len = sizeof(buf) - 2;  | 
    
    
    972  | 
     | 
     | 
    	}  | 
    
    
    973  | 
     | 
     | 
    	bcopy(name, buf, len);  | 
    
    
    974  | 
     | 
     | 
    	buf[len] = c;  | 
    
    
    975  | 
     | 
     | 
    	buf[len + 1] = 0;  | 
    
    
    976  | 
     | 
     | 
    	return (intern(buf));  | 
    
    
    977  | 
     | 
     | 
    }  | 
    
    
    978  | 
     | 
     | 
     | 
    
    
    979  | 
     | 
     | 
    const char *  | 
    
    
    980  | 
     | 
     | 
    starref(const char *name)  | 
    
    
    981  | 
     | 
     | 
    { | 
    
    
    982  | 
     | 
     | 
     | 
    
    
    983  | 
     | 
     | 
    	return (concat(name, '*'));  | 
    
    
    984  | 
     | 
     | 
    }  | 
    
    
    985  | 
     | 
     | 
     | 
    
    
    986  | 
     | 
     | 
    const char *  | 
    
    
    987  | 
     | 
     | 
    wildref(const char *name)  | 
    
    
    988  | 
     | 
     | 
    { | 
    
    
    989  | 
     | 
     | 
     | 
    
    
    990  | 
     | 
     | 
    	return (concat(name, '?'));  | 
    
    
    991  | 
     | 
     | 
    }  | 
    
    
    992  | 
     | 
     | 
     | 
    
    
    993  | 
     | 
     | 
    /*  | 
    
    
    994  | 
     | 
     | 
     * Split a name like "foo0" into base name (foo) and unit number (0).  | 
    
    
    995  | 
     | 
     | 
     * Return 0 on success.  To make this useful for names like "foo0a",  | 
    
    
    996  | 
     | 
     | 
     * the length of the "foo0" part is one of the arguments.  | 
    
    
    997  | 
     | 
     | 
     */  | 
    
    
    998  | 
     | 
     | 
    static int  | 
    
    
    999  | 
     | 
     | 
    split(const char *name, size_t nlen, char *base, size_t bsize, int *aunit)  | 
    
    
    1000  | 
     | 
     | 
    { | 
    
    
    1001  | 
     | 
     | 
    	const char *cp;  | 
    
    
    1002  | 
     | 
     | 
    	int c;  | 
    
    
    1003  | 
     | 
     | 
    	size_t l;  | 
    
    
    1004  | 
     | 
     | 
     | 
    
    
    1005  | 
     | 
     | 
    	l = nlen;  | 
    
    
    1006  | 
     | 
     | 
    	if (l < 2 || l >= bsize || isdigit((unsigned char)*name))  | 
    
    
    1007  | 
     | 
     | 
    		return (1);  | 
    
    
    1008  | 
     | 
     | 
    	c = (u_char)name[--l];  | 
    
    
    1009  | 
     | 
     | 
    	if (!isdigit((unsigned char)c)) { | 
    
    
    1010  | 
     | 
     | 
    		if (c == '*')  | 
    
    
    1011  | 
     | 
     | 
    			*aunit = STAR;  | 
    
    
    1012  | 
     | 
     | 
    		else if (c == '?')  | 
    
    
    1013  | 
     | 
     | 
    			*aunit = WILD;  | 
    
    
    1014  | 
     | 
     | 
    		else  | 
    
    
    1015  | 
     | 
     | 
    			return (1);  | 
    
    
    1016  | 
     | 
     | 
    	} else { | 
    
    
    1017  | 
     | 
     | 
    		cp = &name[l];  | 
    
    
    1018  | 
     | 
     | 
    		while (isdigit((unsigned char)cp[-1]))  | 
    
    
    1019  | 
     | 
     | 
    			l--, cp--;  | 
    
    
    1020  | 
     | 
     | 
    		*aunit = atoi(cp);  | 
    
    
    1021  | 
     | 
     | 
    	}  | 
    
    
    1022  | 
     | 
     | 
    	bcopy(name, base, l);  | 
    
    
    1023  | 
     | 
     | 
    	base[l] = 0;  | 
    
    
    1024  | 
     | 
     | 
    	return (0);  | 
    
    
    1025  | 
     | 
     | 
    }  | 
    
    
    1026  | 
     | 
     | 
     | 
    
    
    1027  | 
     | 
     | 
    /*  | 
    
    
    1028  | 
     | 
     | 
     * We have an instance of the base foo, so select it and all its  | 
    
    
    1029  | 
     | 
     | 
     * attributes for "optional foo".  | 
    
    
    1030  | 
     | 
     | 
     */  | 
    
    
    1031  | 
     | 
     | 
    static void  | 
    
    
    1032  | 
     | 
     | 
    selectbase(struct devbase *d, struct deva *da)  | 
    
    
    1033  | 
     | 
     | 
    { | 
    
    
    1034  | 
     | 
     | 
    	struct attr *a;  | 
    
    
    1035  | 
     | 
     | 
    	struct nvlist *nv;  | 
    
    
    1036  | 
     | 
     | 
     | 
    
    
    1037  | 
     | 
     | 
    	(void)ht_insert(selecttab, d->d_name, (char *)d->d_name);  | 
    
    
    1038  | 
     | 
     | 
    	for (nv = d->d_attrs; nv != NULL; nv = nv->nv_next) { | 
    
    
    1039  | 
     | 
     | 
    		a = nv->nv_ptr;  | 
    
    
    1040  | 
     | 
     | 
    		(void)ht_insert(selecttab, a->a_name, (char *)a->a_name);  | 
    
    
    1041  | 
     | 
     | 
    	}  | 
    
    
    1042  | 
     | 
     | 
    	if (da != NULL) { | 
    
    
    1043  | 
     | 
     | 
    		(void)ht_insert(selecttab, da->d_name, (char *)da->d_name);  | 
    
    
    1044  | 
     | 
     | 
    		for (nv = da->d_attrs; nv != NULL; nv = nv->nv_next) { | 
    
    
    1045  | 
     | 
     | 
    			a = nv->nv_ptr;  | 
    
    
    1046  | 
     | 
     | 
    			(void)ht_insert(selecttab, a->a_name,  | 
    
    
    1047  | 
     | 
     | 
    			    (char *)a->a_name);  | 
    
    
    1048  | 
     | 
     | 
    		}  | 
    
    
    1049  | 
     | 
     | 
    	}  | 
    
    
    1050  | 
     | 
     | 
    }  | 
    
    
    1051  | 
     | 
     | 
     | 
    
    
    1052  | 
     | 
     | 
    /*  | 
    
    
    1053  | 
     | 
     | 
     * Is the given pointer on the given list of pointers?  | 
    
    
    1054  | 
     | 
     | 
     */  | 
    
    
    1055  | 
     | 
     | 
    static int  | 
    
    
    1056  | 
     | 
     | 
    onlist(struct nvlist *nv, void *ptr)  | 
    
    
    1057  | 
     | 
     | 
    { | 
    
    
    1058  | 
     | 
     | 
    	for (; nv != NULL; nv = nv->nv_next)  | 
    
    
    1059  | 
     | 
     | 
    		if (nv->nv_ptr == ptr)  | 
    
    
    1060  | 
     | 
     | 
    			return (1);  | 
    
    
    1061  | 
     | 
     | 
    	return (0);  | 
    
    
    1062  | 
     | 
     | 
    }  | 
    
    
    1063  | 
     | 
     | 
     | 
    
    
    1064  | 
     | 
     | 
    static char *  | 
    
    
    1065  | 
     | 
     | 
    extend(char *p, const char *name)  | 
    
    
    1066  | 
     | 
     | 
    { | 
    
    
    1067  | 
     | 
     | 
    	int l;  | 
    
    
    1068  | 
     | 
     | 
     | 
    
    
    1069  | 
     | 
     | 
    	l = strlen(name);  | 
    
    
    1070  | 
     | 
     | 
    	bcopy(name, p, l);  | 
    
    
    1071  | 
     | 
     | 
    	p += l;  | 
    
    
    1072  | 
     | 
     | 
    	*p++ = ',';  | 
    
    
    1073  | 
     | 
     | 
    	*p++ = ' ';  | 
    
    
    1074  | 
     | 
     | 
    	return (p);  | 
    
    
    1075  | 
     | 
     | 
    }  | 
    
    
    1076  | 
     | 
     | 
     | 
    
    
    1077  | 
     | 
     | 
    /*  | 
    
    
    1078  | 
     | 
     | 
     * Check that we got all required locators, and default any that are  | 
    
    
    1079  | 
     | 
     | 
     * given as "?" and have defaults.  Return 0 on success.  | 
    
    
    1080  | 
     | 
     | 
     */  | 
    
    
    1081  | 
     | 
     | 
    static const char **  | 
    
    
    1082  | 
     | 
     | 
    fixloc(const char *name, struct attr *attr, struct nvlist *got)  | 
    
    
    1083  | 
     | 
     | 
    { | 
    
    
    1084  | 
     | 
     | 
    	struct nvlist *m, *n;  | 
    
    
    1085  | 
     | 
     | 
    	int ord;  | 
    
    
    1086  | 
     | 
     | 
    	const char **lp;  | 
    
    
    1087  | 
     | 
     | 
    	int nmissing, nextra, nnodefault;  | 
    
    
    1088  | 
     | 
     | 
    	char *mp, *ep, *ndp;  | 
    
    
    1089  | 
     | 
     | 
    	char missing[1000], extra[1000], nodefault[1000];  | 
    
    
    1090  | 
     | 
     | 
    	static const char *nullvec[1];  | 
    
    
    1091  | 
     | 
     | 
     | 
    
    
    1092  | 
     | 
     | 
    	/*  | 
    
    
    1093  | 
     | 
     | 
    	 * Look for all required locators, and number the given ones  | 
    
    
    1094  | 
     | 
     | 
    	 * according to the required order.  While we are numbering,  | 
    
    
    1095  | 
     | 
     | 
    	 * set default values for defaulted locators.  | 
    
    
    1096  | 
     | 
     | 
    	 */  | 
    
    
    1097  | 
     | 
     | 
    	if (attr->a_loclen == 0)	/* e.g., "at root" */  | 
    
    
    1098  | 
     | 
     | 
    		lp = nullvec;  | 
    
    
    1099  | 
     | 
     | 
    	else  | 
    
    
    1100  | 
     | 
     | 
    		lp = ereallocarray(NULL, attr->a_loclen + 1,  | 
    
    
    1101  | 
     | 
     | 
    		    sizeof(const char *));  | 
    
    
    1102  | 
     | 
     | 
    	for (n = got; n != NULL; n = n->nv_next)  | 
    
    
    1103  | 
     | 
     | 
    		n->nv_int = -1;  | 
    
    
    1104  | 
     | 
     | 
    	nmissing = 0;  | 
    
    
    1105  | 
     | 
     | 
    	mp = missing;  | 
    
    
    1106  | 
     | 
     | 
    	/* yes, this is O(mn), but m and n should be small */  | 
    
    
    1107  | 
     | 
     | 
    	for (ord = 0, m = attr->a_locs; m != NULL; m = m->nv_next, ord++) { | 
    
    
    1108  | 
     | 
     | 
    		for (n = got; n != NULL; n = n->nv_next) { | 
    
    
    1109  | 
     | 
     | 
    			if (n->nv_name == m->nv_name) { | 
    
    
    1110  | 
     | 
     | 
    				n->nv_int = ord;  | 
    
    
    1111  | 
     | 
     | 
    				break;  | 
    
    
    1112  | 
     | 
     | 
    			}  | 
    
    
    1113  | 
     | 
     | 
    		}  | 
    
    
    1114  | 
     | 
     | 
    		if (n == NULL && m->nv_int == 0) { | 
    
    
    1115  | 
     | 
     | 
    			nmissing++;  | 
    
    
    1116  | 
     | 
     | 
    			mp = extend(mp, m->nv_name);  | 
    
    
    1117  | 
     | 
     | 
    		}  | 
    
    
    1118  | 
     | 
     | 
    		lp[ord] = m->nv_str;  | 
    
    
    1119  | 
     | 
     | 
    	}  | 
    
    
    1120  | 
     | 
     | 
    	if (ord != attr->a_loclen)  | 
    
    
    1121  | 
     | 
     | 
    		panic("fixloc"); | 
    
    
    1122  | 
     | 
     | 
    	lp[ord] = NULL;  | 
    
    
    1123  | 
     | 
     | 
    	nextra = 0;  | 
    
    
    1124  | 
     | 
     | 
    	ep = extra;  | 
    
    
    1125  | 
     | 
     | 
    	nnodefault = 0;  | 
    
    
    1126  | 
     | 
     | 
    	ndp = nodefault;  | 
    
    
    1127  | 
     | 
     | 
    	for (n = got; n != NULL; n = n->nv_next) { | 
    
    
    1128  | 
     | 
     | 
    		if (n->nv_int >= 0) { | 
    
    
    1129  | 
     | 
     | 
    			if (n->nv_str != NULL)  | 
    
    
    1130  | 
     | 
     | 
    				lp[n->nv_int] = n->nv_str;  | 
    
    
    1131  | 
     | 
     | 
    			else if (lp[n->nv_int] == NULL) { | 
    
    
    1132  | 
     | 
     | 
    				nnodefault++;  | 
    
    
    1133  | 
     | 
     | 
    				ndp = extend(ndp, n->nv_name);  | 
    
    
    1134  | 
     | 
     | 
    			}  | 
    
    
    1135  | 
     | 
     | 
    		} else { | 
    
    
    1136  | 
     | 
     | 
    			nextra++;  | 
    
    
    1137  | 
     | 
     | 
    			ep = extend(ep, n->nv_name);  | 
    
    
    1138  | 
     | 
     | 
    		}  | 
    
    
    1139  | 
     | 
     | 
    	}  | 
    
    
    1140  | 
     | 
     | 
    	if (nextra) { | 
    
    
    1141  | 
     | 
     | 
    		ep[-2] = 0;	/* kill ", " */  | 
    
    
    1142  | 
     | 
     | 
    		error("%s: extraneous locator%s: %s", | 
    
    
    1143  | 
     | 
     | 
    		    name, nextra > 1 ? "s" : "", extra);  | 
    
    
    1144  | 
     | 
     | 
    	}  | 
    
    
    1145  | 
     | 
     | 
    	if (nmissing) { | 
    
    
    1146  | 
     | 
     | 
    		mp[-2] = 0;  | 
    
    
    1147  | 
     | 
     | 
    		error("%s: must specify %s", name, missing); | 
    
    
    1148  | 
     | 
     | 
    	}  | 
    
    
    1149  | 
     | 
     | 
    	if (nnodefault) { | 
    
    
    1150  | 
     | 
     | 
    		ndp[-2] = 0;  | 
    
    
    1151  | 
     | 
     | 
    		error("%s: cannot wildcard %s", name, nodefault); | 
    
    
    1152  | 
     | 
     | 
    	}  | 
    
    
    1153  | 
     | 
     | 
    	if (nmissing || nnodefault) { | 
    
    
    1154  | 
     | 
     | 
    		free(lp);  | 
    
    
    1155  | 
     | 
     | 
    		lp = NULL;  | 
    
    
    1156  | 
     | 
     | 
    	}  | 
    
    
    1157  | 
     | 
     | 
    	return (lp);  | 
    
    
    1158  | 
     | 
     | 
    }  |