chiark / gitweb /
fwd: Improve `source' and `target' lifecycle management.
[fwd] / socket.c
index 5bfef372a83dbb4fae57bb1049afc94b6714d959..36e58eac8c4c5b0b12892f8e8e605f44a2da6fa8 100644 (file)
--- a/socket.c
+++ b/socket.c
@@ -5,61 +5,26 @@
  * (c) 1999 Straylight/Edgeware
  */
 
-/*----- Licensing notice --------------------------------------------------* 
+/*----- Licensing notice --------------------------------------------------*
  *
- * This file is part of the `fw' port forwarder.
+ * This file is part of the `fwd' port forwarder.
  *
- * `fw' is free software; you can redistribute it and/or modify
+ * `fwd' is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
  * the Free Software Foundation; either version 2 of the License, or
  * (at your option) any later version.
- * 
- * `fw' is distributed in the hope that it will be useful,
+ *
+ * `fwd' is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  * GNU General Public License for more details.
- * 
+ *
  * You should have received a copy of the GNU General Public License
- * along with `fw'; if not, write to the Free Software Foundation,
+ * along with `fwd'; if not, write to the Free Software Foundation,
  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  */
 
-/*----- Header files ------------------------------------------------------*/
-
-#include "config.h"
-
-#include <ctype.h>
-#include <errno.h>
-#include <limits.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-#include <sys/types.h>
-#include <unistd.h>
-
-#include <sys/socket.h>
-#include <netinet/in.h>
-#include <arpa/inet.h>
-#include <netdb.h>
-
-#include <mLib/alloc.h>
-#include <mLib/conn.h>
-#include <mLib/dstr.h>
-#include <mLib/fdflags.h>
-#include <mLib/sel.h>
-#include <mLib/sub.h>
-
-#include "addr.h"
-#include "conf.h"
-#include "endpt.h"
-#include "fw.h"
-#include "scan.h"
-#include "socket.h"
-#include "target.h"
-
-#include "inet.h"
-#include "un.h"
+#include "fwd.h"
 
 /*----- Data structures ---------------------------------------------------*/
 
@@ -69,9 +34,10 @@ typedef struct ssource_opts {
   unsigned opt;
   unsigned conn;
   unsigned listen;
+  unsigned naccept;
 } ssource_opts;
 
-static ssource_opts ssgo = { 256, 0, 5 };
+static ssource_opts ssgo = { 256, 0, 5, 1 };
 
 #define SOCKOPT_LIMIT 0u
 #define SOCKOPT_NOLIMIT 1u
@@ -204,7 +170,7 @@ static void ssept_close(endpt *e)
 {
   ssept *ee = (ssept *)e;
 
-  if (ee->s->o.opt == SOCKOPT_LIMIT) {
+  if ((ee->s->s.f&SF_ACTIVE) && ee->s->o.opt == SOCKOPT_LIMIT) {
     ee->s->o.conn++;
     if (ee->s->o.conn == 1)
       ss_listen(ee->s);
@@ -259,7 +225,7 @@ void starget_connected(int fd, void *p)
     e->e.in = e->e.out = r;
     e->e.f &= ~EPF_PENDING;
     if (e->e.other)
-      endpt_join(&e->e, e->e.other);
+      endpt_join(&e->e, e->e.other, 0);
   }
 }
 
@@ -325,6 +291,26 @@ static int ssource_option(source *s, scanner *sc)
     CONF_ACCEPT;
   }
 
