]> git.ipfire.org Git - thirdparty/glibc.git/blobdiff - nss/nss_files/files-parse.c
Prefer https to http for gnu.org and fsf.org URLs
[thirdparty/glibc.git] / nss / nss_files / files-parse.c
index ece253d01740c84eaf3c7e7a947dd313ce5c47f3..fa249d7544add0a08f04b3e9ef6ddca883c9fd80 100644 (file)
@@ -1,26 +1,26 @@
 /* Common code for file-based database parsers in nss_files module.
-Copyright (C) 1996 Free Software Foundation, Inc.
-This file is part of the GNU C Library.
+   Copyright (C) 1996-2019 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
 
-The GNU C Library is free software; you can redistribute it and/or
-modify it under the terms of the GNU Library General Public License as
-published by the Free Software Foundation; either version 2 of the
-License, or (at your option) any later version.
+   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
-Library General Public License for more details.
+   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 Library General Public
-License along with the GNU C Library; see the file COPYING.LIB.  If
-not, write to the Free Software Foundation, Inc., 675 Mass Ave,
-Cambridge, MA 02139, USA.  */
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, see
+   <https://www.gnu.org/licenses/>.  */
 
 #include <ctype.h>
 #include <errno.h>
 #include <string.h>
 #include <stdlib.h>
+#include <stdint.h>
 
 /* These symbols are defined by the including source file:
 
@@ -29,17 +29,27 @@ Cambridge, MA 02139, USA.  */
    DATABASE -- string of the database file's name ("hosts", "passwd").
 
    ENTDATA -- if defined, `struct ENTDATA' is used by the parser to store
-              things pointed to by the resultant `struct STRUCTURE'.
+             things pointed to by the resultant `struct STRUCTURE'.
 
    NEED_H_ERRNO - defined iff an arg `int *herrnop' is used.
 
+   EXTRA_ARGS -- defined iff extra parameters must be passed to the parser
+   EXTRA_ARGS_DECL -- declaration for these extra parameters
+   EXTRA_ARGS_VALUE -- values to be passed for these parameters
+
    Also see files-XXX.c.  */
 
+#ifndef EXTRA_ARGS
+# define EXTRA_ARGS
+# define EXTRA_ARGS_DECL
+# define EXTRA_ARGS_VALUE
+#endif
+
 #define CONCAT(a,b) CONCAT1(a,b)
 #define CONCAT1(a,b) a##b
 
 #ifndef STRUCTURE
-#define STRUCTURE ENTNAME
+# define STRUCTURE ENTNAME
 #endif
 
 
@@ -47,9 +57,9 @@ struct parser_data
   {
 #ifdef ENTDATA
     struct ENTDATA entdata;
-#define ENTDATA_DECL(data) struct ENTDATA *const entdata = &data->entdata;
+# define ENTDATA_DECL(data) struct ENTDATA *const entdata = &data->entdata;
 #else
-#define ENTDATA_DECL(data)
+# define ENTDATA_DECL(data)
 #endif
     char linebuffer[0];
   };
@@ -57,11 +67,19 @@ struct parser_data
 #ifdef ENTDATA
 /* The function can't be exported, because the entdata structure
    is defined only in files-foo.c.  */
-#define parser_stclass static inline
+# define parser_stclass static
+# define nss_files_parse_hidden_def(name)
 #else
 /* Export the line parser function so it can be used in nss_db.  */
-#define parser_stclass /* Global */
-#define parse_line CONCAT(_nss_files_parse_,ENTNAME)
+# define parser_stclass /* Global */
+# define parse_line CONCAT(_nss_files_parse_,ENTNAME)
+# if IS_IN (libc)
+/* We are defining one of the functions that actually lives in libc
+   because it is used to implement fget*ent and suchlike.  */
+#  define nss_files_parse_hidden_def(name) libc_hidden_def (name)
+# else
+#  define nss_files_parse_hidden_def(name) libnss_files_hidden_def (name)
+# endif
 #endif
 
 
@@ -69,30 +87,34 @@ struct parser_data
 
 /* The parser is defined in a different module.  */
 extern int parse_line (char *line, struct STRUCTURE *result,
-                      struct parser_data *data, int datalen);
+                      struct parser_data *data, size_t datalen, int *errnop
+                      EXTRA_ARGS_DECL);
 
-#define LINE_PARSER(EOLSET, BODY) /* Do nothing */
+# define LINE_PARSER(EOLSET, BODY) /* Do nothing */
 
 #else
 
 /* Define a line parsing function.  */
 
