AuGetAddr.c revision 313a12fd 
1/*
2
3Copyright 1988, 1998  The Open Group
4
5Permission to use, copy, modify, distribute, and sell this software and its
6documentation for any purpose is hereby granted without fee, provided that
7the above copyright notice appear in all copies and that both that
8copyright notice and this permission notice appear in supporting
9documentation.
10
11The above copyright notice and this permission notice shall be included in
12all copies or substantial portions of the Software.
13
14THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
15IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
16FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
17OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
18AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
19CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
20
21Except as contained in this notice, the name of The Open Group shall not be
22used in advertising or otherwise to promote the sale, use or other dealings
23in this Software without prior written authorization from The Open Group.
24
25*/
26
27#ifdef HAVE_CONFIG_H
28#include <config.h>
29#endif
30#include <X11/Xauth.h>
31#include <X11/Xos.h>
32
33#define binaryEqual(a, b, len) (memcmp(a, b, len) == 0)
34
35Xauth *
36XauGetAuthByAddr (
37#if NeedWidePrototypes
38unsigned int	family,
39unsigned int	address_length,
40#else
41unsigned short	family,
42unsigned short	address_length,
43#endif
44_Xconst char*	address,
45#if NeedWidePrototypes
46unsigned int	number_length,
47#else
48unsigned short	number_length,
49#endif
50_Xconst char*	number,
51#if NeedWidePrototypes
52unsigned int	name_length,
53#else
54unsigned short	name_length,
55#endif
56_Xconst char*	name)
57{
58    FILE    *auth_file;
59    char    *auth_name;
60    Xauth   *entry;
61
62    auth_name = XauFileName ();
63    if (!auth_name)
64	return NULL;
65    if (access (auth_name, R_OK) != 0)		/* checks REAL id */
66	return NULL;
67    auth_file = fopen (auth_name, "rb");
68    if (!auth_file)
69	return NULL;
70    for (;;) {
71	entry = XauReadAuth (auth_file);
72	if (!entry)
73	    break;
74	/*
75	 * Match when:
76	 *   either family or entry->family are FamilyWild or
77	 *    family and entry->family are the same and
78	 *     address and entry->address are the same
79	 *  and
80	 *   either number or entry->number are empty or
81	 *    number and entry->number are the same
82	 *  and
83	 *   either name or entry->name are empty or
84	 *    name and entry->name are the same
85	 */
86
87	if ((family == FamilyWild || entry->family == FamilyWild ||
88	     (entry->family == family &&
89	      address_length == entry->address_length &&
90	      binaryEqual (entry->address, address, address_length))) &&
91	    (number_length == 0 || entry->number_length == 0 ||
92	     (number_length == entry->number_length &&
93	      binaryEqual (entry->number, number, number_length))) &&
94	    (name_length == 0 || entry->name_length == 0 ||
95	     (entry->name_length == name_length &&
96	      binaryEqual (entry->name, name, name_length))))
97	    break;
98	XauDisposeAuth (entry);
99    }
100    (void) fclose (auth_file);
101    return entry;
102}
103