+  if (strcmp(sc->d.buf, "accept") == 0 ||
+      strcmp(sc->d.buf, "accept-count") == 0) {
+    token(sc);
+    if (sc->t == '=')
+      token(sc);
+    if (sc->t != CTOK_WORD)
+      error(sc, "parse error, expected `unlimited' or number");
+    else if (isdigit((unsigned char)sc->d.buf[0])) {
+      sso->naccept = atoi(sc->d.buf);
+      if (sso->naccept == 0)
+       error(sc, "argument of `accept-count' must be positive");
+    } else {
+      sso->naccept = 0;
+      conf_enum(sc, "unlimited,infinite",
+               ENUM_ABBREV, "`accept-count' option");
+    }
+    token(sc);
+    CONF_ACCEPT;
+  }
+
   if (strcmp(sc->d.buf, "logging") == 0 ||
       strcmp(sc->d.buf, "log") == 0) {
     addr_opts *ao = ss ? ss->ao : &gsao;
@@ -365,15 +351,16 @@ static source *ssource_read(scanner *sc)
   (void)(conf_prefix(sc, "socket") || conf_prefix(sc, "sk"));
   ss = CREATE(ssource);
   ss->s.ops = &ssource_ops;
+  ss->s.ref = 1;
+  ss->s.f = 0;
   ss->s.desc = 0;
   ss->t = 0;
   ss->a = getaddr(sc, ADDR_SRC);
   if (ss->a->ops->initsrcopts)
     ss->ao = ss->a->ops->initsrcopts();
-  else {
+  else
     ss->ao = CREATE(addr_opts);
-    *ss->ao = gsao;
-  }
+  *ss->ao = gsao;
   ss->o = ssgo;
   return (&ss->s);
 }
@@ -398,66 +385,79 @@ static void ss_accept(int fd, unsigned mode, void *p)
   ssept *e;
   endpt *ee;
   reffd *r;
+  int acceptp = 1;
+  unsigned i = 0;
 
-  /* --- Make the file descriptor --- */
-
-  {
-    int opt = 1;
-    if ((r = ss->a->ops->accept(fd, ss->ao, ss->s.desc)) == 0)
-      return;
-    setsockopt(r->fd, SOL_SOCKET, SO_OOBINLINE, &opt, sizeof(opt));
-    fdflags(r->fd, O_NONBLOCK, O_NONBLOCK, FD_CLOEXEC, FD_CLOEXEC);
-  }
+  while (acceptp) {
 
-  /* --- Make an endpoint --- */
+    /* --- Make the file descriptor --- */
 
-  e = CREATE(ssept);
-  e->e.ops = &ssept_ops;
-  e->e.other = 0;
-  e->e.f = EPF_FILE;
-  e->e.t = 0;
-  e->e.in = e->e.out = r;
-  e->s = ss;
-  REFFD_INC(r);
+    {
+      int opt = 1;
+      if ((r = ss->a->ops->accept(fd, ss->ao, ss->s.desc)) == 0)
+       return;
+      setsockopt(r->fd, SOL_SOCKET, SO_OOBINLINE, &opt, sizeof(opt));
+      fdflags(r->fd, O_NONBLOCK, O_NONBLOCK, FD_CLOEXEC, FD_CLOEXEC);
+    }
 
-  /* --- Obtain the target endpoint and let rip --- */
+    /* --- Make an endpoint --- */
 
-  if ((ee = ss->t->ops->create(ss->t, ss->s.desc)) == 0) {
-    REFFD_DEC(r);
-    REFFD_DEC(r);
-    DESTROY(e);
-    return;
-  }
-  fw_inc();
+    e = CREATE(ssept);
+    e->e.ops = &ssept_ops;
+    e->e.other = 0;
+    e->e.f = EPF_FILE;
+    e->e.t = 0;
+    e->e.in = e->e.out = r;
+    e->s = ss;
+    REFFD_INC(r);
 
-  /* --- Remove the listening socket if necessary --- */
+    /* --- Obtain the target endpoint and let rip --- */
 
-  switch (ss->o.opt) {
-    case SOCKOPT_LIMIT:
-      ss->o.conn--;
-      if (!ss->o.conn) {
-       if (!(ss->ao->f & ADDRF_NOLOG))
-         fw_log(-1, "[%s] maximum connections reached", ss->s.desc);
+    if ((ee = ss->t->ops->create(ss->t, ss->s.desc)) == 0) {
+      REFFD_DEC(r);
+      REFFD_DEC(r);
+      DESTROY(e);
+      return;
+    }
+    fw_inc();
+
+    /* --- Note that we've done one --- */
+
+    i++;
+    if (i >= ss->o.naccept)
+      acceptp = 0;
+
+    /* --- Remove the listening socket if necessary --- */
+
+    switch (ss->o.opt) {
+      case SOCKOPT_LIMIT:
+       ss->o.conn--;
+       if (!ss->o.conn) {
+         if (!(ss->ao->f & ADDRF_NOLOG))
+           fw_log(-1, "[%s] maximum connections reached", ss->s.desc);
+         sel_rmfile(&ss->r);
+         close(ss->r.fd);
+         if (ss->a->ops->unbind)
+           ss->a->ops->unbind(ss->a);
+         acceptp = 0;
+       }
+       break;
+      case SOCKOPT_NOLIMIT:
+       break;
+      case SOCKOPT_ONESHOT:
        sel_rmfile(&ss->r);
        close(ss->r.fd);
        if (ss->a->ops->unbind)
          ss->a->ops->unbind(ss->a);
-      }
-      break;
-    case SOCKOPT_NOLIMIT:
-      break;
-    case SOCKOPT_ONESHOT:
-      sel_rmfile(&ss->r);
-      close(ss->r.fd);
-      if (ss->a->ops->unbind)
-       ss->a->ops->unbind(ss->a);
-      ssource_destroy(&ss->s);
-      break;
-  }
+       source_dec(&ss->s);
+       acceptp = 0;
+       break;
+    }
 
-  /* --- Let everything else happen --- */
+    /* --- Let everything else happen --- */
 
-  endpt_join(&e->e, ee);
+    endpt_join(&e->e, ee, ss->s.desc);
+  }
 }
 
 /* --- @ss_listen@ --- *
@@ -513,7 +513,7 @@ fail_1:
   close(fd);
 fail_0:
   ss->o.conn = 0;
-  ssource_destroy(&ss->s);
+  source_dec(&ss->s);
 }
 
 /* --- @attach@ --- */
