chiark - git - mdw - become/blob - src/rule.c

   1 /* -*-c-*-
   2  *
   3  * $Id: rule.c,v 1.8 2004/04/08 01:36:20 mdw Exp $
   4  *
   5  * Managing rule sets
   6  *
   7  * (c) 1998 EBI
   8  */
   9
  10 /*----- Licensing notice --------------------------------------------------*
  11  *
  12  * This file is part of `become'
  13  *
  14  * `Become' is free software; you can redistribute it and/or modify
  15  * it under the terms of the GNU General Public License as published by
  16  * the Free Software Foundation; either version 2 of the License, or
  17  * (at your option) any later version.
  18  *
  19  * `Become' is distributed in the hope that it will be useful,
  20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22  * GNU General Public License for more details.
  23  *
  24  * You should have received a copy of the GNU General Public License
  25  * along with `become'; if not, write to the Free Software Foundation,
  26  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  27  */
  28
  29 /*----- Header files ------------------------------------------------------*/
  30
  31 /* --- ANSI headers --- */
  32
  33 #include <stdio.h>
  34 #include <stdlib.h>
  35 #include <string.h>
  36
  37 /* --- Unix headers --- */
  38
  39 #include <sys/types.h>
  40 #include <sys/socket.h>
  41 #include <netinet/in.h>
  42 #include <arpa/inet.h>
  43 #include <netdb.h>
  44 #include <unistd.h>
  45
  46 /* --- mLib headers --- */
  47
  48 #include <mLib/alloc.h>
  49 #include <mLib/report.h>
  50 #include <mLib/trace.h>
  51
  52 /* --- Local headers --- */
  53
  54 #include "become.h"
  55 #include "class.h"
  56 #include "rule.h"
  57 #include "userdb.h"
  58
  59 /*----- Static variables --------------------------------------------------*/
  60
  61 static rule *rule__list;                /* List of rules */
  62 static rule *rule__tail;                /* Pointer to last rule item */
  63
  64 /*----- Main code ---------------------------------------------------------*/
  65
  66 /* --- @rule_init@ --- *
  67  *
  68  * Arguments:   ---
  69  *
  70  * Returns:     ---
  71  *
  72  * Use:         Intialises the rule database.
  73  */
  74
  75 void rule_init(void)
  76 {
  77   rule__list = 0;
  78   rule__tail = (rule *)&rule__list;
  79 }
  80
  81 /* --- @rule_end@ --- *
  82  *
  83  * Arguments:   ---
  84  *
  85  * Returns:     ---
  86  *
  87  * Use:         Empties the rule database.
  88  */
  89
  90 void rule_end(void)
  91 {
  92   rule *r = rule__list;
  93   rule *rr;
  94
  95   while (r) {
  96     rr = r->next;
  97     class_dec(r->host);
  98     class_dec(r->from);
  99     class_dec(r->to);
 100     class_dec(r->cmd);
 101     free(r);
 102     r = rr;
 103   }
 104 }
 105
 106 /* --- @rule_list@ --- *
 107  *
 108  * Arguments:   ---
 109  *
 110  * Returns:     The list of rules.
 111  *
 112  * Use:         Returns the address of the first node in the rule list.
 113  */
 114
 115 rule *rule_list(void)
 116 {
 117   return (rule__list);
 118 }
 119
 120 /* --- @rule_add@ --- *
 121  *
 122  * Arguments:   @class_node *host@ = class of hosts this rule applies to
 123  *              @class_node *from@ = class of users allowed to change
 124  *              @class_node *to@ = class of users allowed to be changed to
 125  *              @class_node *cmd@ = class of commands allowed
 126  *
 127  * Returns:     ---
 128  *
 129  * Use:         Registers another rule.
 130  */
 131
 132 void rule_add(class_node *host, class_node *from,
 133               class_node *to, class_node *cmd)
 134 {
 135   rule *r = xmalloc(sizeof(*r));
 136
 137   r->host = host;
 138   r->from = from;
 139   r->to = to;
 140   r->cmd = cmd;
 141   r->next = 0;
 142   rule__tail->next = r;
 143   rule__tail = r;
 144 }
 145
 146 /* --- @rule_check@ --- *
 147  *
 148  * Arguments:   @request *r@ = pointer to a request block
 149  *
 150  * Returns:     Zero if disallowed, nonzero if allowed.
 151  *
 152  * Use:         Checks a request to see if it's allowed.
 153  */
 154
 155 int rule_check(request *r)
 156 {
 157   rule *rr;
 158
 159   /* --- Trace out the request we're checking --- */
 160
 161   IF_TRACING(TRACE_CHECK, {
 162     struct passwd *pw_from = userdb_userById(r->from);
 163     struct passwd *pw_to = userdb_userById(r->to);
 164     struct hostent *h = gethostbyaddr((char *)&r->host, sizeof(r->host),
 165                                       AF_INET);
 166
 167     trace(TRACE_CHECK, "check: request from %s (%li) to become %s (%li)",
 168           pw_from ? pw_from->pw_name : "<unknown>", (long)r->from,
 169           pw_to ? pw_to->pw_name : "<unknown>", (long)r->to);
 170     trace(TRACE_CHECK, "check: ... at %s (%s) for `%s'",
 171           h ? h->h_name : "<unknown>", inet_ntoa(r->host), r->cmd);
 172   })
 173
 174   /* --- Search the rule list --- */
 175
 176   for (rr = rule__list; rr; rr = rr->next) {
 177
 178     /* --- Trace out the rule --- */
 179
 180     IF_TRACING(TRACE_RULE, {
 181       trace(TRACE_RULE, "rule: check against rule...");
 182       trace(TRACE_RULE, "rule:   from"); class_dump(rr->from, 2);
 183       trace(TRACE_RULE, "rule:   to"); class_dump(rr->to, 2);
 184       trace(TRACE_RULE, "rule:   cmd"); class_dump(rr->cmd, 2);
 185       trace(TRACE_RULE, "rule:   host"); class_dump(rr->host, 2);
 186     })
 187
 188     /* --- Check the rule --- */
 189
 190     if (class_matchUser(rr->from, r->from) &&
 191         class_matchUser(rr->to, r->to) &&
 192         class_matchCommand(rr->cmd, r->cmd) &&
 193         class_matchHost(rr->host, r->host)) {
 194       T( trace(TRACE_CHECK, "check: rule matched -- granting permission"); )
 195       return (1);
 196     }
 197   }
 198
 199   /* --- Failed to match --- */
 200
 201   T( trace(TRACE_CHECK, "check: no rules matched -- permission denied"); )
 202   return (0);
 203 }
 204
 205 /* --- @rule_dump@ --- *
 206  *
 207  * Arguments:   ---
 208  *
 209  * Returns:     ---
 210  *
 211  * Use:         Dumps a map of the current ruleset to the trace output.
 212  */
 213
 214 void rule_dump(void)
 215 {
 216 #ifdef TRACING
 217   rule *rr = rule__list;
 218
 219   trace(TRACE_RULE, "rule: dumping rules");
 220   while (rr) {
 221     trace(TRACE_RULE, "rule: rule dump...");
 222     trace(TRACE_RULE, "rule:   from"); class_dump(rr->from, 2);
 223     trace(TRACE_RULE, "rule:   to"); class_dump(rr->to, 2);
 224     trace(TRACE_RULE, "rule:   cmd"); class_dump(rr->cmd, 2);
 225     trace(TRACE_RULE, "rule:   host"); class_dump(rr->host, 2);
 226     rr = rr->next;
 227   }
 228   trace(TRACE_RULE, "rule: dump finished");
 229 #endif
 230 }
 231
 232 /*----- That's all, folks -------------------------------------------------*/