-#define LINE_PARSER(EOLSET, BODY)                                            \
+# define LINE_PARSER(EOLSET, BODY)                                           \
 parser_stclass int                                                           \
 parse_line (char *line, struct STRUCTURE *result,                            \
-           struct parser_data *data, int datalen)                            \
+           struct parser_data *data, size_t datalen, int *errnop             \
+           EXTRA_ARGS_DECL)                                                  \
 {                                                                            \
   ENTDATA_DECL (data)                                                        \
+  BUFFER_PREPARE                                                             \
   char *p = strpbrk (line, EOLSET "\n");                                     \
-  if (p)                                                                     \
+  if (p != NULL)                                                             \
     *p = '\0';                                                               \
   BODY;                                                                              \
   TRAILING_LIST_PARSER;                                                              \
   return 1;                                                                  \
-}
+}                                                                            \
+nss_files_parse_hidden_def (parse_line)
 
 
-#define STRING_FIELD(variable, terminator_p, swallow)                        \
+# define STRING_FIELD(variable, terminator_p, swallow)                       \
   {                                                                          \
     variable = line;                                                         \
     while (*line != '\0' && !terminator_p (*line))                           \
@@ -106,10 +128,39 @@ parse_line (char *line, struct STRUCTURE *result,                       \
       }                                                                              \
   }
 
