source/lib/samba3/winsdb.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    Wins Database
   4
   5    Copyright (C) Jeremy Allison 1994-2003
   6    Copyright (C) Jelmer Vernooij 2005
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 3 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  20
  21 */
  22
  23 #include "includes.h"
  24 #include "system/filesys.h"
  25 #include "lib/samba3/samba3.h"
  26
  27 #define WINS_VERSION 1
  28
  29 NTSTATUS samba3_read_winsdb( const char *fn, TALLOC_CTX *ctx, struct samba3_winsdb_entry **entries, uint32_t *count )
  30 {
  31         XFILE *fp;
  32         char *line;
  33
  34         if((fp = x_fopen(fn,O_RDONLY,0)) == NULL) {
  35                 DEBUG(0,("initialise_wins: Can't open wins database file %s. Error was %s\n",
  36                         fn, strerror(errno) ));
  37                 return NT_STATUS_OPEN_FAILED;
  38         }
  39
  40         *count = 0;
  41         *entries = NULL;
  42
  43         while (!x_feof(fp)) {
  44                 struct samba3_winsdb_entry entry;
  45                 const char *name_str, *ttl_str, *nb_flags_str;
  46                 const char **args;
  47                 char *p;
  48                 int i;
  49                 unsigned int hash;
  50                 int version;
  51
  52                 /* Read a line from the wins.dat file. Strips whitespace
  53                         from the beginning and end of the line.  */
  54                 line = fgets_slash(NULL,8,fp);
  55                 if (!line) {
  56                         return NT_STATUS_UNEXPECTED_IO_ERROR;
  57                 }
  58
  59                 if (*line == '#') {
  60                         SAFE_FREE(line);
  61                         continue;
  62                 }
  63
  64                 if (strncmp(line,"VERSION ", 8) == 0) {
  65                         if (sscanf(line,"VERSION %d %u", &version, &hash) != 2 ||
  66                                                 version != WINS_VERSION) {
  67                                 DEBUG(0,("Discarding invalid wins.dat file [%s]\n",line));
  68                                 SAFE_FREE(line);
  69                                 x_fclose(fp);
  70                                 return NT_STATUS_REVISION_MISMATCH;
  71                         }
  72                         SAFE_FREE(line);
  73
  74                         continue;
  75                 }
  76
  77                 args = str_list_make_shell(ctx, line, NULL);
  78
  79                 /*
  80                  * Now we handle multiple IP addresses per name we need
  81                  * to iterate over the line twice. The first time to
  82                  * determine how many IP addresses there are, the second
  83                  * time to actually parse them into the ip_list array.
  84                  */
  85
  86                 name_str = args[0];
  87                 if (!name_str) {
  88                         DEBUG(0,("initialise_wins: Failed to parse name when parsing line %s\n", line ));
  89                         SAFE_FREE(line);
  90                         continue;
  91                 }
  92
  93                 ttl_str = args[1];
  94                 if (!ttl_str) {
  95                         DEBUG(0,("initialise_wins: Failed to parse time to live when parsing line %s\n", line ));
  96                         SAFE_FREE(line);
  97                         continue;
  98                 }
  99
 100                 /*
 101                  * Determine the number of IP addresses per line.
 102                  */
 103                 entry.ip_count = 0;
 104                 for (i = 2; args[i] && strchr(args[i], '.'); i++) entry.ip_count++;
 105
 106                 if(entry.ip_count == 0) {
 107                         DEBUG(0,("initialise_wins: Missing IP address when parsing line %s\n", line ));
 108                         SAFE_FREE(line);
 109                         continue;
 110                 }
 111
 112                 /* Allocate the space for the ip_list. */
 113                 if((entry.ips = talloc_array ( ctx, struct ipv4_addr, entry.ip_count)) == NULL) {
 114                         DEBUG(0,("initialise_wins: Malloc fail !\n"));
 115                         SAFE_FREE(line);
 116                         return NT_STATUS_NO_MEMORY;
 117                 }
 118
 119                 /* Reset and re-parse the line. */
 120                 for(i = 0; i < entry.ip_count; i++) {
 121                         entry.ips[i] = interpret_addr2(args[i+2]);
 122                 }
 123                 nb_flags_str = args[2 + entry.ip_count];
 124
 125                 SMB_ASSERT(nb_flags_str);
 126
 127                 /*
 128                  * Deal with SELF or REGISTER name encoding. Default is REGISTER
 129                  * for compatibility with old nmbds.
 130                  */
 131
 132                 if(nb_flags_str[strlen(nb_flags_str)-1] == 'S') {
 133                         DEBUG(5,("initialise_wins: Ignoring SELF name %s\n", line));
 134                         talloc_free(entry.ips);
 135                         SAFE_FREE(line);
 136                         continue;
 137                 }
 138
 139                 /* Netbios name. # divides the name from the type (hex): netbios#xx */
 140                 entry.name = talloc_strdup(ctx, name_str);
 141
 142                 if((p = strchr(entry.name,'#')) != NULL) {
 143                         *p = 0;
 144                         sscanf(p+1,"%x",&entry.type);
 145                 }
 146
 147                 /* Decode the netbios flags (hex) and the time-to-live (in seconds). */
 148                 sscanf(nb_flags_str,"%x",&entry.nb_flags);
 149                 entry.ttl = atol(ttl_str);
 150
 151                 *entries = talloc_realloc(ctx, *entries, struct samba3_winsdb_entry, (*count)+1);
 152                 (*entries)[*count] = entry;
 153
 154                 (*count)++;
 155         }
 156
 157         x_fclose(fp);
 158         return NT_STATUS_OK;
 159 }