glibc/nis/nis_defaults.c
Zack Weinberg 82f43dd2d1 Include shlib-compat.h in many sunrpc/nis source files.
Every file that uses libc_hidden_nolink_sunrpc or
libnsl_hidden_nolink_def needs to include shlib-compat.h.  Currently,
most of them are getting it via stdio.h, because libio.h refers to
SHLIB_COMPAT when _LIBC is defined, so it includes shlib-compat.h.  My
experimental patch to not install libio.h breaks that chain; stdio.h
no longer pulls in libio.h even for internal users.

Accordingly, this patch adds #include <shlib-compat.h> to many files
in sunrpc/ and nis/.  There are also a small number of really obvious
fixups to includes that caught my eye while proofreading the patch -
not including headers twice in a row, not worrying about portability
to Ultrix anymore, sort of thing.

	* nis/nis_add.c, nis/nis_addmember.c, nis/nis_call.c
	* nis/nis_checkpoint.c, nis/nis_clone_dir.c, nis/nis_clone_obj.c
	* nis/nis_clone_res.c, nis/nis_creategroup.c, nis/nis_defaults.c
	* nis/nis_destroygroup.c, nis/nis_domain_of.c
	* nis/nis_domain_of_r.c, nis/nis_error.c, nis/nis_file.c
	* nis/nis_free.c, nis/nis_getservlist.c, nis/nis_ismember.c
	* nis/nis_local_names.c, nis/nis_lookup.c, nis/nis_mkdir.c
	* nis/nis_modify.c, nis/nis_ping.c, nis/nis_print.c
	* nis/nis_print_group_entry.c, nis/nis_remove.c
	* nis/nis_removemember.c, nis/nis_rmdir.c, nis/nis_server.c
	* nis/nis_subr.c, nis/nis_table.c, nis/nis_util.c
	* nis/nis_verifygroup.c, nis/nis_xdr.c, nis/yp_xdr.c
	* nis/ypclnt.c, nis/ypupdate_xdr.c, sunrpc/auth_des.c
	* sunrpc/auth_none.c, sunrpc/auth_unix.c, sunrpc/authdes_prot.c
	* sunrpc/authuxprot.c, sunrpc/clnt_gen.c, sunrpc/clnt_perr.c
	* sunrpc/clnt_raw.c, sunrpc/clnt_simp.c, sunrpc/clnt_tcp.c
	* sunrpc/clnt_udp.c, sunrpc/clnt_unix.c, sunrpc/des_crypt.c
	* sunrpc/des_soft.c, sunrpc/get_myaddr.c, sunrpc/key_call.c
	* sunrpc/key_prot.c, sunrpc/netname.c, sunrpc/pm_getmaps.c
	* sunrpc/pm_getport.c, sunrpc/pmap_clnt.c, sunrpc/pmap_prot.c
	* sunrpc/pmap_prot2.c, sunrpc/pmap_rmt.c, sunrpc/publickey.c
	* sunrpc/rpc_cmsg.c, sunrpc/rpc_dtable.c, sunrpc/rpc_prot.c
	* sunrpc/rpc_thread.c, sunrpc/rtime.c, sunrpc/svc.c
	* sunrpc/svc_auth.c, sunrpc/svc_raw.c, sunrpc/svc_run.c
	* sunrpc/svc_tcp.c, sunrpc/svc_udp.c, sunrpc/svc_unix.c
	* sunrpc/svcauth_des.c, sunrpc/xdr.c, sunrpc/xdr_array.c
	* sunrpc/xdr_float.c, sunrpc/xdr_intXX_t.c, sunrpc/xdr_mem.c
	* sunrpc/xdr_rec.c, sunrpc/xdr_ref.c, sunrpc/xdr_sizeof.c
	* sunrpc/xdr_stdio.c: Include shlib-compat.h.

	* sunrpc/des_crypt.c, sunrpc/des_soft.c: No need to include
	abi-versions.h as well as shlib-compat.h.
	* sunrpc/get_myaddr.c: Remove obsolete comment.
	* sunrpc/pmap_rmt.c: Remove obsolete comment and #undef.
	* sunrpc/rpc_thread.c: Include libc-lock.h only once.
	* resolv/res_libc.c: Include shlib-compat.h only once.
2017-06-04 11:31:28 -04:00

457 lines
9.6 KiB
C

