18360efbdSAlfred Perlstein /* $NetBSD: getnetpath.c,v 1.3 2000/07/06 03:10:34 christos Exp $ */ 28360efbdSAlfred Perlstein 38360efbdSAlfred Perlstein /* 48360efbdSAlfred Perlstein * Sun RPC is a product of Sun Microsystems, Inc. and is provided for 58360efbdSAlfred Perlstein * unrestricted use provided that this legend is included on all tape 68360efbdSAlfred Perlstein * media and as a part of the software program in whole or part. Users 78360efbdSAlfred Perlstein * may copy or modify Sun RPC without charge, but are not authorized 88360efbdSAlfred Perlstein * to license or distribute it to anyone else except as part of a product or 98360efbdSAlfred Perlstein * program developed by the user or with the express written consent of 108360efbdSAlfred Perlstein * Sun Microsystems, Inc. 118360efbdSAlfred Perlstein * 128360efbdSAlfred Perlstein * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE 138360efbdSAlfred Perlstein * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR 148360efbdSAlfred Perlstein * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE. 158360efbdSAlfred Perlstein * 168360efbdSAlfred Perlstein * Sun RPC is provided with no support and without any obligation on the 178360efbdSAlfred Perlstein * part of Sun Microsystems, Inc. to assist in its use, correction, 188360efbdSAlfred Perlstein * modification or enhancement. 198360efbdSAlfred Perlstein * 208360efbdSAlfred Perlstein * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE 218360efbdSAlfred Perlstein * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC 228360efbdSAlfred Perlstein * OR ANY PART THEREOF. 238360efbdSAlfred Perlstein * 248360efbdSAlfred Perlstein * In no event will Sun Microsystems, Inc. be liable for any lost revenue 258360efbdSAlfred Perlstein * or profits or other special, indirect and consequential damages, even if 268360efbdSAlfred Perlstein * Sun has been advised of the possibility of such damages. 278360efbdSAlfred Perlstein * 288360efbdSAlfred Perlstein * Sun Microsystems, Inc. 298360efbdSAlfred Perlstein * 2550 Garcia Avenue 308360efbdSAlfred Perlstein * Mountain View, California 94043 318360efbdSAlfred Perlstein */ 328360efbdSAlfred Perlstein /* 338360efbdSAlfred Perlstein #ifndef lint 348360efbdSAlfred Perlstein static char sccsid[] = "@(#)getnetpath.c 1.11 91/12/19 SMI"; 358360efbdSAlfred Perlstein #endif 368360efbdSAlfred Perlstein */ 37d3d20c82SDavid E. O'Brien #include <sys/cdefs.h> 38d3d20c82SDavid E. O'Brien __FBSDID("$FreeBSD$"); 398360efbdSAlfred Perlstein 408360efbdSAlfred Perlstein /* 418360efbdSAlfred Perlstein * Copyright (c) 1989 by Sun Microsystems, Inc. 428360efbdSAlfred Perlstein */ 438360efbdSAlfred Perlstein 448360efbdSAlfred Perlstein #include "namespace.h" 458360efbdSAlfred Perlstein #include <sys/cdefs.h> 468360efbdSAlfred Perlstein #include <stdio.h> 478360efbdSAlfred Perlstein #include <errno.h> 488360efbdSAlfred Perlstein #include <netconfig.h> 498360efbdSAlfred Perlstein #include <stdlib.h> 508360efbdSAlfred Perlstein #include <string.h> 518360efbdSAlfred Perlstein #include <syslog.h> 528360efbdSAlfred Perlstein #include "un-namespace.h" 538360efbdSAlfred Perlstein 548360efbdSAlfred Perlstein /* 558360efbdSAlfred Perlstein * internal structure to keep track of a netpath "session" 568360efbdSAlfred Perlstein */ 578360efbdSAlfred Perlstein struct netpath_chain { 588360efbdSAlfred Perlstein struct netconfig *ncp; /* an nconf entry */ 598360efbdSAlfred Perlstein struct netpath_chain *nchain_next; /* next nconf entry allocated */ 608360efbdSAlfred Perlstein }; 618360efbdSAlfred Perlstein 628360efbdSAlfred Perlstein 638360efbdSAlfred Perlstein struct netpath_vars { 648360efbdSAlfred Perlstein int valid; /* token that indicates a valid netpath_vars */ 658360efbdSAlfred Perlstein void *nc_handlep; /* handle for current netconfig "session" */ 668360efbdSAlfred Perlstein char *netpath; /* pointer to current view-point in NETPATH */ 678360efbdSAlfred Perlstein char *netpath_start; /* pointer to start of our copy of NETPATH */ 688360efbdSAlfred Perlstein struct netpath_chain *ncp_list; /* list of nconfs allocated this session*/ 698360efbdSAlfred Perlstein }; 708360efbdSAlfred Perlstein 718360efbdSAlfred Perlstein #define NP_VALID 0xf00d 728360efbdSAlfred Perlstein #define NP_INVALID 0 738360efbdSAlfred Perlstein 74c05ac53bSDavid E. O'Brien char *_get_next_token(char *, int); 758360efbdSAlfred Perlstein 768360efbdSAlfred Perlstein 778360efbdSAlfred Perlstein /* 788360efbdSAlfred Perlstein * A call to setnetpath() establishes a NETPATH "session". setnetpath() 798360efbdSAlfred Perlstein * must be called before the first call to getnetpath(). A "handle" is 808360efbdSAlfred Perlstein * returned to distinguish the session; this handle should be passed 818360efbdSAlfred Perlstein * subsequently to getnetpath(). (Handles are used to allow for nested calls 828360efbdSAlfred Perlstein * to setnetpath()). 838360efbdSAlfred Perlstein * If setnetpath() is unable to establish a session (due to lack of memory 848360efbdSAlfred Perlstein * resources, or the absence of the /etc/netconfig file), a NULL pointer is 858360efbdSAlfred Perlstein * returned. 868360efbdSAlfred Perlstein */ 878360efbdSAlfred Perlstein 888360efbdSAlfred Perlstein void * 898360efbdSAlfred Perlstein setnetpath() 908360efbdSAlfred Perlstein { 918360efbdSAlfred Perlstein 928360efbdSAlfred Perlstein struct netpath_vars *np_sessionp; /* this session's variables */ 938360efbdSAlfred Perlstein char *npp; /* NETPATH env variable */ 948360efbdSAlfred Perlstein 958360efbdSAlfred Perlstein #ifdef MEM_CHK 968360efbdSAlfred Perlstein malloc_debug(1); 978360efbdSAlfred Perlstein #endif 988360efbdSAlfred Perlstein 998360efbdSAlfred Perlstein if ((np_sessionp = 1008360efbdSAlfred Perlstein (struct netpath_vars *)malloc(sizeof (struct netpath_vars))) == NULL) { 1018360efbdSAlfred Perlstein return (NULL); 1028360efbdSAlfred Perlstein } 1038360efbdSAlfred Perlstein if ((np_sessionp->nc_handlep = setnetconfig()) == NULL) { 1048360efbdSAlfred Perlstein syslog (LOG_ERR, "rpc: failed to open " NETCONFIG); 1058360efbdSAlfred Perlstein return (NULL); 1068360efbdSAlfred Perlstein } 1078360efbdSAlfred Perlstein np_sessionp->valid = NP_VALID; 1088360efbdSAlfred Perlstein np_sessionp->ncp_list = NULL; 1098360efbdSAlfred Perlstein if ((npp = getenv(NETPATH)) == NULL) { 1108360efbdSAlfred Perlstein np_sessionp->netpath = NULL; 1118360efbdSAlfred Perlstein } else { 1128360efbdSAlfred Perlstein (void) endnetconfig(np_sessionp->nc_handlep);/* won't need nc session*/ 1138360efbdSAlfred Perlstein np_sessionp->nc_handlep = NULL; 1148360efbdSAlfred Perlstein if ((np_sessionp->netpath = malloc(strlen(npp)+1)) == NULL) { 1158360efbdSAlfred Perlstein free(np_sessionp); 1168360efbdSAlfred Perlstein return (NULL); 1178360efbdSAlfred Perlstein } else { 1188360efbdSAlfred Perlstein (void) strcpy(np_sessionp->netpath, npp); 1198360efbdSAlfred Perlstein } 1208360efbdSAlfred Perlstein } 1218360efbdSAlfred Perlstein np_sessionp->netpath_start = np_sessionp->netpath; 1228360efbdSAlfred Perlstein return ((void *)np_sessionp); 1238360efbdSAlfred Perlstein } 1248360efbdSAlfred Perlstein 1258360efbdSAlfred Perlstein /* 1268360efbdSAlfred Perlstein * When first called, getnetpath() returns a pointer to the netconfig 1278360efbdSAlfred Perlstein * database entry corresponding to the first valid NETPATH component. The 1288360efbdSAlfred Perlstein * netconfig entry is formatted as a struct netconfig. 1298360efbdSAlfred Perlstein * On each subsequent call, getnetpath returns a pointer to the netconfig 1308360efbdSAlfred Perlstein * entry that corresponds to the next valid NETPATH component. getnetpath 1318360efbdSAlfred Perlstein * can thus be used to search the netconfig database for all networks 1328360efbdSAlfred Perlstein * included in the NETPATH variable. 1338360efbdSAlfred Perlstein * When NETPATH has been exhausted, getnetpath() returns NULL. It returns 1348360efbdSAlfred Perlstein * NULL and sets errno in case of an error (e.g., setnetpath was not called 1358360efbdSAlfred Perlstein * previously). 1368360efbdSAlfred Perlstein * getnetpath() silently ignores invalid NETPATH components. A NETPATH 1378360efbdSAlfred Perlstein * compnent is invalid if there is no corresponding entry in the netconfig 1388360efbdSAlfred Perlstein * database. 1398360efbdSAlfred Perlstein * If the NETPATH variable is unset, getnetpath() behaves as if NETPATH 1408360efbdSAlfred Perlstein * were set to the sequence of default or visible networks in the netconfig 1418360efbdSAlfred Perlstein * database, in the order in which they are listed. 1428360efbdSAlfred Perlstein */ 1438360efbdSAlfred Perlstein 1448360efbdSAlfred Perlstein struct netconfig * 1458360efbdSAlfred Perlstein getnetpath(handlep) 1468360efbdSAlfred Perlstein void *handlep; 1478360efbdSAlfred Perlstein { 1488360efbdSAlfred Perlstein struct netpath_vars *np_sessionp = (struct netpath_vars *)handlep; 1498360efbdSAlfred Perlstein struct netconfig *ncp = NULL; /* temp. holds a netconfig session */ 1508360efbdSAlfred Perlstein struct netpath_chain *chainp; /* holds chain of ncp's we alloc */ 1518360efbdSAlfred Perlstein char *npp; /* holds current NETPATH */ 1528360efbdSAlfred Perlstein 1538360efbdSAlfred Perlstein if (np_sessionp == NULL || np_sessionp->valid != NP_VALID) { 1548360efbdSAlfred Perlstein errno = EINVAL; 1558360efbdSAlfred Perlstein return (NULL); 1568360efbdSAlfred Perlstein } 1578360efbdSAlfred Perlstein if (np_sessionp->netpath_start == NULL) { /* NETPATH was not set */ 1588360efbdSAlfred Perlstein do { /* select next visible network */ 1598360efbdSAlfred Perlstein if (np_sessionp->nc_handlep == NULL) { 1608360efbdSAlfred Perlstein np_sessionp->nc_handlep = setnetconfig(); 1618360efbdSAlfred Perlstein if (np_sessionp->nc_handlep == NULL) 1628360efbdSAlfred Perlstein syslog (LOG_ERR, "rpc: failed to open " NETCONFIG); 1638360efbdSAlfred Perlstein } 1648360efbdSAlfred Perlstein if ((ncp = getnetconfig(np_sessionp->nc_handlep)) == NULL) { 1658360efbdSAlfred Perlstein return(NULL); 1668360efbdSAlfred Perlstein } 1678360efbdSAlfred Perlstein } while ((ncp->nc_flag & NC_VISIBLE) == 0); 1688360efbdSAlfred Perlstein return (ncp); 1698360efbdSAlfred Perlstein } 1708360efbdSAlfred Perlstein /* 1718360efbdSAlfred Perlstein * Find first valid network ID in netpath. 1728360efbdSAlfred Perlstein */ 1738360efbdSAlfred Perlstein while ((npp = np_sessionp->netpath) != NULL && strlen(npp) != 0) { 1748360efbdSAlfred Perlstein np_sessionp->netpath = _get_next_token(npp, ':'); 1758360efbdSAlfred Perlstein /* 1768360efbdSAlfred Perlstein * npp is a network identifier. 1778360efbdSAlfred Perlstein */ 1788360efbdSAlfred Perlstein if ((ncp = getnetconfigent(npp)) != NULL) { 1798360efbdSAlfred Perlstein chainp = (struct netpath_chain *) /* cobble alloc chain entry */ 1808360efbdSAlfred Perlstein malloc(sizeof (struct netpath_chain)); 1818360efbdSAlfred Perlstein chainp->ncp = ncp; 1828360efbdSAlfred Perlstein chainp->nchain_next = NULL; 1838360efbdSAlfred Perlstein if (np_sessionp->ncp_list == NULL) { 1848360efbdSAlfred Perlstein np_sessionp->ncp_list = chainp; 1858360efbdSAlfred Perlstein } else { 1868360efbdSAlfred Perlstein np_sessionp->ncp_list->nchain_next = chainp; 1878360efbdSAlfred Perlstein } 1888360efbdSAlfred Perlstein return (ncp); 1898360efbdSAlfred Perlstein } 1908360efbdSAlfred Perlstein /* couldn't find this token in the database; go to next one. */ 1918360efbdSAlfred Perlstein } 1928360efbdSAlfred Perlstein return (NULL); 1938360efbdSAlfred Perlstein } 1948360efbdSAlfred Perlstein 1958360efbdSAlfred Perlstein /* 1968360efbdSAlfred Perlstein * endnetpath() may be called to unbind NETPATH when processing is complete, 1978360efbdSAlfred Perlstein * releasing resources for reuse. It returns 0 on success and -1 on failure 1988360efbdSAlfred Perlstein * (e.g. if setnetpath() was not called previously. 1998360efbdSAlfred Perlstein */ 2008360efbdSAlfred Perlstein int 2018360efbdSAlfred Perlstein endnetpath(handlep) 2028360efbdSAlfred Perlstein void *handlep; 2038360efbdSAlfred Perlstein { 2048360efbdSAlfred Perlstein struct netpath_vars *np_sessionp = (struct netpath_vars *)handlep; 2058360efbdSAlfred Perlstein struct netpath_chain *chainp, *lastp; 2068360efbdSAlfred Perlstein 2078360efbdSAlfred Perlstein if (np_sessionp == NULL || np_sessionp->valid != NP_VALID) { 2088360efbdSAlfred Perlstein errno = EINVAL; 2098360efbdSAlfred Perlstein return (-1); 2108360efbdSAlfred Perlstein } 2118360efbdSAlfred Perlstein if (np_sessionp->nc_handlep != NULL) 2128360efbdSAlfred Perlstein endnetconfig(np_sessionp->nc_handlep); 2138360efbdSAlfred Perlstein if (np_sessionp->netpath_start != NULL) 2148360efbdSAlfred Perlstein free(np_sessionp->netpath_start); 2158360efbdSAlfred Perlstein for (chainp = np_sessionp->ncp_list; chainp != NULL; 2168360efbdSAlfred Perlstein lastp=chainp, chainp=chainp->nchain_next, free(lastp)) { 2178360efbdSAlfred Perlstein freenetconfigent(chainp->ncp); 2188360efbdSAlfred Perlstein } 2198360efbdSAlfred Perlstein free(np_sessionp); 2208360efbdSAlfred Perlstein #ifdef MEM_CHK 2218360efbdSAlfred Perlstein if (malloc_verify() == 0) { 2228360efbdSAlfred Perlstein fprintf(stderr, "memory heap corrupted in endnetpath\n"); 2238360efbdSAlfred Perlstein exit(1); 2248360efbdSAlfred Perlstein } 2258360efbdSAlfred Perlstein #endif 2268360efbdSAlfred Perlstein return (0); 2278360efbdSAlfred Perlstein } 2288360efbdSAlfred Perlstein 2298360efbdSAlfred Perlstein 2308360efbdSAlfred Perlstein 2318360efbdSAlfred Perlstein /* 2328360efbdSAlfred Perlstein * Returns pointer to the rest-of-the-string after the current token. 2338360efbdSAlfred Perlstein * The token itself starts at arg, and we null terminate it. We return NULL 2348360efbdSAlfred Perlstein * if either the arg is empty, or if this is the last token. 2358360efbdSAlfred Perlstein */ 2368360efbdSAlfred Perlstein 2378360efbdSAlfred Perlstein char * 2388360efbdSAlfred Perlstein _get_next_token(npp, token) 2398360efbdSAlfred Perlstein char *npp; /* string */ 2408360efbdSAlfred Perlstein int token; /* char to parse string for */ 2418360efbdSAlfred Perlstein { 2428360efbdSAlfred Perlstein char *cp; /* char pointer */ 2438360efbdSAlfred Perlstein char *np; /* netpath pointer */ 2448360efbdSAlfred Perlstein char *ep; /* escape pointer */ 2458360efbdSAlfred Perlstein 2468360efbdSAlfred Perlstein if ((cp = strchr(npp, token)) == NULL) { 2478360efbdSAlfred Perlstein return (NULL); 2488360efbdSAlfred Perlstein } 2498360efbdSAlfred Perlstein /* 2508360efbdSAlfred Perlstein * did find a token, but it might be escaped. 2518360efbdSAlfred Perlstein */ 252555f4cffSMartin Blapp if ((cp > npp) && (cp[-1] == '\\')) { 2538360efbdSAlfred Perlstein /* if slash was also escaped, carry on, otherwise find next token */ 254555f4cffSMartin Blapp if ((cp > npp + 1) && (cp[-2] != '\\')) { 2558360efbdSAlfred Perlstein /* shift r-o-s onto the escaped token */ 2568360efbdSAlfred Perlstein strcpy(&cp[-1], cp); /* XXX: overlapping string copy */ 2578360efbdSAlfred Perlstein /* 2588360efbdSAlfred Perlstein * Do a recursive call. 2598360efbdSAlfred Perlstein * We don't know how many escaped tokens there might be. 2608360efbdSAlfred Perlstein */ 2618360efbdSAlfred Perlstein return (_get_next_token(cp, token)); 2628360efbdSAlfred Perlstein } 2638360efbdSAlfred Perlstein } 2648360efbdSAlfred Perlstein 2658360efbdSAlfred Perlstein *cp++ = '\0'; /* null-terminate token */ 2668360efbdSAlfred Perlstein /* get rid of any backslash escapes */ 2678360efbdSAlfred Perlstein ep = npp; 2688360efbdSAlfred Perlstein while ((np = strchr(ep, '\\')) != 0) { 2698360efbdSAlfred Perlstein if (np[1] == '\\') 2708360efbdSAlfred Perlstein np++; 2718360efbdSAlfred Perlstein strcpy(np, (ep = &np[1])); /* XXX: overlapping string copy */ 2728360efbdSAlfred Perlstein } 2738360efbdSAlfred Perlstein return (cp); /* return ptr to r-o-s */ 2748360efbdSAlfred Perlstein } 275