[thirdparty/glibc.git] / nscd / nscd_conf.c

/* Copyright (c) 1998-2023 Free Software Foundation, Inc.
   This file is part of the GNU C Library.

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published
   by the Free Software Foundation; version 2 of the License, or
   (at your option) any later version.

   This program 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 General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, see <https://www.gnu.org/licenses/>.  */

#include <ctype.h>
#include <errno.h>
#include <error.h>
#include <libintl.h>
#include <malloc.h>
#include <pwd.h>
#include <stdio.h>
#include <stdio_ext.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <sys/param.h>
#include <sys/types.h>

#include "dbg_log.h"
#include "nscd.h"


/* Names of the databases.  */
const char *const dbnames[lastdb] =
{
  [pwddb] = "passwd",
  [grpdb] = "group",
  [hstdb] = "hosts",
  [servdb] = "services",
  [netgrdb] = "netgroup"
};


static int
find_db (const char *name)
{
  for (int cnt = 0; cnt < lastdb; ++cnt)
    if (strcmp (name, dbnames[cnt]) == 0)
      return cnt;

  error (0, 0, _("database %s is not supported"), name);
  return -1;
}

int
nscd_parse_file (const char *fname, struct database_dyn dbs[lastdb])
{
  FILE *fp;
  char *line, *cp, *entry, *arg1, *arg2;
  size_t len;
  int cnt;
  const unsigned int initial_error_message_count = error_message_count;

  /* Open the configuration file.  */
  fp = fopen (fname, "r");
  if (fp == NULL)
    return -1;

  /* The stream is not used by more than one thread.  */
  (void) __fsetlocking (fp, FSETLOCKING_BYCALLER);

  line = NULL;
  len = 0;

  do
    {
      ssize_t n = getline (&line, &len, fp);
      if (n < 0)
	break;
      if (line[n - 1] == '\n')
	line[n - 1] = '\0';

      /* Because the file format does not know any form of quoting we
	 can search forward for the next '#' character and if found
	 make it terminating the line.  */
      *strchrnul (line, '#') = '\0';

      /* If the line is blank it is ignored.  */
      if (line[0] == '\0')
	continue;

      entry = line;
      while (isspace (*entry) && *entry != '\0')
	++entry;
      cp = entry;
      while (!isspace (*cp) && *cp != '\0')
	++cp;
      arg1 = cp;
      ++arg1;
      *cp = '\0';
      if (strlen (entry) == 0)
	error (0, 0, _("Parse error: %s"), line);
      while (isspace (*arg1) && *arg1 != '\0')
	++arg1;
      cp = arg1;
      while (!isspace (*cp) && *cp != '\0')
	++cp;
      arg2 = cp;
      ++arg2;
      *cp = '\0';
      if (strlen (arg2) > 0)
	{
	  while (isspace (*arg2) && *arg2 != '\0')
	    ++arg2;
	  cp = arg2;
	  while (!isspace (*cp) && *cp != '\0')
	    ++cp;
	  *cp = '\0';
	}

      if (strcmp (entry, "positive-time-to-live") == 0)
	{
	  int idx = find_db (arg1);
	  if (idx >= 0)
	    dbs[idx].postimeout = atol (arg2);
	}
      else if (strcmp (entry, "negative-time-to-live") == 0)
	{
	  int idx = find_db (arg1);
	  if (idx >= 0)
	    dbs[idx].negtimeout = atol (arg2);
	}
      else if (strcmp (entry, "suggested-size") == 0)
	{
	  int idx = find_db (arg1);
	  if (idx >= 0)
	    dbs[idx].suggested_module
	      = atol (arg2) ?: DEFAULT_SUGGESTED_MODULE;
	}
      else if (strcmp (entry, "enable-cache") == 0)
	{
	  int idx = find_db (arg1);
	  if (idx >= 0)
	    {
	      if (strcmp (arg2, "no") == 0)
		dbs[idx].enabled = 0;
	      else if (strcmp (arg2, "yes") == 0)
		dbs[idx].enabled = 1;
	    }
	}
      else if (strcmp (entry, "check-files") == 0)
	{
	  int idx = find_db (arg1);
	  if (idx >= 0)
	    {
	      if (strcmp (arg2, "no") == 0)
		dbs[idx].check_file = 0;
	      else if (strcmp (arg2, "yes") == 0)
		dbs[idx].check_file = 1;
	    }
	}
      else if (strcmp (entry, "max-db-size") == 0)
	{
	  int idx = find_db (arg1);
	  if (idx >= 0)
	    dbs[idx].max_db_size = atol (arg2) ?: DEFAULT_MAX_DB_SIZE;
	}
      else if (strcmp (entry, "logfile") == 0)
	set_logfile (arg1);
      else if (strcmp (entry, "debug-level") == 0)
	{
	  int level = atoi (arg1);
	  if (level > 0)
	    debug_level = level;
	}
      else if (strcmp (entry, "threads") == 0)
	{
	  if (nthreads == -1)
	    nthreads = MAX (atol (arg1), lastdb);
	}
      else if (strcmp (entry, "max-threads") == 0)
	{
	  max_nthreads = MAX (atol (arg1), lastdb);
	}
      else if (strcmp (entry, "server-user") == 0)
	{
	  if (!arg1)
	    error (0, 0, _("Must specify user name for server-user option"));
	  else
	    {
	      free ((char *) server_user);
	      server_user = xstrdup (arg1);
	    }
	}
      else if (strcmp (entry, "stat-user") == 0)
	{
	  if (arg1 == NULL)
	    error (0, 0, _("Must specify user name for stat-user option"));
	  else
	    {
	      free ((char *) stat_user);
	      stat_user = xstrdup (arg1);

	      struct passwd *pw = getpwnam (stat_user);
	      if (pw != NULL)
		stat_uid = pw->pw_uid;
	    }
	}
      else if (strcmp (entry, "persistent") == 0)
	{
	  int idx = find_db (arg1);
	  if (idx >= 0)
	    {
	      if (strcmp (arg2, "no") == 0)
		dbs[idx].persistent = 0;
	      else if (strcmp (arg2, "yes") == 0)
		dbs[idx].persistent = 1;
	    }
	}
      else if (strcmp (entry, "shared") == 0)
	{
	  int idx = find_db (arg1);
	  if (idx >= 0)
	    {
	      if (strcmp (arg2, "no") == 0)
		dbs[idx].shared = 0;
	      else if (strcmp (arg2, "yes") == 0)
		dbs[idx].shared = 1;
	    }
	}
      else if (strcmp (entry, "reload-count") == 0)
	{
	  if (strcasecmp (arg1, "unlimited") == 0)
	    reload_count = UINT_MAX;
	  else
	    {
	      unsigned long int count = strtoul (arg1, NULL, 0);
	      if (count > UINT8_MAX - 1)
		reload_count = UINT_MAX;
	      else
		reload_count = count;
	    }
	}
      else if (strcmp (entry, "paranoia") == 0)
	{
	  if (strcmp (arg1, "no") == 0)
	    paranoia = 0;
	  else if (strcmp (arg1, "yes") == 0)
	    paranoia = 1;
	}
      else if (strcmp (entry, "restart-interval") == 0)
	{
	  if (arg1 != NULL)
	    restart_interval = atol (arg1);
	  else
	    error (0, 0, _("Must specify value for restart-interval option"));
	}
      else if (strcmp (entry, "auto-propagate") == 0)
	{
	  int idx = find_db (arg1);
	  if (idx >= 0)
	    {
	      if (strcmp (arg2, "no") == 0)
		dbs[idx].propagate = 0;
	      else if (strcmp (arg2, "yes") == 0)
		dbs[idx].propagate = 1;
	    }
	}
      else
	error (0, 0, _("Unknown option: %s %s %s"), entry, arg1, arg2);
    }
  while (!feof_unlocked (fp));

  if (paranoia)
    {
      restart_time = time (NULL) + restart_interval;

      /* Save the old current workding directory if we are in paranoia
	 mode.  We have to change back to it.  */
      oldcwd = get_current_dir_name ();
      if (oldcwd == NULL)
	{
	  error (0, 0, _("\
cannot get current working directory: %s; disabling paranoia mode"),
		   strerror (errno));
	  paranoia = 0;
	}
    }

  /* Enforce sanity.  */
  if (max_nthreads < nthreads)
    max_nthreads = nthreads;

  for (cnt = 0; cnt < lastdb; ++cnt)
    {
      size_t datasize = (sizeof (struct database_pers_head)
			 + roundup (dbs[cnt].suggested_module
				    * sizeof (ref_t), ALIGN)
			 + (dbs[cnt].suggested_module
			    * DEFAULT_DATASIZE_PER_BUCKET));
      if (datasize > dbs[cnt].max_db_size)
	{
	  error (0, 0, _("maximum file size for %s database too small"),
		   dbnames[cnt]);
	  dbs[cnt].max_db_size = datasize;
	}

    }

  /* Free the buffer.  */
  free (line);
  /* Close configuration file.  */
  fclose (fp);

  return error_message_count != initial_error_message_count;
}
Commit	Line	Data
6d7e8eda	1	/* Copyright (c) 1998-2023 Free Software Foundation, Inc.
d67281a7	2	This file is part of the GNU C Library.
d67281a7	3
43bc8ac6	4	This program is free software; you can redistribute it and/or modify
2e2efe65 RM	5	it under the terms of the GNU General Public License as published
	6	by the Free Software Foundation; version 2 of the License, or
	7	(at your option) any later version.
d67281a7	8
43bc8ac6	9	This program is distributed in the hope that it will be useful,
d67281a7	10	but WITHOUT ANY WARRANTY; without even the implied warranty of
43bc8ac6 UD	11	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
43bc8ac6 UD	12	GNU General Public License for more details.
d67281a7	13
43bc8ac6	14	You should have received a copy of the GNU General Public License
5a82c748	15	along with this program; if not, see <https://www.gnu.org/licenses/>. */
d67281a7 UD	16
d67281a7 UD	17	#include <ctype.h>
4401d759	18	#include <errno.h>
4fb5ab74	19	#include <error.h>
4401d759	20	#include <libintl.h>
d67281a7	21	#include <malloc.h>
a12ce44f	22	#include <pwd.h>
d67281a7	23	#include <stdio.h>
ec1c8075	24	#include <stdio_ext.h>
d67281a7 UD	25	#include <stdlib.h>
d67281a7 UD	26	#include <string.h>
4401d759	27	#include <unistd.h>
67479a70	28	#include <sys/param.h>
d67281a7 UD	29	#include <sys/types.h>
	30
	31	#include "dbg_log.h"
	32	#include "nscd.h"
	33
