added 2.6.29.6 aldebaran kernel
[nao-ulib.git] / kernel / 2.6.29.6-aldebaran-rt / net / netfilter / ipvs / ip_vs_ctl.c
blobf7ad2fddf916bf77151ef88210490d26a4e2162c
1 /*
2 * IPVS An implementation of the IP virtual server support for the
3 * LINUX operating system. IPVS is now implemented as a module
4 * over the NetFilter framework. IPVS can be used to build a
5 * high-performance and highly available server based on a
6 * cluster of servers.
8 * Authors: Wensong Zhang <wensong@linuxvirtualserver.org>
9 * Peter Kese <peter.kese@ijs.si>
10 * Julian Anastasov <ja@ssi.bg>
12 * This program is free software; you can redistribute it and/or
13 * modify it under the terms of the GNU General Public License
14 * as published by the Free Software Foundation; either version
15 * 2 of the License, or (at your option) any later version.
17 * Changes:
21 #include <linux/module.h>
22 #include <linux/init.h>
23 #include <linux/types.h>
24 #include <linux/capability.h>
25 #include <linux/fs.h>
26 #include <linux/sysctl.h>
27 #include <linux/proc_fs.h>
28 #include <linux/workqueue.h>
29 #include <linux/swap.h>
30 #include <linux/seq_file.h>
32 #include <linux/netfilter.h>
33 #include <linux/netfilter_ipv4.h>
34 #include <linux/mutex.h>
36 #include <net/net_namespace.h>
37 #include <net/ip.h>
38 #ifdef CONFIG_IP_VS_IPV6
39 #include <net/ipv6.h>
40 #include <net/ip6_route.h>
41 #endif
42 #include <net/route.h>
43 #include <net/sock.h>
44 #include <net/genetlink.h>
46 #include <asm/uaccess.h>
48 #include <net/ip_vs.h>
50 /* semaphore for IPVS sockopts. And, [gs]etsockopt may sleep. */
51 static DEFINE_MUTEX(__ip_vs_mutex);
53 /* lock for service table */
54 static DEFINE_RWLOCK(__ip_vs_svc_lock);
56 /* lock for table with the real services */
57 static DEFINE_RWLOCK(__ip_vs_rs_lock);
59 /* lock for state and timeout tables */
60 static DEFINE_RWLOCK(__ip_vs_securetcp_lock);
62 /* lock for drop entry handling */
63 static DEFINE_SPINLOCK(__ip_vs_dropentry_lock);
65 /* lock for drop packet handling */
66 static DEFINE_SPINLOCK(__ip_vs_droppacket_lock);
68 /* 1/rate drop and drop-entry variables */
69 int ip_vs_drop_rate = 0;
70 int ip_vs_drop_counter = 0;
71 static atomic_t ip_vs_dropentry = ATOMIC_INIT(0);
73 /* number of virtual services */
74 static int ip_vs_num_services = 0;
76 /* sysctl variables */
77 static int sysctl_ip_vs_drop_entry = 0;
78 static int sysctl_ip_vs_drop_packet = 0;
79 static int sysctl_ip_vs_secure_tcp = 0;
80 static int sysctl_ip_vs_amemthresh = 1024;
81 static int sysctl_ip_vs_am_droprate = 10;
82 int sysctl_ip_vs_cache_bypass = 0;
83 int sysctl_ip_vs_expire_nodest_conn = 0;
84 int sysctl_ip_vs_expire_quiescent_template = 0;
85 int sysctl_ip_vs_sync_threshold[2] = { 3, 50 };
86 int sysctl_ip_vs_nat_icmp_send = 0;
89 #ifdef CONFIG_IP_VS_DEBUG
90 static int sysctl_ip_vs_debug_level = 0;
92 int ip_vs_get_debug_level(void)
94 return sysctl_ip_vs_debug_level;
96 #endif
98 #ifdef CONFIG_IP_VS_IPV6
99 /* Taken from rt6_fill_node() in net/ipv6/route.c, is there a better way? */
100 static int __ip_vs_addr_is_local_v6(const struct in6_addr *addr)
102 struct rt6_info *rt;
103 struct flowi fl = {
104 .oif = 0,
105 .nl_u = {
106 .ip6_u = {
107 .daddr = *addr,
108 .saddr = { .s6_addr32 = {0, 0, 0, 0} }, } },
111 rt = (struct rt6_info *)ip6_route_output(&init_net, NULL, &fl);
112 if (rt && rt->rt6i_dev && (rt->rt6i_dev->flags & IFF_LOOPBACK))
113 return 1;
115 return 0;
117 #endif
119 * update_defense_level is called from keventd and from sysctl,
120 * so it needs to protect itself from softirqs
122 static void update_defense_level(void)
124 struct sysinfo i;
125 static int old_secure_tcp = 0;
126 int availmem;
127 int nomem;
128 int to_change = -1;
130 /* we only count free and buffered memory (in pages) */
131 si_meminfo(&i);
132 availmem = i.freeram + i.bufferram;
133 /* however in linux 2.5 the i.bufferram is total page cache size,
134 we need adjust it */
135 /* si_swapinfo(&i); */
136 /* availmem = availmem - (i.totalswap - i.freeswap); */
138 nomem = (availmem < sysctl_ip_vs_amemthresh);
140 local_bh_disable();
142 /* drop_entry */
143 spin_lock(&__ip_vs_dropentry_lock);
144 switch (sysctl_ip_vs_drop_entry) {
145 case 0:
146 atomic_set(&ip_vs_dropentry, 0);
147 break;
148 case 1:
149 if (nomem) {
150 atomic_set(&ip_vs_dropentry, 1);
151 sysctl_ip_vs_drop_entry = 2;
152 } else {
153 atomic_set(&ip_vs_dropentry, 0);
155 break;
156 case 2:
157 if (nomem) {
158 atomic_set(&ip_vs_dropentry, 1);
159 } else {
160 atomic_set(&ip_vs_dropentry, 0);
161 sysctl_ip_vs_drop_entry = 1;
163 break;
164 case 3:
165 atomic_set(&ip_vs_dropentry, 1);
166 break;
168 spin_unlock(&__ip_vs_dropentry_lock);
170 /* drop_packet */
171 spin_lock(&__ip_vs_droppacket_lock);
172 switch (sysctl_ip_vs_drop_packet) {
173 case 0:
174 ip_vs_drop_rate = 0;
175 break;
176 case 1:
177 if (nomem) {
178 ip_vs_drop_rate = ip_vs_drop_counter
179 = sysctl_ip_vs_amemthresh /
180 (sysctl_ip_vs_amemthresh-availmem);
181 sysctl_ip_vs_drop_packet = 2;
182 } else {
183 ip_vs_drop_rate = 0;
185 break;
186 case 2:
187 if (nomem) {
188 ip_vs_drop_rate = ip_vs_drop_counter
189 = sysctl_ip_vs_amemthresh /
190 (sysctl_ip_vs_amemthresh-availmem);
191 } else {
192 ip_vs_drop_rate = 0;
193 sysctl_ip_vs_drop_packet = 1;
195 break;
196 case 3:
197 ip_vs_drop_rate = sysctl_ip_vs_am_droprate;
198 break;
200 spin_unlock(&__ip_vs_droppacket_lock);
202 /* secure_tcp */
203 write_lock(&__ip_vs_securetcp_lock);
204 switch (sysctl_ip_vs_secure_tcp) {
205 case 0:
206 if (old_secure_tcp >= 2)
207 to_change = 0;
208 break;
209 case 1:
210 if (nomem) {
211 if (old_secure_tcp < 2)
212 to_change = 1;
213 sysctl_ip_vs_secure_tcp = 2;
214 } else {
215 if (old_secure_tcp >= 2)
216 to_change = 0;
218 break;
219 case 2:
220 if (nomem) {
221 if (old_secure_tcp < 2)
222 to_change = 1;
223 } else {
224 if (old_secure_tcp >= 2)
225 to_change = 0;
226 sysctl_ip_vs_secure_tcp = 1;
228 break;
229 case 3:
230 if (old_secure_tcp < 2)
231 to_change = 1;
232 break;
234 old_secure_tcp = sysctl_ip_vs_secure_tcp;
235 if (to_change >= 0)
236 ip_vs_protocol_timeout_change(sysctl_ip_vs_secure_tcp>1);
237 write_unlock(&__ip_vs_securetcp_lock);
239 local_bh_enable();
244 * Timer for checking the defense
246 #define DEFENSE_TIMER_PERIOD 1*HZ
247 static void defense_work_handler(struct work_struct *work);
248 static DECLARE_DELAYED_WORK(defense_work, defense_work_handler);
250 static void defense_work_handler(struct work_struct *work)
252 update_defense_level();
253 if (atomic_read(&ip_vs_dropentry))
254 ip_vs_random_dropentry();
256 schedule_delayed_work(&defense_work, DEFENSE_TIMER_PERIOD);
260 ip_vs_use_count_inc(void)
262 return try_module_get(THIS_MODULE);
265 void
266 ip_vs_use_count_dec(void)
268 module_put(THIS_MODULE);
273 * Hash table: for virtual service lookups
275 #define IP_VS_SVC_TAB_BITS 8
276 #define IP_VS_SVC_TAB_SIZE (1 << IP_VS_SVC_TAB_BITS)
277 #define IP_VS_SVC_TAB_MASK (IP_VS_SVC_TAB_SIZE - 1)
279 /* the service table hashed by <protocol, addr, port> */
280 static struct list_head ip_vs_svc_table[IP_VS_SVC_TAB_SIZE];
281 /* the service table hashed by fwmark */
282 static struct list_head ip_vs_svc_fwm_table[IP_VS_SVC_TAB_SIZE];
285 * Hash table: for real service lookups
287 #define IP_VS_RTAB_BITS 4
288 #define IP_VS_RTAB_SIZE (1 << IP_VS_RTAB_BITS)
289 #define IP_VS_RTAB_MASK (IP_VS_RTAB_SIZE - 1)
291 static struct list_head ip_vs_rtable[IP_VS_RTAB_SIZE];
294 * Trash for destinations
296 static LIST_HEAD(ip_vs_dest_trash);
299 * FTP & NULL virtual service counters
301 static atomic_t ip_vs_ftpsvc_counter = ATOMIC_INIT(0);
302 static atomic_t ip_vs_nullsvc_counter = ATOMIC_INIT(0);
306 * Returns hash value for virtual service
308 static __inline__ unsigned
309 ip_vs_svc_hashkey(int af, unsigned proto, const union nf_inet_addr *addr,
310 __be16 port)
312 register unsigned porth = ntohs(port);
313 __be32 addr_fold = addr->ip;
315 #ifdef CONFIG_IP_VS_IPV6
316 if (af == AF_INET6)
317 addr_fold = addr->ip6[0]^addr->ip6[1]^
318 addr->ip6[2]^addr->ip6[3];
319 #endif
321 return (proto^ntohl(addr_fold)^(porth>>IP_VS_SVC_TAB_BITS)^porth)
322 & IP_VS_SVC_TAB_MASK;
326 * Returns hash value of fwmark for virtual service lookup
328 static __inline__ unsigned ip_vs_svc_fwm_hashkey(__u32 fwmark)
330 return fwmark & IP_VS_SVC_TAB_MASK;
334 * Hashes a service in the ip_vs_svc_table by <proto,addr,port>
335 * or in the ip_vs_svc_fwm_table by fwmark.
336 * Should be called with locked tables.
338 static int ip_vs_svc_hash(struct ip_vs_service *svc)
340 unsigned hash;
342 if (svc->flags & IP_VS_SVC_F_HASHED) {
343 IP_VS_ERR("ip_vs_svc_hash(): request for already hashed, "
344 "called from %p\n", __builtin_return_address(0));
345 return 0;
348 if (svc->fwmark == 0) {
350 * Hash it by <protocol,addr,port> in ip_vs_svc_table
352 hash = ip_vs_svc_hashkey(svc->af, svc->protocol, &svc->addr,
353 svc->port);
354 list_add(&svc->s_list, &ip_vs_svc_table[hash]);
355 } else {
357 * Hash it by fwmark in ip_vs_svc_fwm_table
359 hash = ip_vs_svc_fwm_hashkey(svc->fwmark);
360 list_add(&svc->f_list, &ip_vs_svc_fwm_table[hash]);
363 svc->flags |= IP_VS_SVC_F_HASHED;
364 /* increase its refcnt because it is referenced by the svc table */
365 atomic_inc(&svc->refcnt);
366 return 1;
371 * Unhashes a service from ip_vs_svc_table/ip_vs_svc_fwm_table.
372 * Should be called with locked tables.
374 static int ip_vs_svc_unhash(struct ip_vs_service *svc)
376 if (!(svc->flags & IP_VS_SVC_F_HASHED)) {
377 IP_VS_ERR("ip_vs_svc_unhash(): request for unhash flagged, "
378 "called from %p\n", __builtin_return_address(0));
379 return 0;
382 if (svc->fwmark == 0) {
383 /* Remove it from the ip_vs_svc_table table */
384 list_del(&svc->s_list);
385 } else {
386 /* Remove it from the ip_vs_svc_fwm_table table */
387 list_del(&svc->f_list);
390 svc->flags &= ~IP_VS_SVC_F_HASHED;
391 atomic_dec(&svc->refcnt);
392 return 1;
397 * Get service by {proto,addr,port} in the service table.
399 static inline struct ip_vs_service *
400 __ip_vs_service_get(int af, __u16 protocol, const union nf_inet_addr *vaddr,
401 __be16 vport)
403 unsigned hash;
404 struct ip_vs_service *svc;
406 /* Check for "full" addressed entries */
407 hash = ip_vs_svc_hashkey(af, protocol, vaddr, vport);
409 list_for_each_entry(svc, &ip_vs_svc_table[hash], s_list){
410 if ((svc->af == af)
411 && ip_vs_addr_equal(af, &svc->addr, vaddr)
412 && (svc->port == vport)
413 && (svc->protocol == protocol)) {
414 /* HIT */
415 atomic_inc(&svc->usecnt);
416 return svc;
420 return NULL;
425 * Get service by {fwmark} in the service table.
427 static inline struct ip_vs_service *
428 __ip_vs_svc_fwm_get(int af, __u32 fwmark)
430 unsigned hash;
431 struct ip_vs_service *svc;
433 /* Check for fwmark addressed entries */
434 hash = ip_vs_svc_fwm_hashkey(fwmark);
436 list_for_each_entry(svc, &ip_vs_svc_fwm_table[hash], f_list) {
437 if (svc->fwmark == fwmark && svc->af == af) {
438 /* HIT */
439 atomic_inc(&svc->usecnt);
440 return svc;
444 return NULL;
447 struct ip_vs_service *
448 ip_vs_service_get(int af, __u32 fwmark, __u16 protocol,
449 const union nf_inet_addr *vaddr, __be16 vport)
451 struct ip_vs_service *svc;
453 read_lock(&__ip_vs_svc_lock);
456 * Check the table hashed by fwmark first
458 if (fwmark && (svc = __ip_vs_svc_fwm_get(af, fwmark)))
459 goto out;
462 * Check the table hashed by <protocol,addr,port>
463 * for "full" addressed entries
465 svc = __ip_vs_service_get(af, protocol, vaddr, vport);
467 if (svc == NULL
468 && protocol == IPPROTO_TCP
469 && atomic_read(&ip_vs_ftpsvc_counter)
470 && (vport == FTPDATA || ntohs(vport) >= PROT_SOCK)) {
472 * Check if ftp service entry exists, the packet
473 * might belong to FTP data connections.
475 svc = __ip_vs_service_get(af, protocol, vaddr, FTPPORT);
478 if (svc == NULL
479 && atomic_read(&ip_vs_nullsvc_counter)) {
481 * Check if the catch-all port (port zero) exists
483 svc = __ip_vs_service_get(af, protocol, vaddr, 0);
486 out:
487 read_unlock(&__ip_vs_svc_lock);
489 IP_VS_DBG_BUF(9, "lookup service: fwm %u %s %s:%u %s\n",
490 fwmark, ip_vs_proto_name(protocol),
491 IP_VS_DBG_ADDR(af, vaddr), ntohs(vport),
492 svc ? "hit" : "not hit");
494 return svc;
498 static inline void
499 __ip_vs_bind_svc(struct ip_vs_dest *dest, struct ip_vs_service *svc)
501 atomic_inc(&svc->refcnt);
502 dest->svc = svc;
505 static inline void
506 __ip_vs_unbind_svc(struct ip_vs_dest *dest)
508 struct ip_vs_service *svc = dest->svc;
510 dest->svc = NULL;
511 if (atomic_dec_and_test(&svc->refcnt))
512 kfree(svc);
517 * Returns hash value for real service
519 static inline unsigned ip_vs_rs_hashkey(int af,
520 const union nf_inet_addr *addr,
521 __be16 port)
523 register unsigned porth = ntohs(port);
524 __be32 addr_fold = addr->ip;
526 #ifdef CONFIG_IP_VS_IPV6
527 if (af == AF_INET6)
528 addr_fold = addr->ip6[0]^addr->ip6[1]^
529 addr->ip6[2]^addr->ip6[3];
530 #endif
532 return (ntohl(addr_fold)^(porth>>IP_VS_RTAB_BITS)^porth)
533 & IP_VS_RTAB_MASK;
537 * Hashes ip_vs_dest in ip_vs_rtable by <proto,addr,port>.
538 * should be called with locked tables.
540 static int ip_vs_rs_hash(struct ip_vs_dest *dest)
542 unsigned hash;
544 if (!list_empty(&dest->d_list)) {
545 return 0;
549 * Hash by proto,addr,port,
550 * which are the parameters of the real service.
552 hash = ip_vs_rs_hashkey(dest->af, &dest->addr, dest->port);
554 list_add(&dest->d_list, &ip_vs_rtable[hash]);
556 return 1;
560 * UNhashes ip_vs_dest from ip_vs_rtable.
561 * should be called with locked tables.
563 static int ip_vs_rs_unhash(struct ip_vs_dest *dest)
566 * Remove it from the ip_vs_rtable table.
568 if (!list_empty(&dest->d_list)) {
569 list_del(&dest->d_list);
570 INIT_LIST_HEAD(&dest->d_list);
573 return 1;
577 * Lookup real service by <proto,addr,port> in the real service table.
579 struct ip_vs_dest *
580 ip_vs_lookup_real_service(int af, __u16 protocol,
581 const union nf_inet_addr *daddr,
582 __be16 dport)
584 unsigned hash;
585 struct ip_vs_dest *dest;
588 * Check for "full" addressed entries
589 * Return the first found entry
591 hash = ip_vs_rs_hashkey(af, daddr, dport);
593 read_lock(&__ip_vs_rs_lock);
594 list_for_each_entry(dest, &ip_vs_rtable[hash], d_list) {
595 if ((dest->af == af)
596 && ip_vs_addr_equal(af, &dest->addr, daddr)
597 && (dest->port == dport)
598 && ((dest->protocol == protocol) ||
599 dest->vfwmark)) {
600 /* HIT */
601 read_unlock(&__ip_vs_rs_lock);
602 return dest;
605 read_unlock(&__ip_vs_rs_lock);
607 return NULL;
611 * Lookup destination by {addr,port} in the given service
613 static struct ip_vs_dest *
614 ip_vs_lookup_dest(struct ip_vs_service *svc, const union nf_inet_addr *daddr,
615 __be16 dport)
617 struct ip_vs_dest *dest;
620 * Find the destination for the given service
622 list_for_each_entry(dest, &svc->destinations, n_list) {
623 if ((dest->af == svc->af)
624 && ip_vs_addr_equal(svc->af, &dest->addr, daddr)
625 && (dest->port == dport)) {
626 /* HIT */
627 return dest;
631 return NULL;
635 * Find destination by {daddr,dport,vaddr,protocol}
636 * Cretaed to be used in ip_vs_process_message() in
637 * the backup synchronization daemon. It finds the
638 * destination to be bound to the received connection
639 * on the backup.
641 * ip_vs_lookup_real_service() looked promissing, but
642 * seems not working as expected.
644 struct ip_vs_dest *ip_vs_find_dest(int af, const union nf_inet_addr *daddr,
645 __be16 dport,
646 const union nf_inet_addr *vaddr,
647 __be16 vport, __u16 protocol)
649 struct ip_vs_dest *dest;
650 struct ip_vs_service *svc;
652 svc = ip_vs_service_get(af, 0, protocol, vaddr, vport);
653 if (!svc)
654 return NULL;
655 dest = ip_vs_lookup_dest(svc, daddr, dport);
656 if (dest)
657 atomic_inc(&dest->refcnt);
658 ip_vs_service_put(svc);
659 return dest;
663 * Lookup dest by {svc,addr,port} in the destination trash.
664 * The destination trash is used to hold the destinations that are removed
665 * from the service table but are still referenced by some conn entries.
666 * The reason to add the destination trash is when the dest is temporary
667 * down (either by administrator or by monitor program), the dest can be
668 * picked back from the trash, the remaining connections to the dest can
669 * continue, and the counting information of the dest is also useful for
670 * scheduling.
672 static struct ip_vs_dest *
673 ip_vs_trash_get_dest(struct ip_vs_service *svc, const union nf_inet_addr *daddr,
674 __be16 dport)
676 struct ip_vs_dest *dest, *nxt;
679 * Find the destination in trash
681 list_for_each_entry_safe(dest, nxt, &ip_vs_dest_trash, n_list) {
682 IP_VS_DBG_BUF(3, "Destination %u/%s:%u still in trash, "
683 "dest->refcnt=%d\n",
684 dest->vfwmark,
685 IP_VS_DBG_ADDR(svc->af, &dest->addr),
686 ntohs(dest->port),
687 atomic_read(&dest->refcnt));
688 if (dest->af == svc->af &&
689 ip_vs_addr_equal(svc->af, &dest->addr, daddr) &&
690 dest->port == dport &&
691 dest->vfwmark == svc->fwmark &&
692 dest->protocol == svc->protocol &&
693 (svc->fwmark ||
694 (ip_vs_addr_equal(svc->af, &dest->vaddr, &svc->addr) &&
695 dest->vport == svc->port))) {
696 /* HIT */
697 return dest;
701 * Try to purge the destination from trash if not referenced
703 if (atomic_read(&dest->refcnt) == 1) {
704 IP_VS_DBG_BUF(3, "Removing destination %u/%s:%u "
705 "from trash\n",
706 dest->vfwmark,
707 IP_VS_DBG_ADDR(svc->af, &dest->addr),
708 ntohs(dest->port));
709 list_del(&dest->n_list);
710 ip_vs_dst_reset(dest);
711 __ip_vs_unbind_svc(dest);
712 kfree(dest);
716 return NULL;
721 * Clean up all the destinations in the trash
722 * Called by the ip_vs_control_cleanup()
724 * When the ip_vs_control_clearup is activated by ipvs module exit,
725 * the service tables must have been flushed and all the connections
726 * are expired, and the refcnt of each destination in the trash must
727 * be 1, so we simply release them here.
729 static void ip_vs_trash_cleanup(void)
731 struct ip_vs_dest *dest, *nxt;
733 list_for_each_entry_safe(dest, nxt, &ip_vs_dest_trash, n_list) {
734 list_del(&dest->n_list);
735 ip_vs_dst_reset(dest);
736 __ip_vs_unbind_svc(dest);
737 kfree(dest);
742 static void
743 ip_vs_zero_stats(struct ip_vs_stats *stats)
745 spin_lock_bh(&stats->lock);
747 memset(&stats->ustats, 0, sizeof(stats->ustats));
748 ip_vs_zero_estimator(stats);
750 spin_unlock_bh(&stats->lock);
754 * Update a destination in the given service
756 static void
757 __ip_vs_update_dest(struct ip_vs_service *svc,
758 struct ip_vs_dest *dest, struct ip_vs_dest_user_kern *udest)
760 int conn_flags;
762 /* set the weight and the flags */
763 atomic_set(&dest->weight, udest->weight);
764 conn_flags = udest->conn_flags | IP_VS_CONN_F_INACTIVE;
766 /* check if local node and update the flags */
767 #ifdef CONFIG_IP_VS_IPV6
768 if (svc->af == AF_INET6) {
769 if (__ip_vs_addr_is_local_v6(&udest->addr.in6)) {
770 conn_flags = (conn_flags & ~IP_VS_CONN_F_FWD_MASK)
771 | IP_VS_CONN_F_LOCALNODE;
773 } else
774 #endif
775 if (inet_addr_type(&init_net, udest->addr.ip) == RTN_LOCAL) {
776 conn_flags = (conn_flags & ~IP_VS_CONN_F_FWD_MASK)
777 | IP_VS_CONN_F_LOCALNODE;
780 /* set the IP_VS_CONN_F_NOOUTPUT flag if not masquerading/NAT */
781 if ((conn_flags & IP_VS_CONN_F_FWD_MASK) != 0) {
782 conn_flags |= IP_VS_CONN_F_NOOUTPUT;
783 } else {
785 * Put the real service in ip_vs_rtable if not present.
786 * For now only for NAT!
788 write_lock_bh(&__ip_vs_rs_lock);
789 ip_vs_rs_hash(dest);
790 write_unlock_bh(&__ip_vs_rs_lock);
792 atomic_set(&dest->conn_flags, conn_flags);
794 /* bind the service */
795 if (!dest->svc) {
796 __ip_vs_bind_svc(dest, svc);
797 } else {
798 if (dest->svc != svc) {
799 __ip_vs_unbind_svc(dest);
800 ip_vs_zero_stats(&dest->stats);
801 __ip_vs_bind_svc(dest, svc);
805 /* set the dest status flags */
806 dest->flags |= IP_VS_DEST_F_AVAILABLE;
808 if (udest->u_threshold == 0 || udest->u_threshold > dest->u_threshold)
809 dest->flags &= ~IP_VS_DEST_F_OVERLOAD;
810 dest->u_threshold = udest->u_threshold;
811 dest->l_threshold = udest->l_threshold;
816 * Create a destination for the given service
818 static int
819 ip_vs_new_dest(struct ip_vs_service *svc, struct ip_vs_dest_user_kern *udest,
820 struct ip_vs_dest **dest_p)
822 struct ip_vs_dest *dest;
823 unsigned atype;
825 EnterFunction(2);
827 #ifdef CONFIG_IP_VS_IPV6
828 if (svc->af == AF_INET6) {
829 atype = ipv6_addr_type(&udest->addr.in6);
830 if ((!(atype & IPV6_ADDR_UNICAST) ||
831 atype & IPV6_ADDR_LINKLOCAL) &&
832 !__ip_vs_addr_is_local_v6(&udest->addr.in6))
833 return -EINVAL;
834 } else
835 #endif
837 atype = inet_addr_type(&init_net, udest->addr.ip);
838 if (atype != RTN_LOCAL && atype != RTN_UNICAST)
839 return -EINVAL;
842 dest = kzalloc(sizeof(struct ip_vs_dest), GFP_ATOMIC);
843 if (dest == NULL) {
844 IP_VS_ERR("ip_vs_new_dest: kmalloc failed.\n");
845 return -ENOMEM;
848 dest->af = svc->af;
849 dest->protocol = svc->protocol;
850 dest->vaddr = svc->addr;
851 dest->vport = svc->port;
852 dest->vfwmark = svc->fwmark;
853 ip_vs_addr_copy(svc->af, &dest->addr, &udest->addr);
854 dest->port = udest->port;
856 atomic_set(&dest->activeconns, 0);
857 atomic_set(&dest->inactconns, 0);
858 atomic_set(&dest->persistconns, 0);
859 atomic_set(&dest->refcnt, 0);
861 INIT_LIST_HEAD(&dest->d_list);
862 spin_lock_init(&dest->dst_lock);
863 spin_lock_init(&dest->stats.lock);
864 __ip_vs_update_dest(svc, dest, udest);
865 ip_vs_new_estimator(&dest->stats);
867 *dest_p = dest;
869 LeaveFunction(2);
870 return 0;
875 * Add a destination into an existing service
877 static int
878 ip_vs_add_dest(struct ip_vs_service *svc, struct ip_vs_dest_user_kern *udest)
880 struct ip_vs_dest *dest;
881 union nf_inet_addr daddr;
882 __be16 dport = udest->port;
883 int ret;
885 EnterFunction(2);
887 if (udest->weight < 0) {
888 IP_VS_ERR("ip_vs_add_dest(): server weight less than zero\n");
889 return -ERANGE;
892 if (udest->l_threshold > udest->u_threshold) {
893 IP_VS_ERR("ip_vs_add_dest(): lower threshold is higher than "
894 "upper threshold\n");
895 return -ERANGE;
898 ip_vs_addr_copy(svc->af, &daddr, &udest->addr);
901 * Check if the dest already exists in the list
903 dest = ip_vs_lookup_dest(svc, &daddr, dport);
905 if (dest != NULL) {
906 IP_VS_DBG(1, "ip_vs_add_dest(): dest already exists\n");
907 return -EEXIST;
911 * Check if the dest already exists in the trash and
912 * is from the same service
914 dest = ip_vs_trash_get_dest(svc, &daddr, dport);
916 if (dest != NULL) {
917 IP_VS_DBG_BUF(3, "Get destination %s:%u from trash, "
918 "dest->refcnt=%d, service %u/%s:%u\n",
919 IP_VS_DBG_ADDR(svc->af, &daddr), ntohs(dport),
920 atomic_read(&dest->refcnt),
921 dest->vfwmark,
922 IP_VS_DBG_ADDR(svc->af, &dest->vaddr),
923 ntohs(dest->vport));
925 __ip_vs_update_dest(svc, dest, udest);
928 * Get the destination from the trash
930 list_del(&dest->n_list);
932 ip_vs_new_estimator(&dest->stats);
934 write_lock_bh(&__ip_vs_svc_lock);
937 * Wait until all other svc users go away.
939 IP_VS_WAIT_WHILE(atomic_read(&svc->usecnt) > 1);
941 list_add(&dest->n_list, &svc->destinations);
942 svc->num_dests++;
944 /* call the update_service function of its scheduler */
945 if (svc->scheduler->update_service)
946 svc->scheduler->update_service(svc);
948 write_unlock_bh(&__ip_vs_svc_lock);
949 return 0;
953 * Allocate and initialize the dest structure
955 ret = ip_vs_new_dest(svc, udest, &dest);
956 if (ret) {
957 return ret;
961 * Add the dest entry into the list
963 atomic_inc(&dest->refcnt);
965 write_lock_bh(&__ip_vs_svc_lock);
968 * Wait until all other svc users go away.
970 IP_VS_WAIT_WHILE(atomic_read(&svc->usecnt) > 1);
972 list_add(&dest->n_list, &svc->destinations);
973 svc->num_dests++;
975 /* call the update_service function of its scheduler */
976 if (svc->scheduler->update_service)
977 svc->scheduler->update_service(svc);
979 write_unlock_bh(&__ip_vs_svc_lock);
981 LeaveFunction(2);
983 return 0;
988 * Edit a destination in the given service
990 static int
991 ip_vs_edit_dest(struct ip_vs_service *svc, struct ip_vs_dest_user_kern *udest)
993 struct ip_vs_dest *dest;
994 union nf_inet_addr daddr;
995 __be16 dport = udest->port;
997 EnterFunction(2);
999 if (udest->weight < 0) {
1000 IP_VS_ERR("ip_vs_edit_dest(): server weight less than zero\n");
1001 return -ERANGE;
1004 if (udest->l_threshold > udest->u_threshold) {
1005 IP_VS_ERR("ip_vs_edit_dest(): lower threshold is higher than "
1006 "upper threshold\n");
1007 return -ERANGE;
1010 ip_vs_addr_copy(svc->af, &daddr, &udest->addr);
1013 * Lookup the destination list
1015 dest = ip_vs_lookup_dest(svc, &daddr, dport);
1017 if (dest == NULL) {
1018 IP_VS_DBG(1, "ip_vs_edit_dest(): dest doesn't exist\n");
1019 return -ENOENT;
1022 __ip_vs_update_dest(svc, dest, udest);
1024 write_lock_bh(&__ip_vs_svc_lock);
1026 /* Wait until all other svc users go away */
1027 IP_VS_WAIT_WHILE(atomic_read(&svc->usecnt) > 1);
1029 /* call the update_service, because server weight may be changed */
1030 if (svc->scheduler->update_service)
1031 svc->scheduler->update_service(svc);
1033 write_unlock_bh(&__ip_vs_svc_lock);
1035 LeaveFunction(2);
1037 return 0;
1042 * Delete a destination (must be already unlinked from the service)
1044 static void __ip_vs_del_dest(struct ip_vs_dest *dest)
1046 ip_vs_kill_estimator(&dest->stats);
1049 * Remove it from the d-linked list with the real services.
1051 write_lock_bh(&__ip_vs_rs_lock);
1052 ip_vs_rs_unhash(dest);
1053 write_unlock_bh(&__ip_vs_rs_lock);
1056 * Decrease the refcnt of the dest, and free the dest
1057 * if nobody refers to it (refcnt=0). Otherwise, throw
1058 * the destination into the trash.
1060 if (atomic_dec_and_test(&dest->refcnt)) {
1061 ip_vs_dst_reset(dest);
1062 /* simply decrease svc->refcnt here, let the caller check
1063 and release the service if nobody refers to it.
1064 Only user context can release destination and service,
1065 and only one user context can update virtual service at a
1066 time, so the operation here is OK */
1067 atomic_dec(&dest->svc->refcnt);
1068 kfree(dest);
1069 } else {
1070 IP_VS_DBG_BUF(3, "Moving dest %s:%u into trash, "
1071 "dest->refcnt=%d\n",
1072 IP_VS_DBG_ADDR(dest->af, &dest->addr),
1073 ntohs(dest->port),
1074 atomic_read(&dest->refcnt));
1075 list_add(&dest->n_list, &ip_vs_dest_trash);
1076 atomic_inc(&dest->refcnt);
1082 * Unlink a destination from the given service
1084 static void __ip_vs_unlink_dest(struct ip_vs_service *svc,
1085 struct ip_vs_dest *dest,
1086 int svcupd)
1088 dest->flags &= ~IP_VS_DEST_F_AVAILABLE;
1091 * Remove it from the d-linked destination list.
1093 list_del(&dest->n_list);
1094 svc->num_dests--;
1097 * Call the update_service function of its scheduler
1099 if (svcupd && svc->scheduler->update_service)
1100 svc->scheduler->update_service(svc);
1105 * Delete a destination server in the given service
1107 static int
1108 ip_vs_del_dest(struct ip_vs_service *svc, struct ip_vs_dest_user_kern *udest)
1110 struct ip_vs_dest *dest;
1111 __be16 dport = udest->port;
1113 EnterFunction(2);
1115 dest = ip_vs_lookup_dest(svc, &udest->addr, dport);
1117 if (dest == NULL) {
1118 IP_VS_DBG(1, "ip_vs_del_dest(): destination not found!\n");
1119 return -ENOENT;
1122 write_lock_bh(&__ip_vs_svc_lock);
1125 * Wait until all other svc users go away.
1127 IP_VS_WAIT_WHILE(atomic_read(&svc->usecnt) > 1);
1130 * Unlink dest from the service
1132 __ip_vs_unlink_dest(svc, dest, 1);
1134 write_unlock_bh(&__ip_vs_svc_lock);
1137 * Delete the destination
1139 __ip_vs_del_dest(dest);
1141 LeaveFunction(2);
1143 return 0;
1148 * Add a service into the service hash table
1150 static int
1151 ip_vs_add_service(struct ip_vs_service_user_kern *u,
1152 struct ip_vs_service **svc_p)
1154 int ret = 0;
1155 struct ip_vs_scheduler *sched = NULL;
1156 struct ip_vs_service *svc = NULL;
1158 /* increase the module use count */
1159 ip_vs_use_count_inc();
1161 /* Lookup the scheduler by 'u->sched_name' */
1162 sched = ip_vs_scheduler_get(u->sched_name);
1163 if (sched == NULL) {
1164 IP_VS_INFO("Scheduler module ip_vs_%s not found\n",
1165 u->sched_name);
1166 ret = -ENOENT;
1167 goto out_mod_dec;
1170 #ifdef CONFIG_IP_VS_IPV6
1171 if (u->af == AF_INET6 && (u->netmask < 1 || u->netmask > 128)) {
1172 ret = -EINVAL;
1173 goto out_err;
1175 #endif
1177 svc = kzalloc(sizeof(struct ip_vs_service), GFP_ATOMIC);
1178 if (svc == NULL) {
1179 IP_VS_DBG(1, "ip_vs_add_service: kmalloc failed.\n");
1180 ret = -ENOMEM;
1181 goto out_err;
1184 /* I'm the first user of the service */
1185 atomic_set(&svc->usecnt, 1);
1186 atomic_set(&svc->refcnt, 0);
1188 svc->af = u->af;
1189 svc->protocol = u->protocol;
1190 ip_vs_addr_copy(svc->af, &svc->addr, &u->addr);
1191 svc->port = u->port;
1192 svc->fwmark = u->fwmark;
1193 svc->flags = u->flags;
1194 svc->timeout = u->timeout * HZ;
1195 svc->netmask = u->netmask;
1197 INIT_LIST_HEAD(&svc->destinations);
1198 rwlock_init(&svc->sched_lock);
1199 spin_lock_init(&svc->stats.lock);
1201 /* Bind the scheduler */
1202 ret = ip_vs_bind_scheduler(svc, sched);
1203 if (ret)
1204 goto out_err;
1205 sched = NULL;
1207 /* Update the virtual service counters */
1208 if (svc->port == FTPPORT)
1209 atomic_inc(&ip_vs_ftpsvc_counter);
1210 else if (svc->port == 0)
1211 atomic_inc(&ip_vs_nullsvc_counter);
1213 ip_vs_new_estimator(&svc->stats);
1215 /* Count only IPv4 services for old get/setsockopt interface */
1216 if (svc->af == AF_INET)
1217 ip_vs_num_services++;
1219 /* Hash the service into the service table */
1220 write_lock_bh(&__ip_vs_svc_lock);
1221 ip_vs_svc_hash(svc);
1222 write_unlock_bh(&__ip_vs_svc_lock);
1224 *svc_p = svc;
1225 return 0;
1227 out_err:
1228 if (svc != NULL) {
1229 if (svc->scheduler)
1230 ip_vs_unbind_scheduler(svc);
1231 if (svc->inc) {
1232 local_bh_disable();
1233 ip_vs_app_inc_put(svc->inc);
1234 local_bh_enable();
1236 kfree(svc);
1238 ip_vs_scheduler_put(sched);
1240 out_mod_dec:
1241 /* decrease the module use count */
1242 ip_vs_use_count_dec();
1244 return ret;
1249 * Edit a service and bind it with a new scheduler
1251 static int
1252 ip_vs_edit_service(struct ip_vs_service *svc, struct ip_vs_service_user_kern *u)
1254 struct ip_vs_scheduler *sched, *old_sched;
1255 int ret = 0;
1258 * Lookup the scheduler, by 'u->sched_name'
1260 sched = ip_vs_scheduler_get(u->sched_name);
1261 if (sched == NULL) {
1262 IP_VS_INFO("Scheduler module ip_vs_%s not found\n",
1263 u->sched_name);
1264 return -ENOENT;
1266 old_sched = sched;
1268 #ifdef CONFIG_IP_VS_IPV6
1269 if (u->af == AF_INET6 && (u->netmask < 1 || u->netmask > 128)) {
1270 ret = -EINVAL;
1271 goto out;
1273 #endif
1275 write_lock_bh(&__ip_vs_svc_lock);
1278 * Wait until all other svc users go away.
1280 IP_VS_WAIT_WHILE(atomic_read(&svc->usecnt) > 1);
1283 * Set the flags and timeout value
1285 svc->flags = u->flags | IP_VS_SVC_F_HASHED;
1286 svc->timeout = u->timeout * HZ;
1287 svc->netmask = u->netmask;
1289 old_sched = svc->scheduler;
1290 if (sched != old_sched) {
1292 * Unbind the old scheduler
1294 if ((ret = ip_vs_unbind_scheduler(svc))) {
1295 old_sched = sched;
1296 goto out_unlock;
1300 * Bind the new scheduler
1302 if ((ret = ip_vs_bind_scheduler(svc, sched))) {
1304 * If ip_vs_bind_scheduler fails, restore the old
1305 * scheduler.
1306 * The main reason of failure is out of memory.
1308 * The question is if the old scheduler can be
1309 * restored all the time. TODO: if it cannot be
1310 * restored some time, we must delete the service,
1311 * otherwise the system may crash.
1313 ip_vs_bind_scheduler(svc, old_sched);
1314 old_sched = sched;
1315 goto out_unlock;
1319 out_unlock:
1320 write_unlock_bh(&__ip_vs_svc_lock);
1321 #ifdef CONFIG_IP_VS_IPV6
1322 out:
1323 #endif
1325 if (old_sched)
1326 ip_vs_scheduler_put(old_sched);
1328 return ret;
1333 * Delete a service from the service list
1334 * - The service must be unlinked, unlocked and not referenced!
1335 * - We are called under _bh lock
1337 static void __ip_vs_del_service(struct ip_vs_service *svc)
1339 struct ip_vs_dest *dest, *nxt;
1340 struct ip_vs_scheduler *old_sched;
1342 /* Count only IPv4 services for old get/setsockopt interface */
1343 if (svc->af == AF_INET)
1344 ip_vs_num_services--;
1346 ip_vs_kill_estimator(&svc->stats);
1348 /* Unbind scheduler */
1349 old_sched = svc->scheduler;
1350 ip_vs_unbind_scheduler(svc);
1351 if (old_sched)
1352 ip_vs_scheduler_put(old_sched);
1354 /* Unbind app inc */
1355 if (svc->inc) {
1356 ip_vs_app_inc_put(svc->inc);
1357 svc->inc = NULL;
1361 * Unlink the whole destination list
1363 list_for_each_entry_safe(dest, nxt, &svc->destinations, n_list) {
1364 __ip_vs_unlink_dest(svc, dest, 0);
1365 __ip_vs_del_dest(dest);
1369 * Update the virtual service counters
1371 if (svc->port == FTPPORT)
1372 atomic_dec(&ip_vs_ftpsvc_counter);
1373 else if (svc->port == 0)
1374 atomic_dec(&ip_vs_nullsvc_counter);
1377 * Free the service if nobody refers to it
1379 if (atomic_read(&svc->refcnt) == 0)
1380 kfree(svc);
1382 /* decrease the module use count */
1383 ip_vs_use_count_dec();
1387 * Delete a service from the service list
1389 static int ip_vs_del_service(struct ip_vs_service *svc)
1391 if (svc == NULL)
1392 return -EEXIST;
1395 * Unhash it from the service table
1397 write_lock_bh(&__ip_vs_svc_lock);
1399 ip_vs_svc_unhash(svc);
1402 * Wait until all the svc users go away.
1404 IP_VS_WAIT_WHILE(atomic_read(&svc->usecnt) > 1);
1406 __ip_vs_del_service(svc);
1408 write_unlock_bh(&__ip_vs_svc_lock);
1410 return 0;
1415 * Flush all the virtual services
1417 static int ip_vs_flush(void)
1419 int idx;
1420 struct ip_vs_service *svc, *nxt;
1423 * Flush the service table hashed by <protocol,addr,port>
1425 for(idx = 0; idx < IP_VS_SVC_TAB_SIZE; idx++) {
1426 list_for_each_entry_safe(svc, nxt, &ip_vs_svc_table[idx], s_list) {
1427 write_lock_bh(&__ip_vs_svc_lock);
1428 ip_vs_svc_unhash(svc);
1430 * Wait until all the svc users go away.
1432 IP_VS_WAIT_WHILE(atomic_read(&svc->usecnt) > 0);
1433 __ip_vs_del_service(svc);
1434 write_unlock_bh(&__ip_vs_svc_lock);
1439 * Flush the service table hashed by fwmark
1441 for(idx = 0; idx < IP_VS_SVC_TAB_SIZE; idx++) {
1442 list_for_each_entry_safe(svc, nxt,
1443 &ip_vs_svc_fwm_table[idx], f_list) {
1444 write_lock_bh(&__ip_vs_svc_lock);
1445 ip_vs_svc_unhash(svc);
1447 * Wait until all the svc users go away.
1449 IP_VS_WAIT_WHILE(atomic_read(&svc->usecnt) > 0);
1450 __ip_vs_del_service(svc);
1451 write_unlock_bh(&__ip_vs_svc_lock);
1455 return 0;
1460 * Zero counters in a service or all services
1462 static int ip_vs_zero_service(struct ip_vs_service *svc)
1464 struct ip_vs_dest *dest;
1466 write_lock_bh(&__ip_vs_svc_lock);
1467 list_for_each_entry(dest, &svc->destinations, n_list) {
1468 ip_vs_zero_stats(&dest->stats);
1470 ip_vs_zero_stats(&svc->stats);
1471 write_unlock_bh(&__ip_vs_svc_lock);
1472 return 0;
1475 static int ip_vs_zero_all(void)
1477 int idx;
1478 struct ip_vs_service *svc;
1480 for(idx = 0; idx < IP_VS_SVC_TAB_SIZE; idx++) {
1481 list_for_each_entry(svc, &ip_vs_svc_table[idx], s_list) {
1482 ip_vs_zero_service(svc);
1486 for(idx = 0; idx < IP_VS_SVC_TAB_SIZE; idx++) {
1487 list_for_each_entry(svc, &ip_vs_svc_fwm_table[idx], f_list) {
1488 ip_vs_zero_service(svc);
1492 ip_vs_zero_stats(&ip_vs_stats);
1493 return 0;
1497 static int
1498 proc_do_defense_mode(ctl_table *table, int write, struct file * filp,
1499 void __user *buffer, size_t *lenp, loff_t *ppos)
1501 int *valp = table->data;
1502 int val = *valp;
1503 int rc;
1505 rc = proc_dointvec(table, write, filp, buffer, lenp, ppos);
1506 if (write && (*valp != val)) {
1507 if ((*valp < 0) || (*valp > 3)) {
1508 /* Restore the correct value */
1509 *valp = val;
1510 } else {
1511 update_defense_level();
1514 return rc;
1518 static int
1519 proc_do_sync_threshold(ctl_table *table, int write, struct file *filp,
1520 void __user *buffer, size_t *lenp, loff_t *ppos)
1522 int *valp = table->data;
1523 int val[2];
1524 int rc;
1526 /* backup the value first */
1527 memcpy(val, valp, sizeof(val));
1529 rc = proc_dointvec(table, write, filp, buffer, lenp, ppos);
1530 if (write && (valp[0] < 0 || valp[1] < 0 || valp[0] >= valp[1])) {
1531 /* Restore the correct value */
1532 memcpy(valp, val, sizeof(val));
1534 return rc;
1539 * IPVS sysctl table (under the /proc/sys/net/ipv4/vs/)
1542 static struct ctl_table vs_vars[] = {
1544 .procname = "amemthresh",
1545 .data = &sysctl_ip_vs_amemthresh,
1546 .maxlen = sizeof(int),
1547 .mode = 0644,
1548 .proc_handler = proc_dointvec,
1550 #ifdef CONFIG_IP_VS_DEBUG
1552 .procname = "debug_level",
1553 .data = &sysctl_ip_vs_debug_level,
1554 .maxlen = sizeof(int),
1555 .mode = 0644,
1556 .proc_handler = proc_dointvec,
1558 #endif
1560 .procname = "am_droprate",
1561 .data = &sysctl_ip_vs_am_droprate,
1562 .maxlen = sizeof(int),
1563 .mode = 0644,
1564 .proc_handler = proc_dointvec,
1567 .procname = "drop_entry",
1568 .data = &sysctl_ip_vs_drop_entry,
1569 .maxlen = sizeof(int),
1570 .mode = 0644,
1571 .proc_handler = proc_do_defense_mode,
1574 .procname = "drop_packet",
1575 .data = &sysctl_ip_vs_drop_packet,
1576 .maxlen = sizeof(int),
1577 .mode = 0644,
1578 .proc_handler = proc_do_defense_mode,
1581 .procname = "secure_tcp",
1582 .data = &sysctl_ip_vs_secure_tcp,
1583 .maxlen = sizeof(int),
1584 .mode = 0644,
1585 .proc_handler = proc_do_defense_mode,
1587 #if 0
1589 .procname = "timeout_established",
1590 .data = &vs_timeout_table_dos.timeout[IP_VS_S_ESTABLISHED],
1591 .maxlen = sizeof(int),
1592 .mode = 0644,
1593 .proc_handler = proc_dointvec_jiffies,
1596 .procname = "timeout_synsent",
1597 .data = &vs_timeout_table_dos.timeout[IP_VS_S_SYN_SENT],
1598 .maxlen = sizeof(int),
1599 .mode = 0644,
1600 .proc_handler = proc_dointvec_jiffies,
1603 .procname = "timeout_synrecv",
1604 .data = &vs_timeout_table_dos.timeout[IP_VS_S_SYN_RECV],
1605 .maxlen = sizeof(int),
1606 .mode = 0644,
1607 .proc_handler = proc_dointvec_jiffies,
1610 .procname = "timeout_finwait",
1611 .data = &vs_timeout_table_dos.timeout[IP_VS_S_FIN_WAIT],
1612 .maxlen = sizeof(int),
1613 .mode = 0644,
1614 .proc_handler = proc_dointvec_jiffies,
1617 .procname = "timeout_timewait",
1618 .data = &vs_timeout_table_dos.timeout[IP_VS_S_TIME_WAIT],
1619 .maxlen = sizeof(int),
1620 .mode = 0644,
1621 .proc_handler = proc_dointvec_jiffies,
1624 .procname = "timeout_close",
1625 .data = &vs_timeout_table_dos.timeout[IP_VS_S_CLOSE],
1626 .maxlen = sizeof(int),
1627 .mode = 0644,
1628 .proc_handler = proc_dointvec_jiffies,
1631 .procname = "timeout_closewait",
1632 .data = &vs_timeout_table_dos.timeout[IP_VS_S_CLOSE_WAIT],
1633 .maxlen = sizeof(int),
1634 .mode = 0644,
1635 .proc_handler = proc_dointvec_jiffies,
1638 .procname = "timeout_lastack",
1639 .data = &vs_timeout_table_dos.timeout[IP_VS_S_LAST_ACK],
1640 .maxlen = sizeof(int),
1641 .mode = 0644,
1642 .proc_handler = proc_dointvec_jiffies,
1645 .procname = "timeout_listen",
1646 .data = &vs_timeout_table_dos.timeout[IP_VS_S_LISTEN],
1647 .maxlen = sizeof(int),
1648 .mode = 0644,
1649 .proc_handler = proc_dointvec_jiffies,
1652 .procname = "timeout_synack",
1653 .data = &vs_timeout_table_dos.timeout[IP_VS_S_SYNACK],
1654 .maxlen = sizeof(int),
1655 .mode = 0644,
1656 .proc_handler = proc_dointvec_jiffies,
1659 .procname = "timeout_udp",
1660 .data = &vs_timeout_table_dos.timeout[IP_VS_S_UDP],
1661 .maxlen = sizeof(int),
1662 .mode = 0644,
1663 .proc_handler = proc_dointvec_jiffies,
1666 .procname = "timeout_icmp",
1667 .data = &vs_timeout_table_dos.timeout[IP_VS_S_ICMP],
1668 .maxlen = sizeof(int),
1669 .mode = 0644,
1670 .proc_handler = proc_dointvec_jiffies,
1672 #endif
1674 .procname = "cache_bypass",
1675 .data = &sysctl_ip_vs_cache_bypass,
1676 .maxlen = sizeof(int),
1677 .mode = 0644,
1678 .proc_handler = proc_dointvec,
1681 .procname = "expire_nodest_conn",
1682 .data = &sysctl_ip_vs_expire_nodest_conn,
1683 .maxlen = sizeof(int),
1684 .mode = 0644,
1685 .proc_handler = proc_dointvec,
1688 .procname = "expire_quiescent_template",
1689 .data = &sysctl_ip_vs_expire_quiescent_template,
1690 .maxlen = sizeof(int),
1691 .mode = 0644,
1692 .proc_handler = proc_dointvec,
1695 .procname = "sync_threshold",
1696 .data = &sysctl_ip_vs_sync_threshold,
1697 .maxlen = sizeof(sysctl_ip_vs_sync_threshold),
1698 .mode = 0644,
1699 .proc_handler = proc_do_sync_threshold,
1702 .procname = "nat_icmp_send",
1703 .data = &sysctl_ip_vs_nat_icmp_send,
1704 .maxlen = sizeof(int),
1705 .mode = 0644,
1706 .proc_handler = proc_dointvec,
1708 { .ctl_name = 0 }
1711 const struct ctl_path net_vs_ctl_path[] = {
1712 { .procname = "net", .ctl_name = CTL_NET, },
1713 { .procname = "ipv4", .ctl_name = NET_IPV4, },
1714 { .procname = "vs", },
1717 EXPORT_SYMBOL_GPL(net_vs_ctl_path);
1719 static struct ctl_table_header * sysctl_header;
1721 #ifdef CONFIG_PROC_FS
1723 struct ip_vs_iter {
1724 struct list_head *table;
1725 int bucket;
1729 * Write the contents of the VS rule table to a PROCfs file.
1730 * (It is kept just for backward compatibility)
1732 static inline const char *ip_vs_fwd_name(unsigned flags)
1734 switch (flags & IP_VS_CONN_F_FWD_MASK) {
1735 case IP_VS_CONN_F_LOCALNODE:
1736 return "Local";
1737 case IP_VS_CONN_F_TUNNEL:
1738 return "Tunnel";
1739 case IP_VS_CONN_F_DROUTE:
1740 return "Route";
1741 default:
1742 return "Masq";
1747 /* Get the Nth entry in the two lists */
1748 static struct ip_vs_service *ip_vs_info_array(struct seq_file *seq, loff_t pos)
1750 struct ip_vs_iter *iter = seq->private;
1751 int idx;
1752 struct ip_vs_service *svc;
1754 /* look in hash by protocol */
1755 for (idx = 0; idx < IP_VS_SVC_TAB_SIZE; idx++) {
1756 list_for_each_entry(svc, &ip_vs_svc_table[idx], s_list) {
1757 if (pos-- == 0){
1758 iter->table = ip_vs_svc_table;
1759 iter->bucket = idx;
1760 return svc;
1765 /* keep looking in fwmark */
1766 for (idx = 0; idx < IP_VS_SVC_TAB_SIZE; idx++) {
1767 list_for_each_entry(svc, &ip_vs_svc_fwm_table[idx], f_list) {
1768 if (pos-- == 0) {
1769 iter->table = ip_vs_svc_fwm_table;
1770 iter->bucket = idx;
1771 return svc;
1776 return NULL;
1779 static void *ip_vs_info_seq_start(struct seq_file *seq, loff_t *pos)
1780 __acquires(__ip_vs_svc_lock)
1783 read_lock_bh(&__ip_vs_svc_lock);
1784 return *pos ? ip_vs_info_array(seq, *pos - 1) : SEQ_START_TOKEN;
1788 static void *ip_vs_info_seq_next(struct seq_file *seq, void *v, loff_t *pos)
1790 struct list_head *e;
1791 struct ip_vs_iter *iter;
1792 struct ip_vs_service *svc;
1794 ++*pos;
1795 if (v == SEQ_START_TOKEN)
1796 return ip_vs_info_array(seq,0);
1798 svc = v;
1799 iter = seq->private;
1801 if (iter->table == ip_vs_svc_table) {
1802 /* next service in table hashed by protocol */
1803 if ((e = svc->s_list.next) != &ip_vs_svc_table[iter->bucket])
1804 return list_entry(e, struct ip_vs_service, s_list);
1807 while (++iter->bucket < IP_VS_SVC_TAB_SIZE) {
1808 list_for_each_entry(svc,&ip_vs_svc_table[iter->bucket],
1809 s_list) {
1810 return svc;
1814 iter->table = ip_vs_svc_fwm_table;
1815 iter->bucket = -1;
1816 goto scan_fwmark;
1819 /* next service in hashed by fwmark */
1820 if ((e = svc->f_list.next) != &ip_vs_svc_fwm_table[iter->bucket])
1821 return list_entry(e, struct ip_vs_service, f_list);
1823 scan_fwmark:
1824 while (++iter->bucket < IP_VS_SVC_TAB_SIZE) {
1825 list_for_each_entry(svc, &ip_vs_svc_fwm_table[iter->bucket],
1826 f_list)
1827 return svc;
1830 return NULL;
1833 static void ip_vs_info_seq_stop(struct seq_file *seq, void *v)
1834 __releases(__ip_vs_svc_lock)
1836 read_unlock_bh(&__ip_vs_svc_lock);
1840 static int ip_vs_info_seq_show(struct seq_file *seq, void *v)
1842 if (v == SEQ_START_TOKEN) {
1843 seq_printf(seq,
1844 "IP Virtual Server version %d.%d.%d (size=%d)\n",
1845 NVERSION(IP_VS_VERSION_CODE), IP_VS_CONN_TAB_SIZE);
1846 seq_puts(seq,
1847 "Prot LocalAddress:Port Scheduler Flags\n");
1848 seq_puts(seq,
1849 " -> RemoteAddress:Port Forward Weight ActiveConn InActConn\n");
1850 } else {
1851 const struct ip_vs_service *svc = v;
1852 const struct ip_vs_iter *iter = seq->private;
1853 const struct ip_vs_dest *dest;
1855 if (iter->table == ip_vs_svc_table) {
1856 #ifdef CONFIG_IP_VS_IPV6
1857 if (svc->af == AF_INET6)
1858 seq_printf(seq, "%s [%pI6]:%04X %s ",
1859 ip_vs_proto_name(svc->protocol),
1860 &svc->addr.in6,
1861 ntohs(svc->port),
1862 svc->scheduler->name);
1863 else
1864 #endif
1865 seq_printf(seq, "%s %08X:%04X %s ",
1866 ip_vs_proto_name(svc->protocol),
1867 ntohl(svc->addr.ip),
1868 ntohs(svc->port),
1869 svc->scheduler->name);
1870 } else {
1871 seq_printf(seq, "FWM %08X %s ",
1872 svc->fwmark, svc->scheduler->name);
1875 if (svc->flags & IP_VS_SVC_F_PERSISTENT)
1876 seq_printf(seq, "persistent %d %08X\n",
1877 svc->timeout,
1878 ntohl(svc->netmask));
1879 else
1880 seq_putc(seq, '\n');
1882 list_for_each_entry(dest, &svc->destinations, n_list) {
1883 #ifdef CONFIG_IP_VS_IPV6
1884 if (dest->af == AF_INET6)
1885 seq_printf(seq,
1886 " -> [%pI6]:%04X"
1887 " %-7s %-6d %-10d %-10d\n",
1888 &dest->addr.in6,
1889 ntohs(dest->port),
1890 ip_vs_fwd_name(atomic_read(&dest->conn_flags)),
1891 atomic_read(&dest->weight),
1892 atomic_read(&dest->activeconns),
1893 atomic_read(&dest->inactconns));
1894 else
1895 #endif
1896 seq_printf(seq,
1897 " -> %08X:%04X "
1898 "%-7s %-6d %-10d %-10d\n",
1899 ntohl(dest->addr.ip),
1900 ntohs(dest->port),
1901 ip_vs_fwd_name(atomic_read(&dest->conn_flags)),
1902 atomic_read(&dest->weight),
1903 atomic_read(&dest->activeconns),
1904 atomic_read(&dest->inactconns));
1908 return 0;
1911 static const struct seq_operations ip_vs_info_seq_ops = {
1912 .start = ip_vs_info_seq_start,
1913 .next = ip_vs_info_seq_next,
1914 .stop = ip_vs_info_seq_stop,
1915 .show = ip_vs_info_seq_show,
1918 static int ip_vs_info_open(struct inode *inode, struct file *file)
1920 return seq_open_private(file, &ip_vs_info_seq_ops,
1921 sizeof(struct ip_vs_iter));
1924 static const struct file_operations ip_vs_info_fops = {
1925 .owner = THIS_MODULE,
1926 .open = ip_vs_info_open,
1927 .read = seq_read,
1928 .llseek = seq_lseek,
1929 .release = seq_release_private,
1932 #endif
1934 struct ip_vs_stats ip_vs_stats = {
1935 .lock = __SPIN_LOCK_UNLOCKED(ip_vs_stats.lock),
1938 #ifdef CONFIG_PROC_FS
1939 static int ip_vs_stats_show(struct seq_file *seq, void *v)
1942 /* 01234567 01234567 01234567 0123456701234567 0123456701234567 */
1943 seq_puts(seq,
1944 " Total Incoming Outgoing Incoming Outgoing\n");
1945 seq_printf(seq,
1946 " Conns Packets Packets Bytes Bytes\n");
1948 spin_lock_bh(&ip_vs_stats.lock);
1949 seq_printf(seq, "%8X %8X %8X %16LX %16LX\n\n", ip_vs_stats.ustats.conns,
1950 ip_vs_stats.ustats.inpkts, ip_vs_stats.ustats.outpkts,
1951 (unsigned long long) ip_vs_stats.ustats.inbytes,
1952 (unsigned long long) ip_vs_stats.ustats.outbytes);
1954 /* 01234567 01234567 01234567 0123456701234567 0123456701234567 */
1955 seq_puts(seq,
1956 " Conns/s Pkts/s Pkts/s Bytes/s Bytes/s\n");
1957 seq_printf(seq,"%8X %8X %8X %16X %16X\n",
1958 ip_vs_stats.ustats.cps,
1959 ip_vs_stats.ustats.inpps,
1960 ip_vs_stats.ustats.outpps,
1961 ip_vs_stats.ustats.inbps,
1962 ip_vs_stats.ustats.outbps);
1963 spin_unlock_bh(&ip_vs_stats.lock);
1965 return 0;
1968 static int ip_vs_stats_seq_open(struct inode *inode, struct file *file)
1970 return single_open(file, ip_vs_stats_show, NULL);
1973 static const struct file_operations ip_vs_stats_fops = {
1974 .owner = THIS_MODULE,
1975 .open = ip_vs_stats_seq_open,
1976 .read = seq_read,
1977 .llseek = seq_lseek,
1978 .release = single_release,
1981 #endif
1984 * Set timeout values for tcp tcpfin udp in the timeout_table.
1986 static int ip_vs_set_timeout(struct ip_vs_timeout_user *u)
1988 IP_VS_DBG(2, "Setting timeout tcp:%d tcpfin:%d udp:%d\n",
1989 u->tcp_timeout,
1990 u->tcp_fin_timeout,
1991 u->udp_timeout);
1993 #ifdef CONFIG_IP_VS_PROTO_TCP
1994 if (u->tcp_timeout) {
1995 ip_vs_protocol_tcp.timeout_table[IP_VS_TCP_S_ESTABLISHED]
1996 = u->tcp_timeout * HZ;
1999 if (u->tcp_fin_timeout) {
2000 ip_vs_protocol_tcp.timeout_table[IP_VS_TCP_S_FIN_WAIT]
2001 = u->tcp_fin_timeout * HZ;
2003 #endif
2005 #ifdef CONFIG_IP_VS_PROTO_UDP
2006 if (u->udp_timeout) {
2007 ip_vs_protocol_udp.timeout_table[IP_VS_UDP_S_NORMAL]
2008 = u->udp_timeout * HZ;
2010 #endif
2011 return 0;
2015 #define SET_CMDID(cmd) (cmd - IP_VS_BASE_CTL)
2016 #define SERVICE_ARG_LEN (sizeof(struct ip_vs_service_user))
2017 #define SVCDEST_ARG_LEN (sizeof(struct ip_vs_service_user) + \
2018 sizeof(struct ip_vs_dest_user))
2019 #define TIMEOUT_ARG_LEN (sizeof(struct ip_vs_timeout_user))
2020 #define DAEMON_ARG_LEN (sizeof(struct ip_vs_daemon_user))
2021 #define MAX_ARG_LEN SVCDEST_ARG_LEN
2023 static const unsigned char set_arglen[SET_CMDID(IP_VS_SO_SET_MAX)+1] = {
2024 [SET_CMDID(IP_VS_SO_SET_ADD)] = SERVICE_ARG_LEN,
2025 [SET_CMDID(IP_VS_SO_SET_EDIT)] = SERVICE_ARG_LEN,
2026 [SET_CMDID(IP_VS_SO_SET_DEL)] = SERVICE_ARG_LEN,
2027 [SET_CMDID(IP_VS_SO_SET_FLUSH)] = 0,
2028 [SET_CMDID(IP_VS_SO_SET_ADDDEST)] = SVCDEST_ARG_LEN,
2029 [SET_CMDID(IP_VS_SO_SET_DELDEST)] = SVCDEST_ARG_LEN,
2030 [SET_CMDID(IP_VS_SO_SET_EDITDEST)] = SVCDEST_ARG_LEN,
2031 [SET_CMDID(IP_VS_SO_SET_TIMEOUT)] = TIMEOUT_ARG_LEN,
2032 [SET_CMDID(IP_VS_SO_SET_STARTDAEMON)] = DAEMON_ARG_LEN,
2033 [SET_CMDID(IP_VS_SO_SET_STOPDAEMON)] = DAEMON_ARG_LEN,
2034 [SET_CMDID(IP_VS_SO_SET_ZERO)] = SERVICE_ARG_LEN,
2037 static void ip_vs_copy_usvc_compat(struct ip_vs_service_user_kern *usvc,
2038 struct ip_vs_service_user *usvc_compat)
2040 usvc->af = AF_INET;
2041 usvc->protocol = usvc_compat->protocol;
2042 usvc->addr.ip = usvc_compat->addr;
2043 usvc->port = usvc_compat->port;
2044 usvc->fwmark = usvc_compat->fwmark;
2046 /* Deep copy of sched_name is not needed here */
2047 usvc->sched_name = usvc_compat->sched_name;
2049 usvc->flags = usvc_compat->flags;
2050 usvc->timeout = usvc_compat->timeout;
2051 usvc->netmask = usvc_compat->netmask;
2054 static void ip_vs_copy_udest_compat(struct ip_vs_dest_user_kern *udest,
2055 struct ip_vs_dest_user *udest_compat)
2057 udest->addr.ip = udest_compat->addr;
2058 udest->port = udest_compat->port;
2059 udest->conn_flags = udest_compat->conn_flags;
2060 udest->weight = udest_compat->weight;
2061 udest->u_threshold = udest_compat->u_threshold;
2062 udest->l_threshold = udest_compat->l_threshold;
2065 static int
2066 do_ip_vs_set_ctl(struct sock *sk, int cmd, void __user *user, unsigned int len)
2068 int ret;
2069 unsigned char arg[MAX_ARG_LEN];
2070 struct ip_vs_service_user *usvc_compat;
2071 struct ip_vs_service_user_kern usvc;
2072 struct ip_vs_service *svc;
2073 struct ip_vs_dest_user *udest_compat;
2074 struct ip_vs_dest_user_kern udest;
2076 if (!capable(CAP_NET_ADMIN))
2077 return -EPERM;
2079 if (len != set_arglen[SET_CMDID(cmd)]) {
2080 IP_VS_ERR("set_ctl: len %u != %u\n",
2081 len, set_arglen[SET_CMDID(cmd)]);
2082 return -EINVAL;
2085 if (copy_from_user(arg, user, len) != 0)
2086 return -EFAULT;
2088 /* increase the module use count */
2089 ip_vs_use_count_inc();
2091 if (mutex_lock_interruptible(&__ip_vs_mutex)) {
2092 ret = -ERESTARTSYS;
2093 goto out_dec;
2096 if (cmd == IP_VS_SO_SET_FLUSH) {
2097 /* Flush the virtual service */
2098 ret = ip_vs_flush();
2099 goto out_unlock;
2100 } else if (cmd == IP_VS_SO_SET_TIMEOUT) {
2101 /* Set timeout values for (tcp tcpfin udp) */
2102 ret = ip_vs_set_timeout((struct ip_vs_timeout_user *)arg);
2103 goto out_unlock;
2104 } else if (cmd == IP_VS_SO_SET_STARTDAEMON) {
2105 struct ip_vs_daemon_user *dm = (struct ip_vs_daemon_user *)arg;
2106 ret = start_sync_thread(dm->state, dm->mcast_ifn, dm->syncid);
2107 goto out_unlock;
2108 } else if (cmd == IP_VS_SO_SET_STOPDAEMON) {
2109 struct ip_vs_daemon_user *dm = (struct ip_vs_daemon_user *)arg;
2110 ret = stop_sync_thread(dm->state);
2111 goto out_unlock;
2114 usvc_compat = (struct ip_vs_service_user *)arg;
2115 udest_compat = (struct ip_vs_dest_user *)(usvc_compat + 1);
2117 /* We only use the new structs internally, so copy userspace compat
2118 * structs to extended internal versions */
2119 ip_vs_copy_usvc_compat(&usvc, usvc_compat);
2120 ip_vs_copy_udest_compat(&udest, udest_compat);
2122 if (cmd == IP_VS_SO_SET_ZERO) {
2123 /* if no service address is set, zero counters in all */
2124 if (!usvc.fwmark && !usvc.addr.ip && !usvc.port) {
2125 ret = ip_vs_zero_all();
2126 goto out_unlock;
2130 /* Check for valid protocol: TCP or UDP, even for fwmark!=0 */
2131 if (usvc.protocol != IPPROTO_TCP && usvc.protocol != IPPROTO_UDP) {
2132 IP_VS_ERR("set_ctl: invalid protocol: %d %pI4:%d %s\n",
2133 usvc.protocol, &usvc.addr.ip,
2134 ntohs(usvc.port), usvc.sched_name);
2135 ret = -EFAULT;
2136 goto out_unlock;
2139 /* Lookup the exact service by <protocol, addr, port> or fwmark */
2140 if (usvc.fwmark == 0)
2141 svc = __ip_vs_service_get(usvc.af, usvc.protocol,
2142 &usvc.addr, usvc.port);
2143 else
2144 svc = __ip_vs_svc_fwm_get(usvc.af, usvc.fwmark);
2146 if (cmd != IP_VS_SO_SET_ADD
2147 && (svc == NULL || svc->protocol != usvc.protocol)) {
2148 ret = -ESRCH;
2149 goto out_unlock;
2152 switch (cmd) {
2153 case IP_VS_SO_SET_ADD:
2154 if (svc != NULL)
2155 ret = -EEXIST;
2156 else
2157 ret = ip_vs_add_service(&usvc, &svc);
2158 break;
2159 case IP_VS_SO_SET_EDIT:
2160 ret = ip_vs_edit_service(svc, &usvc);
2161 break;
2162 case IP_VS_SO_SET_DEL:
2163 ret = ip_vs_del_service(svc);
2164 if (!ret)
2165 goto out_unlock;
2166 break;
2167 case IP_VS_SO_SET_ZERO:
2168 ret = ip_vs_zero_service(svc);
2169 break;
2170 case IP_VS_SO_SET_ADDDEST:
2171 ret = ip_vs_add_dest(svc, &udest);
2172 break;
2173 case IP_VS_SO_SET_EDITDEST:
2174 ret = ip_vs_edit_dest(svc, &udest);
2175 break;
2176 case IP_VS_SO_SET_DELDEST:
2177 ret = ip_vs_del_dest(svc, &udest);
2178 break;
2179 default:
2180 ret = -EINVAL;
2183 if (svc)
2184 ip_vs_service_put(svc);
2186 out_unlock:
2187 mutex_unlock(&__ip_vs_mutex);
2188 out_dec:
2189 /* decrease the module use count */
2190 ip_vs_use_count_dec();
2192 return ret;
2196 static void
2197 ip_vs_copy_stats(struct ip_vs_stats_user *dst, struct ip_vs_stats *src)
2199 spin_lock_bh(&src->lock);
2200 memcpy(dst, &src->ustats, sizeof(*dst));
2201 spin_unlock_bh(&src->lock);
2204 static void
2205 ip_vs_copy_service(struct ip_vs_service_entry *dst, struct ip_vs_service *src)
2207 dst->protocol = src->protocol;
2208 dst->addr = src->addr.ip;
2209 dst->port = src->port;
2210 dst->fwmark = src->fwmark;
2211 strlcpy(dst->sched_name, src->scheduler->name, sizeof(dst->sched_name));
2212 dst->flags = src->flags;
2213 dst->timeout = src->timeout / HZ;
2214 dst->netmask = src->netmask;
2215 dst->num_dests = src->num_dests;
2216 ip_vs_copy_stats(&dst->stats, &src->stats);
2219 static inline int
2220 __ip_vs_get_service_entries(const struct ip_vs_get_services *get,
2221 struct ip_vs_get_services __user *uptr)
2223 int idx, count=0;
2224 struct ip_vs_service *svc;
2225 struct ip_vs_service_entry entry;
2226 int ret = 0;
2228 for (idx = 0; idx < IP_VS_SVC_TAB_SIZE; idx++) {
2229 list_for_each_entry(svc, &ip_vs_svc_table[idx], s_list) {
2230 /* Only expose IPv4 entries to old interface */
2231 if (svc->af != AF_INET)
2232 continue;
2234 if (count >= get->num_services)
2235 goto out;
2236 memset(&entry, 0, sizeof(entry));
2237 ip_vs_copy_service(&entry, svc);
2238 if (copy_to_user(&uptr->entrytable[count],
2239 &entry, sizeof(entry))) {
2240 ret = -EFAULT;
2241 goto out;
2243 count++;
2247 for (idx = 0; idx < IP_VS_SVC_TAB_SIZE; idx++) {
2248 list_for_each_entry(svc, &ip_vs_svc_fwm_table[idx], f_list) {
2249 /* Only expose IPv4 entries to old interface */
2250 if (svc->af != AF_INET)
2251 continue;
2253 if (count >= get->num_services)
2254 goto out;
2255 memset(&entry, 0, sizeof(entry));
2256 ip_vs_copy_service(&entry, svc);
2257 if (copy_to_user(&uptr->entrytable[count],
2258 &entry, sizeof(entry))) {
2259 ret = -EFAULT;
2260 goto out;
2262 count++;
2265 out:
2266 return ret;
2269 static inline int
2270 __ip_vs_get_dest_entries(const struct ip_vs_get_dests *get,
2271 struct ip_vs_get_dests __user *uptr)
2273 struct ip_vs_service *svc;
2274 union nf_inet_addr addr = { .ip = get->addr };
2275 int ret = 0;
2277 if (get->fwmark)
2278 svc = __ip_vs_svc_fwm_get(AF_INET, get->fwmark);
2279 else
2280 svc = __ip_vs_service_get(AF_INET, get->protocol, &addr,
2281 get->port);
2283 if (svc) {
2284 int count = 0;
2285 struct ip_vs_dest *dest;
2286 struct ip_vs_dest_entry entry;
2288 list_for_each_entry(dest, &svc->destinations, n_list) {
2289 if (count >= get->num_dests)
2290 break;
2292 entry.addr = dest->addr.ip;
2293 entry.port = dest->port;
2294 entry.conn_flags = atomic_read(&dest->conn_flags);
2295 entry.weight = atomic_read(&dest->weight);
2296 entry.u_threshold = dest->u_threshold;
2297 entry.l_threshold = dest->l_threshold;
2298 entry.activeconns = atomic_read(&dest->activeconns);
2299 entry.inactconns = atomic_read(&dest->inactconns);
2300 entry.persistconns = atomic_read(&dest->persistconns);
2301 ip_vs_copy_stats(&entry.stats, &dest->stats);
2302 if (copy_to_user(&uptr->entrytable[count],
2303 &entry, sizeof(entry))) {
2304 ret = -EFAULT;
2305 break;
2307 count++;
2309 ip_vs_service_put(svc);
2310 } else
2311 ret = -ESRCH;
2312 return ret;
2315 static inline void
2316 __ip_vs_get_timeouts(struct ip_vs_timeout_user *u)
2318 memset(u, 0, sizeof(*u));
2319 #ifdef CONFIG_IP_VS_PROTO_TCP
2320 u->tcp_timeout =
2321 ip_vs_protocol_tcp.timeout_table[IP_VS_TCP_S_ESTABLISHED] / HZ;
2322 u->tcp_fin_timeout =
2323 ip_vs_protocol_tcp.timeout_table[IP_VS_TCP_S_FIN_WAIT] / HZ;
2324 #endif
2325 #ifdef CONFIG_IP_VS_PROTO_UDP
2326 u->udp_timeout =
2327 ip_vs_protocol_udp.timeout_table[IP_VS_UDP_S_NORMAL] / HZ;
2328 #endif
2332 #define GET_CMDID(cmd) (cmd - IP_VS_BASE_CTL)
2333 #define GET_INFO_ARG_LEN (sizeof(struct ip_vs_getinfo))
2334 #define GET_SERVICES_ARG_LEN (sizeof(struct ip_vs_get_services))
2335 #define GET_SERVICE_ARG_LEN (sizeof(struct ip_vs_service_entry))
2336 #define GET_DESTS_ARG_LEN (sizeof(struct ip_vs_get_dests))
2337 #define GET_TIMEOUT_ARG_LEN (sizeof(struct ip_vs_timeout_user))
2338 #define GET_DAEMON_ARG_LEN (sizeof(struct ip_vs_daemon_user) * 2)
2340 static const unsigned char get_arglen[GET_CMDID(IP_VS_SO_GET_MAX)+1] = {
2341 [GET_CMDID(IP_VS_SO_GET_VERSION)] = 64,
2342 [GET_CMDID(IP_VS_SO_GET_INFO)] = GET_INFO_ARG_LEN,
2343 [GET_CMDID(IP_VS_SO_GET_SERVICES)] = GET_SERVICES_ARG_LEN,
2344 [GET_CMDID(IP_VS_SO_GET_SERVICE)] = GET_SERVICE_ARG_LEN,
2345 [GET_CMDID(IP_VS_SO_GET_DESTS)] = GET_DESTS_ARG_LEN,
2346 [GET_CMDID(IP_VS_SO_GET_TIMEOUT)] = GET_TIMEOUT_ARG_LEN,
2347 [GET_CMDID(IP_VS_SO_GET_DAEMON)] = GET_DAEMON_ARG_LEN,
2350 static int
2351 do_ip_vs_get_ctl(struct sock *sk, int cmd, void __user *user, int *len)
2353 unsigned char arg[128];
2354 int ret = 0;
2356 if (!capable(CAP_NET_ADMIN))
2357 return -EPERM;
2359 if (*len < get_arglen[GET_CMDID(cmd)]) {
2360 IP_VS_ERR("get_ctl: len %u < %u\n",
2361 *len, get_arglen[GET_CMDID(cmd)]);
2362 return -EINVAL;
2365 if (copy_from_user(arg, user, get_arglen[GET_CMDID(cmd)]) != 0)
2366 return -EFAULT;
2368 if (mutex_lock_interruptible(&__ip_vs_mutex))
2369 return -ERESTARTSYS;
2371 switch (cmd) {
2372 case IP_VS_SO_GET_VERSION:
2374 char buf[64];
2376 sprintf(buf, "IP Virtual Server version %d.%d.%d (size=%d)",
2377 NVERSION(IP_VS_VERSION_CODE), IP_VS_CONN_TAB_SIZE);
2378 if (copy_to_user(user, buf, strlen(buf)+1) != 0) {
2379 ret = -EFAULT;
2380 goto out;
2382 *len = strlen(buf)+1;
2384 break;
2386 case IP_VS_SO_GET_INFO:
2388 struct ip_vs_getinfo info;
2389 info.version = IP_VS_VERSION_CODE;
2390 info.size = IP_VS_CONN_TAB_SIZE;
2391 info.num_services = ip_vs_num_services;
2392 if (copy_to_user(user, &info, sizeof(info)) != 0)
2393 ret = -EFAULT;
2395 break;
2397 case IP_VS_SO_GET_SERVICES:
2399 struct ip_vs_get_services *get;
2400 int size;
2402 get = (struct ip_vs_get_services *)arg;
2403 size = sizeof(*get) +
2404 sizeof(struct ip_vs_service_entry) * get->num_services;
2405 if (*len != size) {
2406 IP_VS_ERR("length: %u != %u\n", *len, size);
2407 ret = -EINVAL;
2408 goto out;
2410 ret = __ip_vs_get_service_entries(get, user);
2412 break;
2414 case IP_VS_SO_GET_SERVICE:
2416 struct ip_vs_service_entry *entry;
2417 struct ip_vs_service *svc;
2418 union nf_inet_addr addr;
2420 entry = (struct ip_vs_service_entry *)arg;
2421 addr.ip = entry->addr;
2422 if (entry->fwmark)
2423 svc = __ip_vs_svc_fwm_get(AF_INET, entry->fwmark);
2424 else
2425 svc = __ip_vs_service_get(AF_INET, entry->protocol,
2426 &addr, entry->port);
2427 if (svc) {
2428 ip_vs_copy_service(entry, svc);
2429 if (copy_to_user(user, entry, sizeof(*entry)) != 0)
2430 ret = -EFAULT;
2431 ip_vs_service_put(svc);
2432 } else
2433 ret = -ESRCH;
2435 break;
2437 case IP_VS_SO_GET_DESTS:
2439 struct ip_vs_get_dests *get;
2440 int size;
2442 get = (struct ip_vs_get_dests *)arg;
2443 size = sizeof(*get) +
2444 sizeof(struct ip_vs_dest_entry) * get->num_dests;
2445 if (*len != size) {
2446 IP_VS_ERR("length: %u != %u\n", *len, size);
2447 ret = -EINVAL;
2448 goto out;
2450 ret = __ip_vs_get_dest_entries(get, user);
2452 break;
2454 case IP_VS_SO_GET_TIMEOUT:
2456 struct ip_vs_timeout_user t;
2458 __ip_vs_get_timeouts(&t);
2459 if (copy_to_user(user, &t, sizeof(t)) != 0)
2460 ret = -EFAULT;
2462 break;
2464 case IP_VS_SO_GET_DAEMON:
2466 struct ip_vs_daemon_user d[2];
2468 memset(&d, 0, sizeof(d));
2469 if (ip_vs_sync_state & IP_VS_STATE_MASTER) {
2470 d[0].state = IP_VS_STATE_MASTER;
2471 strlcpy(d[0].mcast_ifn, ip_vs_master_mcast_ifn, sizeof(d[0].mcast_ifn));
2472 d[0].syncid = ip_vs_master_syncid;
2474 if (ip_vs_sync_state & IP_VS_STATE_BACKUP) {
2475 d[1].state = IP_VS_STATE_BACKUP;
2476 strlcpy(d[1].mcast_ifn, ip_vs_backup_mcast_ifn, sizeof(d[1].mcast_ifn));
2477 d[1].syncid = ip_vs_backup_syncid;
2479 if (copy_to_user(user, &d, sizeof(d)) != 0)
2480 ret = -EFAULT;
2482 break;
2484 default:
2485 ret = -EINVAL;
2488 out:
2489 mutex_unlock(&__ip_vs_mutex);
2490 return ret;
2494 static struct nf_sockopt_ops ip_vs_sockopts = {
2495 .pf = PF_INET,
2496 .set_optmin = IP_VS_BASE_CTL,
2497 .set_optmax = IP_VS_SO_SET_MAX+1,
2498 .set = do_ip_vs_set_ctl,
2499 .get_optmin = IP_VS_BASE_CTL,
2500 .get_optmax = IP_VS_SO_GET_MAX+1,
2501 .get = do_ip_vs_get_ctl,
2502 .owner = THIS_MODULE,
2506 * Generic Netlink interface
2509 /* IPVS genetlink family */
2510 static struct genl_family ip_vs_genl_family = {
2511 .id = GENL_ID_GENERATE,
2512 .hdrsize = 0,
2513 .name = IPVS_GENL_NAME,
2514 .version = IPVS_GENL_VERSION,
2515 .maxattr = IPVS_CMD_MAX,
2518 /* Policy used for first-level command attributes */
2519 static const struct nla_policy ip_vs_cmd_policy[IPVS_CMD_ATTR_MAX + 1] = {
2520 [IPVS_CMD_ATTR_SERVICE] = { .type = NLA_NESTED },
2521 [IPVS_CMD_ATTR_DEST] = { .type = NLA_NESTED },
2522 [IPVS_CMD_ATTR_DAEMON] = { .type = NLA_NESTED },
2523 [IPVS_CMD_ATTR_TIMEOUT_TCP] = { .type = NLA_U32 },
2524 [IPVS_CMD_ATTR_TIMEOUT_TCP_FIN] = { .type = NLA_U32 },
2525 [IPVS_CMD_ATTR_TIMEOUT_UDP] = { .type = NLA_U32 },
2528 /* Policy used for attributes in nested attribute IPVS_CMD_ATTR_DAEMON */
2529 static const struct nla_policy ip_vs_daemon_policy[IPVS_DAEMON_ATTR_MAX + 1] = {
2530 [IPVS_DAEMON_ATTR_STATE] = { .type = NLA_U32 },
2531 [IPVS_DAEMON_ATTR_MCAST_IFN] = { .type = NLA_NUL_STRING,
2532 .len = IP_VS_IFNAME_MAXLEN },
2533 [IPVS_DAEMON_ATTR_SYNC_ID] = { .type = NLA_U32 },
2536 /* Policy used for attributes in nested attribute IPVS_CMD_ATTR_SERVICE */
2537 static const struct nla_policy ip_vs_svc_policy[IPVS_SVC_ATTR_MAX + 1] = {
2538 [IPVS_SVC_ATTR_AF] = { .type = NLA_U16 },
2539 [IPVS_SVC_ATTR_PROTOCOL] = { .type = NLA_U16 },
2540 [IPVS_SVC_ATTR_ADDR] = { .type = NLA_BINARY,
2541 .len = sizeof(union nf_inet_addr) },
2542 [IPVS_SVC_ATTR_PORT] = { .type = NLA_U16 },
2543 [IPVS_SVC_ATTR_FWMARK] = { .type = NLA_U32 },
2544 [IPVS_SVC_ATTR_SCHED_NAME] = { .type = NLA_NUL_STRING,
2545 .len = IP_VS_SCHEDNAME_MAXLEN },
2546 [IPVS_SVC_ATTR_FLAGS] = { .type = NLA_BINARY,
2547 .len = sizeof(struct ip_vs_flags) },
2548 [IPVS_SVC_ATTR_TIMEOUT] = { .type = NLA_U32 },
2549 [IPVS_SVC_ATTR_NETMASK] = { .type = NLA_U32 },
2550 [IPVS_SVC_ATTR_STATS] = { .type = NLA_NESTED },
2553 /* Policy used for attributes in nested attribute IPVS_CMD_ATTR_DEST */
2554 static const struct nla_policy ip_vs_dest_policy[IPVS_DEST_ATTR_MAX + 1] = {
2555 [IPVS_DEST_ATTR_ADDR] = { .type = NLA_BINARY,
2556 .len = sizeof(union nf_inet_addr) },
2557 [IPVS_DEST_ATTR_PORT] = { .type = NLA_U16 },
2558 [IPVS_DEST_ATTR_FWD_METHOD] = { .type = NLA_U32 },
2559 [IPVS_DEST_ATTR_WEIGHT] = { .type = NLA_U32 },
2560 [IPVS_DEST_ATTR_U_THRESH] = { .type = NLA_U32 },
2561 [IPVS_DEST_ATTR_L_THRESH] = { .type = NLA_U32 },
2562 [IPVS_DEST_ATTR_ACTIVE_CONNS] = { .type = NLA_U32 },
2563 [IPVS_DEST_ATTR_INACT_CONNS] = { .type = NLA_U32 },
2564 [IPVS_DEST_ATTR_PERSIST_CONNS] = { .type = NLA_U32 },
2565 [IPVS_DEST_ATTR_STATS] = { .type = NLA_NESTED },
2568 static int ip_vs_genl_fill_stats(struct sk_buff *skb, int container_type,
2569 struct ip_vs_stats *stats)
2571 struct nlattr *nl_stats = nla_nest_start(skb, container_type);
2572 if (!nl_stats)
2573 return -EMSGSIZE;
2575 spin_lock_bh(&stats->lock);
2577 NLA_PUT_U32(skb, IPVS_STATS_ATTR_CONNS, stats->ustats.conns);
2578 NLA_PUT_U32(skb, IPVS_STATS_ATTR_INPKTS, stats->ustats.inpkts);
2579 NLA_PUT_U32(skb, IPVS_STATS_ATTR_OUTPKTS, stats->ustats.outpkts);
2580 NLA_PUT_U64(skb, IPVS_STATS_ATTR_INBYTES, stats->ustats.inbytes);
2581 NLA_PUT_U64(skb, IPVS_STATS_ATTR_OUTBYTES, stats->ustats.outbytes);
2582 NLA_PUT_U32(skb, IPVS_STATS_ATTR_CPS, stats->ustats.cps);
2583 NLA_PUT_U32(skb, IPVS_STATS_ATTR_INPPS, stats->ustats.inpps);
2584 NLA_PUT_U32(skb, IPVS_STATS_ATTR_OUTPPS, stats->ustats.outpps);
2585 NLA_PUT_U32(skb, IPVS_STATS_ATTR_INBPS, stats->ustats.inbps);
2586 NLA_PUT_U32(skb, IPVS_STATS_ATTR_OUTBPS, stats->ustats.outbps);
2588 spin_unlock_bh(&stats->lock);
2590 nla_nest_end(skb, nl_stats);
2592 return 0;
2594 nla_put_failure:
2595 spin_unlock_bh(&stats->lock);
2596 nla_nest_cancel(skb, nl_stats);
2597 return -EMSGSIZE;
2600 static int ip_vs_genl_fill_service(struct sk_buff *skb,
2601 struct ip_vs_service *svc)
2603 struct nlattr *nl_service;
2604 struct ip_vs_flags flags = { .flags = svc->flags,
2605 .mask = ~0 };
2607 nl_service = nla_nest_start(skb, IPVS_CMD_ATTR_SERVICE);
2608 if (!nl_service)
2609 return -EMSGSIZE;
2611 NLA_PUT_U16(skb, IPVS_SVC_ATTR_AF, svc->af);
2613 if (svc->fwmark) {
2614 NLA_PUT_U32(skb, IPVS_SVC_ATTR_FWMARK, svc->fwmark);
2615 } else {
2616 NLA_PUT_U16(skb, IPVS_SVC_ATTR_PROTOCOL, svc->protocol);
2617 NLA_PUT(skb, IPVS_SVC_ATTR_ADDR, sizeof(svc->addr), &svc->addr);
2618 NLA_PUT_U16(skb, IPVS_SVC_ATTR_PORT, svc->port);
2621 NLA_PUT_STRING(skb, IPVS_SVC_ATTR_SCHED_NAME, svc->scheduler->name);
2622 NLA_PUT(skb, IPVS_SVC_ATTR_FLAGS, sizeof(flags), &flags);
2623 NLA_PUT_U32(skb, IPVS_SVC_ATTR_TIMEOUT, svc->timeout / HZ);
2624 NLA_PUT_U32(skb, IPVS_SVC_ATTR_NETMASK, svc->netmask);
2626 if (ip_vs_genl_fill_stats(skb, IPVS_SVC_ATTR_STATS, &svc->stats))
2627 goto nla_put_failure;
2629 nla_nest_end(skb, nl_service);
2631 return 0;
2633 nla_put_failure:
2634 nla_nest_cancel(skb, nl_service);
2635 return -EMSGSIZE;
2638 static int ip_vs_genl_dump_service(struct sk_buff *skb,
2639 struct ip_vs_service *svc,
2640 struct netlink_callback *cb)
2642 void *hdr;
2644 hdr = genlmsg_put(skb, NETLINK_CB(cb->skb).pid, cb->nlh->nlmsg_seq,
2645 &ip_vs_genl_family, NLM_F_MULTI,
2646 IPVS_CMD_NEW_SERVICE);
2647 if (!hdr)
2648 return -EMSGSIZE;
2650 if (ip_vs_genl_fill_service(skb, svc) < 0)
2651 goto nla_put_failure;
2653 return genlmsg_end(skb, hdr);
2655 nla_put_failure:
2656 genlmsg_cancel(skb, hdr);
2657 return -EMSGSIZE;
2660 static int ip_vs_genl_dump_services(struct sk_buff *skb,
2661 struct netlink_callback *cb)
2663 int idx = 0, i;
2664 int start = cb->args[0];
2665 struct ip_vs_service *svc;
2667 mutex_lock(&__ip_vs_mutex);
2668 for (i = 0; i < IP_VS_SVC_TAB_SIZE; i++) {
2669 list_for_each_entry(svc, &ip_vs_svc_table[i], s_list) {
2670 if (++idx <= start)
2671 continue;
2672 if (ip_vs_genl_dump_service(skb, svc, cb) < 0) {
2673 idx--;
2674 goto nla_put_failure;
2679 for (i = 0; i < IP_VS_SVC_TAB_SIZE; i++) {
2680 list_for_each_entry(svc, &ip_vs_svc_fwm_table[i], f_list) {
2681 if (++idx <= start)
2682 continue;
2683 if (ip_vs_genl_dump_service(skb, svc, cb) < 0) {
2684 idx--;
2685 goto nla_put_failure;
2690 nla_put_failure:
2691 mutex_unlock(&__ip_vs_mutex);
2692 cb->args[0] = idx;
2694 return skb->len;
2697 static int ip_vs_genl_parse_service(struct ip_vs_service_user_kern *usvc,
2698 struct nlattr *nla, int full_entry)
2700 struct nlattr *attrs[IPVS_SVC_ATTR_MAX + 1];
2701 struct nlattr *nla_af, *nla_port, *nla_fwmark, *nla_protocol, *nla_addr;
2703 /* Parse mandatory identifying service fields first */
2704 if (nla == NULL ||
2705 nla_parse_nested(attrs, IPVS_SVC_ATTR_MAX, nla, ip_vs_svc_policy))
2706 return -EINVAL;
2708 nla_af = attrs[IPVS_SVC_ATTR_AF];
2709 nla_protocol = attrs[IPVS_SVC_ATTR_PROTOCOL];
2710 nla_addr = attrs[IPVS_SVC_ATTR_ADDR];
2711 nla_port = attrs[IPVS_SVC_ATTR_PORT];
2712 nla_fwmark = attrs[IPVS_SVC_ATTR_FWMARK];
2714 if (!(nla_af && (nla_fwmark || (nla_port && nla_protocol && nla_addr))))
2715 return -EINVAL;
2717 usvc->af = nla_get_u16(nla_af);
2718 #ifdef CONFIG_IP_VS_IPV6
2719 if (usvc->af != AF_INET && usvc->af != AF_INET6)
2720 #else
2721 if (usvc->af != AF_INET)
2722 #endif
2723 return -EAFNOSUPPORT;
2725 if (nla_fwmark) {
2726 usvc->protocol = IPPROTO_TCP;
2727 usvc->fwmark = nla_get_u32(nla_fwmark);
2728 } else {
2729 usvc->protocol = nla_get_u16(nla_protocol);
2730 nla_memcpy(&usvc->addr, nla_addr, sizeof(usvc->addr));
2731 usvc->port = nla_get_u16(nla_port);
2732 usvc->fwmark = 0;
2735 /* If a full entry was requested, check for the additional fields */
2736 if (full_entry) {
2737 struct nlattr *nla_sched, *nla_flags, *nla_timeout,
2738 *nla_netmask;
2739 struct ip_vs_flags flags;
2740 struct ip_vs_service *svc;
2742 nla_sched = attrs[IPVS_SVC_ATTR_SCHED_NAME];
2743 nla_flags = attrs[IPVS_SVC_ATTR_FLAGS];
2744 nla_timeout = attrs[IPVS_SVC_ATTR_TIMEOUT];
2745 nla_netmask = attrs[IPVS_SVC_ATTR_NETMASK];
2747 if (!(nla_sched && nla_flags && nla_timeout && nla_netmask))
2748 return -EINVAL;
2750 nla_memcpy(&flags, nla_flags, sizeof(flags));
2752 /* prefill flags from service if it already exists */
2753 if (usvc->fwmark)
2754 svc = __ip_vs_svc_fwm_get(usvc->af, usvc->fwmark);
2755 else
2756 svc = __ip_vs_service_get(usvc->af, usvc->protocol,
2757 &usvc->addr, usvc->port);
2758 if (svc) {
2759 usvc->flags = svc->flags;
2760 ip_vs_service_put(svc);
2761 } else
2762 usvc->flags = 0;
2764 /* set new flags from userland */
2765 usvc->flags = (usvc->flags & ~flags.mask) |
2766 (flags.flags & flags.mask);
2767 usvc->sched_name = nla_data(nla_sched);
2768 usvc->timeout = nla_get_u32(nla_timeout);
2769 usvc->netmask = nla_get_u32(nla_netmask);
2772 return 0;
2775 static struct ip_vs_service *ip_vs_genl_find_service(struct nlattr *nla)
2777 struct ip_vs_service_user_kern usvc;
2778 int ret;
2780 ret = ip_vs_genl_parse_service(&usvc, nla, 0);
2781 if (ret)
2782 return ERR_PTR(ret);
2784 if (usvc.fwmark)
2785 return __ip_vs_svc_fwm_get(usvc.af, usvc.fwmark);
2786 else
2787 return __ip_vs_service_get(usvc.af, usvc.protocol,
2788 &usvc.addr, usvc.port);
2791 static int ip_vs_genl_fill_dest(struct sk_buff *skb, struct ip_vs_dest *dest)
2793 struct nlattr *nl_dest;
2795 nl_dest = nla_nest_start(skb, IPVS_CMD_ATTR_DEST);
2796 if (!nl_dest)
2797 return -EMSGSIZE;
2799 NLA_PUT(skb, IPVS_DEST_ATTR_ADDR, sizeof(dest->addr), &dest->addr);
2800 NLA_PUT_U16(skb, IPVS_DEST_ATTR_PORT, dest->port);
2802 NLA_PUT_U32(skb, IPVS_DEST_ATTR_FWD_METHOD,
2803 atomic_read(&dest->conn_flags) & IP_VS_CONN_F_FWD_MASK);
2804 NLA_PUT_U32(skb, IPVS_DEST_ATTR_WEIGHT, atomic_read(&dest->weight));
2805 NLA_PUT_U32(skb, IPVS_DEST_ATTR_U_THRESH, dest->u_threshold);
2806 NLA_PUT_U32(skb, IPVS_DEST_ATTR_L_THRESH, dest->l_threshold);
2807 NLA_PUT_U32(skb, IPVS_DEST_ATTR_ACTIVE_CONNS,
2808 atomic_read(&dest->activeconns));
2809 NLA_PUT_U32(skb, IPVS_DEST_ATTR_INACT_CONNS,
2810 atomic_read(&dest->inactconns));
2811 NLA_PUT_U32(skb, IPVS_DEST_ATTR_PERSIST_CONNS,
2812 atomic_read(&dest->persistconns));
2814 if (ip_vs_genl_fill_stats(skb, IPVS_DEST_ATTR_STATS, &dest->stats))
2815 goto nla_put_failure;
2817 nla_nest_end(skb, nl_dest);
2819 return 0;
2821 nla_put_failure:
2822 nla_nest_cancel(skb, nl_dest);
2823 return -EMSGSIZE;
2826 static int ip_vs_genl_dump_dest(struct sk_buff *skb, struct ip_vs_dest *dest,
2827 struct netlink_callback *cb)
2829 void *hdr;
2831 hdr = genlmsg_put(skb, NETLINK_CB(cb->skb).pid, cb->nlh->nlmsg_seq,
2832 &ip_vs_genl_family, NLM_F_MULTI,
2833 IPVS_CMD_NEW_DEST);
2834 if (!hdr)
2835 return -EMSGSIZE;
2837 if (ip_vs_genl_fill_dest(skb, dest) < 0)
2838 goto nla_put_failure;
2840 return genlmsg_end(skb, hdr);
2842 nla_put_failure:
2843 genlmsg_cancel(skb, hdr);
2844 return -EMSGSIZE;
2847 static int ip_vs_genl_dump_dests(struct sk_buff *skb,
2848 struct netlink_callback *cb)
2850 int idx = 0;
2851 int start = cb->args[0];
2852 struct ip_vs_service *svc;
2853 struct ip_vs_dest *dest;
2854 struct nlattr *attrs[IPVS_CMD_ATTR_MAX + 1];
2856 mutex_lock(&__ip_vs_mutex);
2858 /* Try to find the service for which to dump destinations */
2859 if (nlmsg_parse(cb->nlh, GENL_HDRLEN, attrs,
2860 IPVS_CMD_ATTR_MAX, ip_vs_cmd_policy))
2861 goto out_err;
2863 svc = ip_vs_genl_find_service(attrs[IPVS_CMD_ATTR_SERVICE]);
2864 if (IS_ERR(svc) || svc == NULL)
2865 goto out_err;
2867 /* Dump the destinations */
2868 list_for_each_entry(dest, &svc->destinations, n_list) {
2869 if (++idx <= start)
2870 continue;
2871 if (ip_vs_genl_dump_dest(skb, dest, cb) < 0) {
2872 idx--;
2873 goto nla_put_failure;
2877 nla_put_failure:
2878 cb->args[0] = idx;
2879 ip_vs_service_put(svc);
2881 out_err:
2882 mutex_unlock(&__ip_vs_mutex);
2884 return skb->len;
2887 static int ip_vs_genl_parse_dest(struct ip_vs_dest_user_kern *udest,
2888 struct nlattr *nla, int full_entry)
2890 struct nlattr *attrs[IPVS_DEST_ATTR_MAX + 1];
2891 struct nlattr *nla_addr, *nla_port;
2893 /* Parse mandatory identifying destination fields first */
2894 if (nla == NULL ||
2895 nla_parse_nested(attrs, IPVS_DEST_ATTR_MAX, nla, ip_vs_dest_policy))
2896 return -EINVAL;
2898 nla_addr = attrs[IPVS_DEST_ATTR_ADDR];
2899 nla_port = attrs[IPVS_DEST_ATTR_PORT];
2901 if (!(nla_addr && nla_port))
2902 return -EINVAL;
2904 nla_memcpy(&udest->addr, nla_addr, sizeof(udest->addr));
2905 udest->port = nla_get_u16(nla_port);
2907 /* If a full entry was requested, check for the additional fields */
2908 if (full_entry) {
2909 struct nlattr *nla_fwd, *nla_weight, *nla_u_thresh,
2910 *nla_l_thresh;
2912 nla_fwd = attrs[IPVS_DEST_ATTR_FWD_METHOD];
2913 nla_weight = attrs[IPVS_DEST_ATTR_WEIGHT];
2914 nla_u_thresh = attrs[IPVS_DEST_ATTR_U_THRESH];
2915 nla_l_thresh = attrs[IPVS_DEST_ATTR_L_THRESH];
2917 if (!(nla_fwd && nla_weight && nla_u_thresh && nla_l_thresh))
2918 return -EINVAL;
2920 udest->conn_flags = nla_get_u32(nla_fwd)
2921 & IP_VS_CONN_F_FWD_MASK;
2922 udest->weight = nla_get_u32(nla_weight);
2923 udest->u_threshold = nla_get_u32(nla_u_thresh);
2924 udest->l_threshold = nla_get_u32(nla_l_thresh);
2927 return 0;
2930 static int ip_vs_genl_fill_daemon(struct sk_buff *skb, __be32 state,
2931 const char *mcast_ifn, __be32 syncid)
2933 struct nlattr *nl_daemon;
2935 nl_daemon = nla_nest_start(skb, IPVS_CMD_ATTR_DAEMON);
2936 if (!nl_daemon)
2937 return -EMSGSIZE;
2939 NLA_PUT_U32(skb, IPVS_DAEMON_ATTR_STATE, state);
2940 NLA_PUT_STRING(skb, IPVS_DAEMON_ATTR_MCAST_IFN, mcast_ifn);
2941 NLA_PUT_U32(skb, IPVS_DAEMON_ATTR_SYNC_ID, syncid);
2943 nla_nest_end(skb, nl_daemon);
2945 return 0;
2947 nla_put_failure:
2948 nla_nest_cancel(skb, nl_daemon);
2949 return -EMSGSIZE;
2952 static int ip_vs_genl_dump_daemon(struct sk_buff *skb, __be32 state,
2953 const char *mcast_ifn, __be32 syncid,
2954 struct netlink_callback *cb)
2956 void *hdr;
2957 hdr = genlmsg_put(skb, NETLINK_CB(cb->skb).pid, cb->nlh->nlmsg_seq,
2958 &ip_vs_genl_family, NLM_F_MULTI,
2959 IPVS_CMD_NEW_DAEMON);
2960 if (!hdr)
2961 return -EMSGSIZE;
2963 if (ip_vs_genl_fill_daemon(skb, state, mcast_ifn, syncid))
2964 goto nla_put_failure;
2966 return genlmsg_end(skb, hdr);
2968 nla_put_failure:
2969 genlmsg_cancel(skb, hdr);
2970 return -EMSGSIZE;
2973 static int ip_vs_genl_dump_daemons(struct sk_buff *skb,
2974 struct netlink_callback *cb)
2976 mutex_lock(&__ip_vs_mutex);
2977 if ((ip_vs_sync_state & IP_VS_STATE_MASTER) && !cb->args[0]) {
2978 if (ip_vs_genl_dump_daemon(skb, IP_VS_STATE_MASTER,
2979 ip_vs_master_mcast_ifn,
2980 ip_vs_master_syncid, cb) < 0)
2981 goto nla_put_failure;
2983 cb->args[0] = 1;
2986 if ((ip_vs_sync_state & IP_VS_STATE_BACKUP) && !cb->args[1]) {
2987 if (ip_vs_genl_dump_daemon(skb, IP_VS_STATE_BACKUP,
2988 ip_vs_backup_mcast_ifn,
2989 ip_vs_backup_syncid, cb) < 0)
2990 goto nla_put_failure;
2992 cb->args[1] = 1;
2995 nla_put_failure:
2996 mutex_unlock(&__ip_vs_mutex);
2998 return skb->len;
3001 static int ip_vs_genl_new_daemon(struct nlattr **attrs)
3003 if (!(attrs[IPVS_DAEMON_ATTR_STATE] &&
3004 attrs[IPVS_DAEMON_ATTR_MCAST_IFN] &&
3005 attrs[IPVS_DAEMON_ATTR_SYNC_ID]))
3006 return -EINVAL;
3008 return start_sync_thread(nla_get_u32(attrs[IPVS_DAEMON_ATTR_STATE]),
3009 nla_data(attrs[IPVS_DAEMON_ATTR_MCAST_IFN]),
3010 nla_get_u32(attrs[IPVS_DAEMON_ATTR_SYNC_ID]));
3013 static int ip_vs_genl_del_daemon(struct nlattr **attrs)
3015 if (!attrs[IPVS_DAEMON_ATTR_STATE])
3016 return -EINVAL;
3018 return stop_sync_thread(nla_get_u32(attrs[IPVS_DAEMON_ATTR_STATE]));
3021 static int ip_vs_genl_set_config(struct nlattr **attrs)
3023 struct ip_vs_timeout_user t;
3025 __ip_vs_get_timeouts(&t);
3027 if (attrs[IPVS_CMD_ATTR_TIMEOUT_TCP])
3028 t.tcp_timeout = nla_get_u32(attrs[IPVS_CMD_ATTR_TIMEOUT_TCP]);
3030 if (attrs[IPVS_CMD_ATTR_TIMEOUT_TCP_FIN])
3031 t.tcp_fin_timeout =
3032 nla_get_u32(attrs[IPVS_CMD_ATTR_TIMEOUT_TCP_FIN]);
3034 if (attrs[IPVS_CMD_ATTR_TIMEOUT_UDP])
3035 t.udp_timeout = nla_get_u32(attrs[IPVS_CMD_ATTR_TIMEOUT_UDP]);
3037 return ip_vs_set_timeout(&t);
3040 static int ip_vs_genl_set_cmd(struct sk_buff *skb, struct genl_info *info)
3042 struct ip_vs_service *svc = NULL;
3043 struct ip_vs_service_user_kern usvc;
3044 struct ip_vs_dest_user_kern udest;
3045 int ret = 0, cmd;
3046 int need_full_svc = 0, need_full_dest = 0;
3048 cmd = info->genlhdr->cmd;
3050 mutex_lock(&__ip_vs_mutex);
3052 if (cmd == IPVS_CMD_FLUSH) {
3053 ret = ip_vs_flush();
3054 goto out;
3055 } else if (cmd == IPVS_CMD_SET_CONFIG) {
3056 ret = ip_vs_genl_set_config(info->attrs);
3057 goto out;
3058 } else if (cmd == IPVS_CMD_NEW_DAEMON ||
3059 cmd == IPVS_CMD_DEL_DAEMON) {
3061 struct nlattr *daemon_attrs[IPVS_DAEMON_ATTR_MAX + 1];
3063 if (!info->attrs[IPVS_CMD_ATTR_DAEMON] ||
3064 nla_parse_nested(daemon_attrs, IPVS_DAEMON_ATTR_MAX,
3065 info->attrs[IPVS_CMD_ATTR_DAEMON],
3066 ip_vs_daemon_policy)) {
3067 ret = -EINVAL;
3068 goto out;
3071 if (cmd == IPVS_CMD_NEW_DAEMON)
3072 ret = ip_vs_genl_new_daemon(daemon_attrs);
3073 else
3074 ret = ip_vs_genl_del_daemon(daemon_attrs);
3075 goto out;
3076 } else if (cmd == IPVS_CMD_ZERO &&
3077 !info->attrs[IPVS_CMD_ATTR_SERVICE]) {
3078 ret = ip_vs_zero_all();
3079 goto out;
3082 /* All following commands require a service argument, so check if we
3083 * received a valid one. We need a full service specification when
3084 * adding / editing a service. Only identifying members otherwise. */
3085 if (cmd == IPVS_CMD_NEW_SERVICE || cmd == IPVS_CMD_SET_SERVICE)
3086 need_full_svc = 1;
3088 ret = ip_vs_genl_parse_service(&usvc,
3089 info->attrs[IPVS_CMD_ATTR_SERVICE],
3090 need_full_svc);
3091 if (ret)
3092 goto out;
3094 /* Lookup the exact service by <protocol, addr, port> or fwmark */
3095 if (usvc.fwmark == 0)
3096 svc = __ip_vs_service_get(usvc.af, usvc.protocol,
3097 &usvc.addr, usvc.port);
3098 else
3099 svc = __ip_vs_svc_fwm_get(usvc.af, usvc.fwmark);
3101 /* Unless we're adding a new service, the service must already exist */
3102 if ((cmd != IPVS_CMD_NEW_SERVICE) && (svc == NULL)) {
3103 ret = -ESRCH;
3104 goto out;
3107 /* Destination commands require a valid destination argument. For
3108 * adding / editing a destination, we need a full destination
3109 * specification. */
3110 if (cmd == IPVS_CMD_NEW_DEST || cmd == IPVS_CMD_SET_DEST ||
3111 cmd == IPVS_CMD_DEL_DEST) {
3112 if (cmd != IPVS_CMD_DEL_DEST)
3113 need_full_dest = 1;
3115 ret = ip_vs_genl_parse_dest(&udest,
3116 info->attrs[IPVS_CMD_ATTR_DEST],
3117 need_full_dest);
3118 if (ret)
3119 goto out;
3122 switch (cmd) {
3123 case IPVS_CMD_NEW_SERVICE:
3124 if (svc == NULL)
3125 ret = ip_vs_add_service(&usvc, &svc);
3126 else
3127 ret = -EEXIST;
3128 break;
3129 case IPVS_CMD_SET_SERVICE:
3130 ret = ip_vs_edit_service(svc, &usvc);
3131 break;
3132 case IPVS_CMD_DEL_SERVICE:
3133 ret = ip_vs_del_service(svc);
3134 break;
3135 case IPVS_CMD_NEW_DEST:
3136 ret = ip_vs_add_dest(svc, &udest);
3137 break;
3138 case IPVS_CMD_SET_DEST:
3139 ret = ip_vs_edit_dest(svc, &udest);
3140 break;
3141 case IPVS_CMD_DEL_DEST:
3142 ret = ip_vs_del_dest(svc, &udest);
3143 break;
3144 case IPVS_CMD_ZERO:
3145 ret = ip_vs_zero_service(svc);
3146 break;
3147 default:
3148 ret = -EINVAL;
3151 out:
3152 if (svc)
3153 ip_vs_service_put(svc);
3154 mutex_unlock(&__ip_vs_mutex);
3156 return ret;
3159 static int ip_vs_genl_get_cmd(struct sk_buff *skb, struct genl_info *info)
3161 struct sk_buff *msg;
3162 void *reply;
3163 int ret, cmd, reply_cmd;
3165 cmd = info->genlhdr->cmd;
3167 if (cmd == IPVS_CMD_GET_SERVICE)
3168 reply_cmd = IPVS_CMD_NEW_SERVICE;
3169 else if (cmd == IPVS_CMD_GET_INFO)
3170 reply_cmd = IPVS_CMD_SET_INFO;
3171 else if (cmd == IPVS_CMD_GET_CONFIG)
3172 reply_cmd = IPVS_CMD_SET_CONFIG;
3173 else {
3174 IP_VS_ERR("unknown Generic Netlink command\n");
3175 return -EINVAL;
3178 msg = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_KERNEL);
3179 if (!msg)
3180 return -ENOMEM;
3182 mutex_lock(&__ip_vs_mutex);
3184 reply = genlmsg_put_reply(msg, info, &ip_vs_genl_family, 0, reply_cmd);
3185 if (reply == NULL)
3186 goto nla_put_failure;
3188 switch (cmd) {
3189 case IPVS_CMD_GET_SERVICE:
3191 struct ip_vs_service *svc;
3193 svc = ip_vs_genl_find_service(info->attrs[IPVS_CMD_ATTR_SERVICE]);
3194 if (IS_ERR(svc)) {
3195 ret = PTR_ERR(svc);
3196 goto out_err;
3197 } else if (svc) {
3198 ret = ip_vs_genl_fill_service(msg, svc);
3199 ip_vs_service_put(svc);
3200 if (ret)
3201 goto nla_put_failure;
3202 } else {
3203 ret = -ESRCH;
3204 goto out_err;
3207 break;
3210 case IPVS_CMD_GET_CONFIG:
3212 struct ip_vs_timeout_user t;
3214 __ip_vs_get_timeouts(&t);
3215 #ifdef CONFIG_IP_VS_PROTO_TCP
3216 NLA_PUT_U32(msg, IPVS_CMD_ATTR_TIMEOUT_TCP, t.tcp_timeout);
3217 NLA_PUT_U32(msg, IPVS_CMD_ATTR_TIMEOUT_TCP_FIN,
3218 t.tcp_fin_timeout);
3219 #endif
3220 #ifdef CONFIG_IP_VS_PROTO_UDP
3221 NLA_PUT_U32(msg, IPVS_CMD_ATTR_TIMEOUT_UDP, t.udp_timeout);
3222 #endif
3224 break;
3227 case IPVS_CMD_GET_INFO:
3228 NLA_PUT_U32(msg, IPVS_INFO_ATTR_VERSION, IP_VS_VERSION_CODE);
3229 NLA_PUT_U32(msg, IPVS_INFO_ATTR_CONN_TAB_SIZE,
3230 IP_VS_CONN_TAB_SIZE);
3231 break;
3234 genlmsg_end(msg, reply);
3235 ret = genlmsg_unicast(msg, info->snd_pid);
3236 goto out;
3238 nla_put_failure:
3239 IP_VS_ERR("not enough space in Netlink message\n");
3240 ret = -EMSGSIZE;
3242 out_err:
3243 nlmsg_free(msg);
3244 out:
3245 mutex_unlock(&__ip_vs_mutex);
3247 return ret;
3251 static struct genl_ops ip_vs_genl_ops[] __read_mostly = {
3253 .cmd = IPVS_CMD_NEW_SERVICE,
3254 .flags = GENL_ADMIN_PERM,
3255 .policy = ip_vs_cmd_policy,
3256 .doit = ip_vs_genl_set_cmd,
3259 .cmd = IPVS_CMD_SET_SERVICE,
3260 .flags = GENL_ADMIN_PERM,
3261 .policy = ip_vs_cmd_policy,
3262 .doit = ip_vs_genl_set_cmd,
3265 .cmd = IPVS_CMD_DEL_SERVICE,
3266 .flags = GENL_ADMIN_PERM,
3267 .policy = ip_vs_cmd_policy,
3268 .doit = ip_vs_genl_set_cmd,
3271 .cmd = IPVS_CMD_GET_SERVICE,
3272 .flags = GENL_ADMIN_PERM,
3273 .doit = ip_vs_genl_get_cmd,
3274 .dumpit = ip_vs_genl_dump_services,
3275 .policy = ip_vs_cmd_policy,
3278 .cmd = IPVS_CMD_NEW_DEST,
3279 .flags = GENL_ADMIN_PERM,
3280 .policy = ip_vs_cmd_policy,
3281 .doit = ip_vs_genl_set_cmd,
3284 .cmd = IPVS_CMD_SET_DEST,
3285 .flags = GENL_ADMIN_PERM,
3286 .policy = ip_vs_cmd_policy,
3287 .doit = ip_vs_genl_set_cmd,
3290 .cmd = IPVS_CMD_DEL_DEST,
3291 .flags = GENL_ADMIN_PERM,
3292 .policy = ip_vs_cmd_policy,
3293 .doit = ip_vs_genl_set_cmd,
3296 .cmd = IPVS_CMD_GET_DEST,
3297 .flags = GENL_ADMIN_PERM,
3298 .policy = ip_vs_cmd_policy,
3299 .dumpit = ip_vs_genl_dump_dests,
3302 .cmd = IPVS_CMD_NEW_DAEMON,
3303 .flags = GENL_ADMIN_PERM,
3304 .policy = ip_vs_cmd_policy,
3305 .doit = ip_vs_genl_set_cmd,
3308 .cmd = IPVS_CMD_DEL_DAEMON,
3309 .flags = GENL_ADMIN_PERM,
3310 .policy = ip_vs_cmd_policy,
3311 .doit = ip_vs_genl_set_cmd,
3314 .cmd = IPVS_CMD_GET_DAEMON,
3315 .flags = GENL_ADMIN_PERM,
3316 .dumpit = ip_vs_genl_dump_daemons,
3319 .cmd = IPVS_CMD_SET_CONFIG,
3320 .flags = GENL_ADMIN_PERM,
3321 .policy = ip_vs_cmd_policy,
3322 .doit = ip_vs_genl_set_cmd,
3325 .cmd = IPVS_CMD_GET_CONFIG,
3326 .flags = GENL_ADMIN_PERM,
3327 .doit = ip_vs_genl_get_cmd,
3330 .cmd = IPVS_CMD_GET_INFO,
3331 .flags = GENL_ADMIN_PERM,
3332 .doit = ip_vs_genl_get_cmd,
3335 .cmd = IPVS_CMD_ZERO,
3336 .flags = GENL_ADMIN_PERM,
3337 .policy = ip_vs_cmd_policy,
3338 .doit = ip_vs_genl_set_cmd,
3341 .cmd = IPVS_CMD_FLUSH,
3342 .flags = GENL_ADMIN_PERM,
3343 .doit = ip_vs_genl_set_cmd,
3347 static int __init ip_vs_genl_register(void)
3349 int ret, i;
3351 ret = genl_register_family(&ip_vs_genl_family);
3352 if (ret)
3353 return ret;
3355 for (i = 0; i < ARRAY_SIZE(ip_vs_genl_ops); i++) {
3356 ret = genl_register_ops(&ip_vs_genl_family, &ip_vs_genl_ops[i]);
3357 if (ret)
3358 goto err_out;
3360 return 0;
3362 err_out:
3363 genl_unregister_family(&ip_vs_genl_family);
3364 return ret;
3367 static void ip_vs_genl_unregister(void)
3369 genl_unregister_family(&ip_vs_genl_family);
3372 /* End of Generic Netlink interface definitions */
3375 int __init ip_vs_control_init(void)
3377 int ret;
3378 int idx;
3380 EnterFunction(2);
3382 ret = nf_register_sockopt(&ip_vs_sockopts);
3383 if (ret) {
3384 IP_VS_ERR("cannot register sockopt.\n");
3385 return ret;
3388 ret = ip_vs_genl_register();
3389 if (ret) {
3390 IP_VS_ERR("cannot register Generic Netlink interface.\n");
3391 nf_unregister_sockopt(&ip_vs_sockopts);
3392 return ret;
3395 proc_net_fops_create(&init_net, "ip_vs", 0, &ip_vs_info_fops);
3396 proc_net_fops_create(&init_net, "ip_vs_stats",0, &ip_vs_stats_fops);
3398 sysctl_header = register_sysctl_paths(net_vs_ctl_path, vs_vars);
3400 /* Initialize ip_vs_svc_table, ip_vs_svc_fwm_table, ip_vs_rtable */
3401 for(idx = 0; idx < IP_VS_SVC_TAB_SIZE; idx++) {
3402 INIT_LIST_HEAD(&ip_vs_svc_table[idx]);
3403 INIT_LIST_HEAD(&ip_vs_svc_fwm_table[idx]);
3405 for(idx = 0; idx < IP_VS_RTAB_SIZE; idx++) {
3406 INIT_LIST_HEAD(&ip_vs_rtable[idx]);
3409 ip_vs_new_estimator(&ip_vs_stats);
3411 /* Hook the defense timer */
3412 schedule_delayed_work(&defense_work, DEFENSE_TIMER_PERIOD);
3414 LeaveFunction(2);
3415 return 0;
3419 void ip_vs_control_cleanup(void)
3421 EnterFunction(2);
3422 ip_vs_trash_cleanup();
3423 cancel_rearming_delayed_work(&defense_work);
3424 cancel_work_sync(&defense_work.work);
3425 ip_vs_kill_estimator(&ip_vs_stats);
3426 unregister_sysctl_table(sysctl_header);
3427 proc_net_remove(&init_net, "ip_vs_stats");
3428 proc_net_remove(&init_net, "ip_vs");
3429 ip_vs_genl_unregister();
3430 nf_unregister_sockopt(&ip_vs_sockopts);
3431 LeaveFunction(2);