(long_dbl): Add test for loooong numbers.
[kopensolaris-gnu/glibc.git] / shadow / sgetspent_r.c
1 /* Copyright (C) 1996, 1997, 1998 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3
4    The GNU C Library is free software; you can redistribute it and/or
5    modify it under the terms of the GNU Library General Public License as
6    published by the Free Software Foundation; either version 2 of the
7    License, or (at your option) any later version.
8
9    The GNU C Library is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12    Library General Public License for more details.
13
14    You should have received a copy of the GNU Library General Public
15    License along with the GNU C Library; see the file COPYING.LIB.  If not,
16    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17    Boston, MA 02111-1307, USA.  */
18
19 #include <ctype.h>
20 #include <errno.h>
21 #include <shadow.h>
22 #include <stdio.h>
23 #include <string.h>
24
25 /* Define a line parsing function using the common code
26    used in the nss_files module.  */
27
28 #define STRUCTURE       spwd
29 #define ENTNAME         spent
30 struct spent_data {};
31
32 /* Predicate which always returns false, needed below.  */
33 #define FALSE(arg) 0
34
35
36 #include <nss/nss_files/files-parse.c>
37 LINE_PARSER
38 (,
39  STRING_FIELD (result->sp_namp, ISCOLON, 0);
40  if (line[0] == '\0'
41      && (result->sp_namp[0] == '+' || result->sp_namp[0] == '-'))
42    {
43      result->sp_pwdp = NULL;
44      result->sp_lstchg = 0;
45      result->sp_min = 0;
46      result->sp_max = 0;
47      result->sp_warn = -1l;
48      result->sp_inact = -1l;
49      result->sp_expire = -1l;
50      result->sp_flag = ~0ul;
51    }
52  else
53    {
54      STRING_FIELD (result->sp_pwdp, ISCOLON, 0);
55      INT_FIELD_MAYBE_NULL (result->sp_lstchg, ISCOLON, 0, 10, (long int),
56                            (long int) -1);
57      INT_FIELD_MAYBE_NULL (result->sp_min, ISCOLON, 0, 10, (long int),
58                            (long int) -1);
59      INT_FIELD_MAYBE_NULL (result->sp_max, ISCOLON, 0, 10, (long int),
60                            (long int) -1);
61      while (isspace (*line))
62        ++line;
63      if (*line == '\0')
64        {
65          /* The old form.  */
66          result->sp_warn = -1l;
67          result->sp_inact = -1l;
68          result->sp_expire = -1l;
69          result->sp_flag = ~0ul;
70        }
71      else
72        {
73          INT_FIELD_MAYBE_NULL (result->sp_warn, ISCOLON, 0, 10, (long int),
74                                (long int) -1);
75          INT_FIELD_MAYBE_NULL (result->sp_inact, ISCOLON, 0, 10, (long int),
76                                (long int) -1);
77          INT_FIELD_MAYBE_NULL (result->sp_expire, ISCOLON, 0, 10, (long int),
78                                (long int) -1);
79          if (*line != '\0')
80            INT_FIELD_MAYBE_NULL (result->sp_flag, FALSE, 0, 10,
81                                  (unsigned long int), ~0ul)
82          else
83            result->sp_flag = ~0ul;
84        }
85    }
86  )
87
88
89 /* Read one shadow entry from the given stream.  */
90 int
91 __sgetspent_r (const char *string, struct spwd *resbuf, char *buffer,
92                size_t buflen, struct spwd **result)
93 {
94   int parse_result = parse_line (strncpy (buffer, string, buflen),
95                                  resbuf, NULL, 0, &errno);
96   *result = parse_result > 0 ? resbuf : NULL;
97
98   return *result == NULL ? errno : 0;
99 }
100 weak_alias (__sgetspent_r, sgetspent_r)