moved more code to tlscommon, fixed a couple of minor lint warnings
[radsecproxy.git] / util.c
1 /*
2  * Copyright (C) 2006-2008 Stig Venaas <venaas@uninett.no>
3  *
4  * Permission to use, copy, modify, and distribute this software for any
5  * purpose with or without fee is hereby granted, provided that the above
6  * copyright notice and this permission notice appear in all copies.
7  */
8
9 #include <sys/socket.h>
10 #include <netinet/in.h>
11 #include <netdb.h>
12 #include <stdio.h>
13 #include <stdlib.h>
14 #include <string.h>
15 #include <unistd.h>
16 #include <stdarg.h>
17 #include "debug.h"
18 #include "util.h"
19
20 char *stringcopy(const char *s, int len) {
21     char *r;
22     if (!len)
23         len = strlen(s);
24     r = malloc(len + 1);
25     if (!r)
26         debug(DBG_ERR, "stringcopy: malloc failed");
27     memcpy(r, s, len);
28     r[len] = '\0';
29     return r;
30 }
31
32 void printfchars(char *prefixfmt, char *prefix, char *charfmt, char *chars, int len) {
33     int i;
34     unsigned char *s = (unsigned char *)chars;
35     if (prefix)
36         printf(prefixfmt ? prefixfmt : "%s: ", prefix);
37     for (i = 0; i < len; i++)
38         printf(charfmt ? charfmt : "%c", s[i]);
39     printf("\n");
40 }
41
42 void port_set(struct sockaddr *sa, uint16_t port) {
43     switch (sa->sa_family) {
44     case AF_INET:
45         ((struct sockaddr_in *)sa)->sin_port = htons(port);
46         break;
47     case AF_INET6:
48         ((struct sockaddr_in6 *)sa)->sin6_port = htons(port);
49         break;
50     }
51 }
52
53 struct sockaddr *addr_copy(struct sockaddr *in) {
54     struct sockaddr *out = NULL;
55     
56     switch (in->sa_family) {
57     case AF_INET:
58         out = malloc(sizeof(struct sockaddr_in));
59         if (out) {
60             memset(out, 0, sizeof(struct sockaddr_in));
61             ((struct sockaddr_in *)out)->sin_addr = ((struct sockaddr_in *)in)->sin_addr;
62         }
63         break;
64     case AF_INET6:
65         out = malloc(sizeof(struct sockaddr_in6));
66         if (out) {
67             memset(out, 0, sizeof(struct sockaddr_in6));
68             ((struct sockaddr_in6 *)out)->sin6_addr = ((struct sockaddr_in6 *)in)->sin6_addr;
69         }
70         break;
71     }
72     out->sa_family = in->sa_family;
73     return out;
74 }
75
76 char *addr2string(struct sockaddr *addr) {
77     struct sockaddr_in6 *sa6;
78     struct sockaddr_in sa4;
79     static char addr_buf[2][INET6_ADDRSTRLEN];
80     static int i = 0;
81     i = !i;
82     if (addr->sa_family == AF_INET6) {
83         sa6 = (struct sockaddr_in6 *)addr;
84         if (IN6_IS_ADDR_V4MAPPED(&sa6->sin6_addr)) {
85             memset(&sa4, 0, sizeof(sa4));
86             sa4.sin_family = AF_INET;
87             sa4.sin_port = sa6->sin6_port;
88             memcpy(&sa4.sin_addr, &sa6->sin6_addr.s6_addr[12], 4);
89             addr = (struct sockaddr *)&sa4;
90         }
91     }
92     if (getnameinfo(addr, SOCKADDRP_SIZE(addr), addr_buf[i], sizeof(addr_buf[i]),
93                     NULL, 0, NI_NUMERICHOST)) {
94         debug(DBG_WARN, "getnameinfo failed");
95         return "getnameinfo_failed";
96     }
97     return addr_buf[i];
98 }
99
100 #if 0
101 /* not in use */
102 int connectport(int type, char *host, char *port) {
103     struct addrinfo hints, *res0, *res;
104     int s = -1;
105     
106     memset(&hints, 0, sizeof(hints));
107     hints.ai_socktype = type;
108     hints.ai_family = AF_UNSPEC;
109
110     if (getaddrinfo(host, port, &hints, &res0) != 0) {
111         debug(DBG_ERR, "connectport: can't resolve host %s port %s", host, port);
112         return -1;
113     }
114
115     for (res = res0; res; res = res->ai_next) {
116         s = socket(res->ai_family, res->ai_socktype, res->ai_protocol);
117         if (s < 0) {
118             debug(DBG_WARN, "connectport: socket failed");
119             continue;
120         }
121         if (connect(s, res->ai_addr, res->ai_addrlen) == 0)
122             break;
123         debug(DBG_WARN, "connectport: connect failed");
124         close(s);
125         s = -1;
126     }
127     freeaddrinfo(res0);
128     return s;
129 }
130 #endif
131
132 int bindtoaddr(struct addrinfo *addrinfo, int family, int reuse, int v6only) {
133     int s, on = 1;
134     struct addrinfo *res;
135
136     for (res = addrinfo; res; res = res->ai_next) {
137         if (family != AF_UNSPEC && family != res->ai_family)
138             continue;
139         s = socket(res->ai_family, res->ai_socktype, res->ai_protocol);
140         if (s < 0) {
141             debug(DBG_WARN, "bindtoaddr: socket failed");
142             continue;
143         }
144         if (reuse)
145             setsockopt(s, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on));
146         #ifdef IPV6_V6ONLY
147         if (v6only)
148             setsockopt(s, IPPROTO_IPV6, IPV6_V6ONLY, &on, sizeof(on));
149         #endif
150         if (!bind(s, res->ai_addr, res->ai_addrlen))
151             return s;
152         debug(DBG_WARN, "bindtoaddr: bind failed");
153         close(s);
154     }
155     return -1;
156 }
157
158 int connecttcp(struct addrinfo *addrinfo, struct addrinfo *src) {
159     int s;
160     struct addrinfo *res;
161
162     s = -1;
163     for (res = addrinfo; res; res = res->ai_next) {
164         s = bindtoaddr(src, res->ai_family, 1, 1);
165         if (s < 0) {
166             debug(DBG_WARN, "connecttoserver: socket failed");
167             continue;
168         }
169         if (connect(s, res->ai_addr, res->ai_addrlen) == 0)
170             break;
171         debug(DBG_WARN, "connecttoserver: connect failed");
172         close(s);
173         s = -1;
174     }
175     return s;
176 }