1 /******************************************************************************/
2 /* pfixtools: a collection of postfix related tools */
4 /* ________________________________________________________________________ */
6 /* Redistribution and use in source and binary forms, with or without */
7 /* modification, are permitted provided that the following conditions */
10 /* 1. Redistributions of source code must retain the above copyright */
11 /* notice, this list of conditions and the following disclaimer. */
12 /* 2. Redistributions in binary form must reproduce the above copyright */
13 /* notice, this list of conditions and the following disclaimer in the */
14 /* documentation and/or other materials provided with the distribution. */
15 /* 3. The names of its contributors may not be used to endorse or promote */
16 /* products derived from this software without specific prior written */
19 /* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND */
20 /* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE */
21 /* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR */
22 /* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS */
23 /* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR */
24 /* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF */
25 /* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS */
26 /* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN */
27 /* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) */
28 /* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF */
29 /* THE POSSIBILITY OF SUCH DAMAGE. */
30 /******************************************************************************/
33 * Copyright © 2007 Pierre Habouzit
34 * Copyright © 2008 Florent Bruneau
37 #include <arpa/inet.h>
39 #include <netinet/in.h>
48 #define IPv4_PREFIX(ip) ((uint32_t)(ip) >> IPv4_BITS)
49 #define IPv4_SUFFIX(ip) ((uint32_t)(ip) & ((1 << IPv4_BITS) - 1))
50 #define NODE(db, i) ((db)->tree + (i))
67 static int get_o(const char *s, const char **out)
71 if (*s < '0' || *s > '9')
75 if (*s < '0' || *s > '9')
78 res = res * 10 + *s++ - '0';
79 if (*s < '0' || *s > '9')
82 res = res * 10 + *s++ - '0';
83 if (!(*s < '0' || *s > '9') || res < 100)
91 static int parse_ipv4(const char *s, const char **out, uint32_t *ip)
96 if ((o & ~0xff) || *s++ != '.')
101 if ((o & ~0xff) || *s++ != '.')
106 if ((o & ~0xff) || *s++ != '.')
119 rbldb_t *rbldb_create(const char *file, bool lock)
122 const char *map, *p, *end;
126 fd = open(file, O_RDONLY, 0000);
132 if (fstat(fd, &st) < 0) {
138 p = map = mmap(NULL, st.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
139 if (map == MAP_FAILED) {
146 end = map + st.st_size;
147 while (end > map && end[-1] != '\n') {
150 if (end != map + st.st_size) {
151 syslog(LOG_WARNING, "file %s miss a final \\n, ignoring last line",
155 db = p_new(rbldb_t, 1);
159 while (*p == ' ' || *p == '\t' || *p == '\r')
162 if (parse_ipv4(p, &p, &ip) < 0) {
163 p = (char *)memchr(p, '\n', end - p) + 1;
165 if (db->len >= db->size) {
166 db->size += 64 * 1024;
167 p_realloc(&db->ips, db->size);
169 db->ips[db->len++] = ip;
172 munmap((void*)map, st.st_size);
174 /* Lookup may perform serveral I/O, so avoid swap.
176 db->locked = lock && mlock(db->ips, db->len * sizeof(*(db->ips))) == 0;
177 if (lock && !db->locked) {
182 # define QSORT_TYPE uint32_t
183 # define QSORT_BASE db->ips
184 # define QSORT_NELT db->len
185 # define QSORT_LT(a,b) *a < *b
189 syslog(LOG_INFO, "rbl %s loaded, %d IPs", file, db->len);
193 void rbldb_delete(rbldb_t **db)
197 (void)munlock((*db)->ips, (*db)->len * sizeof(*(*db)->ips));
199 p_delete(&(*db)->ips);
204 uint32_t rbldb_stats(rbldb_t *rbl)
209 bool rbldb_ipv4_lookup(rbldb_t *db, uint32_t ip)
211 int l = 0, r = db->len;
216 if (db->ips[i] == ip)
219 if (ip < db->ips[i]) {