a3c55a94e8df7a336753a22dc88ca683807a41f1
[kopensolaris-gnu/glibc.git] / sysdeps / unix / sysv / linux / opensock.c
1 /* Copyright (C) 1999, 2001 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 Lesser General Public
6    License as published by the Free Software Foundation; either
7    version 2.1 of the 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    Lesser General Public License for more details.
13
14    You should have received a copy of the GNU Lesser General Public
15    License along with the GNU C Library; if not, write to the Free
16    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
17    02111-1307 USA.  */
18
19 #include <assert.h>
20 #include <errno.h>
21 #include <stdio.h>
22 #include <unistd.h>
23 #include <sys/socket.h>
24
25 /* Return a socket of any type.  The socket can be used in subsequent
26    ioctl calls to talk to the kernel.  */
27 int internal_function
28 __opensock (void)
29 {
30   static int last_family;       /* Available socket family we will use.  */
31   static int last_type;
32   static const struct
33   {
34     int family;
35     const char procname[15];
36   } afs[] =
37     {
38       { AF_UNIX, "net/unix" },
39       { AF_INET, "" },
40       { AF_INET6, "net/if_inet6" },
41       { AF_AX25, "net/ax25" },
42       { AF_NETROM, "net/nr" },
43       { AF_ROSE, "net/rose" },
44       { AF_IPX, "net/ipx" },
45       { AF_APPLETALK, "net/appletalk" },
46       { AF_ECONET, "sys/net/econet" },
47       { AF_ASH, "sys/net/ash" },
48       { AF_X25, "net/x25" }
49     };
50 #define nafs (sizeof (afs) / sizeof (afs[0]))
51   char fname[sizeof "/proc/" + 14];
52   int result;
53   int has_proc;
54   int cnt;
55
56   /* We already know which family to use from the last call.  Use it
57      again.  */
58   if (last_family != 0)
59     {
60       assert (last_type != 0);
61
62       result = socket (last_family, last_type, 0);
63       if (result != -1 || errno != EAFNOSUPPORT)
64         /* Maybe the socket type isn't supported anymore (module is
65            unloaded).  In this case again try to find the type.  */
66         return result;
67
68       /* Reset the values.  They seem not valid anymore.  */
69       last_family = 0;
70       last_type = 0;
71     }
72
73   /* Check whether the /proc filesystem is available.  */
74   has_proc = __access ("/proc/net", R_OK) != -1;
75   strcpy (fname, "/proc/");
76
77   /* Iterate over the interface families and find one which is
78      available.  */
79   for (cnt = 0; cnt < nafs; ++cnt)
80     {
81       int type = SOCK_DGRAM;
82
83       if (has_proc && afs[cnt].procname[0] != '\0')
84         {
85           strcpy (fname + 6, afs[cnt].procname);
86           if (__access (fname, R_OK) == -1)
87             /* The /proc entry is not available.  I.e., we cannot
88                create a socket of this type (without loading the
89                module).  Don't look for it since this might trigger
90                loading the module.  */
91             continue;
92         }
93
94       if (afs[cnt].family == AF_NETROM || afs[cnt].family == AF_X25)
95         type = SOCK_SEQPACKET;
96
97       result = socket (afs[cnt].family, type, 0);
98       if (result != -1)
99         {
100           /* Found an available family.  */
101           last_type = type;
102           last_family = afs[cnt].family;
103           return result;
104         }
105     }
106
107   /* None of the protocol families is available.  It is unclear what kind
108      of error is returned.  ENOENT seems like a reasonable choice.  */
109   __set_errno (ENOENT);
110   return -1;
111 }