Home | History | Annotate | Line # | Download | only in libhack
      1  1.5       agc /*	$NetBSD: yplib.c,v 1.5 2003/12/10 12:06:25 agc Exp $	*/
      2  1.1       gwr 
      3  1.1       gwr /*
      4  1.1       gwr  * Copyright (c) 1992, 1993 Theo de Raadt <deraadt (at) fsa.ca>
      5  1.1       gwr  * All rights reserved.
      6  1.1       gwr  *
      7  1.1       gwr  * Redistribution and use in source and binary forms, with or without
      8  1.1       gwr  * modification, are permitted provided that the following conditions
      9  1.1       gwr  * are met:
     10  1.1       gwr  * 1. Redistributions of source code must retain the above copyright
     11  1.1       gwr  *    notice, this list of conditions and the following disclaimer.
     12  1.1       gwr  * 2. Redistributions in binary form must reproduce the above copyright
     13  1.1       gwr  *    notice, this list of conditions and the following disclaimer in the
     14  1.1       gwr  *    documentation and/or other materials provided with the distribution.
     15  1.1       gwr  *
     16  1.1       gwr  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
     17  1.1       gwr  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
     18  1.1       gwr  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     19  1.1       gwr  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
     20  1.1       gwr  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     21  1.1       gwr  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     22  1.1       gwr  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     23  1.1       gwr  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     24  1.1       gwr  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     25  1.1       gwr  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     26  1.1       gwr  * SUCH DAMAGE.
     27  1.1       gwr  */
     28  1.1       gwr 
     29  1.1       gwr /*
     30  1.1       gwr  * This file provides "stubs" for all the YP library functions.
     31  1.1       gwr  * It is not needed unless you pull in things that call YP, and
     32  1.1       gwr  * if you use all the get* files here then the YP stuff should
     33  1.1       gwr  * not get dragged in.  But if it does, one can use this.
     34  1.1       gwr  *
     35  1.1       gwr  * This was copied from:
     36  1.1       gwr  *      lib/libc/yp/yplib.c
     37  1.1       gwr  * (and then completely gutted! 8^)
     38  1.1       gwr  */
     39  1.3  christos #include <sys/cdefs.h>
     40  1.3  christos 
     41  1.3  christos #ifdef __weak_alias
     42  1.3  christos #define yp_all			_yp_all
     43  1.3  christos #define yp_bind			_yp_bind
     44  1.3  christos #define yp_first		_yp_first
     45  1.3  christos #define yp_get_default_domain	_yp_get_default_domain
     46  1.3  christos #define yp_maplist		_yp_maplist
     47  1.3  christos #define yp_master		_yp_master
     48  1.3  christos #define yp_match		_yp_match
     49  1.3  christos #define yp_next			_yp_next
     50  1.3  christos #define yp_order		_yp_order
     51  1.3  christos #define yp_unbind		_yp_unbind
     52  1.3  christos #define yperr_string		_yperr_string
     53  1.3  christos #define ypprot_err		_ypprot_err
     54  1.3  christos #endif
     55  1.1       gwr 
     56  1.1       gwr #include <sys/types.h>
     57  1.1       gwr 
     58  1.2  sommerfe #include <errno.h>
     59  1.2  sommerfe #include <stdio.h>
     60  1.2  sommerfe #include <stdlib.h>
     61  1.2  sommerfe #include <string.h>
     62  1.2  sommerfe #include <unistd.h>
     63  1.2  sommerfe 
     64  1.2  sommerfe #include <rpc/rpc.h>
     65  1.2  sommerfe #include <rpc/xdr.h>
     66  1.2  sommerfe #include <rpcsvc/yp_prot.h>
     67  1.2  sommerfe #include <rpcsvc/ypclnt.h>
     68  1.1       gwr 
     69  1.3  christos struct dom_binding *_ypbindlist;
     70  1.3  christos char _yp_domain[256];
     71  1.3  christos 
     72  1.3  christos #define YPLIB_TIMEOUT		10
     73  1.3  christos #define YPLIB_RPC_RETRIES	4
     74  1.3  christos 
     75  1.3  christos struct timeval _yplib_timeout = { YPLIB_TIMEOUT, 0 };
     76  1.3  christos struct timeval _yplib_rpc_timeout = { YPLIB_TIMEOUT / YPLIB_RPC_RETRIES,
     77  1.3  christos 	1000000 * (YPLIB_TIMEOUT % YPLIB_RPC_RETRIES) / YPLIB_RPC_RETRIES };
     78  1.3  christos int _yplib_nerrs = 5;
     79  1.3  christos 
     80  1.3  christos 
     81  1.3  christos #ifdef __weak_alias
     82  1.3  christos __weak_alias(yp_all,_yp_all);
     83  1.3  christos __weak_alias(yp_bind, _yp_bind);
     84  1.3  christos __weak_alias(yp_first,_yp_first);
     85  1.3  christos __weak_alias(yp_get_default_domain, _yp_get_default_domain);
     86  1.3  christos __weak_alias(yp_maplist,_yp_maplist);
     87  1.3  christos __weak_alias(yp_master,_yp_master);
     88  1.3  christos __weak_alias(yp_match,_yp_match);
     89  1.3  christos __weak_alias(yp_next,_yp_next);
     90  1.3  christos __weak_alias(yp_order,_yp_order);
     91  1.3  christos __weak_alias(yp_unbind, _yp_unbind);
     92  1.3  christos __weak_alias(yperr_string,_yperr_string);
     93  1.3  christos __weak_alias(ypprot_err,_ypprot_err);
     94  1.3  christos #endif
     95  1.3  christos 
     96  1.3  christos void __yp_unbind __P((struct dom_binding *));
     97  1.3  christos int _yp_invalid_domain __P((const char *));
     98  1.1       gwr 
     99  1.1       gwr int
    100  1.1       gwr _yp_dobind(dom, ypdb)
    101  1.1       gwr 	const char *dom;
    102  1.2  sommerfe 	struct dom_binding **ypdb;
    103  1.1       gwr {
    104  1.1       gwr 	return YPERR_YPBIND;
    105  1.1       gwr }
    106  1.1       gwr 
    107  1.3  christos void
    108  1.3  christos __yp_unbind(ypb)
    109  1.3  christos 	struct dom_binding *ypb;
    110  1.3  christos {
    111  1.3  christos }
    112  1.3  christos 
    113  1.1       gwr int
    114  1.1       gwr yp_bind(dom)
    115  1.1       gwr 	const char     *dom;
    116  1.1       gwr {
    117  1.1       gwr 	return _yp_dobind(dom, NULL);
    118  1.1       gwr }
    119  1.1       gwr 
    120  1.1       gwr void
    121  1.1       gwr yp_unbind(dom)
    122  1.1       gwr 	const char     *dom;
    123  1.1       gwr {
    124  1.1       gwr }
    125  1.1       gwr 
    126  1.1       gwr int
    127  1.3  christos yp_get_default_domain(domp)
    128  1.3  christos 	char **domp;
    129  1.3  christos {
    130  1.3  christos 	*domp = NULL;
    131  1.3  christos 	if (_yp_domain[0] == '\0')
    132  1.3  christos 		if (getdomainname(_yp_domain, sizeof(_yp_domain)))
    133  1.3  christos 			return YPERR_NODOM;
    134  1.3  christos 	*domp = _yp_domain;
    135  1.3  christos 	return 0;
    136  1.3  christos }
    137  1.3  christos 
    138  1.3  christos int
    139  1.3  christos _yp_check(dom)
    140  1.3  christos 	char          **dom;
    141  1.3  christos {
    142  1.3  christos 	char           *unused;
    143  1.3  christos 
    144  1.3  christos 	if (_yp_domain[0] == '\0')
    145  1.3  christos 		if (yp_get_default_domain(&unused))
    146  1.3  christos 			return 0;
    147  1.3  christos 
    148  1.3  christos 	if (dom)
    149  1.3  christos 		*dom = _yp_domain;
    150  1.3  christos 
    151  1.3  christos 	if (yp_bind(_yp_domain) == 0)
    152  1.3  christos 		return 1;
    153  1.3  christos 	return 0;
    154  1.3  christos }
    155  1.3  christos 
    156  1.3  christos int
    157  1.3  christos _yp_invalid_domain(dom)
    158  1.3  christos 	const char *dom;
    159  1.3  christos {
    160  1.3  christos 	if (dom == NULL || *dom == '\0')
    161  1.3  christos 		return 1;
    162  1.3  christos 
    163  1.3  christos 	if (strlen(dom) > YPMAXDOMAIN)
    164  1.3  christos 		return 1;
    165  1.3  christos 
    166  1.3  christos 	if (strchr(dom, '/') != NULL)
    167  1.3  christos 		return 1;
    168  1.3  christos 
    169  1.3  christos 	return 0;
    170  1.3  christos }
    171  1.3  christos 
    172  1.3  christos int
    173  1.1       gwr yp_match(indomain, inmap, inkey, inkeylen, outval, outvallen)
    174  1.1       gwr 	const char     *indomain;
    175  1.1       gwr 	const char     *inmap;
    176  1.1       gwr 	const char     *inkey;
    177  1.1       gwr 	int             inkeylen;
    178  1.1       gwr 	char          **outval;
    179  1.1       gwr 	int            *outvallen;
    180  1.1       gwr {
    181  1.1       gwr 	*outval = NULL;
    182  1.1       gwr 	*outvallen = 0;
    183  1.1       gwr 
    184  1.1       gwr 	return YPERR_DOMAIN;
    185  1.1       gwr }
    186  1.1       gwr 
    187  1.1       gwr int
    188  1.1       gwr yp_first(indomain, inmap, outkey, outkeylen, outval, outvallen)
    189  1.1       gwr 	const char     *indomain;
    190  1.1       gwr 	const char     *inmap;
    191  1.1       gwr 	char          **outkey;
    192  1.1       gwr 	int            *outkeylen;
    193  1.1       gwr 	char          **outval;
    194  1.1       gwr 	int            *outvallen;
    195  1.1       gwr {
    196  1.1       gwr 
    197  1.1       gwr 	*outkey = *outval = NULL;
    198  1.1       gwr 	*outkeylen = *outvallen = 0;
    199  1.1       gwr 
    200  1.1       gwr 	return YPERR_DOMAIN;
    201  1.1       gwr }
    202  1.1       gwr 
    203  1.1       gwr int
    204  1.1       gwr yp_next(indomain, inmap, inkey, inkeylen, outkey, outkeylen, outval, outvallen)
    205  1.1       gwr 	const char     *indomain;
    206  1.1       gwr 	const char     *inmap;
    207  1.1       gwr 	const char     *inkey;
    208  1.1       gwr 	int             inkeylen;
    209  1.1       gwr 	char          **outkey;
    210  1.1       gwr 	int            *outkeylen;
    211  1.1       gwr 	char          **outval;
    212  1.1       gwr 	int            *outvallen;
    213  1.1       gwr {
    214  1.1       gwr 	*outkey = *outval = NULL;
    215  1.1       gwr 	*outkeylen = *outvallen = 0;
    216  1.1       gwr 
    217  1.1       gwr 	return YPERR_DOMAIN;
    218  1.1       gwr }
    219  1.1       gwr 
    220  1.1       gwr int
    221  1.1       gwr yp_all(indomain, inmap, incallback)
    222  1.1       gwr 	const char     *indomain;
    223  1.1       gwr 	const char     *inmap;
    224  1.2  sommerfe 	struct ypall_callback *incallback;
    225  1.1       gwr {
    226  1.1       gwr 	return YPERR_DOMAIN;
    227  1.1       gwr }
    228  1.1       gwr 
    229  1.1       gwr int
    230  1.1       gwr yp_order(indomain, inmap, outorder)
    231  1.1       gwr 	const char     *indomain;
    232  1.1       gwr 	const char     *inmap;
    233  1.1       gwr 	int            *outorder;
    234  1.1       gwr {
    235  1.1       gwr 	return YPERR_DOMAIN;
    236  1.1       gwr }
    237  1.1       gwr 
    238  1.1       gwr int
    239  1.1       gwr yp_master(indomain, inmap, outname)
    240  1.1       gwr 	const char     *indomain;
    241  1.1       gwr 	const char     *inmap;
    242  1.1       gwr 	char          **outname;
    243  1.1       gwr {
    244  1.1       gwr 	return YPERR_DOMAIN;
    245  1.1       gwr }
    246  1.1       gwr 
    247  1.1       gwr int
    248  1.1       gwr yp_maplist(indomain, outmaplist)
    249  1.1       gwr 	const char     *indomain;
    250  1.1       gwr 	struct ypmaplist **outmaplist;
    251  1.1       gwr {
    252  1.1       gwr 	return YPERR_DOMAIN;
    253  1.1       gwr }
    254  1.1       gwr 
    255  1.1       gwr char *
    256  1.1       gwr yperr_string(incode)
    257  1.1       gwr 	int             incode;
    258  1.1       gwr {
    259  1.1       gwr 	static char     err[80];
    260  1.1       gwr 
    261  1.1       gwr 	if (incode == 0)
    262  1.1       gwr 		return "Success";
    263  1.1       gwr 
    264  1.4    itojun 	snprintf(err, sizeof(err), "YP FAKE error %d\n", incode);
    265  1.1       gwr 	return err;
    266  1.1       gwr }
    267  1.1       gwr 
    268  1.1       gwr int
    269  1.1       gwr ypprot_err(incode)
    270  1.1       gwr 	unsigned int    incode;
    271  1.1       gwr {
    272  1.1       gwr 	switch (incode) {
    273  1.1       gwr 	case YP_TRUE:	/* success */
    274  1.1       gwr 		return 0;
    275  1.1       gwr 	case YP_FALSE:	/* failure */
    276  1.1       gwr 		return YPERR_YPBIND;
    277  1.1       gwr 	}
    278  1.1       gwr 	return YPERR_YPERR;
    279  1.1       gwr }
    280  1.1       gwr 
    281