1 /* This file has be modified from the original OpenBSD source */
2
3 /*
4 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
5 * unrestricted use provided that this legend is included on all tape
6 * media and as a part of the software program in whole or part. Users
7 * may copy or modify Sun RPC without charge, but are not authorized
8 * to license or distribute it to anyone else except as part of a product or
9 * program developed by the user.
10 *
11 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
12 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
13 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
14 *
15 * Sun RPC is provided with no support and without any obligation on the
16 * part of Sun Microsystems, Inc. to assist in its use, correction,
17 * modification or enhancement.
18 *
19 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
20 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
21 * OR ANY PART THEREOF.
22 *
23 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
24 * or profits or other special, indirect and consequential damages, even if
25 * Sun has been advised of the possibility of such damages.
26 *
27 * Sun Microsystems, Inc.
28 * 2550 Garcia Avenue
29 * Mountain View, California 94043
30 */
31
32 #include "includes.h"
33
34 #ifndef HAVE_BINDRESVPORT_SA
35
36 #if defined(LIBC_SCCS) && !defined(lint)
37 static char *rcsid = "$OpenBSD: bindresvport.c,v 1.13 2000/01/26 03:43:21 deraadt Exp $";
38 #endif /* LIBC_SCCS and not lint */
39
40 /*
41 * Copyright (c) 1987 by Sun Microsystems, Inc.
42 *
43 * Portions Copyright(C) 1996, Jason Downs. All rights reserved.
44 */
45
46 #include "includes.h"
47
48 #define STARTPORT 600
49 #define ENDPORT (IPPORT_RESERVED - 1)
50 #define NPORTS (ENDPORT - STARTPORT + 1)
51
52 /*
53 * Bind a socket to a privileged IP port
54 */
55 int
bindresvport_sa(sd,sa)56 bindresvport_sa(sd, sa)
57 int sd;
58 struct sockaddr *sa;
59 {
60 int error, af;
61 struct sockaddr_storage myaddr;
62 struct sockaddr_in *sin;
63 struct sockaddr_in6 *sin6;
64 u_int16_t *portp;
65 u_int16_t port;
66 socklen_t salen;
67 int i;
68
69 if (sa == NULL) {
70 memset(&myaddr, 0, sizeof(myaddr));
71 sa = (struct sockaddr *)&myaddr;
72
73 if (getsockname(sd, sa, &salen) == -1)
74 return -1; /* errno is correctly set */
75
76 af = sa->sa_family;
77 memset(&myaddr, 0, salen);
78 } else
79 af = sa->sa_family;
80
81 if (af == AF_INET) {
82 /* LINTED */
83 sin = (struct sockaddr_in *)sa;
84 salen = sizeof(struct sockaddr_in);
85 portp = &sin->sin_port;
86 } else if (af == AF_INET6) {
87 /* LINTED */
88 sin6 = (struct sockaddr_in6 *)sa;
89 salen = sizeof(struct sockaddr_in6);
90 portp = &sin6->sin6_port;
91 } else {
92 errno = EPFNOSUPPORT;
93 return (-1);
94 }
95 sa->sa_family = af;
96
97 port = ntohs(*portp);
98 if (port == 0)
99 port = (arc4random() % NPORTS) + STARTPORT;
100
101 /* Avoid warning */
102 error = -1;
103
104 for(i = 0; i < NPORTS; i++) {
105 *portp = htons(port);
106
107 error = bind(sd, sa, salen);
108
109 /* Terminate on success */
110 if (error == 0)
111 break;
112
113 /* Terminate on errors, except "address already in use" */
114 if ((error < 0) && !((errno == EADDRINUSE) || (errno == EINVAL)))
115 break;
116
117 port++;
118 if (port > ENDPORT)
119 port = STARTPORT;
120 }
121
122 return (error);
123 }
124
125 #endif /* HAVE_BINDRESVPORT_SA */
126
127 #pragma ident "%Z%%M% %I% %E% SMI"
128