a12ce44f	34
67479a70	35	/* Names of the databases. */
b21fa963	36	const char *const dbnames[lastdb] =
67479a70 UD	37	{
	38	[pwddb] = "passwd",
	39	[grpdb] = "group",
b21fa963	40	[hstdb] = "hosts",
684ae515 UD	41	[servdb] = "services",
684ae515 UD	42	[netgrdb] = "netgroup"
67479a70 UD	43	};
67479a70 UD	44
4fb5ab74 UD	45
	46	static int
	47	find_db (const char *name)
	48	{
	49	for (int cnt = 0; cnt < lastdb; ++cnt)
	50	if (strcmp (name, dbnames[cnt]) == 0)
	51	return cnt;
	52
b21fa963	53	error (0, 0, _("database %s is not supported"), name);
4fb5ab74 UD	54	return -1;
	55	}
	56
d67281a7	57	int
a95a08b4	58	nscd_parse_file (const char *fname, struct database_dyn dbs[lastdb])
d67281a7 UD	59	{
	60	FILE *fp;
	61	char line, cp, entry, arg1, *arg2;
	62	size_t len;
67479a70	63	int cnt;
4fb5ab74	64	const unsigned int initial_error_message_count = error_message_count;
d67281a7 UD	65
	66	/* Open the configuration file. */
	67	fp = fopen (fname, "r");
	68	if (fp == NULL)
	69	return -1;
	70
f4047366 UD	71	/* The stream is not used by more than one thread. */
	72	(void) __fsetlocking (fp, FSETLOCKING_BYCALLER);
	73
d67281a7 UD	74	line = NULL;
	75	len = 0;
	76
	77	do
	78	{
	79	ssize_t n = getline (&line, &len, fp);
	80	if (n < 0)
	81	break;
	82	if (line[n - 1] == '\n')
	83	line[n - 1] = '\0';
	84
	85	/* Because the file format does not know any form of quoting we
	86	can search forward for the next '#' character and if found
	87	make it terminating the line. */
c4563d2d	88	*strchrnul (line, '#') = '\0';
d67281a7 UD	89
	90	/* If the line is blank it is ignored. */
	91	if (line[0] == '\0')
	92	continue;
	93
	94	entry = line;
	95	while (isspace (entry) && entry != '\0')
	96	++entry;
	97	cp = entry;
	98	while (!isspace (cp) && cp != '\0')
	99	++cp;
	100	arg1 = cp;
	101	++arg1;
	102	*cp = '\0';
6796bc80	103	if (strlen (entry) == 0)
4fb5ab74	104	error (0, 0, _("Parse error: %s"), line);
d67281a7 UD	105	while (isspace (arg1) && arg1 != '\0')
	106	++arg1;
	107	cp = arg1;
	108	while (!isspace (cp) && cp != '\0')
	109	++cp;
	110	arg2 = cp;
	111	++arg2;
	112	*cp = '\0';
	113	if (strlen (arg2) > 0)
	114	{
	115	while (isspace (arg2) && arg2 != '\0')
	116	++arg2;
	117	cp = arg2;
	118	while (!isspace (cp) && cp != '\0')
	119	++cp;
	120	*cp = '\0';
	121	}
	122
	123	if (strcmp (entry, "positive-time-to-live") == 0)
	124	{
4fb5ab74 UD	125	int idx = find_db (arg1);
	126	if (idx >= 0)
	127	dbs[idx].postimeout = atol (arg2);
d67281a7 UD	128	}
	129	else if (strcmp (entry, "negative-time-to-live") == 0)
	130	{
4fb5ab74 UD	131	int idx = find_db (arg1);
	132	if (idx >= 0)
	133	dbs[idx].negtimeout = atol (arg2);
d67281a7 UD	134	}
	135	else if (strcmp (entry, "suggested-size") == 0)
	136	{
4fb5ab74 UD	137	int idx = find_db (arg1);
4fb5ab74 UD	138	if (idx >= 0)
27c377dd UD	139	dbs[idx].suggested_module
27c377dd UD	140	= atol (arg2) ?: DEFAULT_SUGGESTED_MODULE;
67479a70 UD	141	}
	142	else if (strcmp (entry, "enable-cache") == 0)
	143	{
4fb5ab74 UD	144	int idx = find_db (arg1);
	145	if (idx >= 0)
	146	{
	147	if (strcmp (arg2, "no") == 0)
	148	dbs[idx].enabled = 0;
	149	else if (strcmp (arg2, "yes") == 0)
	150	dbs[idx].enabled = 1;
	151	}
d67281a7	152	}
67479a70	153	else if (strcmp (entry, "check-files") == 0)
d67281a7	154	{
4fb5ab74 UD	155	int idx = find_db (arg1);
	156	if (idx >= 0)
	157	{
	158	if (strcmp (arg2, "no") == 0)
	159	dbs[idx].check_file = 0;
	160	else if (strcmp (arg2, "yes") == 0)
	161	dbs[idx].check_file = 1;
	162	}
d67281a7	163	}
2c210d1e UD	164	else if (strcmp (entry, "max-db-size") == 0)
2c210d1e UD	165	{
4fb5ab74 UD	166	int idx = find_db (arg1);
4fb5ab74 UD	167	if (idx >= 0)
27c377dd	168	dbs[idx].max_db_size = atol (arg2) ?: DEFAULT_MAX_DB_SIZE;
2c210d1e	169	}
d67281a7	170	else if (strcmp (entry, "logfile") == 0)
f4047366	171	set_logfile (arg1);
d67281a7 UD	172	else if (strcmp (entry, "debug-level") == 0)
	173	{
	174	int level = atoi (arg1);
	175	if (level > 0)
67479a70 UD	176	debug_level = level;
	177	}
	178	else if (strcmp (entry, "threads") == 0)
	179	{
	180	if (nthreads == -1)
	181	nthreads = MAX (atol (arg1), lastdb);
d67281a7	182	}
27e82856 UD	183	else if (strcmp (entry, "max-threads") == 0)
	184	{
	185	max_nthreads = MAX (atol (arg1), lastdb);
	186	}
adcf0e4a	187	else if (strcmp (entry, "server-user") == 0)
b902330c MP	188	{
	189	if (!arg1)
	190	error (0, 0, _("Must specify user name for server-user option"));
	191	else
2d7acfac FW	192	{
	193	free ((char *) server_user);
	194	server_user = xstrdup (arg1);
	195	}
b902330c	196	}
a12ce44f	197	else if (strcmp (entry, "stat-user") == 0)
b902330c MP	198	{
	199	if (arg1 == NULL)
	200	error (0, 0, _("Must specify user name for stat-user option"));
	201	else
a12ce44f	202	{
2d7acfac	203	free ((char *) stat_user);
a12ce44f UD	204	stat_user = xstrdup (arg1);
	205
	206	struct passwd *pw = getpwnam (stat_user);
	207	if (pw != NULL)
	208	stat_uid = pw->pw_uid;
	209	}
b902330c	210	}
a95a08b4 UD	211	else if (strcmp (entry, "persistent") == 0)
a95a08b4 UD	212	{
4fb5ab74 UD	213	int idx = find_db (arg1);
	214	if (idx >= 0)
	215	{
	216	if (strcmp (arg2, "no") == 0)
	217	dbs[idx].persistent = 0;
	218	else if (strcmp (arg2, "yes") == 0)
	219	dbs[idx].persistent = 1;
	220	}
a95a08b4	221	}
c207f23b UD	222	else if (strcmp (entry, "shared") == 0)
c207f23b UD	223	{
4fb5ab74 UD	224	int idx = find_db (arg1);
	225	if (idx >= 0)
	226	{
	227	if (strcmp (arg2, "no") == 0)
	228	dbs[idx].shared = 0;
	229	else if (strcmp (arg2, "yes") == 0)
	230	dbs[idx].shared = 1;
	231	}
c207f23b	232	}
a95a08b4 UD	233	else if (strcmp (entry, "reload-count") == 0)
	234	{
	235	if (strcasecmp (arg1, "unlimited") == 0)
	236	reload_count = UINT_MAX;
	237	else
	238	{
b902330c	239	unsigned long int count = strtoul (arg1, NULL, 0);
a95a08b4 UD	240	if (count > UINT8_MAX - 1)
a95a08b4 UD	241	reload_count = UINT_MAX;
a95a08b4	242	else
b902330c	243	reload_count = count;
a95a08b4 UD	244	}
a95a08b4 UD	245	}
4401d759 UD	246	else if (strcmp (entry, "paranoia") == 0)
	247	{
	248	if (strcmp (arg1, "no") == 0)
	249	paranoia = 0;
	250	else if (strcmp (arg1, "yes") == 0)
	251	paranoia = 1;
	252	}
	253	else if (strcmp (entry, "restart-interval") == 0)
	254	{
	255	if (arg1 != NULL)
	256	restart_interval = atol (arg1);
	257	else
b902330c	258	error (0, 0, _("Must specify value for restart-interval option"));
4401d759	259	}
797ed6f7 UD	260	else if (strcmp (entry, "auto-propagate") == 0)
	261	{
	262	int idx = find_db (arg1);
	263	if (idx >= 0)
	264	{
	265	if (strcmp (arg2, "no") == 0)
	266	dbs[idx].propagate = 0;
	267	else if (strcmp (arg2, "yes") == 0)
	268	dbs[idx].propagate = 1;
	269	}
	270	}
d67281a7	271	else
4fb5ab74	272	error (0, 0, _("Unknown option: %s %s %s"), entry, arg1, arg2);
d67281a7	273	}
f4047366	274	while (!feof_unlocked (fp));
d67281a7	275
4401d759 UD	276	if (paranoia)
	277	{
	278	restart_time = time (NULL) + restart_interval;
	279
	280	/* Save the old current workding directory if we are in paranoia
	281	mode. We have to change back to it. */
	282	oldcwd = get_current_dir_name ();
	283	if (oldcwd == NULL)
	284	{
4fb5ab74	285	error (0, 0, _("\
4401d759 UD	286	cannot get current working directory: %s; disabling paranoia mode"),
	287	strerror (errno));
	288	paranoia = 0;
	289	}
	290	}
	291
27e82856 UD	292	/* Enforce sanity. */
	293	if (max_nthreads < nthreads)
	294	max_nthreads = nthreads;
	295
2c210d1e UD	296	for (cnt = 0; cnt < lastdb; ++cnt)
	297	{
	298	size_t datasize = (sizeof (struct database_pers_head)
	299	+ roundup (dbs[cnt].suggested_module
	300	* sizeof (ref_t), ALIGN)
	301	+ (dbs[cnt].suggested_module
	302	* DEFAULT_DATASIZE_PER_BUCKET));
	303	if (datasize > dbs[cnt].max_db_size)
	304	{
4fb5ab74	305	error (0, 0, _("maximum file size for %s database too small"),
2c210d1e UD	306	dbnames[cnt]);
	307	dbs[cnt].max_db_size = datasize;
	308	}
	309
	310	}
	311
d67281a7 UD	312	/* Free the buffer. */
	313	free (line);
	314	/* Close configuration file. */
	315	fclose (fp);
	316
4fb5ab74	317	return error_message_count != initial_error_message_count;
d67281a7	318	}