(_nss_hesiod_getservbyport_r): New function. Provide support for
[kopensolaris-gnu/glibc.git] / hesiod / nss_hesiod / hesiod-service.c
1 /* Copyright (C) 1997, 2000 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Mark Kettenis <kettenis@phys.uva.nl>, 1997.
4
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Library General Public License as
7    published by the Free Software Foundation; either version 2 of the
8    License, or (at your option) any later version.
9
10    The GNU C Library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Library General Public License for more details.
14
15    You should have received a copy of the GNU Library General Public
16    License along with the GNU C Library; see the file COPYING.LIB.  If not,
17    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18    Boston, MA 02111-1307, USA.  */
19
20 #include <errno.h>
21 #include <hesiod.h>
22 #include <netdb.h>
23 #include <netinet/in.h>
24 #include <nss.h>
25 #include <stdio.h>
26 #include <stdlib.h>
27 #include <string.h>
28
29 #include "nss_hesiod.h"
30
31 /* Hesiod uses a format for service entries that differs from the
32    traditional format.  We therefore declare our own parser.  */
33
34 #define ENTNAME servent
35
36 struct servent_data {};
37
38 #define TRAILING_LIST_MEMBER            s_aliases
39 #define TRAILING_LIST_SEPARATOR_P       isspace
40 #include <nss/nss_files/files-parse.c>
41 #define ISSC_OR_SPACE(c)        ((c) ==  ';' || isspace (c))
42 LINE_PARSER
43 ("#",
44  STRING_FIELD (result->s_name, ISSC_OR_SPACE, 1);
45  STRING_FIELD (result->s_proto, ISSC_OR_SPACE, 1);
46  INT_FIELD (result->s_port, ISSC_OR_SPACE, 10, 0, htons);
47  )
48
49 enum nss_status
50 _nss_hesiod_setservent (void)
51 {
52   return NSS_STATUS_SUCCESS;
53 }
54
55 enum nss_status
56 _nss_hesiod_endservent (void)
57 {
58   return NSS_STATUS_SUCCESS;
59 }
60
61 static enum nss_status
62 lookup (const char *name, const char *type, const char *protocol,
63         struct servent *serv, char *buffer, size_t buflen, int *errnop)
64 {
65   struct parser_data *data = (void *) buffer;
66   size_t linebuflen;
67   void *context;
68   char **list, **item;
69   int parse_res;
70   int found;
71
72   context = _nss_hesiod_init ();
73   if (context == NULL)
74     return NSS_STATUS_UNAVAIL;
75
76   list = hesiod_resolve (context, name, type);
77   if (list == NULL)
78     {
79       hesiod_end (context);
80       return errno == ENOENT ? NSS_STATUS_NOTFOUND : NSS_STATUS_UNAVAIL;
81     }
82
83   linebuflen = buffer + buflen - data->linebuffer;
84
85   item = list;
86   found = 0;
87   do
88     {
89       size_t len = strlen (*item) + 1;
90
91       if (linebuflen < len)
92         {
93           hesiod_free_list (context, list);
94           hesiod_end (context);
95           *errnop = ERANGE;
96           return NSS_STATUS_TRYAGAIN;
97         }
98
99       memcpy (data->linebuffer, *item, len);
100
101       parse_res = parse_line (buffer, serv, data, buflen, errnop);
102       if (parse_res == -1)
103         {
104           hesiod_free_list (context, list);
105           hesiod_end (context);
106           return NSS_STATUS_TRYAGAIN;
107         }
108
109       if (parse_res > 0)
110         found = protocol == NULL || strcasecmp (serv->s_proto, protocol) == 0;
111
112       ++item;
113     }
114   while (*item != NULL && !found);
115
116   hesiod_free_list (context, list);
117   hesiod_end (context);
118
119   return found ? NSS_STATUS_SUCCESS : NSS_STATUS_NOTFOUND;
120 }
121
122 enum nss_status
123 _nss_hesiod_getservbyname_r (const char *name, const char *protocol,
124                              struct servent *serv,
125                              char *buffer, size_t buflen, int *errnop)
126 {
127   return lookup (name, "service", protocol, serv, buffer, buflen, errnop);
128 }
129
130 enum nss_status
131 _nss_hesiod_getservbyport_r (const int port, const char *protocol,
132                              struct servent *serv,
133                              char *buffer, size_t buflen, int *errnop)
134 {
135   char portstr[6];          /* Port numbers are restricted to 16 bits. */
136
137   snprintf (portstr, sizeof portstr, "%d", ntohs (port));
138
139   return lookup (portstr, "port", protocol, serv, buffer, buflen, errnop);
140 }