1 /*
2 * Copyright (c) 1994, 1995 Scott Bartram
3 * Copyright (c) 1994 Arne H Juul
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. The name of the author may not be used to endorse or promote products
12 * derived from this software without specific prior written permission
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
15 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
16 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
17 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
18 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
19 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
20 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
21 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
22 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
23 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24 *
25 * $FreeBSD: releng/5.1/sys/i386/ibcs2/ibcs2_socksys.c 93593 2002-04-01 21:31:13Z jhb $
26 */
27
28 #include <sys/param.h>
29 #include <sys/systm.h>
30 #include <sys/sysproto.h>
31 #include <sys/jail.h>
32 #include <sys/kernel.h>
33 #include <sys/sysctl.h>
34
35 #include <i386/ibcs2/ibcs2_socksys.h>
36 #include <i386/ibcs2/ibcs2_util.h>
37
38 /* Local structures */
39 struct getipdomainname_args {
40 char *ipdomainname;
41 int len;
42 };
43
44 struct setipdomainname_args {
45 char *ipdomainname;
46 int len;
47 };
48
49 /* Local prototypes */
50 static int ibcs2_getipdomainname(struct thread *,
51 struct getipdomainname_args *);
52 static int ibcs2_setipdomainname(struct thread *,
53 struct setipdomainname_args *);
54
55 /*
56 * iBCS2 socksys calls.
57 */
58
59 int
60 ibcs2_socksys(td, uap)
61 register struct thread *td;
62 register struct ibcs2_socksys_args *uap;
63 {
64 int error;
65 int realargs[7]; /* 1 for command, 6 for recvfrom */
66 void *passargs;
67
68 /*
69 * SOCKET should only be legal on /dev/socksys.
70 * GETIPDOMAINNAME should only be legal on /dev/socksys ?
71 * The others are (and should be) only legal on sockets.
72 */
73
74 if ((error = copyin(uap->argsp, (caddr_t)realargs, sizeof(realargs))) != 0)
75 return error;
76 DPRINTF(("ibcs2_socksys: %08x %08x %08x %08x %08x %08x %08x\n",
77 realargs[0], realargs[1], realargs[2], realargs[3],
78 realargs[4], realargs[5], realargs[6]));
79
80 passargs = (void *)(realargs + 1);
81 switch (realargs[0]) {
82 case SOCKSYS_ACCEPT:
83 return accept(td, passargs);
84 case SOCKSYS_BIND:
85 return bind(td, passargs);
86 case SOCKSYS_CONNECT:
87 return connect(td, passargs);
88 case SOCKSYS_GETPEERNAME:
89 return getpeername(td, passargs);
90 case SOCKSYS_GETSOCKNAME:
91 return getsockname(td, passargs);
92 case SOCKSYS_GETSOCKOPT:
93 return getsockopt(td, passargs);
94 case SOCKSYS_LISTEN:
95 return listen(td, passargs);
96 case SOCKSYS_RECV:
97 realargs[5] = realargs[6] = 0;
98 /* FALLTHROUGH */
99 case SOCKSYS_RECVFROM:
100 return recvfrom(td, passargs);
101 case SOCKSYS_SEND:
102 realargs[5] = realargs[6] = 0;
103 /* FALLTHROUGH */
104 case SOCKSYS_SENDTO:
105 return sendto(td, passargs);
106 case SOCKSYS_SETSOCKOPT:
107 return setsockopt(td, passargs);
108 case SOCKSYS_SHUTDOWN:
109 return shutdown(td, passargs);
110 case SOCKSYS_SOCKET:
111 return socket(td, passargs);
112 case SOCKSYS_SELECT:
113 return select(td, passargs);
114 case SOCKSYS_GETIPDOMAIN:
115 return ibcs2_getipdomainname(td, passargs);
116 case SOCKSYS_SETIPDOMAIN:
117 return ibcs2_setipdomainname(td, passargs);
118 case SOCKSYS_ADJTIME:
119 return adjtime(td, passargs);
120 case SOCKSYS_SETREUID:
121 return setreuid(td, passargs);
122 case SOCKSYS_SETREGID:
123 return setregid(td, passargs);
124 case SOCKSYS_GETTIME:
125 return gettimeofday(td, passargs);
126 case SOCKSYS_SETTIME:
127 return settimeofday(td, passargs);
128 case SOCKSYS_GETITIMER:
129 return getitimer(td, passargs);
130 case SOCKSYS_SETITIMER:
131 return setitimer(td, passargs);
132
133 default:
134 printf("socksys unknown %08x %08x %08x %08x %08x %08x %08x\n",
135 realargs[0], realargs[1], realargs[2], realargs[3],
136 realargs[4], realargs[5], realargs[6]);
137 return EINVAL;
138 }
139 /* NOTREACHED */
140 }
141
142 /* ARGSUSED */
143 static int
144 ibcs2_getipdomainname(td, uap)
145 struct thread *td;
146 struct getipdomainname_args *uap;
147 {
148 char hname[MAXHOSTNAMELEN], *dptr;
149 int len;
150
151 /* Get the domain name */
152 getcredhostname(td->td_ucred, hname, sizeof(hname));
153
154 dptr = index(hname, '.');
155 if ( dptr )
156 dptr++;
157 else
158 /* Make it effectively an empty string */
159 dptr = hname + strlen(hname);
160
161 len = strlen(dptr) + 1;
162 if ((u_int)uap->len > len + 1)
163 uap->len = len + 1;
164 return (copyout((caddr_t)dptr, (caddr_t)uap->ipdomainname, uap->len));
165 }
166
167 /* ARGSUSED */
168 static int
169 ibcs2_setipdomainname(td, uap)
170 struct thread *td;
171 struct setipdomainname_args *uap;
172 {
173 char hname[MAXHOSTNAMELEN], *ptr;
174 int error, sctl[2], hlen;
175
176 if ((error = suser(td)))
177 return (error);
178
179 /* W/out a hostname a domain-name is nonsense */
180 if ( strlen(hostname) == 0 )
181 return EINVAL;
182
183 /* Get the host's unqualified name (strip off the domain) */
184 snprintf(hname, sizeof(hname), "%s", hostname);
185 ptr = index(hname, '.');
186 if ( ptr != NULL ) {
187 ptr++;
188 *ptr = '\0';
189 } else
190 strcat(hname, ".");
191
192 /* Set ptr to the end of the string so we can append to it */
193 hlen = strlen(hname);
194 ptr = hname + hlen;
195 if ((u_int)uap->len > (sizeof (hname) - hlen - 1))
196 return EINVAL;
197
198 /* Append the ipdomain to the end */
199 error = copyin((caddr_t)uap->ipdomainname, ptr, uap->len);
200 if (error)
201 return (error);
202
203 /* 'sethostname' with the new information */
204 sctl[0] = CTL_KERN;
205 sctl[1] = KERN_HOSTNAME;
206 hlen = strlen(hname) + 1;
207 return (kernel_sysctl(td, sctl, 2, 0, 0, hname, hlen, 0));
208 }
Cache object: f3250b210bac9d8174c5fc8d166695b9
|