3 // Copyright (c) 1987-2022 by the citadel.org team
5 // This program is open source software. Use, duplication, or
6 // disclosure is subject to the GNU General Public License v3.
10 // lingering_close() a`la Apache. see
11 // http://httpd.apache.org/docs/2.0/misc/fin_wait_2.html for rationale
12 int lingering_close(int fd) {
16 struct timeval tv, start;
18 gettimeofday(&start, NULL);
24 gettimeofday(&tv, NULL);
25 tv.tv_sec = SLEEPING - (tv.tv_sec - start.tv_sec);
26 tv.tv_usec = start.tv_usec - tv.tv_usec;
29 tv.tv_usec += 1000000;
33 i = select(fd + 1, &set, NULL, NULL, &tv);
34 } while (i == -1 && errno == EINTR);
39 i = read(fd, buf, sizeof buf);
40 } while (i != 0 && (i != -1 || errno == EINTR));
46 // This is a generic function to set up a master socket for listening on
47 // a TCP port. The server shuts down if the bind fails. (IPv4/IPv6 version)
49 // ip_addr IP address to bind
50 // port_number port number to bind
51 // queue_len number of incoming connections to allow in the queue
52 int webcit_tcp_server(const char *ip_addr, int port_number, int queue_len) {
53 const char *ipv4broadcast = "0.0.0.0";
56 struct sockaddr_in6 sin6;
57 struct sockaddr_in sin4;
62 memset(&sin6, 0, sizeof(sin6));
63 memset(&sin4, 0, sizeof(sin4));
64 sin6.sin6_family = AF_INET6;
65 sin4.sin_family = AF_INET;
67 if ( (ip_addr == NULL) // any IPv6
68 || (IsEmptyStr(ip_addr))
69 || (!strcmp(ip_addr, "*"))
73 sin6.sin6_addr = in6addr_any;
75 else if (!strcmp(ip_addr, "0.0.0.0")) { // any IPv4
77 sin4.sin_addr.s_addr = INADDR_ANY;
79 else if ((strchr(ip_addr, '.')) && (!strchr(ip_addr, ':'))) { // specific IPv4
81 if (inet_pton(AF_INET, ip_addr, &sin4.sin_addr) <= 0) {
82 syslog(LOG_WARNING, "Error binding to [%s] : %s\n", ip_addr, strerror(errno));
86 else { // specific IPv6
89 if (inet_pton(AF_INET6, ip_addr, &sin6.sin6_addr) <= 0) {
90 syslog(LOG_WARNING, "Error binding to [%s] : %s\n", ip_addr, strerror(errno));
95 if (port_number == 0) {
96 syslog(LOG_WARNING, "Cannot start: no port number specified.\n");
99 sin6.sin6_port = htons((u_short) port_number);
100 sin4.sin_port = htons((u_short) port_number);
102 p = getprotobyname("tcp");
104 s = socket(((ip_version == 6) ? PF_INET6 : PF_INET), SOCK_STREAM, (p->p_proto));
106 if (IsDefault && (errno == EAFNOSUPPORT)) {
108 ip_addr = ipv4broadcast;
111 syslog(LOG_WARNING, "Can't create a listening socket: %s\n", strerror(errno));
115 // Set some socket options that make sense.
117 setsockopt(s, SOL_SOCKET, SO_REUSEADDR, &i, sizeof(i));
119 if (ip_version == 6) {
120 b = bind(s, (struct sockaddr *) &sin6, sizeof(sin6));
123 b = bind(s, (struct sockaddr *) &sin4, sizeof(sin4));
127 syslog(LOG_ERR, "Can't bind: %s\n", strerror(errno));
132 if (listen(s, queue_len) < 0) {
133 syslog(LOG_ERR, "Can't listen: %s\n", strerror(errno));
141 // Create a Unix domain socket and listen on it
142 // sockpath - file name of the unix domain socket
143 // queue_len - Number of incoming connections to allow in the queue
144 int webcit_uds_server(char *sockpath, int queue_len) {
145 struct sockaddr_un addr;
148 int actual_queue_len;
150 actual_queue_len = queue_len;
151 if (actual_queue_len < 5)
152 actual_queue_len = 5;
154 i = unlink(sockpath);
155 if ((i != 0) && (errno != ENOENT)) {
156 syslog(LOG_WARNING, "webcit: can't unlink %s: %s", sockpath, strerror(errno));
160 memset(&addr, 0, sizeof(addr));
161 addr.sun_family = AF_UNIX;
162 safestrncpy(addr.sun_path, sockpath, sizeof addr.sun_path);
164 s = socket(AF_UNIX, SOCK_STREAM, 0);
166 syslog(LOG_WARNING, "webcit: Can't create a unix domain socket: %s", strerror(errno));
170 if (bind(s, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
171 syslog(LOG_WARNING, "webcit: Can't bind: %s", strerror(errno));
176 if (listen(s, actual_queue_len) < 0) {
177 syslog(LOG_WARNING, "webcit: Can't listen: %s", strerror(errno));
182 chmod(sockpath, 0777);