1 /* 2 * em_ipset.c IPset Ematch 3 * 4 * (C) 2012 Florian Westphal <fw (at) strlen.de> 5 * 6 * Parts taken from iptables libxt_set.h: 7 * Copyright (C) 2000-2002 Joakim Axelsson <gozem (at) linux.nu> 8 * Patrick Schaaf <bof (at) bof.de> 9 * Martin Josefsson <gandalf (at) wlug.westbo.se> 10 * Copyright (C) 2003-2010 Jozsef Kadlecsik <kadlec (at) blackhole.kfki.hu> 11 * 12 * This program is free software; you can redistribute it and/or modify 13 * it under the terms of the GNU General Public License version 2 as 14 * published by the Free Software Foundation. 15 */ 16 17 #include <stdbool.h> 18 #include <stdio.h> 19 #include <errno.h> 20 #include <netdb.h> 21 #include <unistd.h> 22 #include <string.h> 23 #include <stdlib.h> 24 #include <getopt.h> 25 26 #include <xtables.h> 27 #include <linux/netfilter/ipset/ip_set.h> 28 29 #ifndef IPSET_INVALID_ID 30 typedef __u16 ip_set_id_t; 31 32 enum ip_set_dim { 33 IPSET_DIM_ZERO = 0, 34 IPSET_DIM_ONE, 35 IPSET_DIM_TWO, 36 IPSET_DIM_THREE, 37 IPSET_DIM_MAX = 6, 38 }; 39 #endif /* IPSET_INVALID_ID */ 40 41 #include <linux/netfilter/xt_set.h> 42 #include "m_ematch.h" 43 44 #ifndef IPSET_INVALID_ID 45 #define IPSET_INVALID_ID 65535 46 #define SO_IP_SET 83 47 48 union ip_set_name_index { 49 char name[IPSET_MAXNAMELEN]; 50 __u16 index; 51 }; 52 53 #define IP_SET_OP_GET_BYNAME 0x00000006 /* Get set index by name */ 54 struct ip_set_req_get_set { 55 unsigned int op; 56 unsigned int version; 57 union ip_set_name_index set; 58 }; 59 60 #define IP_SET_OP_GET_BYINDEX 0x00000007 /* Get set name by index */ 61 /* Uses ip_set_req_get_set */ 62 63 #define IP_SET_OP_VERSION 0x00000100 /* Ask kernel version */ 64 struct ip_set_req_version { 65 unsigned int op; 66 unsigned int version; 67 }; 68 #endif /* IPSET_INVALID_ID */ 69 70 extern struct ematch_util ipset_ematch_util; 71 72 static int get_version(unsigned int *version) 73 { 74 int res, sockfd = socket(AF_INET, SOCK_RAW, IPPROTO_RAW); 75 struct ip_set_req_version req_version; 76 socklen_t size = sizeof(req_version); 77 78 if (sockfd < 0) { 79 fputs("Can't open socket to ipset.\n", stderr); 80 return -1; 81 } 82 83 req_version.op = IP_SET_OP_VERSION; 84 res = getsockopt(sockfd, SOL_IP, SO_IP_SET, &req_version, &size); 85 if (res != 0) { 86 perror("xt_set getsockopt"); 87 close(sockfd); 88 return -1; 89 } 90 91 *version = req_version.version; 92 return sockfd; 93 } 94 95 static int do_getsockopt(struct ip_set_req_get_set *req) 96 { 97 int sockfd, res; 98 socklen_t size = sizeof(struct ip_set_req_get_set); 99 100 sockfd = get_version(&req->version); 101 if (sockfd < 0) 102 return -1; 103 res = getsockopt(sockfd, SOL_IP, SO_IP_SET, req, &size); 104 if (res != 0) 105 perror("Problem when communicating with ipset"); 106 close(sockfd); 107 if (res != 0) 108 return -1; 109 110 if (size != sizeof(struct ip_set_req_get_set)) { 111 fprintf(stderr, 112 "Incorrect return size from kernel during ipset lookup, (want %zu, got %zu)\n", 113 sizeof(struct ip_set_req_get_set), (size_t)size); 114 return -1; 115 } 116 117 return res; 118 } 119 120 static int 121 get_set_byid(char *setname, unsigned int idx) 122 { 123 struct ip_set_req_get_set req; 124 int res; 125 126 req.op = IP_SET_OP_GET_BYINDEX; 127 req.set.index = idx; 128 res = do_getsockopt(&req); 129 if (res != 0) 130 return -1; 131 if (req.set.name[0] == '\0') { 132 fprintf(stderr, 133 "Set with index %i in kernel doesn't exist.\n", idx); 134 return -1; 135 } 136 137 strncpy(setname, req.set.name, IPSET_MAXNAMELEN); 138 return 0; 139 } 140 141 static int 142 get_set_byname(const char *setname, struct xt_set_info *info) 143 { 144 struct ip_set_req_get_set req; 145 int res; 146 147 req.op = IP_SET_OP_GET_BYNAME; 148 strlcpy(req.set.name, setname, IPSET_MAXNAMELEN); 149 res = do_getsockopt(&req); 150 if (res != 0) 151 return -1; 152 if (req.set.index == IPSET_INVALID_ID) 153 return -1; 154 info->index = req.set.index; 155 return 0; 156 } 157 158 static int 159 parse_dirs(const char *opt_arg, struct xt_set_info *info) 160 { 161 char *saved = strdup(opt_arg); 162 char *ptr, *tmp = saved; 163 164 if (!tmp) { 165 perror("strdup"); 166 return -1; 167 } 168 169 while (info->dim < IPSET_DIM_MAX && tmp != NULL) { 170 info->dim++; 171 ptr = strsep(&tmp, ","); 172 if (strncmp(ptr, "src", 3) == 0) 173 info->flags |= (1 << info->dim); 174 else if (strncmp(ptr, "dst", 3) != 0) { 175 fputs("You must specify (the comma separated list of) 'src' or 'dst'\n", stderr); 176 free(saved); 177 return -1; 178 } 179 } 180 181 if (tmp) 182 fprintf(stderr, "Can't be more src/dst options than %u", IPSET_DIM_MAX); 183 free(saved); 184 return tmp ? -1 : 0; 185 } 186 187 static void ipset_print_usage(FILE *fd) 188 { 189 fprintf(fd, 190 "Usage: ipset(SETNAME FLAGS)\n" \ 191 "where: SETNAME:= string\n" \ 192 " FLAGS := { FLAG[,FLAGS] }\n" \ 193 " FLAG := { src | dst }\n" \ 194 "\n" \ 195 "Example: 'ipset(bulk src,dst)'\n"); 196 } 197 198 static int ipset_parse_eopt(struct nlmsghdr *n, struct tcf_ematch_hdr *hdr, 199 struct bstr *args) 200 { 201 struct xt_set_info set_info = {}; 202 int ret; 203 204 #define PARSE_ERR(CARG, FMT, ARGS...) \ 205 em_parse_error(EINVAL, args, CARG, &ipset_ematch_util, FMT, ##ARGS) 206 207 if (args == NULL) 208 return PARSE_ERR(args, "ipset: missing set name"); 209 210 if (args->len >= IPSET_MAXNAMELEN) 211 return PARSE_ERR(args, "ipset: set name too long (max %u)", IPSET_MAXNAMELEN - 1); 212 ret = get_set_byname(args->data, &set_info); 213 if (ret < 0) 214 return PARSE_ERR(args, "ipset: unknown set name '%s'", args->data); 215 216 if (args->next == NULL) 217 return PARSE_ERR(args, "ipset: missing set flags"); 218 219 args = bstr_next(args); 220 if (parse_dirs(args->data, &set_info)) 221 return PARSE_ERR(args, "ipset: error parsing set flags"); 222 223 if (args->next) { 224 args = bstr_next(args); 225 return PARSE_ERR(args, "ipset: unknown parameter"); 226 } 227 228 addraw_l(n, MAX_MSG, hdr, sizeof(*hdr)); 229 addraw_l(n, MAX_MSG, &set_info, sizeof(set_info)); 230 231 #undef PARSE_ERR 232 return 0; 233 } 234 235 static int ipset_print_eopt(FILE *fd, struct tcf_ematch_hdr *hdr, void *data, 236 int data_len) 237 { 238 int i; 239 char setname[IPSET_MAXNAMELEN]; 240 const struct xt_set_info *set_info = data; 241 242 if (data_len != sizeof(*set_info)) { 243 fprintf(stderr, "xt_set_info struct size mismatch\n"); 244 return -1; 245 } 246 247 if (get_set_byid(setname, set_info->index)) 248 return -1; 249 fputs(setname, fd); 250 for (i = 1; i <= set_info->dim; i++) { 251 fprintf(fd, "%s%s", i == 1 ? " " : ",", set_info->flags & (1 << i) ? "src" : "dst"); 252 } 253 254 return 0; 255 } 256 257 struct ematch_util ipset_ematch_util = { 258 .kind = "ipset", 259 .kind_num = TCF_EM_IPSET, 260 .parse_eopt = ipset_parse_eopt, 261 .print_eopt = ipset_print_eopt, 262 .print_usage = ipset_print_usage 263 }; 264