src/kdparse.c

   1 /*
   2  *  ircd-ratbox: A slightly useful ircd.
   3  *  kdparse.c: Parses K and D lines.
   4  *
   5  *  Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
   6  *  Copyright (C) 1996-2002 Hybrid Development Team
   7  *  Copyright (C) 2002-2005 ircd-ratbox development team
   8  *
   9  *  This program is free software; you can redistribute it and/or modify
  10  *  it under the terms of the GNU General Public License as published by
  11  *  the Free Software Foundation; either version 2 of the License, or
  12  *  (at your option) any later version.
  13  *
  14  *  This program is distributed in the hope that it will be useful,
  15  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  *  GNU General Public License for more details.
  18  *
  19  *  You should have received a copy of the GNU General Public License
  20  *  along with this program; if not, write to the Free Software
  21  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
  22  *  USA
  23  */
  24
  25 #include "stdinc.h"
  26 #include "tools.h"
  27 #include "s_log.h"
  28 #include "s_conf.h"
  29 #include "s_newconf.h"
  30 #include "hostmask.h"
  31 #include "client.h"
  32 #include "irc_string.h"
  33 #include "memory.h"
  34 #include "hash.h"
  35
  36 /* conf_add_fields()
  37  *
  38  * inputs       - pointer to config item, host/pass/user/operreason fields
  39  * output       - NONE
  40  * side effects - update respective fields with pointers
  41  */
  42 static void
  43 conf_add_fields(struct ConfItem *aconf, const char *host_field,
  44                 const char *pass_field, const char *user_field,
  45                 const char *operreason_field)
  46 {
  47         if(host_field != NULL)
  48                 DupString(aconf->host, host_field);
  49         if(pass_field != NULL)
  50                 DupString(aconf->passwd, pass_field);
  51         if(user_field != NULL)
  52                 DupString(aconf->user, user_field);
  53         if(operreason_field != NULL)
  54                 DupString(aconf->spasswd, operreason_field);
  55 }
  56
  57 /*
  58  * parse_k_file
  59  * Inputs       - pointer to line to parse
  60  * Output       - NONE
  61  * Side Effects - Parse one new style K line
  62  */
  63
  64 void
  65 parse_k_file(FILE * file)
  66 {
  67         struct ConfItem *aconf;
  68         char *user_field = NULL;
  69         char *reason_field = NULL;
  70         char *operreason_field = NULL;
  71         char *host_field = NULL;
  72         char line[BUFSIZE];
  73         char *p;
  74
  75         while (fgets(line, sizeof(line), file))
  76         {
  77                 if((p = strchr(line, '\n')) != NULL)
  78                         *p = '\0';
  79
  80                 if((*line == '\0') || (*line == '#'))
  81                         continue;
  82
  83                 user_field = getfield(line);
  84                 if(EmptyString(user_field))
  85                         continue;
  86
  87                 host_field = getfield(NULL);
  88                 if(EmptyString(host_field))
  89                         continue;
  90
  91                 reason_field = getfield(NULL);
  92                 if(EmptyString(reason_field))
  93                         continue;
  94
  95                 operreason_field = getfield(NULL);
  96
  97                 aconf = make_conf();
  98                 aconf->status = CONF_KILL;
  99                 conf_add_fields(aconf, host_field, reason_field,
 100                                 user_field, operreason_field);
 101
 102                 if(aconf->host != NULL)
 103                         add_conf_by_address(aconf->host, CONF_KILL, aconf->user, aconf);
 104         }
 105 }
 106
 107 /*
 108  * parse_d_file
 109  * Inputs       - pointer to line to parse
 110  * Output       - NONE
 111  * Side Effects - Parse one new style D line
 112  */
 113
 114 void
 115 parse_d_file(FILE * file)
 116 {
 117         struct ConfItem *aconf;
 118         char *reason_field = NULL;
 119         char *host_field = NULL;
 120         char *operreason_field = NULL;
 121         char line[BUFSIZE];
 122         char *p;
 123
 124         while (fgets(line, sizeof(line), file))
 125         {
 126                 if((p = strchr(line, '\n')))
 127                         *p = '\0';
 128
 129                 if((*line == '\0') || (line[0] == '#'))
 130                         continue;
 131
 132                 host_field = getfield(line);
 133                 if(EmptyString(host_field))
 134                         continue;
 135
 136                 reason_field = getfield(NULL);
 137                 if(EmptyString(reason_field))
 138                         continue;
 139
 140                 operreason_field = getfield(NULL);
 141
 142                 aconf = make_conf();
 143                 aconf->status = CONF_DLINE;
 144                 conf_add_fields(aconf, host_field, reason_field, "", operreason_field);
 145                 conf_add_d_conf(aconf);
 146         }
 147 }
 148
 149 void
 150 parse_x_file(FILE * file)
 151 {
 152         struct ConfItem *aconf;
 153         char *gecos_field = NULL;
 154         char *reason_field = NULL;
 155         char line[BUFSIZE];
 156         char *p;
 157
 158         while (fgets(line, sizeof(line), file))
 159         {
 160                 if((p = strchr(line, '\n')))
 161                         *p = '\0';
 162
 163                 if((*line == '\0') || (line[0] == '#'))
 164                         continue;
 165
 166                 gecos_field = getfield(line);
 167                 if(EmptyString(gecos_field))
 168                         continue;
 169
 170                 /* field for xline types, which no longer exist */
 171                 getfield(NULL);
 172
 173                 reason_field = getfield(NULL);
 174                 if(EmptyString(reason_field))
 175                         continue;
 176
 177                 /* sanity checking */
 178                 if((find_xline(gecos_field, 0) != NULL) ||
 179                    (strchr(reason_field, ':') != NULL))
 180                         continue;
 181
 182                 aconf = make_conf();
 183                 aconf->status = CONF_XLINE;
 184
 185                 DupString(aconf->name, gecos_field);
 186                 DupString(aconf->passwd, reason_field);
 187
 188                 dlinkAddAlloc(aconf, &xline_conf_list);
 189         }
 190 }
 191
 192 void
 193 parse_resv_file(FILE * file)
 194 {
 195         struct ConfItem *aconf;
 196         char *reason_field;
 197         char *host_field;
 198         char line[BUFSIZE];
 199         char *p;
 200
 201         while (fgets(line, sizeof(line), file))
 202         {
 203                 if((p = strchr(line, '\n')))
 204                         *p = '\0';
 205
 206                 if((*line == '\0') || (line[0] == '#'))
 207                         continue;
 208
 209                 host_field = getfield(line);
 210                 if(EmptyString(host_field))
 211                         continue;
 212
 213                 reason_field = getfield(NULL);
 214                 if(EmptyString(reason_field))
 215                         continue;
 216
 217                 if(IsChannelName(host_field))
 218                 {
 219                         if(hash_find_resv(host_field))
 220                                 continue;
 221
 222                         aconf = make_conf();
 223                         aconf->status = CONF_RESV_CHANNEL;
 224                         aconf->port = 0;
 225
 226                         DupString(aconf->name, host_field);
 227                         DupString(aconf->passwd, reason_field);
 228                         add_to_resv_hash(aconf->name, aconf);
 229                 }
 230                 else if(clean_resv_nick(host_field))
 231                 {
 232                         if(find_nick_resv(host_field))
 233                                 continue;
 234
 235                         aconf = make_conf();
 236                         aconf->status = CONF_RESV_NICK;
 237                         aconf->port = 0;
 238
 239                         DupString(aconf->name, host_field);
 240                         DupString(aconf->passwd, reason_field);
 241                         dlinkAddAlloc(aconf, &resv_conf_list);
 242                 }
 243         }
 244 }
 245
 246 /*
 247  * getfield
 248  *
 249  * inputs       - input buffer
 250  * output       - next field
 251  * side effects - field breakup for ircd.conf file.
 252  */
 253 char *
 254 getfield(char *newline)
 255 {
 256         static char *line = NULL;
 257         char *end, *field;
 258
 259         if(newline != NULL)
 260                 line = newline;
 261
 262         if(line == NULL)
 263                 return (NULL);
 264
 265         field = line;
 266
 267         /* XXX make this skip to first " if present */
 268         if(*field == '"')
 269                 field++;
 270         else
 271                 return (NULL);  /* mal-formed field */
 272
 273         end = strchr(line, ',');
 274
 275         while(1)
 276         {
 277                 /* no trailing , - last field */
 278                 if(end == NULL)
 279                 {
 280                         end = line + strlen(line);
 281                         line = NULL;
 282
 283                         if(*end == '"')
 284                         {
 285                                 *end = '\0';
 286                                 return field;
 287                         }
 288                         else
 289                                 return NULL;
 290                 }
 291                 else
 292                 {
 293                         /* look for a ", to mark the end of a field.. */
 294                         if(*(end - 1) == '"')
 295                         {
 296                                 line = end + 1;
 297                                 end--;
 298                                 *end = '\0';
 299                                 return field;
 300                         }
 301
 302                         /* search for the next ',' */
 303                         end++;
 304                         end = strchr(end, ',');
 305                 }
 306         }
 307
 308         return NULL;
 309 }