(_nss_nis_getservbyname_r): If protocol
[kopensolaris-gnu/glibc.git] / nis / nis_ping.c
1 /* Copyright (c) 1997, 1998, 1999 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Thorsten Kukuk <kukuk@suse.de>, 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 Lesser General Public
7    License as published by the Free Software Foundation; either
8    version 2.1 of the 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    Lesser General Public License for more details.
14
15    You should have received a copy of the GNU Lesser General Public
16    License along with the GNU C Library; if not, write to the Free
17    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
18    02111-1307 USA.  */
19
20 #include <rpcsvc/nis.h>
21
22 #include "nis_xdr.h"
23 #include "nis_intern.h"
24
25 void
26 nis_ping (const_nis_name dirname, unsigned int utime,
27           const nis_object *dirobj)
28 {
29   nis_result *res = NULL;
30   nis_object *obj;
31   ping_args args;
32   unsigned int i;
33
34   if (dirname == NULL && dirobj == NULL)
35     abort ();
36
37   if (dirobj == NULL)
38     {
39       res = nis_lookup (dirname, MASTER_ONLY);
40       if (res == NULL || NIS_RES_STATUS (res) != NIS_SUCCESS)
41         {
42           if (res)
43             nis_freeresult (res);
44           return;
45         }
46       obj = res->objects.objects_val;
47     }
48   else
49     obj = (nis_object *) dirobj;
50
51   /* Check if obj is really a diryectory object */
52   if (__type_of (obj) != NIS_DIRECTORY_OBJ)
53     {
54       if (res != NULL)
55         nis_freeresult (res);
56       return;
57     }
58
59   if (dirname == NULL)
60     args.dir = obj->DI_data.do_name;
61   else
62     args.dir = (char *) dirname;
63   args.stamp = utime;
64
65   /* Send the ping only to replicas */
66   for (i = 1; i < obj->DI_data.do_servers.do_servers_len; ++i)
67     __do_niscall2 (&obj->DI_data.do_servers.do_servers_val[i], 1,
68                    NIS_PING, (xdrproc_t) _xdr_ping_args,
69                    (caddr_t) &args, (xdrproc_t) xdr_void,
70                    (caddr_t) NULL, 0, NULL);
71   if (res)
72     nis_freeresult (res);
73 }