helper.c

   1 /*
   2  *  helper.c - setuid helper program for authbind
   3  *
   4  *  authbind is Copyright (C) 1998 Ian Jackson
   5  *
   6  *  This program is free software; you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation; either version 2, or (at your option)
   9  *  any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program; if not, write to the Free Software Foundation,
  18  *  Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  19  *
  20  */
  21
  22 #include <errno.h>
  23 #include <stdio.h>
  24 #include <string.h>
  25 #include <unistd.h>
  26 #include <assert.h>
  27 #include <stdlib.h>
  28 #include <sys/types.h>
  29 #include <sys/socket.h>
  30 #include <netinet/in.h>
  31 #include <arpa/inet.h>
  32
  33 #ifndef CONFIGDIR
  34 # define CONFIGDIR "/etc/authbind"
  35 #endif
  36
  37 static const char *rcsid="$Id$";
  38
  39 static void exiterrno(int e) {
  40   exit(e>0 && e<128 ? e : ENOSYS);
  41 }
  42
  43 static void perrorfail(const char *m) {
  44   int e;
  45   e= errno;
  46   fprintf(stderr,"libauthbind's helper: %s: %s\n",m,strerror(e));
  47   exiterrno(e);
  48 }
  49
  50 static void badusage(void) {
  51   fprintf(stderr,"libauthbind's helper: bad usage\n %s\n",rcsid);
  52   exit(ENOSYS);
  53 }
  54
  55 static struct sockaddr_in saddr;
  56
  57 static void authorised(void) {
  58   if (bind(0,&saddr,sizeof(saddr))) exiterrno(errno);
  59   else _exit(0);
  60 }
  61
  62 int main(int argc, const char *const *argv) {
  63   uid_t uid;
  64   char fnbuf[100];
  65   char *ep;
  66   const char *np;
  67   unsigned long addr, port, haddr, thaddr, thmask;
  68   unsigned int hport, a1,a2,a3,a4, alen,pmin,pmax;
  69   int nchar;
  70   FILE *file;
  71
  72   if (argc != 3) badusage();
  73   addr= strtoul(argv[1],&ep,16); if (*ep || addr&~0x0ffffffffUL) badusage();
  74   port= strtoul(argv[2],&ep,16); if (*ep || port&~0x0ffffUL) badusage();
  75
  76   if (chdir(CONFIGDIR)) perrorfail("chdir " CONFIGDIR);
  77
  78   fnbuf[sizeof(fnbuf)-1]= 0;
  79   memset(&saddr,0,sizeof(saddr));
  80   saddr.sin_family= AF_INET;
  81   saddr.sin_port= port;
  82   saddr.sin_addr.s_addr= addr;
  83   hport= htons(port);
  84
  85   snprintf(fnbuf,sizeof(fnbuf)-1,"byport/%u",hport);
  86   if (!access(fnbuf,X_OK)) authorised();
  87   if (errno != ENOENT) exiterrno(errno);
  88
  89   np= inet_ntoa(saddr.sin_addr); assert(np);
  90   snprintf(fnbuf,sizeof(fnbuf)-1,"byaddr/%s:%u",np,hport);
  91   if (!access(fnbuf,X_OK)) authorised();
  92   if (errno != ENOENT) exiterrno(errno);
  93
  94   uid= getuid(); if (uid==(uid_t)-1) perrorfail("getuid");
  95   snprintf(fnbuf,sizeof(fnbuf)-1,"byuid/%lu",(unsigned long)uid);
  96
  97   file= fopen(fnbuf,"r");
  98   if (!file) exiterrno(errno==ENOENT ? EPERM : errno);
  99
 100   haddr= ntohl(addr);
 101
 102   while (fgets(fnbuf,sizeof(fnbuf)-1,file)) {
 103     nchar= -1;
 104     sscanf(fnbuf," %u.%u.%u.%u/%u:%u,%u %n",
 105            &a1,&a2,&a3,&a4,&alen,&pmin,&pmax,&nchar);
 106     if (nchar != strlen(fnbuf) ||
 107         alen>32 || pmin&~0x0ffff || pmax&~0x0ffff ||
 108         a1&~0x0ff || a2&~0xff || a3&~0x0ff || a4&~0x0ff)
 109       continue;
 110
 111     if (hport<pmin || hport>pmax) continue;
 112
 113     thaddr= (a1<<24)|(a2<<16)|(a3<<8)|(a4);
 114     thmask= 0x0ffffffffUL<<(32-alen);
 115     if ((haddr&thmask) != thaddr) continue;
 116     authorised();
 117   }
 118   if (ferror(file)) perrorfail("read per-uid file");
 119   _exit(ENOENT);
 120 }