-#define INT_FIELD(variable, terminator_p, swallow, base, convert)            \
+# define STRING_LIST(variable, terminator_c) \
+  {                                                                          \
+    char **list = parse_list (&line, buf_start, buf_end, terminator_c,       \
+                             errnop);                                        \
+    if (list)                                                                \
+      variable = list;                                                       \
+    else                                                                     \
+      return -1;               /* -1 indicates we ran out of space.  */      \
+                                                                             \
+    /* Determine the new end of the buffer.  */                                      \
+    while (*list != NULL)                                                    \
+      ++list;                                                                \
+    buf_start = (char *) (list + 1);                                         \
+  }
+
+/* Helper function.  */
+static inline uint32_t
+__attribute__ ((always_inline))
+strtou32 (const char *nptr, char **endptr, int base)
+{
+  unsigned long int val = strtoul (nptr, endptr, base);
+
+  /* Match the 32-bit behavior on 64-bit platforms.  */
+  if (sizeof (long int) > 4 && val > 0xffffffff)
+    val = 0xffffffff;
+
+  return val;
+}
+
+# define INT_FIELD(variable, terminator_p, swallow, base, convert)           \
   {                                                                          \
     char *endp;                                                                      \
-    variable = convert (strtol (line, &endp, base));                         \
+    variable = convert (strtou32 (line, &endp, base));                       \
     if (endp == line)                                                        \
       return 0;                                                                      \
     else if (terminator_p (*endp))                                           \
@@ -121,13 +172,13 @@ parse_line (char *line, struct STRUCTURE *result,                       \
     line = endp;                                                             \
   }
 
-#define INT_FIELD_MAYBE_NULL(variable, terminator_p, swallow, base, convert, default)        \
+# define INT_FIELD_MAYBE_NULL(variable, terminator_p, swallow, base, convert, default)       \
   {                                                                          \
     char *endp;                                                                      \
     if (*line == '\0')                                                       \
       /* We expect some more input, so don't allow the string to end here. */ \
       return 0;                                                                      \
-    variable = convert (strtol (line, &endp, base));                         \
+    variable = convert (strtou32 (line, &endp, base));                       \
     if (endp == line)                                                        \
       variable = default;                                                    \
     if (terminator_p (*endp))                                                \
@@ -139,36 +190,57 @@ parse_line (char *line, struct STRUCTURE *result,                       \
     line = endp;                                                             \
   }
 
-#define ISCOLON(c) ((c) == ':')
+# define ISCOLON(c) ((c) == ':')
 
 
-#ifndef TRAILING_LIST_MEMBER
-#define TRAILING_LIST_PARSER /* Nothing to do.  */
-#else
+# ifndef TRAILING_LIST_MEMBER
+#  define BUFFER_PREPARE /* Nothing to do.  */
+#  define TRAILING_LIST_PARSER /* Nothing to do.  */
+# else
 
-#define TRAILING_LIST_PARSER                                                 \
+# define BUFFER_PREPARE \
+  char *buf_start = NULL;                                                    \
+  char *buf_end = (char *) data + datalen;                                   \
+  if (line >= data->linebuffer && line < buf_end)                            \
+    /* Find the end of the line buffer, we will use the space in             \
+       DATA after it for storing the vector of pointers.  */                 \
+    buf_start = strchr (line, '\0') + 1;                                     \
+  else                                                                       \
+    /* LINE does not point within DATA->linebuffer, so that space is         \
+       not being used for scratch space right now.  We can use all of        \
+       it for the pointer vector storage.  */                                \
+    buf_start = data->linebuffer;                                            \
+
+#  define TRAILING_LIST_PARSER \
 {                                                                            \
-  char **list = parse_list (line, data, datalen);                            \
+  if (buf_start == NULL)                                                     \
+    {                                                                        \
+      if (line >= data->linebuffer && line < buf_end)                        \
+       /* Find the end of the line buffer, we will use the space in          \
+          DATA after it for storing the vector of pointers.  */              \
+       buf_start = strchr (line, '\0') + 1;                                  \
+      else                                                                   \
+       /* LINE does not point within DATA->linebuffer, so that space is      \
+          not being used for scratch space right now.  We can use all of     \
+          it for the pointer vector storage.  */                             \
+       buf_start = data->linebuffer;                                         \
+    }                                                                        \
+                                                                             \
+  char **list = parse_list (&line, buf_start, buf_end, '\0', errnop);        \
   if (list)                                                                  \
     result->TRAILING_LIST_MEMBER = list;                                     \
-  else                                                                               \
-    return 0;                                                                \
+  else                                                                       \
+    return -1;         /* -1 indicates we ran out of space.  */              \
 }
 
 static inline char **
-parse_list (char *line, struct parser_data *data, int datalen)
+__attribute ((always_inline))
+parse_list (char **linep, char *eol, char *buf_end, int terminator_c,
+           int *errnop)
 {
-  char *eol, **list, **p;
-
-  if (line >= data->linebuffer && line < (char *) data + datalen)
-    /* Find the end of the line buffer, we will use the space in DATA after
-       it for storing the vector of pointers.  */
-    eol = strchr (line, '\0') + 1;
-  else
-    /* LINE does not point within DATA->linebuffer, so that space is
-       not being used for scratch space right now.  We can use all of
-       it for the pointer vector storage.  */
-    eol = data->linebuffer;
+  char *line = *linep;
+  char **list, **p;
+
   /* Adjust the pointer so it is aligned for storing pointers.  */
   eol += __alignof__ (char *) - 1;
   eol -= (eol - (char *) 0) % __alignof__ (char *);
@@ -178,47 +250,57 @@ parse_list (char *line, struct parser_data *data, int datalen)
   p = list;
   while (1)
     {
-      char *elt;
-
-      if ((char *) &p[1] - (char *) data > datalen)
+      if ((char *) (p + 2) > buf_end)
        {
          /* We cannot fit another pointer in the buffer.  */
-         errno = ERANGE;
+         *errnop = ERANGE;
          return NULL;
        }
+
       if (*line == '\0')
        break;
+      if (*line == terminator_c)
+       {
+         ++line;
+         break;
+       }
 
-      elt = line;
+      /* Skip leading white space.  This might not be portable but useful.  */
+      while (isspace (*line))
+       ++line;
+
+      char *elt = line;
       while (1)
        {
-         if (TRAILING_LIST_SEPARATOR_P (*line))
-           {
-             *p++ = elt;
-             *line = '\0';
-             do
-               ++line;
-             while (TRAILING_LIST_SEPARATOR_P (*line));
-             elt = line;
-           }
-         else if (*line == '\0' || *line == '\n')
+         if (*line == '\0' || *line == terminator_c
+             || TRAILING_LIST_SEPARATOR_P (*line))
            {
-             /* End of the line.  */
+             /* End of the next entry.  */
              if (line > elt)
-               /* Last element.  */
+               /* We really found some data.  */
                *p++ = elt;
-             *line = '\0';
+
+             /* Terminate string if necessary.  */
+             if (*line != '\0')
+               {
+                 char endc = *line;
+                 *line++ = '\0';
+                 if (endc == terminator_c)
+                   goto out;
+               }
              break;
            }
-         else
-           ++line;
+         ++line;
        }
     }
+ out:
   *p = NULL;
+  *linep = line;
 
   return list;
 }
 
+# endif        /* TRAILING_LIST_MEMBER */
 #endif /* EXTERN_PARSER */
 
 
@@ -234,9 +316,20 @@ parse_list (char *line, struct parser_data *data, int datalen)
     break;                                                                   \
 }
 
-#endif
+#define LOOKUP_NAME_CASE(nameelt, aliaselt)                                  \
+{                                                                            \
+  char **ap;                                                                 \
+  if (! __strcasecmp (name, result->nameelt))                                \
+    break;                                                                   \
+  for (ap = result->aliaselt; *ap; ++ap)                                     \
+    if (! __strcasecmp (name, *ap))                                          \
+      break;                                                                 \
+  if (*ap)                                                                   \
+    break;                                                                   \
+}
+
 
 /* This is defined by db-*.c to include "../nss_db/db-XXX.c" instead.  */
 #ifndef GENERIC
-#define GENERIC "files-XXX.c"
+# define GENERIC "files-XXX.c"
 #endif