/* Copyright (c) 1997-2017 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Thorsten Kukuk <kukuk@vt.uni-paderborn.de>, 1997.
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, see
<http://www.gnu.org/licenses/>. */
#include <assert.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <stdint.h>
#include <sys/types.h>
#include <rpc/rpc.h>
#include <rpcsvc/nis.h>
#include <shlib-compat.h>
#define DEFAULT_TTL 43200
/*
** Some functions for parsing the -D param and NIS_DEFAULTS Environ
*/
static nis_name
searchXYX (char *str, const char *what)
{
assert (strlen (what) == 6);
assert (strncmp (str, what, 6) == 0);
str += 6; /* Points to the begin of the parameters. */
int i = 0;
while (str[i] != '\0' && str[i] != ':')
++i;
if (i == 0) /* only "<WHAT>=" ? */
return strdup ("");
return strndup (str, i);
}
static nis_name
searchgroup (char *str)
{
return searchXYX (str, "group=");
}
static nis_name
searchowner (char *str)
{
return searchXYX (str, "owner=");
}
static uint32_t
searchttl (char *str)
{
char buf[strlen (str) + 1];
char *cptr, *dptr;
uint32_t time;
int i;
dptr = strstr (str, "ttl=");
if (dptr == NULL) /* should (could) not happen */
return DEFAULT_TTL;;
dptr += 4; /* points to the begin of the new ttl */
i = 0;
while (dptr[i] != '\0' && dptr[i] != ':')
i++;
if (i == 0) /* only "ttl=" ? */
return DEFAULT_TTL;
strncpy (buf, dptr, i);
buf[i] = '\0';
time = 0;
dptr = buf;
cptr = strchr (dptr, 'd');
if (cptr != NULL)
{
*cptr = '\0';
cptr++;
time += atoi (dptr) * 60 * 60 * 24;
dptr = cptr;
}
cptr = strchr (dptr, 'h');
if (cptr != NULL)
{
*cptr = '\0';
cptr++;
time += atoi (dptr) * 60 * 60;
dptr = cptr;
}
cptr = strchr (dptr, 'm');
if (cptr != NULL)
{
*cptr = '\0';
cptr++;
time += atoi (dptr) * 60;
dptr = cptr;
}
cptr = strchr (dptr, 's');
if (cptr != NULL)
*cptr = '\0';
time += atoi (dptr);
return time;
}
static unsigned int
searchaccess (char *str, unsigned int access)
{
char buf[strlen (str) + 1];
char *cptr;
unsigned int result = access;
int i;
int n, o, g, w;
cptr = strstr (str, "access=");
if (cptr == NULL)
return 0;
cptr += 7; /* points to the begin of the access string */
i = 0;
while (cptr[i] != '\0' && cptr[i] != ':')
i++;
if (i == 0) /* only "access=" ? */
return 0;
strncpy (buf, cptr, i);
buf[i] = '\0';
n = o = g = w = 0;
cptr = buf;
if (*cptr == ',') /* Fix for stupid Solaris scripts */
++cptr;
while (*cptr != '\0')
{
switch (*cptr)
{
case 'n':
n = 1;
break;
case 'o':
o = 1;
break;
case 'g':
g = 1;
break;
case 'w':
w = 1;
break;
case 'a':
o = g = w = 1;
break;
case '-':
cptr++; /* Remove "-" from beginning */
while (*cptr != '\0' && *cptr != ',')
{
switch (*cptr)
{
case 'r':
if (n)
result = result & ~(NIS_READ_ACC << 24);
if (o)
result = result & ~(NIS_READ_ACC << 16);
if (g)
result = result & ~(NIS_READ_ACC << 8);
if (w)
result = result & ~(NIS_READ_ACC);
break;
case 'm':
if (n)
result = result & ~(NIS_MODIFY_ACC << 24);
if (o)
result = result & ~(NIS_MODIFY_ACC << 16);
if (g)
result = result & ~(NIS_MODIFY_ACC << 8);
if (w)
result = result & ~(NIS_MODIFY_ACC);
break;
case 'c':
if (n)
result = result & ~(NIS_CREATE_ACC << 24);
if (o)
result = result & ~(NIS_CREATE_ACC << 16);
if (g)
result = result & ~(NIS_CREATE_ACC << 8);
if (w)
result = result & ~(NIS_CREATE_ACC);
break;
case 'd':
if (n)
result = result & ~(NIS_DESTROY_ACC << 24);
if (o)
result = result & ~(NIS_DESTROY_ACC << 16);
if (g)
result = result & ~(NIS_DESTROY_ACC << 8);
if (w)
result = result & ~(NIS_DESTROY_ACC);
break;
default:
return (~0U);
}
cptr++;
}
n = o = g = w = 0;
break;
case '+':
cptr++; /* Remove "+" from beginning */
while (*cptr != '\0' && *cptr != ',')
{
switch (*cptr)
{
case 'r':
if (n)
result = result | (NIS_READ_ACC << 24);
if (o)
result = result | (NIS_READ_ACC << 16);
if (g)
result = result | (NIS_READ_ACC << 8);
if (w)
result = result | (NIS_READ_ACC);
break;
case 'm':
if (n)
result = result | (NIS_MODIFY_ACC << 24);
if (o)
result = result | (NIS_MODIFY_ACC << 16);
if (g)
result = result | (NIS_MODIFY_ACC << 8);
if (w)
result = result | (NIS_MODIFY_ACC);
break;
case 'c':
if (n)
result = result | (NIS_CREATE_ACC << 24);
if (o)
result = result | (NIS_CREATE_ACC << 16);
if (g)
result = result | (NIS_CREATE_ACC << 8);
if (w)
result = result | (NIS_CREATE_ACC);
break;
case 'd':
if (n)
result = result | (NIS_DESTROY_ACC << 24);
if (o)
result = result | (NIS_DESTROY_ACC << 16);
if (g)
result = result | (NIS_DESTROY_ACC << 8);
if (w)
result = result | (NIS_DESTROY_ACC);
break;
default:
return (~0U);
}
cptr++;
}
n = o = g = w = 0;
break;
case '=':
cptr++; /* Remove "=" from beginning */
/* Clear */
if (n)
result = result & ~((NIS_READ_ACC + NIS_MODIFY_ACC +
NIS_CREATE_ACC + NIS_DESTROY_ACC) << 24);
if (o)
result = result & ~((NIS_READ_ACC + NIS_MODIFY_ACC +
NIS_CREATE_ACC + NIS_DESTROY_ACC) << 16);
if (g)
result = result & ~((NIS_READ_ACC + NIS_MODIFY_ACC +
NIS_CREATE_ACC + NIS_DESTROY_ACC) << 8);
if (w)
result = result & ~(NIS_READ_ACC + NIS_MODIFY_ACC +
NIS_CREATE_ACC + NIS_DESTROY_ACC);
while (*cptr != '\0' && *cptr != ',')
{
switch (*cptr)
{
case 'r':
if (n)
result = result | (NIS_READ_ACC << 24);
if (o)
result = result | (NIS_READ_ACC << 16);
if (g)
result = result | (NIS_READ_ACC << 8);
if (w)
result = result | (NIS_READ_ACC);
break;
case 'm':
if (n)
result = result | (NIS_MODIFY_ACC << 24);
if (o)
result = result | (NIS_MODIFY_ACC << 16);
if (g)
result = result | (NIS_MODIFY_ACC << 8);
if (w)
result = result | (NIS_MODIFY_ACC);
break;
case 'c':
if (n)
result = result | (NIS_CREATE_ACC << 24);
if (o)
result = result | (NIS_CREATE_ACC << 16);
if (g)
result = result | (NIS_CREATE_ACC << 8);
if (w)
result = result | (NIS_CREATE_ACC);
break;
case 'd':
if (n)
result = result | (NIS_DESTROY_ACC << 24);
if (o)
result = result | (NIS_DESTROY_ACC << 16);
if (g)
result = result | (NIS_DESTROY_ACC << 8);
if (w)
result = result | (NIS_DESTROY_ACC);
break;
default:
return result = (~0U);
}
cptr++;
}
n = o = g = w = 0;
break;
default:
return result = (~0U);
}
if (*cptr != '\0')
cptr++;
}
return result;
}
nis_name
__nis_default_owner (char *defaults)
{
char *default_owner = NULL;
char *cptr = defaults;
if (cptr == NULL)
cptr = getenv ("NIS_DEFAULTS");
if (cptr != NULL)
{
char *dptr = strstr (cptr, "owner=");
if (dptr != NULL)
{
char *p = searchowner (dptr);
if (p == NULL)
return NULL;
default_owner = strdupa (p);
free (p);
}
}
return strdup (default_owner ?: nis_local_principal ());
}
libnsl_hidden_nolink_def (__nis_default_owner, GLIBC_2_1)
nis_name
__nis_default_group (char *defaults)
{
char *default_group = NULL;
char *cptr = defaults;
if (cptr == NULL)
cptr = getenv ("NIS_DEFAULTS");
if (cptr != NULL)
{
char *dptr = strstr (cptr, "group=");
if (dptr != NULL)
{
char *p = searchgroup (dptr);
if (p == NULL)
return NULL;
default_group = strdupa (p);
free (p);
}
}
return strdup (default_group ?: nis_local_group ());
}
libnsl_hidden_nolink_def (__nis_default_group, GLIBC_2_1)
uint32_t
__nis_default_ttl (char *defaults)
{
char *cptr, *dptr;
if (defaults != NULL)
{
dptr = strstr (defaults, "ttl=");
if (dptr != NULL)
return searchttl (defaults);
}
cptr = getenv ("NIS_DEFAULTS");
if (cptr == NULL)
return DEFAULT_TTL;
dptr = strstr (cptr, "ttl=");
if (dptr == NULL)
return DEFAULT_TTL;
return searchttl (cptr);
}
/* Default access rights are ----rmcdr---r---, but we could change
this with the NIS_DEFAULTS variable. */
unsigned int
__nis_default_access (char *param, unsigned int defaults)
{
unsigned int result;
char *cptr;
if (defaults == 0)
result = 0 | OWNER_DEFAULT | GROUP_DEFAULT | WORLD_DEFAULT;
else
result = defaults;
if (param != NULL && strstr (param, "access=") != NULL)
result = searchaccess (param, result);
else
{
cptr = getenv ("NIS_DEFAULTS");
if (cptr != NULL && strstr (cptr, "access=") != NULL)
result = searchaccess (cptr, result);
}
return result;
}
libnsl_hidden_nolink_def (__nis_default_access, GLIBC_2_1)