/* Copyright (C) 1996-2001, 2002, 2003 Free Software Foundation, Inc. This file is part of the GNU C Library. Contributed by Thorsten Kukuk , 1996. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. The GNU C Library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with the GNU C Library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. */ #include #include #include #include #include #include #include #include #include "nss-nis.h" /* Get the declaration of the parser function. */ #define ENTNAME servent #define EXTERN_PARSER #include __libc_lock_define_initialized (static, lock) struct response_t { char *val; struct response_t *next; }; struct intern_t { struct response_t *start; struct response_t *next; }; typedef struct intern_t intern_t; static intern_t intern = { NULL, NULL }; static int saveit (int instatus, char *inkey, int inkeylen, char *inval, int invallen, char *indata) { intern_t *intern = (intern_t *) indata; if (instatus != YP_TRUE) return instatus; if (inkey && inkeylen > 0 && inval && invallen > 0) { if (intern->start == NULL) { intern->start = malloc (sizeof (struct response_t)); if (intern->start == NULL) return YP_FALSE; /* We have no error code for out of memory */ intern->next = intern->start; } else { intern->next->next = malloc (sizeof (struct response_t)); if (intern->next->next == NULL) return YP_FALSE; /* We have no error code for out of memory */ intern->next = intern->next->next; } intern->next->next = NULL; intern->next->val = malloc (invallen + 1); if (intern->next->val == NULL) return YP_FALSE; /* We have no error code for out of memory */ strncpy (intern->next->val, inval, invallen); intern->next->val[invallen] = '\0'; } return 0; } static enum nss_status internal_nis_endservent (intern_t * intern) { while (intern->start != NULL) { if (intern->start->val != NULL) free (intern->start->val); intern->next = intern->start; intern->start = intern->start->next; free (intern->next); } intern->start = NULL; return NSS_STATUS_SUCCESS; } enum nss_status _nss_nis_endservent (void) { enum nss_status status; __libc_lock_lock (lock); status = internal_nis_endservent (&intern); __libc_lock_unlock (lock); return status; } static enum nss_status internal_nis_setservent (intern_t *intern) { char *domainname; struct ypall_callback ypcb; enum nss_status status; if (yp_get_default_domain (&domainname)) return NSS_STATUS_UNAVAIL; (void) internal_nis_endservent (intern); ypcb.foreach = saveit; ypcb.data = (char *) intern; status = yperr2nss (yp_all (domainname, "services.byname", &ypcb)); intern->next = intern->start; return status; } enum nss_status _nss_nis_setservent (int stayopen) { enum nss_status status; __libc_lock_lock (lock); status = internal_nis_setservent (&intern); __libc_lock_unlock (lock); return status; } static enum nss_status internal_nis_getservent_r (struct servent *serv, char *buffer, size_t buflen, int *errnop, intern_t *data) { struct parser_data *pdata = (void *) buffer; int parse_res; char *p; if (data->start == NULL) internal_nis_setservent (data); /* Get the next entry until we found a correct one. */ do { if (data->next == NULL) return NSS_STATUS_NOTFOUND; p = strncpy (buffer, data->next->val, buflen); while (isspace (*p)) ++p; parse_res = _nss_files_parse_servent (p, serv, pdata, buflen, errnop); if (parse_res == -1) return NSS_STATUS_TRYAGAIN; data->next = data->next->next; } while (!parse_res); return NSS_STATUS_SUCCESS; } enum nss_status _nss_nis_getservent_r (struct servent *serv, char *buffer, size_t buflen, int *errnop) { enum nss_status status; __libc_lock_lock (lock); status = internal_nis_getservent_r (serv, buffer, buflen, errnop, &intern); __libc_lock_unlock (lock); return status; } enum nss_status _nss_nis_getservbyname_r (const char *name, const char *protocol, struct servent *serv, char *buffer, size_t buflen, int *errnop) { intern_t data = { NULL, NULL }; enum nss_status status; int found; if (name == NULL) { *errnop = EINVAL; return NSS_STATUS_UNAVAIL; } /* If the protocol is given, we could try if our NIS server knows about services.byservicename map. If yes, we only need one query */ if (protocol != NULL) { char key[strlen (name) + strlen (protocol) + 2]; char *cp, *domain, *result; size_t keylen, len; int int_len; /* If this fails, the other solution will also fail. */ if (yp_get_default_domain (&domain)) return NSS_STATUS_UNAVAIL; /* key is: "name/protocol" */ cp = stpcpy (key, name); *cp++ = '/'; stpcpy (cp, protocol); keylen = strlen (key); status = yperr2nss (yp_match (domain, "services.byservicename", key, keylen, &result, &int_len)); len = int_len; /* If we found the key, it's ok and parse the result. If not, fall through and parse the complete table. */ if (status == NSS_STATUS_SUCCESS) { struct parser_data *pdata = (void *) buffer; int parse_res; char *p; if ((size_t) (len + 1) > buflen) { free (result); *errnop = ERANGE; return NSS_STATUS_TRYAGAIN; } p = strncpy (buffer, result, len); buffer[len] = '\0'; while (isspace (*p)) ++p; free (result); parse_res = _nss_files_parse_servent (p, serv, pdata, buflen, errnop); if (parse_res < 0) { if (parse_res == -1) return NSS_STATUS_TRYAGAIN; else return NSS_STATUS_NOTFOUND; } else return NSS_STATUS_SUCCESS; } } status = internal_nis_setservent (&data); if (status != NSS_STATUS_SUCCESS) return status; found = 0; while (!found && ((status = internal_nis_getservent_r (serv, buffer, buflen, errnop, &data)) == NSS_STATUS_SUCCESS)) { if (protocol == NULL || strcmp (serv->s_proto, protocol) == 0) { char **cp; if (strcmp (serv->s_name, name) == 0) found = 1; else for (cp = serv->s_aliases; *cp; cp++) if (strcmp (name, *cp) == 0) found = 1; } } internal_nis_endservent (&data); if (!found && status == NSS_STATUS_SUCCESS) return NSS_STATUS_NOTFOUND; else return status; } enum nss_status _nss_nis_getservbyport_r (int port, const char *protocol, struct servent *serv, char *buffer, size_t buflen, int *errnop) { intern_t data = { NULL, NULL }; enum nss_status status; int found; /* If the protocol is given, we only need one query */ if (protocol != NULL) { char key[100 + strlen (protocol) + 2]; char *domain, *result; size_t keylen, len; int int_len; /* If this fails, the other solution will also fail. */ if (yp_get_default_domain (&domain)) return NSS_STATUS_UNAVAIL; /* key is: "port/protocol" */ keylen = snprintf (key, sizeof (key), "%d/%s", port, protocol); status = yperr2nss (yp_match (domain, "services.byname", key, keylen, &result, &int_len)); len = int_len; /* If we found the key, it's ok and parse the result. If not, fall through and parse the complete table. */ if (status == NSS_STATUS_SUCCESS) { struct parser_data *pdata = (void *) buffer; int parse_res; char *p; if ((size_t) (len + 1) > buflen) { free (result); *errnop = ERANGE; return NSS_STATUS_TRYAGAIN; } p = strncpy (buffer, result, len); buffer[len] = '\0'; while (isspace (*p)) ++p; free (result); parse_res = _nss_files_parse_servent (p, serv, pdata, buflen, errnop); if (parse_res < 0) { if (parse_res == -1) return NSS_STATUS_TRYAGAIN; else return NSS_STATUS_NOTFOUND; } else return NSS_STATUS_SUCCESS; } } status = internal_nis_setservent (&data); if (status != NSS_STATUS_SUCCESS) return status; found = 0; while (!found && ((status = internal_nis_getservent_r (serv, buffer, buflen, errnop, &data)) == NSS_STATUS_SUCCESS)) if (serv->s_port == port && (protocol == NULL || strcmp (serv->s_proto, protocol) == 0)) found = 1; internal_nis_endservent (&data); if (!found && status == NSS_STATUS_SUCCESS) return NSS_STATUS_NOTFOUND; else return status; }