jjako | ada9ffa | 2004-12-30 16:39:11 +0000 | [diff] [blame] | 1 | /* |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 2 | * IP address pool functions. |
jjako | c321396 | 2004-09-09 20:23:50 +0000 | [diff] [blame] | 3 | * Copyright (C) 2003, 2004 Mondru AB. |
jjako | ada9ffa | 2004-12-30 16:39:11 +0000 | [diff] [blame] | 4 | * |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 5 | * The contents of this file may be used under the terms of the GNU |
| 6 | * General Public License Version 2, provided that the above copyright |
| 7 | * notice and this permission notice is included in all copies or |
| 8 | * substantial portions of the software. |
| 9 | * |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 10 | */ |
| 11 | |
jjako | 06e9f12 | 2004-01-19 18:37:58 +0000 | [diff] [blame] | 12 | #include <sys/types.h> |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 13 | #include <netinet/in.h> /* in_addr */ |
| 14 | #include <stdlib.h> /* calloc */ |
| 15 | #include <stdio.h> /* sscanf */ |
jjako | c321396 | 2004-09-09 20:23:50 +0000 | [diff] [blame] | 16 | #include <syslog.h> |
| 17 | #include <string.h> |
| 18 | #include <sys/socket.h> |
| 19 | #include <arpa/inet.h> |
jjako | c321396 | 2004-09-09 20:23:50 +0000 | [diff] [blame] | 20 | #include "syserr.h" |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 21 | #include "ippool.h" |
jjako | ada9ffa | 2004-12-30 16:39:11 +0000 | [diff] [blame] | 22 | #include "lookup.h" |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 23 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 24 | int ippool_printaddr(struct ippool_t *this) |
| 25 | { |
| 26 | unsigned int n; |
| 27 | printf("ippool_printaddr\n"); |
| 28 | printf("Firstdyn %d\n", this->firstdyn - this->member); |
| 29 | printf("Lastdyn %d\n", this->lastdyn - this->member); |
| 30 | printf("Firststat %d\n", this->firststat - this->member); |
| 31 | printf("Laststat %d\n", this->laststat - this->member); |
| 32 | printf("Listsize %d\n", this->listsize); |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 33 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 34 | for (n = 0; n < this->listsize; n++) { |
| 35 | printf("Unit %d inuse %d prev %d next %d addr %s %x\n", |
| 36 | n, |
| 37 | this->member[n].inuse, |
| 38 | this->member[n].prev - this->member, |
| 39 | this->member[n].next - this->member, |
| 40 | inet_ntoa(this->member[n].addr), |
| 41 | this->member[n].addr.s_addr); |
| 42 | } |
| 43 | return 0; |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 44 | } |
| 45 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 46 | int ippool_hashadd(struct ippool_t *this, struct ippoolm_t *member) |
| 47 | { |
| 48 | uint32_t hash; |
| 49 | struct ippoolm_t *p; |
| 50 | struct ippoolm_t *p_prev = NULL; |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 51 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 52 | /* Insert into hash table */ |
| 53 | hash = ippool_hash4(&member->addr) & this->hashmask; |
| 54 | for (p = this->hash[hash]; p; p = p->nexthash) |
| 55 | p_prev = p; |
| 56 | if (!p_prev) |
| 57 | this->hash[hash] = member; |
| 58 | else |
| 59 | p_prev->nexthash = member; |
| 60 | return 0; /* Always OK to insert */ |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 61 | } |
| 62 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 63 | int ippool_hashdel(struct ippool_t *this, struct ippoolm_t *member) |
| 64 | { |
| 65 | uint32_t hash; |
| 66 | struct ippoolm_t *p; |
| 67 | struct ippoolm_t *p_prev = NULL; |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 68 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 69 | /* Find in hash table */ |
| 70 | hash = ippool_hash4(&member->addr) & this->hashmask; |
| 71 | for (p = this->hash[hash]; p; p = p->nexthash) { |
| 72 | if (p == member) { |
| 73 | break; |
| 74 | } |
| 75 | p_prev = p; |
| 76 | } |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 77 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 78 | if (p != member) { |
| 79 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 80 | "ippool_hashdel: Tried to delete member not in hash table"); |
| 81 | return -1; |
| 82 | } |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 83 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 84 | if (!p_prev) |
| 85 | this->hash[hash] = p->nexthash; |
| 86 | else |
| 87 | p_prev->nexthash = p->nexthash; |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 88 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 89 | return 0; |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 90 | } |
| 91 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 92 | unsigned long int ippool_hash4(struct in_addr *addr) |
| 93 | { |
| 94 | return lookup((unsigned char *)&addr->s_addr, sizeof(addr->s_addr), 0); |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 95 | } |
| 96 | |
| 97 | #ifndef IPPOOL_NOIP6 |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 98 | unsigned long int ippool_hash6(struct in6_addr *addr) |
| 99 | { |
| 100 | return lookup((unsigned char *)addr->u6_addr8, sizeof(addr->u6_addr8), |
| 101 | 0); |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 102 | } |
| 103 | #endif |
| 104 | |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 105 | /* Get IP address and mask */ |
| 106 | int ippool_aton(struct in_addr *addr, struct in_addr *mask, |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 107 | char *pool, int number) |
| 108 | { |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 109 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 110 | /* Parse only first instance of network for now */ |
| 111 | /* Eventually "number" will indicate the token which we want to parse */ |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 112 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 113 | unsigned int a1, a2, a3, a4; |
| 114 | unsigned int m1, m2, m3, m4; |
| 115 | int c; |
| 116 | int m; |
| 117 | int masklog; |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 118 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 119 | c = sscanf(pool, "%u.%u.%u.%u/%u.%u.%u.%u", |
| 120 | &a1, &a2, &a3, &a4, &m1, &m2, &m3, &m4); |
| 121 | switch (c) { |
| 122 | case 4: |
| 123 | mask->s_addr = 0xffffffff; |
| 124 | break; |
| 125 | case 5: |
| 126 | if (m1 > 32) { |
| 127 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, "Invalid mask"); |
| 128 | return -1; /* Invalid mask */ |
| 129 | } |
| 130 | mask->s_addr = htonl(0xffffffff << (32 - m1)); |
| 131 | break; |
| 132 | case 8: |
| 133 | if (m1 >= 256 || m2 >= 256 || m3 >= 256 || m4 >= 256) { |
| 134 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, "Invalid mask"); |
| 135 | return -1; /* Wrong mask format */ |
| 136 | } |
| 137 | m = m1 * 0x1000000 + m2 * 0x10000 + m3 * 0x100 + m4; |
| 138 | for (masklog = 0; ((1 << masklog) < ((~m) + 1)); masklog++) ; |
| 139 | if (((~m) + 1) != (1 << masklog)) { |
| 140 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, "Invalid mask"); |
| 141 | return -1; /* Wrong mask format (not all ones followed by all zeros) */ |
| 142 | } |
| 143 | mask->s_addr = htonl(m); |
| 144 | break; |
| 145 | default: |
| 146 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, "Invalid mask"); |
| 147 | return -1; /* Invalid mask */ |
| 148 | } |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 149 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 150 | if (a1 >= 256 || a2 >= 256 || a3 >= 256 || a4 >= 256) { |
| 151 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 152 | "Wrong IP address format"); |
| 153 | return -1; |
| 154 | } else |
| 155 | addr->s_addr = |
| 156 | htonl(a1 * 0x1000000 + a2 * 0x10000 + a3 * 0x100 + a4); |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 157 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 158 | return 0; |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 159 | } |
| 160 | |
| 161 | /* Create new address pool */ |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 162 | int ippool_new(struct ippool_t **this, char *dyn, char *stat, |
| 163 | int allowdyn, int allowstat, int flags) |
| 164 | { |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 165 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 166 | /* Parse only first instance of pool for now */ |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 167 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 168 | int i; |
| 169 | struct in_addr addr; |
| 170 | struct in_addr mask; |
| 171 | struct in_addr stataddr; |
| 172 | struct in_addr statmask; |
| 173 | unsigned int m; |
| 174 | int listsize; |
| 175 | int dynsize; |
| 176 | unsigned int statsize; |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 177 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 178 | if (!allowdyn) { |
| 179 | dynsize = 0; |
| 180 | } else { |
| 181 | if (ippool_aton(&addr, &mask, dyn, 0)) { |
| 182 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 183 | "Failed to parse dynamic pool"); |
| 184 | return -1; |
| 185 | } |
jjako | c6762cf | 2004-04-28 14:52:58 +0000 | [diff] [blame] | 186 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 187 | /* Set IPPOOL_NONETWORK if IPPOOL_NOGATEWAY is set */ |
| 188 | if (flags & IPPOOL_NOGATEWAY) { |
| 189 | flags |= IPPOOL_NONETWORK; |
| 190 | } |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 191 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 192 | m = ntohl(mask.s_addr); |
| 193 | dynsize = ((~m) + 1); |
| 194 | if (flags & IPPOOL_NONETWORK) /* Exclude network address from pool */ |
| 195 | dynsize--; |
| 196 | if (flags & IPPOOL_NOGATEWAY) /* Exclude gateway address from pool */ |
| 197 | dynsize--; |
| 198 | if (flags & IPPOOL_NOBROADCAST) /* Exclude broadcast address from pool */ |
| 199 | dynsize--; |
| 200 | } |
jjako | c321396 | 2004-09-09 20:23:50 +0000 | [diff] [blame] | 201 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 202 | if (!allowstat) { |
| 203 | statsize = 0; |
| 204 | stataddr.s_addr = 0; |
| 205 | statmask.s_addr = 0; |
| 206 | } else { |
| 207 | if (ippool_aton(&stataddr, &statmask, stat, 0)) { |
| 208 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 209 | "Failed to parse static range"); |
| 210 | return -1; |
| 211 | } |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 212 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 213 | m = ntohl(statmask.s_addr); |
| 214 | statsize = ((~m) + 1); |
| 215 | if (statsize > IPPOOL_STATSIZE) |
| 216 | statsize = IPPOOL_STATSIZE; |
| 217 | } |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 218 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 219 | listsize = dynsize + statsize; /* Allocate space for static IP addresses */ |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 220 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 221 | if (!(*this = calloc(sizeof(struct ippool_t), 1))) { |
| 222 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 223 | "Failed to allocate memory for ippool"); |
| 224 | return -1; |
| 225 | } |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 226 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 227 | (*this)->allowdyn = allowdyn; |
| 228 | (*this)->allowstat = allowstat; |
| 229 | (*this)->stataddr = stataddr; |
| 230 | (*this)->statmask = statmask; |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 231 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 232 | (*this)->listsize += listsize; |
| 233 | if (!((*this)->member = calloc(sizeof(struct ippoolm_t), listsize))) { |
| 234 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 235 | "Failed to allocate memory for members in ippool"); |
| 236 | return -1; |
| 237 | } |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 238 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 239 | for ((*this)->hashlog = 0; |
| 240 | ((1 << (*this)->hashlog) < listsize); (*this)->hashlog++) ; |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 241 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 242 | /* printf ("Hashlog %d %d %d\n", (*this)->hashlog, listsize, (1 << (*this)->hashlog)); */ |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 243 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 244 | /* Determine hashsize */ |
| 245 | (*this)->hashsize = 1 << (*this)->hashlog; /* Fails if mask=0: All Internet */ |
| 246 | (*this)->hashmask = (*this)->hashsize - 1; |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 247 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 248 | /* Allocate hash table */ |
| 249 | if (! |
| 250 | ((*this)->hash = |
| 251 | calloc(sizeof(struct ippoolm_t), (*this)->hashsize))) { |
| 252 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 253 | "Failed to allocate memory for hash members in ippool"); |
| 254 | return -1; |
| 255 | } |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 256 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 257 | (*this)->firstdyn = NULL; |
| 258 | (*this)->lastdyn = NULL; |
| 259 | for (i = 0; i < dynsize; i++) { |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 260 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 261 | if (flags & IPPOOL_NOGATEWAY) |
| 262 | (*this)->member[i].addr.s_addr = |
| 263 | htonl(ntohl(addr.s_addr) + i + 2); |
| 264 | else if (flags & IPPOOL_NONETWORK) |
| 265 | (*this)->member[i].addr.s_addr = |
| 266 | htonl(ntohl(addr.s_addr) + i + 1); |
| 267 | else |
| 268 | (*this)->member[i].addr.s_addr = |
| 269 | htonl(ntohl(addr.s_addr) + i); |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 270 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 271 | (*this)->member[i].inuse = 0; |
| 272 | |
| 273 | /* Insert into list of unused */ |
| 274 | (*this)->member[i].prev = (*this)->lastdyn; |
| 275 | if ((*this)->lastdyn) { |
| 276 | (*this)->lastdyn->next = &((*this)->member[i]); |
| 277 | } else { |
| 278 | (*this)->firstdyn = &((*this)->member[i]); |
| 279 | } |
| 280 | (*this)->lastdyn = &((*this)->member[i]); |
| 281 | (*this)->member[i].next = NULL; /* Redundant */ |
| 282 | |
| 283 | (void)ippool_hashadd(*this, &(*this)->member[i]); |
| 284 | } |
| 285 | |
| 286 | (*this)->firststat = NULL; |
| 287 | (*this)->laststat = NULL; |
| 288 | for (i = dynsize; i < listsize; i++) { |
| 289 | |
| 290 | (*this)->member[i].addr.s_addr = 0; |
| 291 | (*this)->member[i].inuse = 0; |
| 292 | |
| 293 | /* Insert into list of unused */ |
| 294 | (*this)->member[i].prev = (*this)->laststat; |
| 295 | if ((*this)->laststat) { |
| 296 | (*this)->laststat->next = &((*this)->member[i]); |
| 297 | } else { |
| 298 | (*this)->firststat = &((*this)->member[i]); |
| 299 | } |
| 300 | (*this)->laststat = &((*this)->member[i]); |
| 301 | (*this)->member[i].next = NULL; /* Redundant */ |
| 302 | } |
| 303 | |
| 304 | if (0) |
| 305 | (void)ippool_printaddr(*this); |
| 306 | return 0; |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 307 | } |
| 308 | |
| 309 | /* Delete existing address pool */ |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 310 | int ippool_free(struct ippool_t *this) |
| 311 | { |
| 312 | free(this->hash); |
| 313 | free(this->member); |
| 314 | free(this); |
| 315 | return 0; /* Always OK */ |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 316 | } |
| 317 | |
| 318 | /* Find an IP address in the pool */ |
| 319 | int ippool_getip(struct ippool_t *this, struct ippoolm_t **member, |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 320 | struct in_addr *addr) |
| 321 | { |
| 322 | struct ippoolm_t *p; |
| 323 | uint32_t hash; |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 324 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 325 | /* Find in hash table */ |
| 326 | hash = ippool_hash4(addr) & this->hashmask; |
| 327 | for (p = this->hash[hash]; p; p = p->nexthash) { |
| 328 | if ((p->addr.s_addr == addr->s_addr) && (p->inuse)) { |
| 329 | if (member) |
| 330 | *member = p; |
| 331 | return 0; |
| 332 | } |
| 333 | } |
| 334 | if (member) |
| 335 | *member = NULL; |
| 336 | /*sys_err(LOG_ERR, __FILE__, __LINE__, 0, "Address could not be found"); */ |
| 337 | return -1; |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 338 | } |
| 339 | |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 340 | /** |
| 341 | * ippool_newip |
| 342 | * Get an IP address. If addr = 0.0.0.0 get a dynamic IP address. Otherwise |
| 343 | * check to see if the given address is available. If available within |
| 344 | * dynamic address space allocate it there, otherwise allocate within static |
| 345 | * address space. |
| 346 | **/ |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 347 | int ippool_newip(struct ippool_t *this, struct ippoolm_t **member, |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 348 | struct in_addr *addr, int statip) |
| 349 | { |
| 350 | struct ippoolm_t *p; |
| 351 | struct ippoolm_t *p2 = NULL; |
| 352 | uint32_t hash; |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 353 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 354 | /* If static: |
| 355 | * Look in dynaddr. |
| 356 | * If found remove from firstdyn/lastdyn linked list. |
| 357 | * Else allocate from stataddr. |
| 358 | * Remove from firststat/laststat linked list. |
| 359 | * Insert into hash table. |
| 360 | * |
| 361 | * If dynamic |
| 362 | * Remove from firstdyn/lastdyn linked list. |
| 363 | * |
| 364 | */ |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 365 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 366 | if (0) |
| 367 | (void)ippool_printaddr(this); |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 368 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 369 | /* First check to see if this type of address is allowed */ |
| 370 | if ((addr) && (addr->s_addr) && statip) { /* IP address given */ |
| 371 | if (!this->allowstat) { |
| 372 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 373 | "Static IP address not allowed"); |
| 374 | return -1; |
| 375 | } |
| 376 | if ((addr->s_addr & this->statmask.s_addr) != |
| 377 | this->stataddr.s_addr) { |
| 378 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 379 | "Static out of range"); |
| 380 | return -1; |
| 381 | } |
| 382 | } else { |
| 383 | if (!this->allowdyn) { |
| 384 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 385 | "Dynamic IP address not allowed"); |
| 386 | return -1; |
| 387 | } |
| 388 | } |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 389 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 390 | /* If IP address given try to find it in dynamic address pool */ |
| 391 | if ((addr) && (addr->s_addr)) { /* IP address given */ |
| 392 | /* Find in hash table */ |
| 393 | hash = ippool_hash4(addr) & this->hashmask; |
| 394 | for (p = this->hash[hash]; p; p = p->nexthash) { |
| 395 | if ((p->addr.s_addr == addr->s_addr)) { |
| 396 | p2 = p; |
| 397 | break; |
| 398 | } |
| 399 | } |
| 400 | } |
jjako | ada9ffa | 2004-12-30 16:39:11 +0000 | [diff] [blame] | 401 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 402 | /* If IP was already allocated we can not use it */ |
| 403 | if ((!statip) && (p2) && (p2->inuse)) { |
| 404 | p2 = NULL; |
| 405 | } |
jjako | ada9ffa | 2004-12-30 16:39:11 +0000 | [diff] [blame] | 406 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 407 | /* If not found yet and dynamic IP then allocate dynamic IP */ |
| 408 | if ((!p2) && (!statip)) { |
| 409 | if (!this->firstdyn) { |
| 410 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 411 | "No more IP addresses available"); |
| 412 | return -1; |
| 413 | } else |
| 414 | p2 = this->firstdyn; |
| 415 | } |
jjako | c321396 | 2004-09-09 20:23:50 +0000 | [diff] [blame] | 416 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 417 | if (p2) { /* Was allocated from dynamic address pool */ |
| 418 | if (p2->inuse) { |
| 419 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 420 | "IP address allready in use"); |
| 421 | return -1; /* Allready in use / Should not happen */ |
| 422 | } |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 423 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 424 | /* Remove from linked list of free dynamic addresses */ |
| 425 | if (p2->prev) |
| 426 | p2->prev->next = p2->next; |
| 427 | else |
| 428 | this->firstdyn = p2->next; |
| 429 | if (p2->next) |
| 430 | p2->next->prev = p2->prev; |
| 431 | else |
| 432 | this->lastdyn = p2->prev; |
| 433 | p2->next = NULL; |
| 434 | p2->prev = NULL; |
| 435 | p2->inuse = 1; /* Dynamic address in use */ |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 436 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 437 | *member = p2; |
| 438 | if (0) |
| 439 | (void)ippool_printaddr(this); |
| 440 | return 0; /* Success */ |
| 441 | } |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 442 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 443 | /* It was not possible to allocate from dynamic address pool */ |
| 444 | /* Try to allocate from static address space */ |
jjako | 88c2216 | 2003-07-06 19:33:18 +0000 | [diff] [blame] | 445 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 446 | if ((addr) && (addr->s_addr) && (statip)) { /* IP address given */ |
| 447 | if (!this->firststat) { |
| 448 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 449 | "No more IP addresses available"); |
| 450 | return -1; /* No more available */ |
| 451 | } else |
| 452 | p2 = this->firststat; |
| 453 | |
| 454 | /* Remove from linked list of free static addresses */ |
| 455 | if (p2->prev) |
| 456 | p2->prev->next = p2->next; |
| 457 | else |
| 458 | this->firststat = p2->next; |
| 459 | if (p2->next) |
| 460 | p2->next->prev = p2->prev; |
| 461 | else |
| 462 | this->laststat = p2->prev; |
| 463 | p2->next = NULL; |
| 464 | p2->prev = NULL; |
| 465 | p2->inuse = 2; /* Static address in use */ |
| 466 | memcpy(&p2->addr, addr, sizeof(addr)); |
| 467 | *member = p2; |
| 468 | (void)ippool_hashadd(this, *member); |
| 469 | if (0) |
| 470 | (void)ippool_printaddr(this); |
| 471 | return 0; /* Success */ |
| 472 | } |
| 473 | |
| 474 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 475 | "Could not allocate IP address"); |
| 476 | return -1; /* Should never get here. TODO: Bad code */ |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 477 | } |
| 478 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 479 | int ippool_freeip(struct ippool_t *this, struct ippoolm_t *member) |
| 480 | { |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 481 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 482 | if (0) |
| 483 | (void)ippool_printaddr(this); |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 484 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 485 | if (!member->inuse) { |
| 486 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, "Address not in use"); |
| 487 | return -1; /* Not in use: Should not happen */ |
| 488 | } |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 489 | |
Harald Welte | bed35df | 2011-11-02 13:06:18 +0100 | [diff] [blame] | 490 | switch (member->inuse) { |
| 491 | case 0: /* Not in use: Should not happen */ |
| 492 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, "Address not in use"); |
| 493 | return -1; |
| 494 | case 1: /* Allocated from dynamic address space */ |
| 495 | /* Insert into list of unused */ |
| 496 | member->prev = this->lastdyn; |
| 497 | if (this->lastdyn) { |
| 498 | this->lastdyn->next = member; |
| 499 | } else { |
| 500 | this->firstdyn = member; |
| 501 | } |
| 502 | this->lastdyn = member; |
| 503 | |
| 504 | member->inuse = 0; |
| 505 | member->peer = NULL; |
| 506 | if (0) |
| 507 | (void)ippool_printaddr(this); |
| 508 | return 0; |
| 509 | case 2: /* Allocated from static address space */ |
| 510 | if (ippool_hashdel(this, member)) |
| 511 | return -1; |
| 512 | /* Insert into list of unused */ |
| 513 | member->prev = this->laststat; |
| 514 | if (this->laststat) { |
| 515 | this->laststat->next = member; |
| 516 | } else { |
| 517 | this->firststat = member; |
| 518 | } |
| 519 | this->laststat = member; |
| 520 | |
| 521 | member->inuse = 0; |
| 522 | member->addr.s_addr = 0; |
| 523 | member->peer = NULL; |
| 524 | member->nexthash = NULL; |
| 525 | if (0) |
| 526 | (void)ippool_printaddr(this); |
| 527 | return 0; |
| 528 | default: /* Should not happen */ |
| 529 | sys_err(LOG_ERR, __FILE__, __LINE__, 0, |
| 530 | "Could not free IP address"); |
| 531 | return -1; |
| 532 | } |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 533 | } |
| 534 | |
jjako | a7cd249 | 2003-04-11 09:40:12 +0000 | [diff] [blame] | 535 | #ifndef IPPOOL_NOIP6 |
| 536 | extern unsigned long int ippool_hash6(struct in6_addr *addr); |
| 537 | extern int ippool_getip6(struct ippool_t *this, struct in6_addr *addr); |
| 538 | extern int ippool_returnip6(struct ippool_t *this, struct in6_addr *addr); |
| 539 | #endif |