src/plaintcp.c

   1 /*
   2     ashd - A Sane HTTP Daemon
   3     Copyright (C) 2008  Fredrik Tolf <fredrik@dolda2000.com>
   4
   5     This program is free software: you can redistribute it and/or modify
   6     it under the terms of the GNU General Public License as published by
   7     the Free Software Foundation, either version 3 of the License, or
   8     (at your option) any later version.
   9
  10     This program is distributed in the hope that it will be useful,
  11     but WITHOUT ANY WARRANTY; without even the implied warranty of
  12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13     GNU General Public License for more details.
  14
  15     You should have received a copy of the GNU General Public License
  16     along with this program.  If not, see <http://www.gnu.org/licenses/>.
  17 */
  18
  19 #include <stdlib.h>
  20 #include <unistd.h>
  21 #include <stdio.h>
  22 #include <sys/socket.h>
  23 #include <netinet/in.h>
  24 #include <arpa/inet.h>
  25 #include <errno.h>
  26 #include <string.h>
  27
  28 #ifdef HAVE_CONFIG_H
  29 #include <config.h>
  30 #endif
  31 #include <utils.h>
  32 #include <req.h>
  33 #include <mt.h>
  34 #include <mtio.h>
  35 #include <log.h>
  36
  37 #include "htparser.h"
  38
  39 struct tcpport {
  40     int fd;
  41     int sport;
  42 };
  43
  44 struct tcpconn {
  45     struct sockaddr_storage name;
  46     struct tcpport *port;
  47 };
  48
  49 static int listensock4(int port)
  50 {
  51     struct sockaddr_in name;
  52     int fd;
  53     int valbuf;
  54
  55     memset(&name, 0, sizeof(name));
  56     name.sin_family = AF_INET;
  57     name.sin_port = htons(port);
  58     if((fd = socket(PF_INET, SOCK_STREAM, 0)) < 0)
  59         return(-1);
  60     valbuf = 1;
  61     setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &valbuf, sizeof(valbuf));
  62     if(bind(fd, (struct sockaddr *)&name, sizeof(name))) {
  63         close(fd);
  64         return(-1);
  65     }
  66     if(listen(fd, 16) < 0) {
  67         close(fd);
  68         return(-1);
  69     }
  70     return(fd);
  71 }
  72
  73 static int listensock6(int port)
  74 {
  75     struct sockaddr_in6 name;
  76     int fd;
  77     int valbuf;
  78
  79     memset(&name, 0, sizeof(name));
  80     name.sin6_family = AF_INET6;
  81     name.sin6_port = htons(port);
  82     if((fd = socket(PF_INET6, SOCK_STREAM, 0)) < 0)
  83         return(-1);
  84     valbuf = 1;
  85     setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &valbuf, sizeof(valbuf));
  86     if(bind(fd, (struct sockaddr *)&name, sizeof(name))) {
  87         close(fd);
  88         return(-1);
  89     }
  90     if(listen(fd, 16) < 0) {
  91         close(fd);
  92         return(-1);
  93     }
  94     return(fd);
  95 }
  96
  97 static int initreq(struct conn *conn, struct hthead *req)
  98 {
  99     struct tcpconn *tcp = conn->pdata;
 100     char nmbuf[256];
 101
 102     if(tcp->name.ss_family == AF_INET) {
 103         headappheader(req, "X-Ash-Address", inet_ntop(AF_INET, &((struct sockaddr_in *)&tcp->name)->sin_addr, nmbuf, sizeof(nmbuf)));
 104         headappheader(req, "X-Ash-Port", sprintf3("%i", ntohs(((struct sockaddr_in *)&tcp->name)->sin_port)));
 105     } else if(tcp->name.ss_family == AF_INET6) {
 106         headappheader(req, "X-Ash-Address", inet_ntop(AF_INET6, &((struct sockaddr_in6 *)&tcp->name)->sin6_addr, nmbuf, sizeof(nmbuf)));
 107         headappheader(req, "X-Ash-Port", sprintf3("%i", ntohs(((struct sockaddr_in6 *)&tcp->name)->sin6_port)));
 108     }
 109     headappheader(req, "X-Ash-Server-Port", sprintf3("%i", tcp->port->sport));
 110     return(0);
 111 }
 112
 113 void servetcp(struct muth *muth, va_list args)
 114 {
 115     vavar(int, fd);
 116     vavar(struct sockaddr_storage, name);
 117     vavar(struct tcpport *, stcp);
 118     FILE *in;
 119     struct conn conn;
 120     struct tcpconn tcp;
 121
 122     memset(&conn, 0, sizeof(conn));
 123     memset(&tcp, 0, sizeof(tcp));
 124     in = mtstdopen(fd, 1, 60, "r+");
 125     conn.pdata = &tcp;
 126     conn.initreq = initreq;
 127     tcp.name = name;
 128     tcp.port = stcp;
 129     serve(in, &conn);
 130 }
 131
 132 static void listenloop(struct muth *muth, va_list args)
 133 {
 134     vavar(struct tcpport *, tcp);
 135     int ns;
 136     struct sockaddr_storage name;
 137     socklen_t namelen;
 138
 139     while(1) {
 140         namelen = sizeof(name);
 141         block(tcp->fd, EV_READ, 0);
 142         ns = accept(tcp->fd, (struct sockaddr *)&name, &namelen);
 143         if(ns < 0) {
 144             flog(LOG_ERR, "accept: %s", strerror(errno));
 145             goto out;
 146         }
 147         mustart(servetcp, ns, name, tcp);
 148     }
 149
 150 out:
 151     close(tcp->fd);
 152     free(tcp);
 153 }
 154
 155 void handleplain(int argc, char **argp, char **argv)
 156 {
 157     int port, fd;
 158     int i;
 159     struct tcpport *tcp;
 160
 161     port = 80;
 162     for(i = 0; i < argc; i++) {
 163         if(!strcmp(argp[i], "help")) {
 164             printf("plain handler parameters:\n");
 165             printf("\tport=TCP-PORT (default is 80)\n");
 166             exit(0);
 167         } else if(!strcmp(argp[i], "port")) {
 168             port = atoi(argv[i]);
 169         } else {
 170             flog(LOG_ERR, "unknown parameter `%s' to plain handler", argp[i]);
 171             exit(1);
 172         }
 173     }
 174     if((fd = listensock6(port)) < 0) {
 175         flog(LOG_ERR, "could not listen on IPv6 (port %i): %s", port, strerror(errno));
 176         exit(1);
 177     }
 178     omalloc(tcp);
 179     tcp->fd = fd;
 180     tcp->sport = port;
 181     mustart(listenloop, tcp);
 182     if((fd = listensock4(port)) < 0) {
 183         if(errno != EADDRINUSE) {
 184             flog(LOG_ERR, "could not listen on IPv4 (port %i): %s", port, strerror(errno));
 185             exit(1);
 186         }
 187     } else {
 188         mustart(listenloop, fd, port);
 189     }
 190 }