1 /* Copyright (C) 2000-2002 Joakim Axelsson <gozem@linux.nu>
2  *                         Patrick Schaaf <bof@bof.de>
3  * Copyright (C) 2003-2013 Jozsef Kadlecsik <kadlec@blackhole.kfki.hu>
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License version 2 as
7  * published by the Free Software Foundation.
8  */
9 
10 /* Kernel module for IP set management */
11 
12 #include <linux/init.h>
13 #include <linux/module.h>
14 #include <linux/moduleparam.h>
15 #include <linux/ip.h>
16 #include <linux/skbuff.h>
17 #include <linux/spinlock.h>
18 #include <linux/rculist.h>
19 #include <net/netlink.h>
20 #include <net/net_namespace.h>
21 #include <net/netns/generic.h>
22 
23 #include <linux/netfilter.h>
24 #include <linux/netfilter/x_tables.h>
25 #include <linux/netfilter/nfnetlink.h>
26 #include <linux/netfilter/ipset/ip_set.h>
27 
28 static LIST_HEAD(ip_set_type_list);		/* all registered set types */
29 static DEFINE_MUTEX(ip_set_type_mutex);		/* protects ip_set_type_list */
30 static DEFINE_RWLOCK(ip_set_ref_lock);		/* protects the set refs */
31 
32 struct ip_set_net {
33 	struct ip_set * __rcu *ip_set_list;	/* all individual sets */
34 	ip_set_id_t	ip_set_max;	/* max number of sets */
35 	bool		is_deleted;	/* deleted by ip_set_net_exit */
36 	bool		is_destroyed;	/* all sets are destroyed */
37 };
38 
39 static unsigned int ip_set_net_id __read_mostly;
40 
41 static inline struct ip_set_net *ip_set_pernet(struct net *net)
42 {
43 	return net_generic(net, ip_set_net_id);
44 }
45 
46 #define IP_SET_INC	64
47 #define STRNCMP(a, b)	(strncmp(a, b, IPSET_MAXNAMELEN) == 0)
48 
49 static unsigned int max_sets;
50 
51 module_param(max_sets, int, 0600);
52 MODULE_PARM_DESC(max_sets, "maximal number of sets");
53 MODULE_LICENSE("GPL");
54 MODULE_AUTHOR("Jozsef Kadlecsik <kadlec@blackhole.kfki.hu>");
55 MODULE_DESCRIPTION("core IP set support");
56 MODULE_ALIAS_NFNL_SUBSYS(NFNL_SUBSYS_IPSET);
57 
58 /* When the nfnl mutex is held: */
59 #define ip_set_dereference(p)		\
60 	rcu_dereference_protected(p, 1)
61 #define ip_set(inst, id)		\
62 	ip_set_dereference((inst)->ip_set_list)[id]
63 
64 /* The set types are implemented in modules and registered set types
65  * can be found in ip_set_type_list. Adding/deleting types is
66  * serialized by ip_set_type_mutex.
67  */
68 
69 static inline void
70 ip_set_type_lock(void)
71 {
72 	mutex_lock(&ip_set_type_mutex);
73 }
74 
75 static inline void
76 ip_set_type_unlock(void)
77 {
78 	mutex_unlock(&ip_set_type_mutex);
79 }
80 
81 /* Register and deregister settype */
82 
83 static struct ip_set_type *
84 find_set_type(const char *name, u8 family, u8 revision)
85 {
86 	struct ip_set_type *type;
87 
88 	list_for_each_entry_rcu(type, &ip_set_type_list, list)
89 		if (STRNCMP(type->name, name) &&
90 		    (type->family == family ||
91 		     type->family == NFPROTO_UNSPEC) &&
92 		    revision >= type->revision_min &&
93 		    revision <= type->revision_max)
94 			return type;
95 	return NULL;
96 }
97 
98 /* Unlock, try to load a set type module and lock again */
99 static bool
100 load_settype(const char *name)
101 {
102 	nfnl_unlock(NFNL_SUBSYS_IPSET);
103 	pr_debug("try to load ip_set_%s\n", name);
104 	if (request_module("ip_set_%s", name) < 0) {
105 		pr_warn("Can't find ip_set type %s\n", name);
106 		nfnl_lock(NFNL_SUBSYS_IPSET);
107 		return false;
108 	}
109 	nfnl_lock(NFNL_SUBSYS_IPSET);
110 	return true;
111 }
112 
113 /* Find a set type and reference it */
114 #define find_set_type_get(name, family, revision, found)	\
115 	__find_set_type_get(name, family, revision, found, false)
116 
117 static int
118 __find_set_type_get(const char *name, u8 family, u8 revision,
119 		    struct ip_set_type **found, bool retry)
120 {
121 	struct ip_set_type *type;
122 	int err;
123 
124 	if (retry && !load_settype(name))
125 		return -IPSET_ERR_FIND_TYPE;
126 
127 	rcu_read_lock();
128 	*found = find_set_type(name, family, revision);
129 	if (*found) {
130 		err = !try_module_get((*found)->me) ? -EFAULT : 0;
131 		goto unlock;
132 	}
133 	/* Make sure the type is already loaded
134 	 * but we don't support the revision
135 	 */
136 	list_for_each_entry_rcu(type, &ip_set_type_list, list)
137 		if (STRNCMP(type->name, name)) {
138 			err = -IPSET_ERR_FIND_TYPE;
139 			goto unlock;
140 		}
141 	rcu_read_unlock();
142 
143 	return retry ? -IPSET_ERR_FIND_TYPE :
144 		__find_set_type_get(name, family, revision, found, true);
145 
146 unlock:
147 	rcu_read_unlock();
148 	return err;
149 }
150 
151 /* Find a given set type by name and family.
152  * If we succeeded, the supported minimal and maximum revisions are
153  * filled out.
154  */
155 #define find_set_type_minmax(name, family, min, max) \
156 	__find_set_type_minmax(name, family, min, max, false)
157 
158 static int
159 __find_set_type_minmax(const char *name, u8 family, u8 *min, u8 *max,
160 		       bool retry)
161 {
162 	struct ip_set_type *type;
163 	bool found = false;
164 
165 	if (retry && !load_settype(name))
166 		return -IPSET_ERR_FIND_TYPE;
167 
168 	*min = 255; *max = 0;
169 	rcu_read_lock();
170 	list_for_each_entry_rcu(type, &ip_set_type_list, list)
171 		if (STRNCMP(type->name, name) &&
172 		    (type->family == family ||
173 		     type->family == NFPROTO_UNSPEC)) {
174 			found = true;
175 			if (type->revision_min < *min)
176 				*min = type->revision_min;
177 			if (type->revision_max > *max)
178 				*max = type->revision_max;
179 		}
180 	rcu_read_unlock();
181 	if (found)
182 		return 0;
183 
184 	return retry ? -IPSET_ERR_FIND_TYPE :
185 		__find_set_type_minmax(name, family, min, max, true);
186 }
187 
188 #define family_name(f)	((f) == NFPROTO_IPV4 ? "inet" : \
189 			 (f) == NFPROTO_IPV6 ? "inet6" : "any")
190 
191 /* Register a set type structure. The type is identified by
192  * the unique triple of name, family and revision.
193  */
194 int
195 ip_set_type_register(struct ip_set_type *type)
196 {
197 	int ret = 0;
198 
199 	if (type->protocol != IPSET_PROTOCOL) {
200 		pr_warn("ip_set type %s, family %s, revision %u:%u uses wrong protocol version %u (want %u)\n",
201 			type->name, family_name(type->family),
202 			type->revision_min, type->revision_max,
203 			type->protocol, IPSET_PROTOCOL);
204 		return -EINVAL;
205 	}
206 
207 	ip_set_type_lock();
208 	if (find_set_type(type->name, type->family, type->revision_min)) {
209 		/* Duplicate! */
210 		pr_warn("ip_set type %s, family %s with revision min %u already registered!\n",
211 			type->name, family_name(type->family),
212 			type->revision_min);
213 		ip_set_type_unlock();
214 		return -EINVAL;
215 	}
216 	list_add_rcu(&type->list, &ip_set_type_list);
217 	pr_debug("type %s, family %s, revision %u:%u registered.\n",
218 		 type->name, family_name(type->family),
219 		 type->revision_min, type->revision_max);
220 	ip_set_type_unlock();
221 
222 	return ret;
223 }
224 EXPORT_SYMBOL_GPL(ip_set_type_register);
225 
226 /* Unregister a set type. There's a small race with ip_set_create */
227 void
228 ip_set_type_unregister(struct ip_set_type *type)
229 {
230 	ip_set_type_lock();
231 	if (!find_set_type(type->name, type->family, type->revision_min)) {
232 		pr_warn("ip_set type %s, family %s with revision min %u not registered\n",
233 			type->name, family_name(type->family),
234 			type->revision_min);
235 		ip_set_type_unlock();
236 		return;
237 	}
238 	list_del_rcu(&type->list);
239 	pr_debug("type %s, family %s with revision min %u unregistered.\n",
240 		 type->name, family_name(type->family), type->revision_min);
241 	ip_set_type_unlock();
242 
243 	synchronize_rcu();
244 }
245 EXPORT_SYMBOL_GPL(ip_set_type_unregister);
246 
247 /* Utility functions */
248 void *
249 ip_set_alloc(size_t size)
250 {
251 	void *members = NULL;
252 
253 	if (size < KMALLOC_MAX_SIZE)
254 		members = kzalloc(size, GFP_KERNEL | __GFP_NOWARN);
255 
256 	if (members) {
257 		pr_debug("%p: allocated with kmalloc\n", members);
258 		return members;
259 	}
260 
261 	members = vzalloc(size);
262 	if (!members)
263 		return NULL;
264 	pr_debug("%p: allocated with vmalloc\n", members);
265 
266 	return members;
267 }
268 EXPORT_SYMBOL_GPL(ip_set_alloc);
269 
270 void
271 ip_set_free(void *members)
272 {
273 	pr_debug("%p: free with %s\n", members,
274 		 is_vmalloc_addr(members) ? "vfree" : "kfree");
275 	kvfree(members);
276 }
277 EXPORT_SYMBOL_GPL(ip_set_free);
278 
279 static inline bool
280 flag_nested(const struct nlattr *nla)
281 {
282 	return nla->nla_type & NLA_F_NESTED;
283 }
284 
285 static const struct nla_policy ipaddr_policy[IPSET_ATTR_IPADDR_MAX + 1] = {
286 	[IPSET_ATTR_IPADDR_IPV4]	= { .type = NLA_U32 },
287 	[IPSET_ATTR_IPADDR_IPV6]	= { .type = NLA_BINARY,
288 					    .len = sizeof(struct in6_addr) },
289 };
290 
291 int
292 ip_set_get_ipaddr4(struct nlattr *nla,  __be32 *ipaddr)
293 {
294 	struct nlattr *tb[IPSET_ATTR_IPADDR_MAX + 1];
295 
296 	if (unlikely(!flag_nested(nla)))
297 		return -IPSET_ERR_PROTOCOL;
298 	if (nla_parse_nested(tb, IPSET_ATTR_IPADDR_MAX, nla, ipaddr_policy))
299 		return -IPSET_ERR_PROTOCOL;
300 	if (unlikely(!ip_set_attr_netorder(tb, IPSET_ATTR_IPADDR_IPV4)))
301 		return -IPSET_ERR_PROTOCOL;
302 
303 	*ipaddr = nla_get_be32(tb[IPSET_ATTR_IPADDR_IPV4]);
304 	return 0;
305 }
306 EXPORT_SYMBOL_GPL(ip_set_get_ipaddr4);
307 
308 int
309 ip_set_get_ipaddr6(struct nlattr *nla, union nf_inet_addr *ipaddr)
310 {
311 	struct nlattr *tb[IPSET_ATTR_IPADDR_MAX + 1];
312 
313 	if (unlikely(!flag_nested(nla)))
314 		return -IPSET_ERR_PROTOCOL;
315 
316 	if (nla_parse_nested(tb, IPSET_ATTR_IPADDR_MAX, nla, ipaddr_policy))
317 		return -IPSET_ERR_PROTOCOL;
318 	if (unlikely(!ip_set_attr_netorder(tb, IPSET_ATTR_IPADDR_IPV6)))
319 		return -IPSET_ERR_PROTOCOL;
320 
321 	memcpy(ipaddr, nla_data(tb[IPSET_ATTR_IPADDR_IPV6]),
322 	       sizeof(struct in6_addr));
323 	return 0;
324 }
325 EXPORT_SYMBOL_GPL(ip_set_get_ipaddr6);
326 
327 typedef void (*destroyer)(struct ip_set *, void *);
328 /* ipset data extension types, in size order */
329 
330 const struct ip_set_ext_type ip_set_extensions[] = {
331 	[IPSET_EXT_ID_COUNTER] = {
332 		.type	= IPSET_EXT_COUNTER,
333 		.flag	= IPSET_FLAG_WITH_COUNTERS,
334 		.len	= sizeof(struct ip_set_counter),
335 		.align	= __alignof__(struct ip_set_counter),
336 	},
337 	[IPSET_EXT_ID_TIMEOUT] = {
338 		.type	= IPSET_EXT_TIMEOUT,
339 		.len	= sizeof(unsigned long),
340 		.align	= __alignof__(unsigned long),
341 	},
342 	[IPSET_EXT_ID_SKBINFO] = {
343 		.type	= IPSET_EXT_SKBINFO,
344 		.flag	= IPSET_FLAG_WITH_SKBINFO,
345 		.len	= sizeof(struct ip_set_skbinfo),
346 		.align	= __alignof__(struct ip_set_skbinfo),
347 	},
348 	[IPSET_EXT_ID_COMMENT] = {
349 		.type	 = IPSET_EXT_COMMENT | IPSET_EXT_DESTROY,
350 		.flag	 = IPSET_FLAG_WITH_COMMENT,
351 		.len	 = sizeof(struct ip_set_comment),
352 		.align	 = __alignof__(struct ip_set_comment),
353 		.destroy = (destroyer) ip_set_comment_free,
354 	},
355 };
356 EXPORT_SYMBOL_GPL(ip_set_extensions);
357 
358 static inline bool
359 add_extension(enum ip_set_ext_id id, u32 flags, struct nlattr *tb[])
360 {
361 	return ip_set_extensions[id].flag ?
362 		(flags & ip_set_extensions[id].flag) :
363 		!!tb[IPSET_ATTR_TIMEOUT];
364 }
365 
366 size_t
367 ip_set_elem_len(struct ip_set *set, struct nlattr *tb[], size_t len,
368 		size_t align)
369 {
370 	enum ip_set_ext_id id;
371 	u32 cadt_flags = 0;
372 
373 	if (tb[IPSET_ATTR_CADT_FLAGS])
374 		cadt_flags = ip_set_get_h32(tb[IPSET_ATTR_CADT_FLAGS]);
375 	if (cadt_flags & IPSET_FLAG_WITH_FORCEADD)
376 		set->flags |= IPSET_CREATE_FLAG_FORCEADD;
377 	if (!align)
378 		align = 1;
379 	for (id = 0; id < IPSET_EXT_ID_MAX; id++) {
380 		if (!add_extension(id, cadt_flags, tb))
381 			continue;
382 		len = ALIGN(len, ip_set_extensions[id].align);
383 		set->offset[id] = len;
384 		set->extensions |= ip_set_extensions[id].type;
385 		len += ip_set_extensions[id].len;
386 	}
387 	return ALIGN(len, align);
388 }
389 EXPORT_SYMBOL_GPL(ip_set_elem_len);
390 
391 int
392 ip_set_get_extensions(struct ip_set *set, struct nlattr *tb[],
393 		      struct ip_set_ext *ext)
394 {
395 	u64 fullmark;
396 
397 	if (unlikely(!ip_set_optattr_netorder(tb, IPSET_ATTR_TIMEOUT) ||
398 		     !ip_set_optattr_netorder(tb, IPSET_ATTR_PACKETS) ||
399 		     !ip_set_optattr_netorder(tb, IPSET_ATTR_BYTES) ||
400 		     !ip_set_optattr_netorder(tb, IPSET_ATTR_SKBMARK) ||
401 		     !ip_set_optattr_netorder(tb, IPSET_ATTR_SKBPRIO) ||
402 		     !ip_set_optattr_netorder(tb, IPSET_ATTR_SKBQUEUE)))
403 		return -IPSET_ERR_PROTOCOL;
404 
405 	if (tb[IPSET_ATTR_TIMEOUT]) {
406 		if (!SET_WITH_TIMEOUT(set))
407 			return -IPSET_ERR_TIMEOUT;
408 		ext->timeout = ip_set_timeout_uget(tb[IPSET_ATTR_TIMEOUT]);
409 	}
410 	if (tb[IPSET_ATTR_BYTES] || tb[IPSET_ATTR_PACKETS]) {
411 		if (!SET_WITH_COUNTER(set))
412 			return -IPSET_ERR_COUNTER;
413 		if (tb[IPSET_ATTR_BYTES])
414 			ext->bytes = be64_to_cpu(nla_get_be64(
415 						 tb[IPSET_ATTR_BYTES]));
416 		if (tb[IPSET_ATTR_PACKETS])
417 			ext->packets = be64_to_cpu(nla_get_be64(
418 						   tb[IPSET_ATTR_PACKETS]));
419 	}
420 	if (tb[IPSET_ATTR_COMMENT]) {
421 		if (!SET_WITH_COMMENT(set))
422 			return -IPSET_ERR_COMMENT;
423 		ext->comment = ip_set_comment_uget(tb[IPSET_ATTR_COMMENT]);
424 	}
425 	if (tb[IPSET_ATTR_SKBMARK]) {
426 		if (!SET_WITH_SKBINFO(set))
427 			return -IPSET_ERR_SKBINFO;
428 		fullmark = be64_to_cpu(nla_get_be64(tb[IPSET_ATTR_SKBMARK]));
429 		ext->skbinfo.skbmark = fullmark >> 32;
430 		ext->skbinfo.skbmarkmask = fullmark & 0xffffffff;
431 	}
432 	if (tb[IPSET_ATTR_SKBPRIO]) {
433 		if (!SET_WITH_SKBINFO(set))
434 			return -IPSET_ERR_SKBINFO;
435 		ext->skbinfo.skbprio =
436 			be32_to_cpu(nla_get_be32(tb[IPSET_ATTR_SKBPRIO]));
437 	}
438 	if (tb[IPSET_ATTR_SKBQUEUE]) {
439 		if (!SET_WITH_SKBINFO(set))
440 			return -IPSET_ERR_SKBINFO;
441 		ext->skbinfo.skbqueue =
442 			be16_to_cpu(nla_get_be16(tb[IPSET_ATTR_SKBQUEUE]));
443 	}
444 	return 0;
445 }
446 EXPORT_SYMBOL_GPL(ip_set_get_extensions);
447 
448 int
449 ip_set_put_extensions(struct sk_buff *skb, const struct ip_set *set,
450 		      const void *e, bool active)
451 {
452 	if (SET_WITH_TIMEOUT(set)) {
453 		unsigned long *timeout = ext_timeout(e, set);
454 
455 		if (nla_put_net32(skb, IPSET_ATTR_TIMEOUT,
456 			htonl(active ? ip_set_timeout_get(timeout)
457 				: *timeout)))
458 			return -EMSGSIZE;
459 	}
460 	if (SET_WITH_COUNTER(set) &&
461 	    ip_set_put_counter(skb, ext_counter(e, set)))
462 		return -EMSGSIZE;
463 	if (SET_WITH_COMMENT(set) &&
464 	    ip_set_put_comment(skb, ext_comment(e, set)))
465 		return -EMSGSIZE;
466 	if (SET_WITH_SKBINFO(set) &&
467 	    ip_set_put_skbinfo(skb, ext_skbinfo(e, set)))
468 		return -EMSGSIZE;
469 	return 0;
470 }
471 EXPORT_SYMBOL_GPL(ip_set_put_extensions);
472 
473 /* Creating/destroying/renaming/swapping affect the existence and
474  * the properties of a set. All of these can be executed from userspace
475  * only and serialized by the nfnl mutex indirectly from nfnetlink.
476  *
477  * Sets are identified by their index in ip_set_list and the index
478  * is used by the external references (set/SET netfilter modules).
479  *
480  * The set behind an index may change by swapping only, from userspace.
481  */
482 
483 static inline void
484 __ip_set_get(struct ip_set *set)
485 {
486 	write_lock_bh(&ip_set_ref_lock);
487 	set->ref++;
488 	write_unlock_bh(&ip_set_ref_lock);
489 }
490 
491 static inline void
492 __ip_set_put(struct ip_set *set)
493 {
494 	write_lock_bh(&ip_set_ref_lock);
495 	BUG_ON(set->ref == 0);
496 	set->ref--;
497 	write_unlock_bh(&ip_set_ref_lock);
498 }
499 
500 /* set->ref can be swapped out by ip_set_swap, netlink events (like dump) need
501  * a separate reference counter
502  */
503 static inline void
504 __ip_set_get_netlink(struct ip_set *set)
505 {
506 	write_lock_bh(&ip_set_ref_lock);
507 	set->ref_netlink++;
508 	write_unlock_bh(&ip_set_ref_lock);
509 }
510 
511 static inline void
512 __ip_set_put_netlink(struct ip_set *set)
513 {
514 	write_lock_bh(&ip_set_ref_lock);
515 	BUG_ON(set->ref_netlink == 0);
516 	set->ref_netlink--;
517 	write_unlock_bh(&ip_set_ref_lock);
518 }
519 
520 /* Add, del and test set entries from kernel.
521  *
522  * The set behind the index must exist and must be referenced
523  * so it can't be destroyed (or changed) under our foot.
524  */
525 
526 static inline struct ip_set *
527 ip_set_rcu_get(struct net *net, ip_set_id_t index)
528 {
529 	struct ip_set *set;
530 	struct ip_set_net *inst = ip_set_pernet(net);
531 
532 	rcu_read_lock();
533 	/* ip_set_list itself needs to be protected */
534 	set = rcu_dereference(inst->ip_set_list)[index];
535 	rcu_read_unlock();
536 
537 	return set;
538 }
539 
540 int
541 ip_set_test(ip_set_id_t index, const struct sk_buff *skb,
542 	    const struct xt_action_param *par, struct ip_set_adt_opt *opt)
543 {
544 	struct ip_set *set = ip_set_rcu_get(xt_net(par), index);
545 	int ret = 0;
546 
547 	BUG_ON(!set);
548 	pr_debug("set %s, index %u\n", set->name, index);
549 
550 	if (opt->dim < set->type->dimension ||
551 	    !(opt->family == set->family || set->family == NFPROTO_UNSPEC))
552 		return 0;
553 
554 	rcu_read_lock_bh();
555 	ret = set->variant->kadt(set, skb, par, IPSET_TEST, opt);
556 	rcu_read_unlock_bh();
557 
558 	if (ret == -EAGAIN) {
559 		/* Type requests element to be completed */
560 		pr_debug("element must be completed, ADD is triggered\n");
561 		spin_lock_bh(&set->lock);
562 		set->variant->kadt(set, skb, par, IPSET_ADD, opt);
563 		spin_unlock_bh(&set->lock);
564 		ret = 1;
565 	} else {
566 		/* --return-nomatch: invert matched element */
567 		if ((opt->cmdflags & IPSET_FLAG_RETURN_NOMATCH) &&
568 		    (set->type->features & IPSET_TYPE_NOMATCH) &&
569 		    (ret > 0 || ret == -ENOTEMPTY))
570 			ret = -ret;
571 	}
572 
573 	/* Convert error codes to nomatch */
574 	return (ret < 0 ? 0 : ret);
575 }
576 EXPORT_SYMBOL_GPL(ip_set_test);
577 
578 int
579 ip_set_add(ip_set_id_t index, const struct sk_buff *skb,
580 	   const struct xt_action_param *par, struct ip_set_adt_opt *opt)
581 {
582 	struct ip_set *set = ip_set_rcu_get(xt_net(par), index);
583 	int ret;
584 
585 	BUG_ON(!set);
586 	pr_debug("set %s, index %u\n", set->name, index);
587 
588 	if (opt->dim < set->type->dimension ||
589 	    !(opt->family == set->family || set->family == NFPROTO_UNSPEC))
590 		return -IPSET_ERR_TYPE_MISMATCH;
591 
592 	spin_lock_bh(&set->lock);
593 	ret = set->variant->kadt(set, skb, par, IPSET_ADD, opt);
594 	spin_unlock_bh(&set->lock);
595 
596 	return ret;
597 }
598 EXPORT_SYMBOL_GPL(ip_set_add);
599 
600 int
601 ip_set_del(ip_set_id_t index, const struct sk_buff *skb,
602 	   const struct xt_action_param *par, struct ip_set_adt_opt *opt)
603 {
604 	struct ip_set *set = ip_set_rcu_get(xt_net(par), index);
605 	int ret = 0;
606 
607 	BUG_ON(!set);
608 	pr_debug("set %s, index %u\n", set->name, index);
609 
610 	if (opt->dim < set->type->dimension ||
611 	    !(opt->family == set->family || set->family == NFPROTO_UNSPEC))
612 		return -IPSET_ERR_TYPE_MISMATCH;
613 
614 	spin_lock_bh(&set->lock);
615 	ret = set->variant->kadt(set, skb, par, IPSET_DEL, opt);
616 	spin_unlock_bh(&set->lock);
617 
618 	return ret;
619 }
620 EXPORT_SYMBOL_GPL(ip_set_del);
621 
622 /* Find set by name, reference it once. The reference makes sure the
623  * thing pointed to, does not go away under our feet.
624  *
625  */
626 ip_set_id_t
627 ip_set_get_byname(struct net *net, const char *name, struct ip_set **set)
628 {
629 	ip_set_id_t i, index = IPSET_INVALID_ID;
630 	struct ip_set *s;
631 	struct ip_set_net *inst = ip_set_pernet(net);
632 
633 	rcu_read_lock();
634 	for (i = 0; i < inst->ip_set_max; i++) {
635 		s = rcu_dereference(inst->ip_set_list)[i];
636 		if (s && STRNCMP(s->name, name)) {
637 			__ip_set_get(s);
638 			index = i;
639 			*set = s;
640 			break;
641 		}
642 	}
643 	rcu_read_unlock();
644 
645 	return index;
646 }
647 EXPORT_SYMBOL_GPL(ip_set_get_byname);
648 
649 /* If the given set pointer points to a valid set, decrement
650  * reference count by 1. The caller shall not assume the index
651  * to be valid, after calling this function.
652  *
653  */
654 
655 static inline void
656 __ip_set_put_byindex(struct ip_set_net *inst, ip_set_id_t index)
657 {
658 	struct ip_set *set;
659 
660 	rcu_read_lock();
661 	set = rcu_dereference(inst->ip_set_list)[index];
662 	if (set)
663 		__ip_set_put(set);
664 	rcu_read_unlock();
665 }
666 
667 void
668 ip_set_put_byindex(struct net *net, ip_set_id_t index)
669 {
670 	struct ip_set_net *inst = ip_set_pernet(net);
671 
672 	__ip_set_put_byindex(inst, index);
673 }
674 EXPORT_SYMBOL_GPL(ip_set_put_byindex);
675 
676 /* Get the name of a set behind a set index.
677  * We assume the set is referenced, so it does exist and
678  * can't be destroyed. The set cannot be renamed due to
679  * the referencing either.
680  *
681  */
682 const char *
683 ip_set_name_byindex(struct net *net, ip_set_id_t index)
684 {
685 	const struct ip_set *set = ip_set_rcu_get(net, index);
686 
687 	BUG_ON(!set);
688 	BUG_ON(set->ref == 0);
689 
690 	/* Referenced, so it's safe */
691 	return set->name;
692 }
693 EXPORT_SYMBOL_GPL(ip_set_name_byindex);
694 
695 /* Routines to call by external subsystems, which do not
696  * call nfnl_lock for us.
697  */
698 
699 /* Find set by index, reference it once. The reference makes sure the
700  * thing pointed to, does not go away under our feet.
701  *
702  * The nfnl mutex is used in the function.
703  */
704 ip_set_id_t
705 ip_set_nfnl_get_byindex(struct net *net, ip_set_id_t index)
706 {
707 	struct ip_set *set;
708 	struct ip_set_net *inst = ip_set_pernet(net);
709 
710 	if (index >= inst->ip_set_max)
711 		return IPSET_INVALID_ID;
712 
713 	nfnl_lock(NFNL_SUBSYS_IPSET);
714 	set = ip_set(inst, index);
715 	if (set)
716 		__ip_set_get(set);
717 	else
718 		index = IPSET_INVALID_ID;
719 	nfnl_unlock(NFNL_SUBSYS_IPSET);
720 
721 	return index;
722 }
723 EXPORT_SYMBOL_GPL(ip_set_nfnl_get_byindex);
724 
725 /* If the given set pointer points to a valid set, decrement
726  * reference count by 1. The caller shall not assume the index
727  * to be valid, after calling this function.
728  *
729  * The nfnl mutex is used in the function.
730  */
731 void
732 ip_set_nfnl_put(struct net *net, ip_set_id_t index)
733 {
734 	struct ip_set *set;
735 	struct ip_set_net *inst = ip_set_pernet(net);
736 
737 	nfnl_lock(NFNL_SUBSYS_IPSET);
738 	if (!inst->is_deleted) { /* already deleted from ip_set_net_exit() */
739 		set = ip_set(inst, index);
740 		if (set)
741 			__ip_set_put(set);
742 	}
743 	nfnl_unlock(NFNL_SUBSYS_IPSET);
744 }
745 EXPORT_SYMBOL_GPL(ip_set_nfnl_put);
746 
747 /* Communication protocol with userspace over netlink.
748  *
749  * The commands are serialized by the nfnl mutex.
750  */
751 
752 static inline bool
753 protocol_failed(const struct nlattr * const tb[])
754 {
755 	return !tb[IPSET_ATTR_PROTOCOL] ||
756 	       nla_get_u8(tb[IPSET_ATTR_PROTOCOL]) != IPSET_PROTOCOL;
757 }
758 
759 static inline u32
760 flag_exist(const struct nlmsghdr *nlh)
761 {
762 	return nlh->nlmsg_flags & NLM_F_EXCL ? 0 : IPSET_FLAG_EXIST;
763 }
764 
765 static struct nlmsghdr *
766 start_msg(struct sk_buff *skb, u32 portid, u32 seq, unsigned int flags,
767 	  enum ipset_cmd cmd)
768 {
769 	struct nlmsghdr *nlh;
770 	struct nfgenmsg *nfmsg;
771 
772 	nlh = nlmsg_put(skb, portid, seq, cmd | (NFNL_SUBSYS_IPSET << 8),
773 			sizeof(*nfmsg), flags);
774 	if (!nlh)
775 		return NULL;
776 
777 	nfmsg = nlmsg_data(nlh);
778 	nfmsg->nfgen_family = NFPROTO_IPV4;
779 	nfmsg->version = NFNETLINK_V0;
780 	nfmsg->res_id = 0;
781 
782 	return nlh;
783 }
784 
785 /* Create a set */
786 
787 static const struct nla_policy ip_set_create_policy[IPSET_ATTR_CMD_MAX + 1] = {
788 	[IPSET_ATTR_PROTOCOL]	= { .type = NLA_U8 },
789 	[IPSET_ATTR_SETNAME]	= { .type = NLA_NUL_STRING,
790 				    .len = IPSET_MAXNAMELEN - 1 },
791 	[IPSET_ATTR_TYPENAME]	= { .type = NLA_NUL_STRING,
792 				    .len = IPSET_MAXNAMELEN - 1},
793 	[IPSET_ATTR_REVISION]	= { .type = NLA_U8 },
794 	[IPSET_ATTR_FAMILY]	= { .type = NLA_U8 },
795 	[IPSET_ATTR_DATA]	= { .type = NLA_NESTED },
796 };
797 
798 static struct ip_set *
799 find_set_and_id(struct ip_set_net *inst, const char *name, ip_set_id_t *id)
800 {
801 	struct ip_set *set = NULL;
802 	ip_set_id_t i;
803 
804 	*id = IPSET_INVALID_ID;
805 	for (i = 0; i < inst->ip_set_max; i++) {
806 		set = ip_set(inst, i);
807 		if (set && STRNCMP(set->name, name)) {
808 			*id = i;
809 			break;
810 		}
811 	}
812 	return (*id == IPSET_INVALID_ID ? NULL : set);
813 }
814 
815 static inline struct ip_set *
816 find_set(struct ip_set_net *inst, const char *name)
817 {
818 	ip_set_id_t id;
819 
820 	return find_set_and_id(inst, name, &id);
821 }
822 
823 static int
824 find_free_id(struct ip_set_net *inst, const char *name, ip_set_id_t *index,
825 	     struct ip_set **set)
826 {
827 	struct ip_set *s;
828 	ip_set_id_t i;
829 
830 	*index = IPSET_INVALID_ID;
831 	for (i = 0;  i < inst->ip_set_max; i++) {
832 		s = ip_set(inst, i);
833 		if (!s) {
834 			if (*index == IPSET_INVALID_ID)
835 				*index = i;
836 		} else if (STRNCMP(name, s->name)) {
837 			/* Name clash */
838 			*set = s;
839 			return -EEXIST;
840 		}
841 	}
842 	if (*index == IPSET_INVALID_ID)
843 		/* No free slot remained */
844 		return -IPSET_ERR_MAX_SETS;
845 	return 0;
846 }
847 
848 static int ip_set_none(struct net *net, struct sock *ctnl, struct sk_buff *skb,
849 		       const struct nlmsghdr *nlh,
850 		       const struct nlattr * const attr[])
851 {
852 	return -EOPNOTSUPP;
853 }
854 
855 static int ip_set_create(struct net *net, struct sock *ctnl,
856 			 struct sk_buff *skb, const struct nlmsghdr *nlh,
857 			 const struct nlattr * const attr[])
858 {
859 	struct ip_set_net *inst = ip_set_pernet(net);
860 	struct ip_set *set, *clash = NULL;
861 	ip_set_id_t index = IPSET_INVALID_ID;
862 	struct nlattr *tb[IPSET_ATTR_CREATE_MAX + 1] = {};
863 	const char *name, *typename;
864 	u8 family, revision;
865 	u32 flags = flag_exist(nlh);
866 	int ret = 0;
867 
868 	if (unlikely(protocol_failed(attr) ||
869 		     !attr[IPSET_ATTR_SETNAME] ||
870 		     !attr[IPSET_ATTR_TYPENAME] ||
871 		     !attr[IPSET_ATTR_REVISION] ||
872 		     !attr[IPSET_ATTR_FAMILY] ||
873 		     (attr[IPSET_ATTR_DATA] &&
874 		      !flag_nested(attr[IPSET_ATTR_DATA]))))
875 		return -IPSET_ERR_PROTOCOL;
876 
877 	name = nla_data(attr[IPSET_ATTR_SETNAME]);
878 	typename = nla_data(attr[IPSET_ATTR_TYPENAME]);
879 	family = nla_get_u8(attr[IPSET_ATTR_FAMILY]);
880 	revision = nla_get_u8(attr[IPSET_ATTR_REVISION]);
881 	pr_debug("setname: %s, typename: %s, family: %s, revision: %u\n",
882 		 name, typename, family_name(family), revision);
883 
884 	/* First, and without any locks, allocate and initialize
885 	 * a normal base set structure.
886 	 */
887 	set = kzalloc(sizeof(*set), GFP_KERNEL);
888 	if (!set)
889 		return -ENOMEM;
890 	spin_lock_init(&set->lock);
891 	strlcpy(set->name, name, IPSET_MAXNAMELEN);
892 	set->family = family;
893 	set->revision = revision;
894 
895 	/* Next, check that we know the type, and take
896 	 * a reference on the type, to make sure it stays available
897 	 * while constructing our new set.
898 	 *
899 	 * After referencing the type, we try to create the type
900 	 * specific part of the set without holding any locks.
901 	 */
902 	ret = find_set_type_get(typename, family, revision, &set->type);
903 	if (ret)
904 		goto out;
905 
906 	/* Without holding any locks, create private part. */
907 	if (attr[IPSET_ATTR_DATA] &&
908 	    nla_parse_nested(tb, IPSET_ATTR_CREATE_MAX, attr[IPSET_ATTR_DATA],
909 			     set->type->create_policy)) {
910 		ret = -IPSET_ERR_PROTOCOL;
911 		goto put_out;
912 	}
913 
914 	ret = set->type->create(net, set, tb, flags);
915 	if (ret != 0)
916 		goto put_out;
917 
918 	/* BTW, ret==0 here. */
919 
920 	/* Here, we have a valid, constructed set and we are protected
921 	 * by the nfnl mutex. Find the first free index in ip_set_list
922 	 * and check clashing.
923 	 */
924 	ret = find_free_id(inst, set->name, &index, &clash);
925 	if (ret == -EEXIST) {
926 		/* If this is the same set and requested, ignore error */
927 		if ((flags & IPSET_FLAG_EXIST) &&
928 		    STRNCMP(set->type->name, clash->type->name) &&
929 		    set->type->family == clash->type->family &&
930 		    set->type->revision_min == clash->type->revision_min &&
931 		    set->type->revision_max == clash->type->revision_max &&
932 		    set->variant->same_set(set, clash))
933 			ret = 0;
934 		goto cleanup;
935 	} else if (ret == -IPSET_ERR_MAX_SETS) {
936 		struct ip_set **list, **tmp;
937 		ip_set_id_t i = inst->ip_set_max + IP_SET_INC;
938 
939 		if (i < inst->ip_set_max || i == IPSET_INVALID_ID)
940 			/* Wraparound */
941 			goto cleanup;
942 
943 		list = kcalloc(i, sizeof(struct ip_set *), GFP_KERNEL);
944 		if (!list)
945 			goto cleanup;
946 		/* nfnl mutex is held, both lists are valid */
947 		tmp = ip_set_dereference(inst->ip_set_list);
948 		memcpy(list, tmp, sizeof(struct ip_set *) * inst->ip_set_max);
949 		rcu_assign_pointer(inst->ip_set_list, list);
950 		/* Make sure all current packets have passed through */
951 		synchronize_net();
952 		/* Use new list */
953 		index = inst->ip_set_max;
954 		inst->ip_set_max = i;
955 		kfree(tmp);
956 		ret = 0;
957 	} else if (ret) {
958 		goto cleanup;
959 	}
960 
961 	/* Finally! Add our shiny new set to the list, and be done. */
962 	pr_debug("create: '%s' created with index %u!\n", set->name, index);
963 	ip_set(inst, index) = set;
964 
965 	return ret;
966 
967 cleanup:
968 	set->variant->destroy(set);
969 put_out:
970 	module_put(set->type->me);
971 out:
972 	kfree(set);
973 	return ret;
974 }
975 
976 /* Destroy sets */
977 
978 static const struct nla_policy
979 ip_set_setname_policy[IPSET_ATTR_CMD_MAX + 1] = {
980 	[IPSET_ATTR_PROTOCOL]	= { .type = NLA_U8 },
981 	[IPSET_ATTR_SETNAME]	= { .type = NLA_NUL_STRING,
982 				    .len = IPSET_MAXNAMELEN - 1 },
983 };
984 
985 static void
986 ip_set_destroy_set(struct ip_set *set)
987 {
988 	pr_debug("set: %s\n",  set->name);
989 
990 	/* Must call it without holding any lock */
991 	set->variant->destroy(set);
992 	module_put(set->type->me);
993 	kfree(set);
994 }
995 
996 static int ip_set_destroy(struct net *net, struct sock *ctnl,
997 			  struct sk_buff *skb, const struct nlmsghdr *nlh,
998 			  const struct nlattr * const attr[])
999 {
1000 	struct ip_set_net *inst = ip_set_pernet(net);
1001 	struct ip_set *s;
1002 	ip_set_id_t i;
1003 	int ret = 0;
1004 
1005 	if (unlikely(protocol_failed(attr)))
1006 		return -IPSET_ERR_PROTOCOL;
1007 
1008 	/* Must wait for flush to be really finished in list:set */
1009 	rcu_barrier();
1010 
1011 	/* Commands are serialized and references are
1012 	 * protected by the ip_set_ref_lock.
1013 	 * External systems (i.e. xt_set) must call
1014 	 * ip_set_put|get_nfnl_* functions, that way we
1015 	 * can safely check references here.
1016 	 *
1017 	 * list:set timer can only decrement the reference
1018 	 * counter, so if it's already zero, we can proceed
1019 	 * without holding the lock.
1020 	 */
1021 	read_lock_bh(&ip_set_ref_lock);
1022 	if (!attr[IPSET_ATTR_SETNAME]) {
1023 		for (i = 0; i < inst->ip_set_max; i++) {
1024 			s = ip_set(inst, i);
1025 			if (s && (s->ref || s->ref_netlink)) {
1026 				ret = -IPSET_ERR_BUSY;
1027 				goto out;
1028 			}
1029 		}
1030 		inst->is_destroyed = true;
1031 		read_unlock_bh(&ip_set_ref_lock);
1032 		for (i = 0; i < inst->ip_set_max; i++) {
1033 			s = ip_set(inst, i);
1034 			if (s) {
1035 				ip_set(inst, i) = NULL;
1036 				ip_set_destroy_set(s);
1037 			}
1038 		}
1039 		/* Modified by ip_set_destroy() only, which is serialized */
1040 		inst->is_destroyed = false;
1041 	} else {
1042 		s = find_set_and_id(inst, nla_data(attr[IPSET_ATTR_SETNAME]),
1043 				    &i);
1044 		if (!s) {
1045 			ret = -ENOENT;
1046 			goto out;
1047 		} else if (s->ref || s->ref_netlink) {
1048 			ret = -IPSET_ERR_BUSY;
1049 			goto out;
1050 		}
1051 		ip_set(inst, i) = NULL;
1052 		read_unlock_bh(&ip_set_ref_lock);
1053 
1054 		ip_set_destroy_set(s);
1055 	}
1056 	return 0;
1057 out:
1058 	read_unlock_bh(&ip_set_ref_lock);
1059 	return ret;
1060 }
1061 
1062 /* Flush sets */
1063 
1064 static void
1065 ip_set_flush_set(struct ip_set *set)
1066 {
1067 	pr_debug("set: %s\n",  set->name);
1068 
1069 	spin_lock_bh(&set->lock);
1070 	set->variant->flush(set);
1071 	spin_unlock_bh(&set->lock);
1072 }
1073 
1074 static int ip_set_flush(struct net *net, struct sock *ctnl, struct sk_buff *skb,
1075 			const struct nlmsghdr *nlh,
1076 			const struct nlattr * const attr[])
1077 {
1078 	struct ip_set_net *inst = ip_set_pernet(net);
1079 	struct ip_set *s;
1080 	ip_set_id_t i;
1081 
1082 	if (unlikely(protocol_failed(attr)))
1083 		return -IPSET_ERR_PROTOCOL;
1084 
1085 	if (!attr[IPSET_ATTR_SETNAME]) {
1086 		for (i = 0; i < inst->ip_set_max; i++) {
1087 			s = ip_set(inst, i);
1088 			if (s)
1089 				ip_set_flush_set(s);
1090 		}
1091 	} else {
1092 		s = find_set(inst, nla_data(attr[IPSET_ATTR_SETNAME]));
1093 		if (!s)
1094 			return -ENOENT;
1095 
1096 		ip_set_flush_set(s);
1097 	}
1098 
1099 	return 0;
1100 }
1101 
1102 /* Rename a set */
1103 
1104 static const struct nla_policy
1105 ip_set_setname2_policy[IPSET_ATTR_CMD_MAX + 1] = {
1106 	[IPSET_ATTR_PROTOCOL]	= { .type = NLA_U8 },
1107 	[IPSET_ATTR_SETNAME]	= { .type = NLA_NUL_STRING,
1108 				    .len = IPSET_MAXNAMELEN - 1 },
1109 	[IPSET_ATTR_SETNAME2]	= { .type = NLA_NUL_STRING,
1110 				    .len = IPSET_MAXNAMELEN - 1 },
1111 };
1112 
1113 static int ip_set_rename(struct net *net, struct sock *ctnl,
1114 			 struct sk_buff *skb, const struct nlmsghdr *nlh,
1115 			 const struct nlattr * const attr[])
1116 {
1117 	struct ip_set_net *inst = ip_set_pernet(net);
1118 	struct ip_set *set, *s;
1119 	const char *name2;
1120 	ip_set_id_t i;
1121 	int ret = 0;
1122 
1123 	if (unlikely(protocol_failed(attr) ||
1124 		     !attr[IPSET_ATTR_SETNAME] ||
1125 		     !attr[IPSET_ATTR_SETNAME2]))
1126 		return -IPSET_ERR_PROTOCOL;
1127 
1128 	set = find_set(inst, nla_data(attr[IPSET_ATTR_SETNAME]));
1129 	if (!set)
1130 		return -ENOENT;
1131 
1132 	read_lock_bh(&ip_set_ref_lock);
1133 	if (set->ref != 0) {
1134 		ret = -IPSET_ERR_REFERENCED;
1135 		goto out;
1136 	}
1137 
1138 	name2 = nla_data(attr[IPSET_ATTR_SETNAME2]);
1139 	for (i = 0; i < inst->ip_set_max; i++) {
1140 		s = ip_set(inst, i);
1141 		if (s && STRNCMP(s->name, name2)) {
1142 			ret = -IPSET_ERR_EXIST_SETNAME2;
1143 			goto out;
1144 		}
1145 	}
1146 	strncpy(set->name, name2, IPSET_MAXNAMELEN);
1147 
1148 out:
1149 	read_unlock_bh(&ip_set_ref_lock);
1150 	return ret;
1151 }
1152 
1153 /* Swap two sets so that name/index points to the other.
1154  * References and set names are also swapped.
1155  *
1156  * The commands are serialized by the nfnl mutex and references are
1157  * protected by the ip_set_ref_lock. The kernel interfaces
1158  * do not hold the mutex but the pointer settings are atomic
1159  * so the ip_set_list always contains valid pointers to the sets.
1160  */
1161 
1162 static int ip_set_swap(struct net *net, struct sock *ctnl, struct sk_buff *skb,
1163 		       const struct nlmsghdr *nlh,
1164 		       const struct nlattr * const attr[])
1165 {
1166 	struct ip_set_net *inst = ip_set_pernet(net);
1167 	struct ip_set *from, *to;
1168 	ip_set_id_t from_id, to_id;
1169 	char from_name[IPSET_MAXNAMELEN];
1170 
1171 	if (unlikely(protocol_failed(attr) ||
1172 		     !attr[IPSET_ATTR_SETNAME] ||
1173 		     !attr[IPSET_ATTR_SETNAME2]))
1174 		return -IPSET_ERR_PROTOCOL;
1175 
1176 	from = find_set_and_id(inst, nla_data(attr[IPSET_ATTR_SETNAME]),
1177 			       &from_id);
1178 	if (!from)
1179 		return -ENOENT;
1180 
1181 	to = find_set_and_id(inst, nla_data(attr[IPSET_ATTR_SETNAME2]),
1182 			     &to_id);
1183 	if (!to)
1184 		return -IPSET_ERR_EXIST_SETNAME2;
1185 
1186 	/* Features must not change.
1187 	 * Not an artifical restriction anymore, as we must prevent
1188 	 * possible loops created by swapping in setlist type of sets.
1189 	 */
1190 	if (!(from->type->features == to->type->features &&
1191 	      from->family == to->family))
1192 		return -IPSET_ERR_TYPE_MISMATCH;
1193 
1194 	if (from->ref_netlink || to->ref_netlink)
1195 		return -EBUSY;
1196 
1197 	strncpy(from_name, from->name, IPSET_MAXNAMELEN);
1198 	strncpy(from->name, to->name, IPSET_MAXNAMELEN);
1199 	strncpy(to->name, from_name, IPSET_MAXNAMELEN);
1200 
1201 	write_lock_bh(&ip_set_ref_lock);
1202 	swap(from->ref, to->ref);
1203 	ip_set(inst, from_id) = to;
1204 	ip_set(inst, to_id) = from;
1205 	write_unlock_bh(&ip_set_ref_lock);
1206 
1207 	return 0;
1208 }
1209 
1210 /* List/save set data */
1211 
1212 #define DUMP_INIT	0
1213 #define DUMP_ALL	1
1214 #define DUMP_ONE	2
1215 #define DUMP_LAST	3
1216 
1217 #define DUMP_TYPE(arg)		(((u32)(arg)) & 0x0000FFFF)
1218 #define DUMP_FLAGS(arg)		(((u32)(arg)) >> 16)
1219 
1220 static int
1221 ip_set_dump_done(struct netlink_callback *cb)
1222 {
1223 	if (cb->args[IPSET_CB_ARG0]) {
1224 		struct ip_set_net *inst =
1225 			(struct ip_set_net *)cb->args[IPSET_CB_NET];
1226 		ip_set_id_t index = (ip_set_id_t)cb->args[IPSET_CB_INDEX];
1227 		struct ip_set *set = ip_set(inst, index);
1228 
1229 		if (set->variant->uref)
1230 			set->variant->uref(set, cb, false);
1231 		pr_debug("release set %s\n", set->name);
1232 		__ip_set_put_netlink(set);
1233 	}
1234 	return 0;
1235 }
1236 
1237 static inline void
1238 dump_attrs(struct nlmsghdr *nlh)
1239 {
1240 	const struct nlattr *attr;
1241 	int rem;
1242 
1243 	pr_debug("dump nlmsg\n");
1244 	nlmsg_for_each_attr(attr, nlh, sizeof(struct nfgenmsg), rem) {
1245 		pr_debug("type: %u, len %u\n", nla_type(attr), attr->nla_len);
1246 	}
1247 }
1248 
1249 static int
1250 dump_init(struct netlink_callback *cb, struct ip_set_net *inst)
1251 {
1252 	struct nlmsghdr *nlh = nlmsg_hdr(cb->skb);
1253 	int min_len = nlmsg_total_size(sizeof(struct nfgenmsg));
1254 	struct nlattr *cda[IPSET_ATTR_CMD_MAX + 1];
1255 	struct nlattr *attr = (void *)nlh + min_len;
1256 	u32 dump_type;
1257 	ip_set_id_t index;
1258 
1259 	/* Second pass, so parser can't fail */
1260 	nla_parse(cda, IPSET_ATTR_CMD_MAX,
1261 		  attr, nlh->nlmsg_len - min_len, ip_set_setname_policy);
1262 
1263 	if (cda[IPSET_ATTR_SETNAME]) {
1264 		struct ip_set *set;
1265 
1266 		set = find_set_and_id(inst, nla_data(cda[IPSET_ATTR_SETNAME]),
1267 				      &index);
1268 		if (!set)
1269 			return -ENOENT;
1270 
1271 		dump_type = DUMP_ONE;
1272 		cb->args[IPSET_CB_INDEX] = index;
1273 	} else {
1274 		dump_type = DUMP_ALL;
1275 	}
1276 
1277 	if (cda[IPSET_ATTR_FLAGS]) {
1278 		u32 f = ip_set_get_h32(cda[IPSET_ATTR_FLAGS]);
1279 
1280 		dump_type |= (f << 16);
1281 	}
1282 	cb->args[IPSET_CB_NET] = (unsigned long)inst;
1283 	cb->args[IPSET_CB_DUMP] = dump_type;
1284 
1285 	return 0;
1286 }
1287 
1288 static int
1289 ip_set_dump_start(struct sk_buff *skb, struct netlink_callback *cb)
1290 {
1291 	ip_set_id_t index = IPSET_INVALID_ID, max;
1292 	struct ip_set *set = NULL;
1293 	struct nlmsghdr *nlh = NULL;
1294 	unsigned int flags = NETLINK_CB(cb->skb).portid ? NLM_F_MULTI : 0;
1295 	struct ip_set_net *inst = ip_set_pernet(sock_net(skb->sk));
1296 	u32 dump_type, dump_flags;
1297 	bool is_destroyed;
1298 	int ret = 0;
1299 
1300 	if (!cb->args[IPSET_CB_DUMP]) {
1301 		ret = dump_init(cb, inst);
1302 		if (ret < 0) {
1303 			nlh = nlmsg_hdr(cb->skb);
1304 			/* We have to create and send the error message
1305 			 * manually :-(
1306 			 */
1307 			if (nlh->nlmsg_flags & NLM_F_ACK)
1308 				netlink_ack(cb->skb, nlh, ret);
1309 			return ret;
1310 		}
1311 	}
1312 
1313 	if (cb->args[IPSET_CB_INDEX] >= inst->ip_set_max)
1314 		goto out;
1315 
1316 	dump_type = DUMP_TYPE(cb->args[IPSET_CB_DUMP]);
1317 	dump_flags = DUMP_FLAGS(cb->args[IPSET_CB_DUMP]);
1318 	max = dump_type == DUMP_ONE ? cb->args[IPSET_CB_INDEX] + 1
1319 				    : inst->ip_set_max;
1320 dump_last:
1321 	pr_debug("dump type, flag: %u %u index: %ld\n",
1322 		 dump_type, dump_flags, cb->args[IPSET_CB_INDEX]);
1323 	for (; cb->args[IPSET_CB_INDEX] < max; cb->args[IPSET_CB_INDEX]++) {
1324 		index = (ip_set_id_t)cb->args[IPSET_CB_INDEX];
1325 		write_lock_bh(&ip_set_ref_lock);
1326 		set = ip_set(inst, index);
1327 		is_destroyed = inst->is_destroyed;
1328 		if (!set || is_destroyed) {
1329 			write_unlock_bh(&ip_set_ref_lock);
1330 			if (dump_type == DUMP_ONE) {
1331 				ret = -ENOENT;
1332 				goto out;
1333 			}
1334 			if (is_destroyed) {
1335 				/* All sets are just being destroyed */
1336 				ret = 0;
1337 				goto out;
1338 			}
1339 			continue;
1340 		}
1341 		/* When dumping all sets, we must dump "sorted"
1342 		 * so that lists (unions of sets) are dumped last.
1343 		 */
1344 		if (dump_type != DUMP_ONE &&
1345 		    ((dump_type == DUMP_ALL) ==
1346 		     !!(set->type->features & IPSET_DUMP_LAST))) {
1347 			write_unlock_bh(&ip_set_ref_lock);
1348 			continue;
1349 		}
1350 		pr_debug("List set: %s\n", set->name);
1351 		if (!cb->args[IPSET_CB_ARG0]) {
1352 			/* Start listing: make sure set won't be destroyed */
1353 			pr_debug("reference set\n");
1354 			set->ref_netlink++;
1355 		}
1356 		write_unlock_bh(&ip_set_ref_lock);
1357 		nlh = start_msg(skb, NETLINK_CB(cb->skb).portid,
1358 				cb->nlh->nlmsg_seq, flags,
1359 				IPSET_CMD_LIST);
1360 		if (!nlh) {
1361 			ret = -EMSGSIZE;
1362 			goto release_refcount;
1363 		}
1364 		if (nla_put_u8(skb, IPSET_ATTR_PROTOCOL, IPSET_PROTOCOL) ||
1365 		    nla_put_string(skb, IPSET_ATTR_SETNAME, set->name))
1366 			goto nla_put_failure;
1367 		if (dump_flags & IPSET_FLAG_LIST_SETNAME)
1368 			goto next_set;
1369 		switch (cb->args[IPSET_CB_ARG0]) {
1370 		case 0:
1371 			/* Core header data */
1372 			if (nla_put_string(skb, IPSET_ATTR_TYPENAME,
1373 					   set->type->name) ||
1374 			    nla_put_u8(skb, IPSET_ATTR_FAMILY,
1375 				       set->family) ||
1376 			    nla_put_u8(skb, IPSET_ATTR_REVISION,
1377 				       set->revision))
1378 				goto nla_put_failure;
1379 			ret = set->variant->head(set, skb);
1380 			if (ret < 0)
1381 				goto release_refcount;
1382 			if (dump_flags & IPSET_FLAG_LIST_HEADER)
1383 				goto next_set;
1384 			if (set->variant->uref)
1385 				set->variant->uref(set, cb, true);
1386 			/* Fall through and add elements */
1387 		default:
1388 			rcu_read_lock_bh();
1389 			ret = set->variant->list(set, skb, cb);
1390 			rcu_read_unlock_bh();
1391 			if (!cb->args[IPSET_CB_ARG0])
1392 				/* Set is done, proceed with next one */
1393 				goto next_set;
1394 			goto release_refcount;
1395 		}
1396 	}
1397 	/* If we dump all sets, continue with dumping last ones */
1398 	if (dump_type == DUMP_ALL) {
1399 		dump_type = DUMP_LAST;
1400 		cb->args[IPSET_CB_DUMP] = dump_type | (dump_flags << 16);
1401 		cb->args[IPSET_CB_INDEX] = 0;
1402 		if (set && set->variant->uref)
1403 			set->variant->uref(set, cb, false);
1404 		goto dump_last;
1405 	}
1406 	goto out;
1407 
1408 nla_put_failure:
1409 	ret = -EFAULT;
1410 next_set:
1411 	if (dump_type == DUMP_ONE)
1412 		cb->args[IPSET_CB_INDEX] = IPSET_INVALID_ID;
1413 	else
1414 		cb->args[IPSET_CB_INDEX]++;
1415 release_refcount:
1416 	/* If there was an error or set is done, release set */
1417 	if (ret || !cb->args[IPSET_CB_ARG0]) {
1418 		set = ip_set(inst, index);
1419 		if (set->variant->uref)
1420 			set->variant->uref(set, cb, false);
1421 		pr_debug("release set %s\n", set->name);
1422 		__ip_set_put_netlink(set);
1423 		cb->args[IPSET_CB_ARG0] = 0;
1424 	}
1425 out:
1426 	if (nlh) {
1427 		nlmsg_end(skb, nlh);
1428 		pr_debug("nlmsg_len: %u\n", nlh->nlmsg_len);
1429 		dump_attrs(nlh);
1430 	}
1431 
1432 	return ret < 0 ? ret : skb->len;
1433 }
1434 
1435 static int ip_set_dump(struct net *net, struct sock *ctnl, struct sk_buff *skb,
1436 		       const struct nlmsghdr *nlh,
1437 		       const struct nlattr * const attr[])
1438 {
1439 	if (unlikely(protocol_failed(attr)))
1440 		return -IPSET_ERR_PROTOCOL;
1441 
1442 	{
1443 		struct netlink_dump_control c = {
1444 			.dump = ip_set_dump_start,
1445 			.done = ip_set_dump_done,
1446 		};
1447 		return netlink_dump_start(ctnl, skb, nlh, &c);
1448 	}
1449 }
1450 
1451 /* Add, del and test */
1452 
1453 static const struct nla_policy ip_set_adt_policy[IPSET_ATTR_CMD_MAX + 1] = {
1454 	[IPSET_ATTR_PROTOCOL]	= { .type = NLA_U8 },
1455 	[IPSET_ATTR_SETNAME]	= { .type = NLA_NUL_STRING,
1456 				    .len = IPSET_MAXNAMELEN - 1 },
1457 	[IPSET_ATTR_LINENO]	= { .type = NLA_U32 },
1458 	[IPSET_ATTR_DATA]	= { .type = NLA_NESTED },
1459 	[IPSET_ATTR_ADT]	= { .type = NLA_NESTED },
1460 };
1461 
1462 static int
1463 call_ad(struct sock *ctnl, struct sk_buff *skb, struct ip_set *set,
1464 	struct nlattr *tb[], enum ipset_adt adt,
1465 	u32 flags, bool use_lineno)
1466 {
1467 	int ret;
1468 	u32 lineno = 0;
1469 	bool eexist = flags & IPSET_FLAG_EXIST, retried = false;
1470 
1471 	do {
1472 		spin_lock_bh(&set->lock);
1473 		ret = set->variant->uadt(set, tb, adt, &lineno, flags, retried);
1474 		spin_unlock_bh(&set->lock);
1475 		retried = true;
1476 	} while (ret == -EAGAIN &&
1477 		 set->variant->resize &&
1478 		 (ret = set->variant->resize(set, retried)) == 0);
1479 
1480 	if (!ret || (ret == -IPSET_ERR_EXIST && eexist))
1481 		return 0;
1482 	if (lineno && use_lineno) {
1483 		/* Error in restore/batch mode: send back lineno */
1484 		struct nlmsghdr *rep, *nlh = nlmsg_hdr(skb);
1485 		struct sk_buff *skb2;
1486 		struct nlmsgerr *errmsg;
1487 		size_t payload = min(SIZE_MAX,
1488 				     sizeof(*errmsg) + nlmsg_len(nlh));
1489 		int min_len = nlmsg_total_size(sizeof(struct nfgenmsg));
1490 		struct nlattr *cda[IPSET_ATTR_CMD_MAX + 1];
1491 		struct nlattr *cmdattr;
1492 		u32 *errline;
1493 
1494 		skb2 = nlmsg_new(payload, GFP_KERNEL);
1495 		if (!skb2)
1496 			return -ENOMEM;
1497 		rep = __nlmsg_put(skb2, NETLINK_CB(skb).portid,
1498 				  nlh->nlmsg_seq, NLMSG_ERROR, payload, 0);
1499 		errmsg = nlmsg_data(rep);
1500 		errmsg->error = ret;
1501 		memcpy(&errmsg->msg, nlh, nlh->nlmsg_len);
1502 		cmdattr = (void *)&errmsg->msg + min_len;
1503 
1504 		nla_parse(cda, IPSET_ATTR_CMD_MAX,
1505 			  cmdattr, nlh->nlmsg_len - min_len,
1506 			  ip_set_adt_policy);
1507 
1508 		errline = nla_data(cda[IPSET_ATTR_LINENO]);
1509 
1510 		*errline = lineno;
1511 
1512 		netlink_unicast(ctnl, skb2, NETLINK_CB(skb).portid,
1513 				MSG_DONTWAIT);
1514 		/* Signal netlink not to send its ACK/errmsg.  */
1515 		return -EINTR;
1516 	}
1517 
1518 	return ret;
1519 }
1520 
1521 static int ip_set_uadd(struct net *net, struct sock *ctnl, struct sk_buff *skb,
1522 		       const struct nlmsghdr *nlh,
1523 		       const struct nlattr * const attr[])
1524 {
1525 	struct ip_set_net *inst = ip_set_pernet(net);
1526 	struct ip_set *set;
1527 	struct nlattr *tb[IPSET_ATTR_ADT_MAX + 1] = {};
1528 	const struct nlattr *nla;
1529 	u32 flags = flag_exist(nlh);
1530 	bool use_lineno;
1531 	int ret = 0;
1532 
1533 	if (unlikely(protocol_failed(attr) ||
1534 		     !attr[IPSET_ATTR_SETNAME] ||
1535 		     !((attr[IPSET_ATTR_DATA] != NULL) ^
1536 		       (attr[IPSET_ATTR_ADT] != NULL)) ||
1537 		     (attr[IPSET_ATTR_DATA] &&
1538 		      !flag_nested(attr[IPSET_ATTR_DATA])) ||
1539 		     (attr[IPSET_ATTR_ADT] &&
1540 		      (!flag_nested(attr[IPSET_ATTR_ADT]) ||
1541 		       !attr[IPSET_ATTR_LINENO]))))
1542 		return -IPSET_ERR_PROTOCOL;
1543 
1544 	set = find_set(inst, nla_data(attr[IPSET_ATTR_SETNAME]));
1545 	if (!set)
1546 		return -ENOENT;
1547 
1548 	use_lineno = !!attr[IPSET_ATTR_LINENO];
1549 	if (attr[IPSET_ATTR_DATA]) {
1550 		if (nla_parse_nested(tb, IPSET_ATTR_ADT_MAX,
1551 				     attr[IPSET_ATTR_DATA],
1552 				     set->type->adt_policy))
1553 			return -IPSET_ERR_PROTOCOL;
1554 		ret = call_ad(ctnl, skb, set, tb, IPSET_ADD, flags,
1555 			      use_lineno);
1556 	} else {
1557 		int nla_rem;
1558 
1559 		nla_for_each_nested(nla, attr[IPSET_ATTR_ADT], nla_rem) {
1560 			memset(tb, 0, sizeof(tb));
1561 			if (nla_type(nla) != IPSET_ATTR_DATA ||
1562 			    !flag_nested(nla) ||
1563 			    nla_parse_nested(tb, IPSET_ATTR_ADT_MAX, nla,
1564 					     set->type->adt_policy))
1565 				return -IPSET_ERR_PROTOCOL;
1566 			ret = call_ad(ctnl, skb, set, tb, IPSET_ADD,
1567 				      flags, use_lineno);
1568 			if (ret < 0)
1569 				return ret;
1570 		}
1571 	}
1572 	return ret;
1573 }
1574 
1575 static int ip_set_udel(struct net *net, struct sock *ctnl, struct sk_buff *skb,
1576 		       const struct nlmsghdr *nlh,
1577 		       const struct nlattr * const attr[])
1578 {
1579 	struct ip_set_net *inst = ip_set_pernet(net);
1580 	struct ip_set *set;
1581 	struct nlattr *tb[IPSET_ATTR_ADT_MAX + 1] = {};
1582 	const struct nlattr *nla;
1583 	u32 flags = flag_exist(nlh);
1584 	bool use_lineno;
1585 	int ret = 0;
1586 
1587 	if (unlikely(protocol_failed(attr) ||
1588 		     !attr[IPSET_ATTR_SETNAME] ||
1589 		     !((attr[IPSET_ATTR_DATA] != NULL) ^
1590 		       (attr[IPSET_ATTR_ADT] != NULL)) ||
1591 		     (attr[IPSET_ATTR_DATA] &&
1592 		      !flag_nested(attr[IPSET_ATTR_DATA])) ||
1593 		     (attr[IPSET_ATTR_ADT] &&
1594 		      (!flag_nested(attr[IPSET_ATTR_ADT]) ||
1595 		       !attr[IPSET_ATTR_LINENO]))))
1596 		return -IPSET_ERR_PROTOCOL;
1597 
1598 	set = find_set(inst, nla_data(attr[IPSET_ATTR_SETNAME]));
1599 	if (!set)
1600 		return -ENOENT;
1601 
1602 	use_lineno = !!attr[IPSET_ATTR_LINENO];
1603 	if (attr[IPSET_ATTR_DATA]) {
1604 		if (nla_parse_nested(tb, IPSET_ATTR_ADT_MAX,
1605 				     attr[IPSET_ATTR_DATA],
1606 				     set->type->adt_policy))
1607 			return -IPSET_ERR_PROTOCOL;
1608 		ret = call_ad(ctnl, skb, set, tb, IPSET_DEL, flags,
1609 			      use_lineno);
1610 	} else {
1611 		int nla_rem;
1612 
1613 		nla_for_each_nested(nla, attr[IPSET_ATTR_ADT], nla_rem) {
1614 			memset(tb, 0, sizeof(*tb));
1615 			if (nla_type(nla) != IPSET_ATTR_DATA ||
1616 			    !flag_nested(nla) ||
1617 			    nla_parse_nested(tb, IPSET_ATTR_ADT_MAX, nla,
1618 					     set->type->adt_policy))
1619 				return -IPSET_ERR_PROTOCOL;
1620 			ret = call_ad(ctnl, skb, set, tb, IPSET_DEL,
1621 				      flags, use_lineno);
1622 			if (ret < 0)
1623 				return ret;
1624 		}
1625 	}
1626 	return ret;
1627 }
1628 
1629 static int ip_set_utest(struct net *net, struct sock *ctnl, struct sk_buff *skb,
1630 			const struct nlmsghdr *nlh,
1631 			const struct nlattr * const attr[])
1632 {
1633 	struct ip_set_net *inst = ip_set_pernet(net);
1634 	struct ip_set *set;
1635 	struct nlattr *tb[IPSET_ATTR_ADT_MAX + 1] = {};
1636 	int ret = 0;
1637 
1638 	if (unlikely(protocol_failed(attr) ||
1639 		     !attr[IPSET_ATTR_SETNAME] ||
1640 		     !attr[IPSET_ATTR_DATA] ||
1641 		     !flag_nested(attr[IPSET_ATTR_DATA])))
1642 		return -IPSET_ERR_PROTOCOL;
1643 
1644 	set = find_set(inst, nla_data(attr[IPSET_ATTR_SETNAME]));
1645 	if (!set)
1646 		return -ENOENT;
1647 
1648 	if (nla_parse_nested(tb, IPSET_ATTR_ADT_MAX, attr[IPSET_ATTR_DATA],
1649 			     set->type->adt_policy))
1650 		return -IPSET_ERR_PROTOCOL;
1651 
1652 	rcu_read_lock_bh();
1653 	ret = set->variant->uadt(set, tb, IPSET_TEST, NULL, 0, 0);
1654 	rcu_read_unlock_bh();
1655 	/* Userspace can't trigger element to be re-added */
1656 	if (ret == -EAGAIN)
1657 		ret = 1;
1658 
1659 	return ret > 0 ? 0 : -IPSET_ERR_EXIST;
1660 }
1661 
1662 /* Get headed data of a set */
1663 
1664 static int ip_set_header(struct net *net, struct sock *ctnl,
1665 			 struct sk_buff *skb, const struct nlmsghdr *nlh,
1666 			 const struct nlattr * const attr[])
1667 {
1668 	struct ip_set_net *inst = ip_set_pernet(net);
1669 	const struct ip_set *set;
1670 	struct sk_buff *skb2;
1671 	struct nlmsghdr *nlh2;
1672 	int ret = 0;
1673 
1674 	if (unlikely(protocol_failed(attr) ||
1675 		     !attr[IPSET_ATTR_SETNAME]))
1676 		return -IPSET_ERR_PROTOCOL;
1677 
1678 	set = find_set(inst, nla_data(attr[IPSET_ATTR_SETNAME]));
1679 	if (!set)
1680 		return -ENOENT;
1681 
1682 	skb2 = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_KERNEL);
1683 	if (!skb2)
1684 		return -ENOMEM;
1685 
1686 	nlh2 = start_msg(skb2, NETLINK_CB(skb).portid, nlh->nlmsg_seq, 0,
1687 			 IPSET_CMD_HEADER);
1688 	if (!nlh2)
1689 		goto nlmsg_failure;
1690 	if (nla_put_u8(skb2, IPSET_ATTR_PROTOCOL, IPSET_PROTOCOL) ||
1691 	    nla_put_string(skb2, IPSET_ATTR_SETNAME, set->name) ||
1692 	    nla_put_string(skb2, IPSET_ATTR_TYPENAME, set->type->name) ||
1693 	    nla_put_u8(skb2, IPSET_ATTR_FAMILY, set->family) ||
1694 	    nla_put_u8(skb2, IPSET_ATTR_REVISION, set->revision))
1695 		goto nla_put_failure;
1696 	nlmsg_end(skb2, nlh2);
1697 
1698 	ret = netlink_unicast(ctnl, skb2, NETLINK_CB(skb).portid, MSG_DONTWAIT);
1699 	if (ret < 0)
1700 		return ret;
1701 
1702 	return 0;
1703 
1704 nla_put_failure:
1705 	nlmsg_cancel(skb2, nlh2);
1706 nlmsg_failure:
1707 	kfree_skb(skb2);
1708 	return -EMSGSIZE;
1709 }
1710 
1711 /* Get type data */
1712 
1713 static const struct nla_policy ip_set_type_policy[IPSET_ATTR_CMD_MAX + 1] = {
1714 	[IPSET_ATTR_PROTOCOL]	= { .type = NLA_U8 },
1715 	[IPSET_ATTR_TYPENAME]	= { .type = NLA_NUL_STRING,
1716 				    .len = IPSET_MAXNAMELEN - 1 },
1717 	[IPSET_ATTR_FAMILY]	= { .type = NLA_U8 },
1718 };
1719 
1720 static int ip_set_type(struct net *net, struct sock *ctnl, struct sk_buff *skb,
1721 		       const struct nlmsghdr *nlh,
1722 		       const struct nlattr * const attr[])
1723 {
1724 	struct sk_buff *skb2;
1725 	struct nlmsghdr *nlh2;
1726 	u8 family, min, max;
1727 	const char *typename;
1728 	int ret = 0;
1729 
1730 	if (unlikely(protocol_failed(attr) ||
1731 		     !attr[IPSET_ATTR_TYPENAME] ||
1732 		     !attr[IPSET_ATTR_FAMILY]))
1733 		return -IPSET_ERR_PROTOCOL;
1734 
1735 	family = nla_get_u8(attr[IPSET_ATTR_FAMILY]);
1736 	typename = nla_data(attr[IPSET_ATTR_TYPENAME]);
1737 	ret = find_set_type_minmax(typename, family, &min, &max);
1738 	if (ret)
1739 		return ret;
1740 
1741 	skb2 = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_KERNEL);
1742 	if (!skb2)
1743 		return -ENOMEM;
1744 
1745 	nlh2 = start_msg(skb2, NETLINK_CB(skb).portid, nlh->nlmsg_seq, 0,
1746 			 IPSET_CMD_TYPE);
1747 	if (!nlh2)
1748 		goto nlmsg_failure;
1749 	if (nla_put_u8(skb2, IPSET_ATTR_PROTOCOL, IPSET_PROTOCOL) ||
1750 	    nla_put_string(skb2, IPSET_ATTR_TYPENAME, typename) ||
1751 	    nla_put_u8(skb2, IPSET_ATTR_FAMILY, family) ||
1752 	    nla_put_u8(skb2, IPSET_ATTR_REVISION, max) ||
1753 	    nla_put_u8(skb2, IPSET_ATTR_REVISION_MIN, min))
1754 		goto nla_put_failure;
1755 	nlmsg_end(skb2, nlh2);
1756 
1757 	pr_debug("Send TYPE, nlmsg_len: %u\n", nlh2->nlmsg_len);
1758 	ret = netlink_unicast(ctnl, skb2, NETLINK_CB(skb).portid, MSG_DONTWAIT);
1759 	if (ret < 0)
1760 		return ret;
1761 
1762 	return 0;
1763 
1764 nla_put_failure:
1765 	nlmsg_cancel(skb2, nlh2);
1766 nlmsg_failure:
1767 	kfree_skb(skb2);
1768 	return -EMSGSIZE;
1769 }
1770 
1771 /* Get protocol version */
1772 
1773 static const struct nla_policy
1774 ip_set_protocol_policy[IPSET_ATTR_CMD_MAX + 1] = {
1775 	[IPSET_ATTR_PROTOCOL]	= { .type = NLA_U8 },
1776 };
1777 
1778 static int ip_set_protocol(struct net *net, struct sock *ctnl,
1779 			   struct sk_buff *skb, const struct nlmsghdr *nlh,
1780 			   const struct nlattr * const attr[])
1781 {
1782 	struct sk_buff *skb2;
1783 	struct nlmsghdr *nlh2;
1784 	int ret = 0;
1785 
1786 	if (unlikely(!attr[IPSET_ATTR_PROTOCOL]))
1787 		return -IPSET_ERR_PROTOCOL;
1788 
1789 	skb2 = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_KERNEL);
1790 	if (!skb2)
1791 		return -ENOMEM;
1792 
1793 	nlh2 = start_msg(skb2, NETLINK_CB(skb).portid, nlh->nlmsg_seq, 0,
1794 			 IPSET_CMD_PROTOCOL);
1795 	if (!nlh2)
1796 		goto nlmsg_failure;
1797 	if (nla_put_u8(skb2, IPSET_ATTR_PROTOCOL, IPSET_PROTOCOL))
1798 		goto nla_put_failure;
1799 	nlmsg_end(skb2, nlh2);
1800 
1801 	ret = netlink_unicast(ctnl, skb2, NETLINK_CB(skb).portid, MSG_DONTWAIT);
1802 	if (ret < 0)
1803 		return ret;
1804 
1805 	return 0;
1806 
1807 nla_put_failure:
1808 	nlmsg_cancel(skb2, nlh2);
1809 nlmsg_failure:
1810 	kfree_skb(skb2);
1811 	return -EMSGSIZE;
1812 }
1813 
1814 static const struct nfnl_callback ip_set_netlink_subsys_cb[IPSET_MSG_MAX] = {
1815 	[IPSET_CMD_NONE]	= {
1816 		.call		= ip_set_none,
1817 		.attr_count	= IPSET_ATTR_CMD_MAX,
1818 	},
1819 	[IPSET_CMD_CREATE]	= {
1820 		.call		= ip_set_create,
1821 		.attr_count	= IPSET_ATTR_CMD_MAX,
1822 		.policy		= ip_set_create_policy,
1823 	},
1824 	[IPSET_CMD_DESTROY]	= {
1825 		.call		= ip_set_destroy,
1826 		.attr_count	= IPSET_ATTR_CMD_MAX,
1827 		.policy		= ip_set_setname_policy,
1828 	},
1829 	[IPSET_CMD_FLUSH]	= {
1830 		.call		= ip_set_flush,
1831 		.attr_count	= IPSET_ATTR_CMD_MAX,
1832 		.policy		= ip_set_setname_policy,
1833 	},
1834 	[IPSET_CMD_RENAME]	= {
1835 		.call		= ip_set_rename,
1836 		.attr_count	= IPSET_ATTR_CMD_MAX,
1837 		.policy		= ip_set_setname2_policy,
1838 	},
1839 	[IPSET_CMD_SWAP]	= {
1840 		.call		= ip_set_swap,
1841 		.attr_count	= IPSET_ATTR_CMD_MAX,
1842 		.policy		= ip_set_setname2_policy,
1843 	},
1844 	[IPSET_CMD_LIST]	= {
1845 		.call		= ip_set_dump,
1846 		.attr_count	= IPSET_ATTR_CMD_MAX,
1847 		.policy		= ip_set_setname_policy,
1848 	},
1849 	[IPSET_CMD_SAVE]	= {
1850 		.call		= ip_set_dump,
1851 		.attr_count	= IPSET_ATTR_CMD_MAX,
1852 		.policy		= ip_set_setname_policy,
1853 	},
1854 	[IPSET_CMD_ADD]	= {
1855 		.call		= ip_set_uadd,
1856 		.attr_count	= IPSET_ATTR_CMD_MAX,
1857 		.policy		= ip_set_adt_policy,
1858 	},
1859 	[IPSET_CMD_DEL]	= {
1860 		.call		= ip_set_udel,
1861 		.attr_count	= IPSET_ATTR_CMD_MAX,
1862 		.policy		= ip_set_adt_policy,
1863 	},
1864 	[IPSET_CMD_TEST]	= {
1865 		.call		= ip_set_utest,
1866 		.attr_count	= IPSET_ATTR_CMD_MAX,
1867 		.policy		= ip_set_adt_policy,
1868 	},
1869 	[IPSET_CMD_HEADER]	= {
1870 		.call		= ip_set_header,
1871 		.attr_count	= IPSET_ATTR_CMD_MAX,
1872 		.policy		= ip_set_setname_policy,
1873 	},
1874 	[IPSET_CMD_TYPE]	= {
1875 		.call		= ip_set_type,
1876 		.attr_count	= IPSET_ATTR_CMD_MAX,
1877 		.policy		= ip_set_type_policy,
1878 	},
1879 	[IPSET_CMD_PROTOCOL]	= {
1880 		.call		= ip_set_protocol,
1881 		.attr_count	= IPSET_ATTR_CMD_MAX,
1882 		.policy		= ip_set_protocol_policy,
1883 	},
1884 };
1885 
1886 static struct nfnetlink_subsystem ip_set_netlink_subsys __read_mostly = {
1887 	.name		= "ip_set",
1888 	.subsys_id	= NFNL_SUBSYS_IPSET,
1889 	.cb_count	= IPSET_MSG_MAX,
1890 	.cb		= ip_set_netlink_subsys_cb,
1891 };
1892 
1893 /* Interface to iptables/ip6tables */
1894 
1895 static int
1896 ip_set_sockfn_get(struct sock *sk, int optval, void __user *user, int *len)
1897 {
1898 	unsigned int *op;
1899 	void *data;
1900 	int copylen = *len, ret = 0;
1901 	struct net *net = sock_net(sk);
1902 	struct ip_set_net *inst = ip_set_pernet(net);
1903 
1904 	if (!ns_capable(net->user_ns, CAP_NET_ADMIN))
1905 		return -EPERM;
1906 	if (optval != SO_IP_SET)
1907 		return -EBADF;
1908 	if (*len < sizeof(unsigned int))
1909 		return -EINVAL;
1910 
1911 	data = vmalloc(*len);
1912 	if (!data)
1913 		return -ENOMEM;
1914 	if (copy_from_user(data, user, *len) != 0) {
1915 		ret = -EFAULT;
1916 		goto done;
1917 	}
1918 	op = (unsigned int *)data;
1919 
1920 	if (*op < IP_SET_OP_VERSION) {
1921 		/* Check the version at the beginning of operations */
1922 		struct ip_set_req_version *req_version = data;
1923 
1924 		if (*len < sizeof(struct ip_set_req_version)) {
1925 			ret = -EINVAL;
1926 			goto done;
1927 		}
1928 
1929 		if (req_version->version != IPSET_PROTOCOL) {
1930 			ret = -EPROTO;
1931 			goto done;
1932 		}
1933 	}
1934 
1935 	switch (*op) {
1936 	case IP_SET_OP_VERSION: {
1937 		struct ip_set_req_version *req_version = data;
1938 
1939 		if (*len != sizeof(struct ip_set_req_version)) {
1940 			ret = -EINVAL;
1941 			goto done;
1942 		}
1943 
1944 		req_version->version = IPSET_PROTOCOL;
1945 		ret = copy_to_user(user, req_version,
1946 				   sizeof(struct ip_set_req_version));
1947 		goto done;
1948 	}
1949 	case IP_SET_OP_GET_BYNAME: {
1950 		struct ip_set_req_get_set *req_get = data;
1951 		ip_set_id_t id;
1952 
1953 		if (*len != sizeof(struct ip_set_req_get_set)) {
1954 			ret = -EINVAL;
1955 			goto done;
1956 		}
1957 		req_get->set.name[IPSET_MAXNAMELEN - 1] = '\0';
1958 		nfnl_lock(NFNL_SUBSYS_IPSET);
1959 		find_set_and_id(inst, req_get->set.name, &id);
1960 		req_get->set.index = id;
1961 		nfnl_unlock(NFNL_SUBSYS_IPSET);
1962 		goto copy;
1963 	}
1964 	case IP_SET_OP_GET_FNAME: {
1965 		struct ip_set_req_get_set_family *req_get = data;
1966 		ip_set_id_t id;
1967 
1968 		if (*len != sizeof(struct ip_set_req_get_set_family)) {
1969 			ret = -EINVAL;
1970 			goto done;
1971 		}
1972 		req_get->set.name[IPSET_MAXNAMELEN - 1] = '\0';
1973 		nfnl_lock(NFNL_SUBSYS_IPSET);
1974 		find_set_and_id(inst, req_get->set.name, &id);
1975 		req_get->set.index = id;
1976 		if (id != IPSET_INVALID_ID)
1977 			req_get->family = ip_set(inst, id)->family;
1978 		nfnl_unlock(NFNL_SUBSYS_IPSET);
1979 		goto copy;
1980 	}
1981 	case IP_SET_OP_GET_BYINDEX: {
1982 		struct ip_set_req_get_set *req_get = data;
1983 		struct ip_set *set;
1984 
1985 		if (*len != sizeof(struct ip_set_req_get_set) ||
1986 		    req_get->set.index >= inst->ip_set_max) {
1987 			ret = -EINVAL;
1988 			goto done;
1989 		}
1990 		nfnl_lock(NFNL_SUBSYS_IPSET);
1991 		set = ip_set(inst, req_get->set.index);
1992 		strncpy(req_get->set.name, set ? set->name : "",
1993 			IPSET_MAXNAMELEN);
1994 		nfnl_unlock(NFNL_SUBSYS_IPSET);
1995 		goto copy;
1996 	}
1997 	default:
1998 		ret = -EBADMSG;
1999 		goto done;
2000 	}	/* end of switch(op) */
2001 
2002 copy:
2003 	ret = copy_to_user(user, data, copylen);
2004 
2005 done:
2006 	vfree(data);
2007 	if (ret > 0)
2008 		ret = 0;
2009 	return ret;
2010 }
2011 
2012 static struct nf_sockopt_ops so_set __read_mostly = {
2013 	.pf		= PF_INET,
2014 	.get_optmin	= SO_IP_SET,
2015 	.get_optmax	= SO_IP_SET + 1,
2016 	.get		= &ip_set_sockfn_get,
2017 	.owner		= THIS_MODULE,
2018 };
2019 
2020 static int __net_init
2021 ip_set_net_init(struct net *net)
2022 {
2023 	struct ip_set_net *inst = ip_set_pernet(net);
2024 	struct ip_set **list;
2025 
2026 	inst->ip_set_max = max_sets ? max_sets : CONFIG_IP_SET_MAX;
2027 	if (inst->ip_set_max >= IPSET_INVALID_ID)
2028 		inst->ip_set_max = IPSET_INVALID_ID - 1;
2029 
2030 	list = kcalloc(inst->ip_set_max, sizeof(struct ip_set *), GFP_KERNEL);
2031 	if (!list)
2032 		return -ENOMEM;
2033 	inst->is_deleted = false;
2034 	inst->is_destroyed = false;
2035 	rcu_assign_pointer(inst->ip_set_list, list);
2036 	return 0;
2037 }
2038 
2039 static void __net_exit
2040 ip_set_net_exit(struct net *net)
2041 {
2042 	struct ip_set_net *inst = ip_set_pernet(net);
2043 
2044 	struct ip_set *set = NULL;
2045 	ip_set_id_t i;
2046 
2047 	inst->is_deleted = true; /* flag for ip_set_nfnl_put */
2048 
2049 	for (i = 0; i < inst->ip_set_max; i++) {
2050 		set = ip_set(inst, i);
2051 		if (set) {
2052 			ip_set(inst, i) = NULL;
2053 			ip_set_destroy_set(set);
2054 		}
2055 	}
2056 	kfree(rcu_dereference_protected(inst->ip_set_list, 1));
2057 }
2058 
2059 static struct pernet_operations ip_set_net_ops = {
2060 	.init	= ip_set_net_init,
2061 	.exit   = ip_set_net_exit,
2062 	.id	= &ip_set_net_id,
2063 	.size	= sizeof(struct ip_set_net)
2064 };
2065 
2066 static int __init
2067 ip_set_init(void)
2068 {
2069 	int ret = nfnetlink_subsys_register(&ip_set_netlink_subsys);
2070 
2071 	if (ret != 0) {
2072 		pr_err("ip_set: cannot register with nfnetlink.\n");
2073 		return ret;
2074 	}
2075 	ret = nf_register_sockopt(&so_set);
2076 	if (ret != 0) {
2077 		pr_err("SO_SET registry failed: %d\n", ret);
2078 		nfnetlink_subsys_unregister(&ip_set_netlink_subsys);
2079 		return ret;
2080 	}
2081 	ret = register_pernet_subsys(&ip_set_net_ops);
2082 	if (ret) {
2083 		pr_err("ip_set: cannot register pernet_subsys.\n");
2084 		nf_unregister_sockopt(&so_set);
2085 		nfnetlink_subsys_unregister(&ip_set_netlink_subsys);
2086 		return ret;
2087 	}
2088 	pr_info("ip_set: protocol %u\n", IPSET_PROTOCOL);
2089 	return 0;
2090 }
2091 
2092 static void __exit
2093 ip_set_fini(void)
2094 {
2095 	unregister_pernet_subsys(&ip_set_net_ops);
2096 	nf_unregister_sockopt(&so_set);
2097 	nfnetlink_subsys_unregister(&ip_set_netlink_subsys);
2098 	pr_debug("these are the famous last words\n");
2099 }
2100 
2101 module_init(ip_set_init);
2102 module_exit(ip_set_fini);
2103