@@ -524,7 +524,7 @@ static void ssource_attach(source *s, scanner *sc, target *t)
   int fd;
   int opt = 1;
 
-  ss->t = t;
+  ss->t = t; target_inc(t);
 
   /* --- Initialize the description string --- */
 
@@ -565,9 +565,9 @@ static void ssource_attach(source *s, scanner *sc, target *t)
   fw_inc();
 }
 
-/* --- @destroy@ --- */
+/* --- @shutdown@ --- */
 
-static void ssource_destroy(source *s)
+static void ssource_shutdown(source *s)
 {
   ssource *ss = (ssource *)s;
 
@@ -581,10 +581,19 @@ static void ssource_destroy(source *s)
     ss->a->ops->freesrcopts(ss->ao);
   else
     DESTROY(ss->ao);
-  xfree(ss->s.desc);
   ss->a->ops->destroy(ss->a);
-  ss->t->ops->destroy(ss->t);
   source_remove(&ss->s);
+  target_dec(ss->t);
+  fw_dec();
+}
+
+/* --- @destroy@ --- */
+
+static void ssource_destroy(source *s)
+{
+  ssource *ss = (ssource *)s;
+
+  xfree(ss->s.desc);
   DESTROY(ss);
   fw_dec();
 }
@@ -593,7 +602,7 @@ static void ssource_destroy(source *s)
 
 source_ops ssource_ops = {
   "socket",
-  ssource_option, ssource_read, ssource_attach, ssource_destroy
+  ssource_option, ssource_read, ssource_attach, ssource_shutdown, ssource_destroy
 };
 
 /*----- Target definition -------------------------------------------------*/
@@ -629,6 +638,7 @@ static target *starget_read(scanner *sc)
   (void)(conf_prefix(sc, "socket") || conf_prefix(sc, "sk"));
   st = CREATE(starget);
   st->t.ops = &starget_ops;
+  st->t.ref = 1;
   st->a = getaddr(sc, ADDR_DEST);
   if (st->a->ops->inittargopts)
     st->ao = st->a->ops->inittargopts();