(DO_CALL): Use lcall, binutils have been fixed meanwhile.
[glibc/history.git] / shadow / sgetspent_r.c
blob8aa5a9bdc1d0c8fa2df79d91d706d95c69e88959
1 /* Copyright (C) 1996, 1997 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
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.
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.
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. */
19 #include <ctype.h>
20 #include <shadow.h>
21 #include <stdio.h>
22 #include <string.h>
24 /* Define a line parsing function using the common code
25 used in the nss_files module. */
27 #define STRUCTURE spwd
28 #define ENTNAME spent
29 struct spent_data {};
31 /* Predicate which always returns false, needed below. */
32 #define FALSE(arg) 0
35 #include "../nss/nss_files/files-parse.c"
36 LINE_PARSER
38 STRING_FIELD (result->sp_namp, ISCOLON, 0);
39 if (line[0] == '\0'
40 && (result->sp_namp[0] == '+' || result->sp_namp[0] == '-'))
42 result->sp_pwdp = NULL;
43 result->sp_lstchg = 0;
44 result->sp_min = 0;
45 result->sp_max = 0;
46 result->sp_warn = -1l;
47 result->sp_inact = -1l;
48 result->sp_expire = -1l;
49 result->sp_flag = ~0ul;
51 else
53 STRING_FIELD (result->sp_pwdp, ISCOLON, 0);
54 INT_FIELD_MAYBE_NULL (result->sp_lstchg, ISCOLON, 0, 10, (long int),
55 (long int) -1);
56 INT_FIELD_MAYBE_NULL (result->sp_min, ISCOLON, 0, 10, (long int),
57 (long int) -1);
58 INT_FIELD_MAYBE_NULL (result->sp_max, ISCOLON, 0, 10, (long int),
59 (long int) -1);
60 while (isspace (*line))
61 ++line;
62 if (*line == '\0')
64 /* The old form. */
65 result->sp_warn = -1l;
66 result->sp_inact = -1l;
67 result->sp_expire = -1l;
68 result->sp_flag = ~0ul;
70 else
72 INT_FIELD_MAYBE_NULL (result->sp_warn, ISCOLON, 0, 10, (long int),
73 (long int) -1);
74 INT_FIELD_MAYBE_NULL (result->sp_inact, ISCOLON, 0, 10, (long int),
75 (long int) -1);
76 INT_FIELD_MAYBE_NULL (result->sp_expire, ISCOLON, 0, 10, (long int),
77 (long int) -1);
78 if (*line != '\0')
79 INT_FIELD_MAYBE_NULL (result->sp_flag, FALSE, 0, 10,
80 (unsigned long int), ~0ul)
81 else
82 result->sp_flag = ~0ul;
88 /* Read one shadow entry from the given stream. */
89 int
90 __sgetspent_r (const char *string, struct spwd *resbuf, char *buffer,
91 size_t buflen, struct spwd **result)
93 int parse_result = parse_line (strncpy (buffer, string, buflen),
94 resbuf, NULL, 0);
95 *result = parse_result > 0 ? resbuf : NULL;
97 return *result == NULL ? errno : 0;
99 weak_alias (__sgetspent_r, sgetspent_r)