6 * Kazunori MIYAZAWA @USAGI
7 * Kunihiro Ishiguro <kunihiro@ipinfusion.com>
9 * YOSHIFUJI Hideaki @USAGI
10 * Split up af-specific functions
11 * Derek Atkins <derek@ihtfp.com>
12 * Add UDP Encapsulation
16 #include <linux/workqueue.h>
18 #include <linux/pfkeyv2.h>
19 #include <linux/ipsec.h>
20 #include <linux/module.h>
21 #include <linux/cache.h>
22 #include <linux/audit.h>
23 #include <asm/uaccess.h>
24 #include <linux/ktime.h>
25 #include <linux/slab.h>
26 #include <linux/interrupt.h>
27 #include <linux/kernel.h>
29 #include "xfrm_hash.h"
31 /* Each xfrm_state may be linked to two tables:
33 1. Hash table by (spi,daddr,ah/esp) to find SA by SPI. (input,ctl)
34 2. Hash table by (daddr,family,reqid) to find what SAs exist for given
35 destination/tunnel endpoint. (output)
38 static DEFINE_SPINLOCK(xfrm_state_lock
);
40 static unsigned int xfrm_state_hashmax __read_mostly
= 1 * 1024 * 1024;
42 static struct xfrm_state_afinfo
*xfrm_state_get_afinfo(unsigned int family
);
43 static void xfrm_state_put_afinfo(struct xfrm_state_afinfo
*afinfo
);
45 static inline unsigned int xfrm_dst_hash(struct net
*net
,
46 const xfrm_address_t
*daddr
,
47 const xfrm_address_t
*saddr
,
49 unsigned short family
)
51 return __xfrm_dst_hash(daddr
, saddr
, reqid
, family
, net
->xfrm
.state_hmask
);
54 static inline unsigned int xfrm_src_hash(struct net
*net
,
55 const xfrm_address_t
*daddr
,
56 const xfrm_address_t
*saddr
,
57 unsigned short family
)
59 return __xfrm_src_hash(daddr
, saddr
, family
, net
->xfrm
.state_hmask
);
62 static inline unsigned int
63 xfrm_spi_hash(struct net
*net
, const xfrm_address_t
*daddr
,
64 __be32 spi
, u8 proto
, unsigned short family
)
66 return __xfrm_spi_hash(daddr
, spi
, proto
, family
, net
->xfrm
.state_hmask
);
69 static void xfrm_hash_transfer(struct hlist_head
*list
,
70 struct hlist_head
*ndsttable
,
71 struct hlist_head
*nsrctable
,
72 struct hlist_head
*nspitable
,
73 unsigned int nhashmask
)
75 struct hlist_node
*tmp
;
78 hlist_for_each_entry_safe(x
, tmp
, list
, bydst
) {
81 h
= __xfrm_dst_hash(&x
->id
.daddr
, &x
->props
.saddr
,
82 x
->props
.reqid
, x
->props
.family
,
84 hlist_add_head(&x
->bydst
, ndsttable
+h
);
86 h
= __xfrm_src_hash(&x
->id
.daddr
, &x
->props
.saddr
,
89 hlist_add_head(&x
->bysrc
, nsrctable
+h
);
92 h
= __xfrm_spi_hash(&x
->id
.daddr
, x
->id
.spi
,
93 x
->id
.proto
, x
->props
.family
,
95 hlist_add_head(&x
->byspi
, nspitable
+h
);
100 static unsigned long xfrm_hash_new_size(unsigned int state_hmask
)
102 return ((state_hmask
+ 1) << 1) * sizeof(struct hlist_head
);
105 static DEFINE_MUTEX(hash_resize_mutex
);
107 static void xfrm_hash_resize(struct work_struct
*work
)
109 struct net
*net
= container_of(work
, struct net
, xfrm
.state_hash_work
);
110 struct hlist_head
*ndst
, *nsrc
, *nspi
, *odst
, *osrc
, *ospi
;
111 unsigned long nsize
, osize
;
112 unsigned int nhashmask
, ohashmask
;
115 mutex_lock(&hash_resize_mutex
);
117 nsize
= xfrm_hash_new_size(net
->xfrm
.state_hmask
);
118 ndst
= xfrm_hash_alloc(nsize
);
121 nsrc
= xfrm_hash_alloc(nsize
);
123 xfrm_hash_free(ndst
, nsize
);
126 nspi
= xfrm_hash_alloc(nsize
);
128 xfrm_hash_free(ndst
, nsize
);
129 xfrm_hash_free(nsrc
, nsize
);
133 spin_lock_bh(&xfrm_state_lock
);
135 nhashmask
= (nsize
/ sizeof(struct hlist_head
)) - 1U;
136 for (i
= net
->xfrm
.state_hmask
; i
>= 0; i
--)
137 xfrm_hash_transfer(net
->xfrm
.state_bydst
+i
, ndst
, nsrc
, nspi
,
140 odst
= net
->xfrm
.state_bydst
;
141 osrc
= net
->xfrm
.state_bysrc
;
142 ospi
= net
->xfrm
.state_byspi
;
143 ohashmask
= net
->xfrm
.state_hmask
;
145 net
->xfrm
.state_bydst
= ndst
;
146 net
->xfrm
.state_bysrc
= nsrc
;
147 net
->xfrm
.state_byspi
= nspi
;
148 net
->xfrm
.state_hmask
= nhashmask
;
150 spin_unlock_bh(&xfrm_state_lock
);
152 osize
= (ohashmask
+ 1) * sizeof(struct hlist_head
);
153 xfrm_hash_free(odst
, osize
);
154 xfrm_hash_free(osrc
, osize
);
155 xfrm_hash_free(ospi
, osize
);
158 mutex_unlock(&hash_resize_mutex
);
161 static DEFINE_SPINLOCK(xfrm_state_afinfo_lock
);
162 static struct xfrm_state_afinfo __rcu
*xfrm_state_afinfo
[NPROTO
];
164 static DEFINE_SPINLOCK(xfrm_state_gc_lock
);
166 int __xfrm_state_delete(struct xfrm_state
*x
);
168 int km_query(struct xfrm_state
*x
, struct xfrm_tmpl
*t
, struct xfrm_policy
*pol
);
169 void km_state_expired(struct xfrm_state
*x
, int hard
, u32 portid
);
171 static DEFINE_SPINLOCK(xfrm_type_lock
);
172 int xfrm_register_type(const struct xfrm_type
*type
, unsigned short family
)
174 struct xfrm_state_afinfo
*afinfo
= xfrm_state_get_afinfo(family
);
175 const struct xfrm_type
**typemap
;
178 if (unlikely(afinfo
== NULL
))
179 return -EAFNOSUPPORT
;
180 typemap
= afinfo
->type_map
;
181 spin_lock_bh(&xfrm_type_lock
);
183 if (likely(typemap
[type
->proto
] == NULL
))
184 typemap
[type
->proto
] = type
;
187 spin_unlock_bh(&xfrm_type_lock
);
188 xfrm_state_put_afinfo(afinfo
);
191 EXPORT_SYMBOL(xfrm_register_type
);
193 int xfrm_unregister_type(const struct xfrm_type
*type
, unsigned short family
)
195 struct xfrm_state_afinfo
*afinfo
= xfrm_state_get_afinfo(family
);
196 const struct xfrm_type
**typemap
;
199 if (unlikely(afinfo
== NULL
))
200 return -EAFNOSUPPORT
;
201 typemap
= afinfo
->type_map
;
202 spin_lock_bh(&xfrm_type_lock
);
204 if (unlikely(typemap
[type
->proto
] != type
))
207 typemap
[type
->proto
] = NULL
;
208 spin_unlock_bh(&xfrm_type_lock
);
209 xfrm_state_put_afinfo(afinfo
);
212 EXPORT_SYMBOL(xfrm_unregister_type
);
214 static const struct xfrm_type
*xfrm_get_type(u8 proto
, unsigned short family
)
216 struct xfrm_state_afinfo
*afinfo
;
217 const struct xfrm_type
**typemap
;
218 const struct xfrm_type
*type
;
219 int modload_attempted
= 0;
222 afinfo
= xfrm_state_get_afinfo(family
);
223 if (unlikely(afinfo
== NULL
))
225 typemap
= afinfo
->type_map
;
227 type
= typemap
[proto
];
228 if (unlikely(type
&& !try_module_get(type
->owner
)))
230 if (!type
&& !modload_attempted
) {
231 xfrm_state_put_afinfo(afinfo
);
232 request_module("xfrm-type-%d-%d", family
, proto
);
233 modload_attempted
= 1;
237 xfrm_state_put_afinfo(afinfo
);
241 static void xfrm_put_type(const struct xfrm_type
*type
)
243 module_put(type
->owner
);
246 static DEFINE_SPINLOCK(xfrm_mode_lock
);
247 int xfrm_register_mode(struct xfrm_mode
*mode
, int family
)
249 struct xfrm_state_afinfo
*afinfo
;
250 struct xfrm_mode
**modemap
;
253 if (unlikely(mode
->encap
>= XFRM_MODE_MAX
))
256 afinfo
= xfrm_state_get_afinfo(family
);
257 if (unlikely(afinfo
== NULL
))
258 return -EAFNOSUPPORT
;
261 modemap
= afinfo
->mode_map
;
262 spin_lock_bh(&xfrm_mode_lock
);
263 if (modemap
[mode
->encap
])
267 if (!try_module_get(afinfo
->owner
))
270 mode
->afinfo
= afinfo
;
271 modemap
[mode
->encap
] = mode
;
275 spin_unlock_bh(&xfrm_mode_lock
);
276 xfrm_state_put_afinfo(afinfo
);
279 EXPORT_SYMBOL(xfrm_register_mode
);
281 int xfrm_unregister_mode(struct xfrm_mode
*mode
, int family
)
283 struct xfrm_state_afinfo
*afinfo
;
284 struct xfrm_mode
**modemap
;
287 if (unlikely(mode
->encap
>= XFRM_MODE_MAX
))
290 afinfo
= xfrm_state_get_afinfo(family
);
291 if (unlikely(afinfo
== NULL
))
292 return -EAFNOSUPPORT
;
295 modemap
= afinfo
->mode_map
;
296 spin_lock_bh(&xfrm_mode_lock
);
297 if (likely(modemap
[mode
->encap
] == mode
)) {
298 modemap
[mode
->encap
] = NULL
;
299 module_put(mode
->afinfo
->owner
);
303 spin_unlock_bh(&xfrm_mode_lock
);
304 xfrm_state_put_afinfo(afinfo
);
307 EXPORT_SYMBOL(xfrm_unregister_mode
);
309 static struct xfrm_mode
*xfrm_get_mode(unsigned int encap
, int family
)
311 struct xfrm_state_afinfo
*afinfo
;
312 struct xfrm_mode
*mode
;
313 int modload_attempted
= 0;
315 if (unlikely(encap
>= XFRM_MODE_MAX
))
319 afinfo
= xfrm_state_get_afinfo(family
);
320 if (unlikely(afinfo
== NULL
))
323 mode
= afinfo
->mode_map
[encap
];
324 if (unlikely(mode
&& !try_module_get(mode
->owner
)))
326 if (!mode
&& !modload_attempted
) {
327 xfrm_state_put_afinfo(afinfo
);
328 request_module("xfrm-mode-%d-%d", family
, encap
);
329 modload_attempted
= 1;
333 xfrm_state_put_afinfo(afinfo
);
337 static void xfrm_put_mode(struct xfrm_mode
*mode
)
339 module_put(mode
->owner
);
342 static void xfrm_state_gc_destroy(struct xfrm_state
*x
)
344 tasklet_hrtimer_cancel(&x
->mtimer
);
345 del_timer_sync(&x
->rtimer
);
351 kfree(x
->replay_esn
);
352 kfree(x
->preplay_esn
);
354 xfrm_put_mode(x
->inner_mode
);
355 if (x
->inner_mode_iaf
)
356 xfrm_put_mode(x
->inner_mode_iaf
);
358 xfrm_put_mode(x
->outer_mode
);
360 x
->type
->destructor(x
);
361 xfrm_put_type(x
->type
);
363 security_xfrm_state_free(x
);
367 static void xfrm_state_gc_task(struct work_struct
*work
)
369 struct net
*net
= container_of(work
, struct net
, xfrm
.state_gc_work
);
370 struct xfrm_state
*x
;
371 struct hlist_node
*tmp
;
372 struct hlist_head gc_list
;
374 spin_lock_bh(&xfrm_state_gc_lock
);
375 hlist_move_list(&net
->xfrm
.state_gc_list
, &gc_list
);
376 spin_unlock_bh(&xfrm_state_gc_lock
);
378 hlist_for_each_entry_safe(x
, tmp
, &gc_list
, gclist
)
379 xfrm_state_gc_destroy(x
);
381 wake_up(&net
->xfrm
.km_waitq
);
384 static inline unsigned long make_jiffies(long secs
)
386 if (secs
>= (MAX_SCHEDULE_TIMEOUT
-1)/HZ
)
387 return MAX_SCHEDULE_TIMEOUT
-1;
392 static enum hrtimer_restart
xfrm_timer_handler(struct hrtimer
* me
)
394 struct tasklet_hrtimer
*thr
= container_of(me
, struct tasklet_hrtimer
, timer
);
395 struct xfrm_state
*x
= container_of(thr
, struct xfrm_state
, mtimer
);
396 struct net
*net
= xs_net(x
);
397 unsigned long now
= get_seconds();
398 long next
= LONG_MAX
;
403 if (x
->km
.state
== XFRM_STATE_DEAD
)
405 if (x
->km
.state
== XFRM_STATE_EXPIRED
)
407 if (x
->lft
.hard_add_expires_seconds
) {
408 long tmo
= x
->lft
.hard_add_expires_seconds
+
409 x
->curlft
.add_time
- now
;
411 if (x
->xflags
& XFRM_SOFT_EXPIRE
) {
412 /* enter hard expire without soft expire first?!
413 * setting a new date could trigger this.
414 * workarbound: fix x->curflt.add_time by below:
416 x
->curlft
.add_time
= now
- x
->saved_tmo
- 1;
417 tmo
= x
->lft
.hard_add_expires_seconds
- x
->saved_tmo
;
424 if (x
->lft
.hard_use_expires_seconds
) {
425 long tmo
= x
->lft
.hard_use_expires_seconds
+
426 (x
->curlft
.use_time
? : now
) - now
;
434 if (x
->lft
.soft_add_expires_seconds
) {
435 long tmo
= x
->lft
.soft_add_expires_seconds
+
436 x
->curlft
.add_time
- now
;
439 x
->xflags
&= ~XFRM_SOFT_EXPIRE
;
440 } else if (tmo
< next
) {
442 x
->xflags
|= XFRM_SOFT_EXPIRE
;
446 if (x
->lft
.soft_use_expires_seconds
) {
447 long tmo
= x
->lft
.soft_use_expires_seconds
+
448 (x
->curlft
.use_time
? : now
) - now
;
457 km_state_expired(x
, 0, 0);
459 if (next
!= LONG_MAX
){
460 tasklet_hrtimer_start(&x
->mtimer
, ktime_set(next
, 0), HRTIMER_MODE_REL
);
466 if (x
->km
.state
== XFRM_STATE_ACQ
&& x
->id
.spi
== 0) {
467 x
->km
.state
= XFRM_STATE_EXPIRED
;
468 wake_up(&net
->xfrm
.km_waitq
);
473 err
= __xfrm_state_delete(x
);
474 if (!err
&& x
->id
.spi
)
475 km_state_expired(x
, 1, 0);
477 xfrm_audit_state_delete(x
, err
? 0 : 1,
478 audit_get_loginuid(current
),
479 audit_get_sessionid(current
), 0);
482 spin_unlock(&x
->lock
);
483 return HRTIMER_NORESTART
;
486 static void xfrm_replay_timer_handler(unsigned long data
);
488 struct xfrm_state
*xfrm_state_alloc(struct net
*net
)
490 struct xfrm_state
*x
;
492 x
= kzalloc(sizeof(struct xfrm_state
), GFP_ATOMIC
);
495 write_pnet(&x
->xs_net
, net
);
496 atomic_set(&x
->refcnt
, 1);
497 atomic_set(&x
->tunnel_users
, 0);
498 INIT_LIST_HEAD(&x
->km
.all
);
499 INIT_HLIST_NODE(&x
->bydst
);
500 INIT_HLIST_NODE(&x
->bysrc
);
501 INIT_HLIST_NODE(&x
->byspi
);
502 tasklet_hrtimer_init(&x
->mtimer
, xfrm_timer_handler
, CLOCK_REALTIME
, HRTIMER_MODE_ABS
);
503 setup_timer(&x
->rtimer
, xfrm_replay_timer_handler
,
505 x
->curlft
.add_time
= get_seconds();
506 x
->lft
.soft_byte_limit
= XFRM_INF
;
507 x
->lft
.soft_packet_limit
= XFRM_INF
;
508 x
->lft
.hard_byte_limit
= XFRM_INF
;
509 x
->lft
.hard_packet_limit
= XFRM_INF
;
510 x
->replay_maxage
= 0;
511 x
->replay_maxdiff
= 0;
512 x
->inner_mode
= NULL
;
513 x
->inner_mode_iaf
= NULL
;
514 spin_lock_init(&x
->lock
);
518 EXPORT_SYMBOL(xfrm_state_alloc
);
520 void __xfrm_state_destroy(struct xfrm_state
*x
)
522 struct net
*net
= xs_net(x
);
524 WARN_ON(x
->km
.state
!= XFRM_STATE_DEAD
);
526 spin_lock_bh(&xfrm_state_gc_lock
);
527 hlist_add_head(&x
->gclist
, &net
->xfrm
.state_gc_list
);
528 spin_unlock_bh(&xfrm_state_gc_lock
);
529 schedule_work(&net
->xfrm
.state_gc_work
);
531 EXPORT_SYMBOL(__xfrm_state_destroy
);
533 int __xfrm_state_delete(struct xfrm_state
*x
)
535 struct net
*net
= xs_net(x
);
538 if (x
->km
.state
!= XFRM_STATE_DEAD
) {
539 x
->km
.state
= XFRM_STATE_DEAD
;
540 spin_lock(&xfrm_state_lock
);
541 list_del(&x
->km
.all
);
542 hlist_del(&x
->bydst
);
543 hlist_del(&x
->bysrc
);
545 hlist_del(&x
->byspi
);
546 net
->xfrm
.state_num
--;
547 spin_unlock(&xfrm_state_lock
);
549 /* All xfrm_state objects are created by xfrm_state_alloc.
550 * The xfrm_state_alloc call gives a reference, and that
551 * is what we are dropping here.
559 EXPORT_SYMBOL(__xfrm_state_delete
);
561 int xfrm_state_delete(struct xfrm_state
*x
)
565 spin_lock_bh(&x
->lock
);
566 err
= __xfrm_state_delete(x
);
567 spin_unlock_bh(&x
->lock
);
571 EXPORT_SYMBOL(xfrm_state_delete
);
573 #ifdef CONFIG_SECURITY_NETWORK_XFRM
575 xfrm_state_flush_secctx_check(struct net
*net
, u8 proto
, struct xfrm_audit
*audit_info
)
579 for (i
= 0; i
<= net
->xfrm
.state_hmask
; i
++) {
580 struct xfrm_state
*x
;
582 hlist_for_each_entry(x
, net
->xfrm
.state_bydst
+i
, bydst
) {
583 if (xfrm_id_proto_match(x
->id
.proto
, proto
) &&
584 (err
= security_xfrm_state_delete(x
)) != 0) {
585 xfrm_audit_state_delete(x
, 0,
586 audit_info
->loginuid
,
587 audit_info
->sessionid
,
598 xfrm_state_flush_secctx_check(struct net
*net
, u8 proto
, struct xfrm_audit
*audit_info
)
604 int xfrm_state_flush(struct net
*net
, u8 proto
, struct xfrm_audit
*audit_info
)
606 int i
, err
= 0, cnt
= 0;
608 spin_lock_bh(&xfrm_state_lock
);
609 err
= xfrm_state_flush_secctx_check(net
, proto
, audit_info
);
614 for (i
= 0; i
<= net
->xfrm
.state_hmask
; i
++) {
615 struct xfrm_state
*x
;
617 hlist_for_each_entry(x
, net
->xfrm
.state_bydst
+i
, bydst
) {
618 if (!xfrm_state_kern(x
) &&
619 xfrm_id_proto_match(x
->id
.proto
, proto
)) {
621 spin_unlock_bh(&xfrm_state_lock
);
623 err
= xfrm_state_delete(x
);
624 xfrm_audit_state_delete(x
, err
? 0 : 1,
625 audit_info
->loginuid
,
626 audit_info
->sessionid
,
632 spin_lock_bh(&xfrm_state_lock
);
641 spin_unlock_bh(&xfrm_state_lock
);
642 wake_up(&net
->xfrm
.km_waitq
);
645 EXPORT_SYMBOL(xfrm_state_flush
);
647 void xfrm_sad_getinfo(struct net
*net
, struct xfrmk_sadinfo
*si
)
649 spin_lock_bh(&xfrm_state_lock
);
650 si
->sadcnt
= net
->xfrm
.state_num
;
651 si
->sadhcnt
= net
->xfrm
.state_hmask
;
652 si
->sadhmcnt
= xfrm_state_hashmax
;
653 spin_unlock_bh(&xfrm_state_lock
);
655 EXPORT_SYMBOL(xfrm_sad_getinfo
);
658 xfrm_init_tempstate(struct xfrm_state
*x
, const struct flowi
*fl
,
659 const struct xfrm_tmpl
*tmpl
,
660 const xfrm_address_t
*daddr
, const xfrm_address_t
*saddr
,
661 unsigned short family
)
663 struct xfrm_state_afinfo
*afinfo
= xfrm_state_get_afinfo(family
);
666 afinfo
->init_tempsel(&x
->sel
, fl
);
668 if (family
!= tmpl
->encap_family
) {
669 xfrm_state_put_afinfo(afinfo
);
670 afinfo
= xfrm_state_get_afinfo(tmpl
->encap_family
);
674 afinfo
->init_temprop(x
, tmpl
, daddr
, saddr
);
675 xfrm_state_put_afinfo(afinfo
);
679 static struct xfrm_state
*__xfrm_state_lookup(struct net
*net
, u32 mark
,
680 const xfrm_address_t
*daddr
,
681 __be32 spi
, u8 proto
,
682 unsigned short family
)
684 unsigned int h
= xfrm_spi_hash(net
, daddr
, spi
, proto
, family
);
685 struct xfrm_state
*x
;
687 hlist_for_each_entry(x
, net
->xfrm
.state_byspi
+h
, byspi
) {
688 if (x
->props
.family
!= family
||
690 x
->id
.proto
!= proto
||
691 !xfrm_addr_equal(&x
->id
.daddr
, daddr
, family
))
694 if ((mark
& x
->mark
.m
) != x
->mark
.v
)
703 static struct xfrm_state
*__xfrm_state_lookup_byaddr(struct net
*net
, u32 mark
,
704 const xfrm_address_t
*daddr
,
705 const xfrm_address_t
*saddr
,
706 u8 proto
, unsigned short family
)
708 unsigned int h
= xfrm_src_hash(net
, daddr
, saddr
, family
);
709 struct xfrm_state
*x
;
711 hlist_for_each_entry(x
, net
->xfrm
.state_bysrc
+h
, bysrc
) {
712 if (x
->props
.family
!= family
||
713 x
->id
.proto
!= proto
||
714 !xfrm_addr_equal(&x
->id
.daddr
, daddr
, family
) ||
715 !xfrm_addr_equal(&x
->props
.saddr
, saddr
, family
))
718 if ((mark
& x
->mark
.m
) != x
->mark
.v
)
727 static inline struct xfrm_state
*
728 __xfrm_state_locate(struct xfrm_state
*x
, int use_spi
, int family
)
730 struct net
*net
= xs_net(x
);
731 u32 mark
= x
->mark
.v
& x
->mark
.m
;
734 return __xfrm_state_lookup(net
, mark
, &x
->id
.daddr
,
735 x
->id
.spi
, x
->id
.proto
, family
);
737 return __xfrm_state_lookup_byaddr(net
, mark
,
740 x
->id
.proto
, family
);
743 static void xfrm_hash_grow_check(struct net
*net
, int have_hash_collision
)
745 if (have_hash_collision
&&
746 (net
->xfrm
.state_hmask
+ 1) < xfrm_state_hashmax
&&
747 net
->xfrm
.state_num
> net
->xfrm
.state_hmask
)
748 schedule_work(&net
->xfrm
.state_hash_work
);
751 static void xfrm_state_look_at(struct xfrm_policy
*pol
, struct xfrm_state
*x
,
752 const struct flowi
*fl
, unsigned short family
,
753 struct xfrm_state
**best
, int *acq_in_progress
,
757 * 1. There is a valid state with matching selector. Done.
758 * 2. Valid state with inappropriate selector. Skip.
760 * Entering area of "sysdeps".
762 * 3. If state is not valid, selector is temporary, it selects
763 * only session which triggered previous resolution. Key
764 * manager will do something to install a state with proper
767 if (x
->km
.state
== XFRM_STATE_VALID
) {
768 if ((x
->sel
.family
&&
769 !xfrm_selector_match(&x
->sel
, fl
, x
->sel
.family
)) ||
770 !security_xfrm_state_pol_flow_match(x
, pol
, fl
))
774 (*best
)->km
.dying
> x
->km
.dying
||
775 ((*best
)->km
.dying
== x
->km
.dying
&&
776 (*best
)->curlft
.add_time
< x
->curlft
.add_time
))
778 } else if (x
->km
.state
== XFRM_STATE_ACQ
) {
779 *acq_in_progress
= 1;
780 } else if (x
->km
.state
== XFRM_STATE_ERROR
||
781 x
->km
.state
== XFRM_STATE_EXPIRED
) {
782 if (xfrm_selector_match(&x
->sel
, fl
, x
->sel
.family
) &&
783 security_xfrm_state_pol_flow_match(x
, pol
, fl
))
789 xfrm_state_find(const xfrm_address_t
*daddr
, const xfrm_address_t
*saddr
,
790 const struct flowi
*fl
, struct xfrm_tmpl
*tmpl
,
791 struct xfrm_policy
*pol
, int *err
,
792 unsigned short family
)
794 static xfrm_address_t saddr_wildcard
= { };
795 struct net
*net
= xp_net(pol
);
796 unsigned int h
, h_wildcard
;
797 struct xfrm_state
*x
, *x0
, *to_put
;
798 int acquire_in_progress
= 0;
800 struct xfrm_state
*best
= NULL
;
801 u32 mark
= pol
->mark
.v
& pol
->mark
.m
;
802 unsigned short encap_family
= tmpl
->encap_family
;
806 spin_lock_bh(&xfrm_state_lock
);
807 h
= xfrm_dst_hash(net
, daddr
, saddr
, tmpl
->reqid
, encap_family
);
808 hlist_for_each_entry(x
, net
->xfrm
.state_bydst
+h
, bydst
) {
809 if (x
->props
.family
== encap_family
&&
810 x
->props
.reqid
== tmpl
->reqid
&&
811 (mark
& x
->mark
.m
) == x
->mark
.v
&&
812 !(x
->props
.flags
& XFRM_STATE_WILDRECV
) &&
813 xfrm_state_addr_check(x
, daddr
, saddr
, encap_family
) &&
814 tmpl
->mode
== x
->props
.mode
&&
815 tmpl
->id
.proto
== x
->id
.proto
&&
816 (tmpl
->id
.spi
== x
->id
.spi
|| !tmpl
->id
.spi
))
817 xfrm_state_look_at(pol
, x
, fl
, encap_family
,
818 &best
, &acquire_in_progress
, &error
);
823 h_wildcard
= xfrm_dst_hash(net
, daddr
, &saddr_wildcard
, tmpl
->reqid
, encap_family
);
824 hlist_for_each_entry(x
, net
->xfrm
.state_bydst
+h_wildcard
, bydst
) {
825 if (x
->props
.family
== encap_family
&&
826 x
->props
.reqid
== tmpl
->reqid
&&
827 (mark
& x
->mark
.m
) == x
->mark
.v
&&
828 !(x
->props
.flags
& XFRM_STATE_WILDRECV
) &&
829 xfrm_state_addr_check(x
, daddr
, saddr
, encap_family
) &&
830 tmpl
->mode
== x
->props
.mode
&&
831 tmpl
->id
.proto
== x
->id
.proto
&&
832 (tmpl
->id
.spi
== x
->id
.spi
|| !tmpl
->id
.spi
))
833 xfrm_state_look_at(pol
, x
, fl
, encap_family
,
834 &best
, &acquire_in_progress
, &error
);
839 if (!x
&& !error
&& !acquire_in_progress
) {
841 (x0
= __xfrm_state_lookup(net
, mark
, daddr
, tmpl
->id
.spi
,
842 tmpl
->id
.proto
, encap_family
)) != NULL
) {
847 x
= xfrm_state_alloc(net
);
852 /* Initialize temporary state matching only
853 * to current session. */
854 xfrm_init_tempstate(x
, fl
, tmpl
, daddr
, saddr
, family
);
855 memcpy(&x
->mark
, &pol
->mark
, sizeof(x
->mark
));
857 error
= security_xfrm_state_alloc_acquire(x
, pol
->security
, fl
->flowi_secid
);
859 x
->km
.state
= XFRM_STATE_DEAD
;
865 if (km_query(x
, tmpl
, pol
) == 0) {
866 x
->km
.state
= XFRM_STATE_ACQ
;
867 list_add(&x
->km
.all
, &net
->xfrm
.state_all
);
868 hlist_add_head(&x
->bydst
, net
->xfrm
.state_bydst
+h
);
869 h
= xfrm_src_hash(net
, daddr
, saddr
, encap_family
);
870 hlist_add_head(&x
->bysrc
, net
->xfrm
.state_bysrc
+h
);
872 h
= xfrm_spi_hash(net
, &x
->id
.daddr
, x
->id
.spi
, x
->id
.proto
, encap_family
);
873 hlist_add_head(&x
->byspi
, net
->xfrm
.state_byspi
+h
);
875 x
->lft
.hard_add_expires_seconds
= net
->xfrm
.sysctl_acq_expires
;
876 tasklet_hrtimer_start(&x
->mtimer
, ktime_set(net
->xfrm
.sysctl_acq_expires
, 0), HRTIMER_MODE_REL
);
877 net
->xfrm
.state_num
++;
878 xfrm_hash_grow_check(net
, x
->bydst
.next
!= NULL
);
880 x
->km
.state
= XFRM_STATE_DEAD
;
890 *err
= acquire_in_progress
? -EAGAIN
: error
;
891 spin_unlock_bh(&xfrm_state_lock
);
893 xfrm_state_put(to_put
);
898 xfrm_stateonly_find(struct net
*net
, u32 mark
,
899 xfrm_address_t
*daddr
, xfrm_address_t
*saddr
,
900 unsigned short family
, u8 mode
, u8 proto
, u32 reqid
)
903 struct xfrm_state
*rx
= NULL
, *x
= NULL
;
905 spin_lock(&xfrm_state_lock
);
906 h
= xfrm_dst_hash(net
, daddr
, saddr
, reqid
, family
);
907 hlist_for_each_entry(x
, net
->xfrm
.state_bydst
+h
, bydst
) {
908 if (x
->props
.family
== family
&&
909 x
->props
.reqid
== reqid
&&
910 (mark
& x
->mark
.m
) == x
->mark
.v
&&
911 !(x
->props
.flags
& XFRM_STATE_WILDRECV
) &&
912 xfrm_state_addr_check(x
, daddr
, saddr
, family
) &&
913 mode
== x
->props
.mode
&&
914 proto
== x
->id
.proto
&&
915 x
->km
.state
== XFRM_STATE_VALID
) {
923 spin_unlock(&xfrm_state_lock
);
928 EXPORT_SYMBOL(xfrm_stateonly_find
);
930 static void __xfrm_state_insert(struct xfrm_state
*x
)
932 struct net
*net
= xs_net(x
);
935 list_add(&x
->km
.all
, &net
->xfrm
.state_all
);
937 h
= xfrm_dst_hash(net
, &x
->id
.daddr
, &x
->props
.saddr
,
938 x
->props
.reqid
, x
->props
.family
);
939 hlist_add_head(&x
->bydst
, net
->xfrm
.state_bydst
+h
);
941 h
= xfrm_src_hash(net
, &x
->id
.daddr
, &x
->props
.saddr
, x
->props
.family
);
942 hlist_add_head(&x
->bysrc
, net
->xfrm
.state_bysrc
+h
);
945 h
= xfrm_spi_hash(net
, &x
->id
.daddr
, x
->id
.spi
, x
->id
.proto
,
948 hlist_add_head(&x
->byspi
, net
->xfrm
.state_byspi
+h
);
951 tasklet_hrtimer_start(&x
->mtimer
, ktime_set(1, 0), HRTIMER_MODE_REL
);
952 if (x
->replay_maxage
)
953 mod_timer(&x
->rtimer
, jiffies
+ x
->replay_maxage
);
955 wake_up(&net
->xfrm
.km_waitq
);
957 net
->xfrm
.state_num
++;
959 xfrm_hash_grow_check(net
, x
->bydst
.next
!= NULL
);
962 /* xfrm_state_lock is held */
963 static void __xfrm_state_bump_genids(struct xfrm_state
*xnew
)
965 struct net
*net
= xs_net(xnew
);
966 unsigned short family
= xnew
->props
.family
;
967 u32 reqid
= xnew
->props
.reqid
;
968 struct xfrm_state
*x
;
970 u32 mark
= xnew
->mark
.v
& xnew
->mark
.m
;
972 h
= xfrm_dst_hash(net
, &xnew
->id
.daddr
, &xnew
->props
.saddr
, reqid
, family
);
973 hlist_for_each_entry(x
, net
->xfrm
.state_bydst
+h
, bydst
) {
974 if (x
->props
.family
== family
&&
975 x
->props
.reqid
== reqid
&&
976 (mark
& x
->mark
.m
) == x
->mark
.v
&&
977 xfrm_addr_equal(&x
->id
.daddr
, &xnew
->id
.daddr
, family
) &&
978 xfrm_addr_equal(&x
->props
.saddr
, &xnew
->props
.saddr
, family
))
983 void xfrm_state_insert(struct xfrm_state
*x
)
985 spin_lock_bh(&xfrm_state_lock
);
986 __xfrm_state_bump_genids(x
);
987 __xfrm_state_insert(x
);
988 spin_unlock_bh(&xfrm_state_lock
);
990 EXPORT_SYMBOL(xfrm_state_insert
);
992 /* xfrm_state_lock is held */
993 static struct xfrm_state
*__find_acq_core(struct net
*net
, struct xfrm_mark
*m
,
994 unsigned short family
, u8 mode
,
996 const xfrm_address_t
*daddr
,
997 const xfrm_address_t
*saddr
, int create
)
999 unsigned int h
= xfrm_dst_hash(net
, daddr
, saddr
, reqid
, family
);
1000 struct xfrm_state
*x
;
1001 u32 mark
= m
->v
& m
->m
;
1003 hlist_for_each_entry(x
, net
->xfrm
.state_bydst
+h
, bydst
) {
1004 if (x
->props
.reqid
!= reqid
||
1005 x
->props
.mode
!= mode
||
1006 x
->props
.family
!= family
||
1007 x
->km
.state
!= XFRM_STATE_ACQ
||
1009 x
->id
.proto
!= proto
||
1010 (mark
& x
->mark
.m
) != x
->mark
.v
||
1011 !xfrm_addr_equal(&x
->id
.daddr
, daddr
, family
) ||
1012 !xfrm_addr_equal(&x
->props
.saddr
, saddr
, family
))
1022 x
= xfrm_state_alloc(net
);
1026 x
->sel
.daddr
.a4
= daddr
->a4
;
1027 x
->sel
.saddr
.a4
= saddr
->a4
;
1028 x
->sel
.prefixlen_d
= 32;
1029 x
->sel
.prefixlen_s
= 32;
1030 x
->props
.saddr
.a4
= saddr
->a4
;
1031 x
->id
.daddr
.a4
= daddr
->a4
;
1035 *(struct in6_addr
*)x
->sel
.daddr
.a6
= *(struct in6_addr
*)daddr
;
1036 *(struct in6_addr
*)x
->sel
.saddr
.a6
= *(struct in6_addr
*)saddr
;
1037 x
->sel
.prefixlen_d
= 128;
1038 x
->sel
.prefixlen_s
= 128;
1039 *(struct in6_addr
*)x
->props
.saddr
.a6
= *(struct in6_addr
*)saddr
;
1040 *(struct in6_addr
*)x
->id
.daddr
.a6
= *(struct in6_addr
*)daddr
;
1044 x
->km
.state
= XFRM_STATE_ACQ
;
1045 x
->id
.proto
= proto
;
1046 x
->props
.family
= family
;
1047 x
->props
.mode
= mode
;
1048 x
->props
.reqid
= reqid
;
1051 x
->lft
.hard_add_expires_seconds
= net
->xfrm
.sysctl_acq_expires
;
1053 tasklet_hrtimer_start(&x
->mtimer
, ktime_set(net
->xfrm
.sysctl_acq_expires
, 0), HRTIMER_MODE_REL
);
1054 list_add(&x
->km
.all
, &net
->xfrm
.state_all
);
1055 hlist_add_head(&x
->bydst
, net
->xfrm
.state_bydst
+h
);
1056 h
= xfrm_src_hash(net
, daddr
, saddr
, family
);
1057 hlist_add_head(&x
->bysrc
, net
->xfrm
.state_bysrc
+h
);
1059 net
->xfrm
.state_num
++;
1061 xfrm_hash_grow_check(net
, x
->bydst
.next
!= NULL
);
1067 static struct xfrm_state
*__xfrm_find_acq_byseq(struct net
*net
, u32 mark
, u32 seq
);
1069 int xfrm_state_add(struct xfrm_state
*x
)
1071 struct net
*net
= xs_net(x
);
1072 struct xfrm_state
*x1
, *to_put
;
1075 u32 mark
= x
->mark
.v
& x
->mark
.m
;
1076 int use_spi
= xfrm_id_proto_match(x
->id
.proto
, IPSEC_PROTO_ANY
);
1078 family
= x
->props
.family
;
1082 spin_lock_bh(&xfrm_state_lock
);
1084 x1
= __xfrm_state_locate(x
, use_spi
, family
);
1092 if (use_spi
&& x
->km
.seq
) {
1093 x1
= __xfrm_find_acq_byseq(net
, mark
, x
->km
.seq
);
1094 if (x1
&& ((x1
->id
.proto
!= x
->id
.proto
) ||
1095 !xfrm_addr_equal(&x1
->id
.daddr
, &x
->id
.daddr
, family
))) {
1102 x1
= __find_acq_core(net
, &x
->mark
, family
, x
->props
.mode
,
1103 x
->props
.reqid
, x
->id
.proto
,
1104 &x
->id
.daddr
, &x
->props
.saddr
, 0);
1106 __xfrm_state_bump_genids(x
);
1107 __xfrm_state_insert(x
);
1111 spin_unlock_bh(&xfrm_state_lock
);
1114 xfrm_state_delete(x1
);
1119 xfrm_state_put(to_put
);
1123 EXPORT_SYMBOL(xfrm_state_add
);
1125 #ifdef CONFIG_XFRM_MIGRATE
1126 static struct xfrm_state
*xfrm_state_clone(struct xfrm_state
*orig
, int *errp
)
1128 struct net
*net
= xs_net(orig
);
1130 struct xfrm_state
*x
= xfrm_state_alloc(net
);
1134 memcpy(&x
->id
, &orig
->id
, sizeof(x
->id
));
1135 memcpy(&x
->sel
, &orig
->sel
, sizeof(x
->sel
));
1136 memcpy(&x
->lft
, &orig
->lft
, sizeof(x
->lft
));
1137 x
->props
.mode
= orig
->props
.mode
;
1138 x
->props
.replay_window
= orig
->props
.replay_window
;
1139 x
->props
.reqid
= orig
->props
.reqid
;
1140 x
->props
.family
= orig
->props
.family
;
1141 x
->props
.saddr
= orig
->props
.saddr
;
1144 x
->aalg
= xfrm_algo_auth_clone(orig
->aalg
);
1148 x
->props
.aalgo
= orig
->props
.aalgo
;
1151 x
->ealg
= xfrm_algo_clone(orig
->ealg
);
1155 x
->props
.ealgo
= orig
->props
.ealgo
;
1158 x
->calg
= xfrm_algo_clone(orig
->calg
);
1162 x
->props
.calgo
= orig
->props
.calgo
;
1165 x
->encap
= kmemdup(orig
->encap
, sizeof(*x
->encap
), GFP_KERNEL
);
1171 x
->coaddr
= kmemdup(orig
->coaddr
, sizeof(*x
->coaddr
),
1177 if (orig
->replay_esn
) {
1178 err
= xfrm_replay_clone(x
, orig
);
1183 memcpy(&x
->mark
, &orig
->mark
, sizeof(x
->mark
));
1185 err
= xfrm_init_state(x
);
1189 x
->props
.flags
= orig
->props
.flags
;
1190 x
->props
.extra_flags
= orig
->props
.extra_flags
;
1192 x
->curlft
.add_time
= orig
->curlft
.add_time
;
1193 x
->km
.state
= orig
->km
.state
;
1194 x
->km
.seq
= orig
->km
.seq
;
1206 /* xfrm_state_lock is held */
1207 struct xfrm_state
* xfrm_migrate_state_find(struct xfrm_migrate
*m
)
1210 struct xfrm_state
*x
;
1213 h
= xfrm_dst_hash(&init_net
, &m
->old_daddr
, &m
->old_saddr
,
1214 m
->reqid
, m
->old_family
);
1215 hlist_for_each_entry(x
, init_net
.xfrm
.state_bydst
+h
, bydst
) {
1216 if (x
->props
.mode
!= m
->mode
||
1217 x
->id
.proto
!= m
->proto
)
1219 if (m
->reqid
&& x
->props
.reqid
!= m
->reqid
)
1221 if (!xfrm_addr_equal(&x
->id
.daddr
, &m
->old_daddr
,
1223 !xfrm_addr_equal(&x
->props
.saddr
, &m
->old_saddr
,
1230 h
= xfrm_src_hash(&init_net
, &m
->old_daddr
, &m
->old_saddr
,
1232 hlist_for_each_entry(x
, init_net
.xfrm
.state_bysrc
+h
, bysrc
) {
1233 if (x
->props
.mode
!= m
->mode
||
1234 x
->id
.proto
!= m
->proto
)
1236 if (!xfrm_addr_equal(&x
->id
.daddr
, &m
->old_daddr
,
1238 !xfrm_addr_equal(&x
->props
.saddr
, &m
->old_saddr
,
1248 EXPORT_SYMBOL(xfrm_migrate_state_find
);
1250 struct xfrm_state
* xfrm_state_migrate(struct xfrm_state
*x
,
1251 struct xfrm_migrate
*m
)
1253 struct xfrm_state
*xc
;
1256 xc
= xfrm_state_clone(x
, &err
);
1260 memcpy(&xc
->id
.daddr
, &m
->new_daddr
, sizeof(xc
->id
.daddr
));
1261 memcpy(&xc
->props
.saddr
, &m
->new_saddr
, sizeof(xc
->props
.saddr
));
1264 if (xfrm_addr_equal(&x
->id
.daddr
, &m
->new_daddr
, m
->new_family
)) {
1265 /* a care is needed when the destination address of the
1266 state is to be updated as it is a part of triplet */
1267 xfrm_state_insert(xc
);
1269 if ((err
= xfrm_state_add(xc
)) < 0)
1278 EXPORT_SYMBOL(xfrm_state_migrate
);
1281 int xfrm_state_update(struct xfrm_state
*x
)
1283 struct xfrm_state
*x1
, *to_put
;
1285 int use_spi
= xfrm_id_proto_match(x
->id
.proto
, IPSEC_PROTO_ANY
);
1289 spin_lock_bh(&xfrm_state_lock
);
1290 x1
= __xfrm_state_locate(x
, use_spi
, x
->props
.family
);
1296 if (xfrm_state_kern(x1
)) {
1302 if (x1
->km
.state
== XFRM_STATE_ACQ
) {
1303 __xfrm_state_insert(x
);
1309 spin_unlock_bh(&xfrm_state_lock
);
1312 xfrm_state_put(to_put
);
1318 xfrm_state_delete(x1
);
1324 spin_lock_bh(&x1
->lock
);
1325 if (likely(x1
->km
.state
== XFRM_STATE_VALID
)) {
1326 if (x
->encap
&& x1
->encap
)
1327 memcpy(x1
->encap
, x
->encap
, sizeof(*x1
->encap
));
1328 if (x
->coaddr
&& x1
->coaddr
) {
1329 memcpy(x1
->coaddr
, x
->coaddr
, sizeof(*x1
->coaddr
));
1331 if (!use_spi
&& memcmp(&x1
->sel
, &x
->sel
, sizeof(x1
->sel
)))
1332 memcpy(&x1
->sel
, &x
->sel
, sizeof(x1
->sel
));
1333 memcpy(&x1
->lft
, &x
->lft
, sizeof(x1
->lft
));
1336 tasklet_hrtimer_start(&x1
->mtimer
, ktime_set(1, 0), HRTIMER_MODE_REL
);
1337 if (x1
->curlft
.use_time
)
1338 xfrm_state_check_expire(x1
);
1341 x
->km
.state
= XFRM_STATE_DEAD
;
1342 __xfrm_state_put(x
);
1344 spin_unlock_bh(&x1
->lock
);
1350 EXPORT_SYMBOL(xfrm_state_update
);
1352 int xfrm_state_check_expire(struct xfrm_state
*x
)
1354 if (!x
->curlft
.use_time
)
1355 x
->curlft
.use_time
= get_seconds();
1357 if (x
->curlft
.bytes
>= x
->lft
.hard_byte_limit
||
1358 x
->curlft
.packets
>= x
->lft
.hard_packet_limit
) {
1359 x
->km
.state
= XFRM_STATE_EXPIRED
;
1360 tasklet_hrtimer_start(&x
->mtimer
, ktime_set(0,0), HRTIMER_MODE_REL
);
1365 (x
->curlft
.bytes
>= x
->lft
.soft_byte_limit
||
1366 x
->curlft
.packets
>= x
->lft
.soft_packet_limit
)) {
1368 km_state_expired(x
, 0, 0);
1372 EXPORT_SYMBOL(xfrm_state_check_expire
);
1375 xfrm_state_lookup(struct net
*net
, u32 mark
, const xfrm_address_t
*daddr
, __be32 spi
,
1376 u8 proto
, unsigned short family
)
1378 struct xfrm_state
*x
;
1380 spin_lock_bh(&xfrm_state_lock
);
1381 x
= __xfrm_state_lookup(net
, mark
, daddr
, spi
, proto
, family
);
1382 spin_unlock_bh(&xfrm_state_lock
);
1385 EXPORT_SYMBOL(xfrm_state_lookup
);
1388 xfrm_state_lookup_byaddr(struct net
*net
, u32 mark
,
1389 const xfrm_address_t
*daddr
, const xfrm_address_t
*saddr
,
1390 u8 proto
, unsigned short family
)
1392 struct xfrm_state
*x
;
1394 spin_lock_bh(&xfrm_state_lock
);
1395 x
= __xfrm_state_lookup_byaddr(net
, mark
, daddr
, saddr
, proto
, family
);
1396 spin_unlock_bh(&xfrm_state_lock
);
1399 EXPORT_SYMBOL(xfrm_state_lookup_byaddr
);
1402 xfrm_find_acq(struct net
*net
, struct xfrm_mark
*mark
, u8 mode
, u32 reqid
, u8 proto
,
1403 const xfrm_address_t
*daddr
, const xfrm_address_t
*saddr
,
1404 int create
, unsigned short family
)
1406 struct xfrm_state
*x
;
1408 spin_lock_bh(&xfrm_state_lock
);
1409 x
= __find_acq_core(net
, mark
, family
, mode
, reqid
, proto
, daddr
, saddr
, create
);
1410 spin_unlock_bh(&xfrm_state_lock
);
1414 EXPORT_SYMBOL(xfrm_find_acq
);
1416 #ifdef CONFIG_XFRM_SUB_POLICY
1418 xfrm_tmpl_sort(struct xfrm_tmpl
**dst
, struct xfrm_tmpl
**src
, int n
,
1419 unsigned short family
)
1422 struct xfrm_state_afinfo
*afinfo
= xfrm_state_get_afinfo(family
);
1424 return -EAFNOSUPPORT
;
1426 spin_lock_bh(&xfrm_state_lock
);
1427 if (afinfo
->tmpl_sort
)
1428 err
= afinfo
->tmpl_sort(dst
, src
, n
);
1429 spin_unlock_bh(&xfrm_state_lock
);
1430 xfrm_state_put_afinfo(afinfo
);
1433 EXPORT_SYMBOL(xfrm_tmpl_sort
);
1436 xfrm_state_sort(struct xfrm_state
**dst
, struct xfrm_state
**src
, int n
,
1437 unsigned short family
)
1440 struct xfrm_state_afinfo
*afinfo
= xfrm_state_get_afinfo(family
);
1442 return -EAFNOSUPPORT
;
1444 spin_lock_bh(&xfrm_state_lock
);
1445 if (afinfo
->state_sort
)
1446 err
= afinfo
->state_sort(dst
, src
, n
);
1447 spin_unlock_bh(&xfrm_state_lock
);
1448 xfrm_state_put_afinfo(afinfo
);
1451 EXPORT_SYMBOL(xfrm_state_sort
);
1454 /* Silly enough, but I'm lazy to build resolution list */
1456 static struct xfrm_state
*__xfrm_find_acq_byseq(struct net
*net
, u32 mark
, u32 seq
)
1460 for (i
= 0; i
<= net
->xfrm
.state_hmask
; i
++) {
1461 struct xfrm_state
*x
;
1463 hlist_for_each_entry(x
, net
->xfrm
.state_bydst
+i
, bydst
) {
1464 if (x
->km
.seq
== seq
&&
1465 (mark
& x
->mark
.m
) == x
->mark
.v
&&
1466 x
->km
.state
== XFRM_STATE_ACQ
) {
1475 struct xfrm_state
*xfrm_find_acq_byseq(struct net
*net
, u32 mark
, u32 seq
)
1477 struct xfrm_state
*x
;
1479 spin_lock_bh(&xfrm_state_lock
);
1480 x
= __xfrm_find_acq_byseq(net
, mark
, seq
);
1481 spin_unlock_bh(&xfrm_state_lock
);
1484 EXPORT_SYMBOL(xfrm_find_acq_byseq
);
1486 u32
xfrm_get_acqseq(void)
1489 static atomic_t acqseq
;
1492 res
= atomic_inc_return(&acqseq
);
1497 EXPORT_SYMBOL(xfrm_get_acqseq
);
1499 int xfrm_alloc_spi(struct xfrm_state
*x
, u32 low
, u32 high
)
1501 struct net
*net
= xs_net(x
);
1503 struct xfrm_state
*x0
;
1505 __be32 minspi
= htonl(low
);
1506 __be32 maxspi
= htonl(high
);
1507 u32 mark
= x
->mark
.v
& x
->mark
.m
;
1509 spin_lock_bh(&x
->lock
);
1510 if (x
->km
.state
== XFRM_STATE_DEAD
)
1519 if (minspi
== maxspi
) {
1520 x0
= xfrm_state_lookup(net
, mark
, &x
->id
.daddr
, minspi
, x
->id
.proto
, x
->props
.family
);
1528 for (h
=0; h
<high
-low
+1; h
++) {
1529 spi
= low
+ net_random()%(high
-low
+1);
1530 x0
= xfrm_state_lookup(net
, mark
, &x
->id
.daddr
, htonl(spi
), x
->id
.proto
, x
->props
.family
);
1532 x
->id
.spi
= htonl(spi
);
1539 spin_lock_bh(&xfrm_state_lock
);
1540 h
= xfrm_spi_hash(net
, &x
->id
.daddr
, x
->id
.spi
, x
->id
.proto
, x
->props
.family
);
1541 hlist_add_head(&x
->byspi
, net
->xfrm
.state_byspi
+h
);
1542 spin_unlock_bh(&xfrm_state_lock
);
1548 spin_unlock_bh(&x
->lock
);
1552 EXPORT_SYMBOL(xfrm_alloc_spi
);
1554 int xfrm_state_walk(struct net
*net
, struct xfrm_state_walk
*walk
,
1555 int (*func
)(struct xfrm_state
*, int, void*),
1558 struct xfrm_state
*state
;
1559 struct xfrm_state_walk
*x
;
1562 if (walk
->seq
!= 0 && list_empty(&walk
->all
))
1565 spin_lock_bh(&xfrm_state_lock
);
1566 if (list_empty(&walk
->all
))
1567 x
= list_first_entry(&net
->xfrm
.state_all
, struct xfrm_state_walk
, all
);
1569 x
= list_entry(&walk
->all
, struct xfrm_state_walk
, all
);
1570 list_for_each_entry_from(x
, &net
->xfrm
.state_all
, all
) {
1571 if (x
->state
== XFRM_STATE_DEAD
)
1573 state
= container_of(x
, struct xfrm_state
, km
);
1574 if (!xfrm_id_proto_match(state
->id
.proto
, walk
->proto
))
1576 err
= func(state
, walk
->seq
, data
);
1578 list_move_tail(&walk
->all
, &x
->all
);
1583 if (walk
->seq
== 0) {
1587 list_del_init(&walk
->all
);
1589 spin_unlock_bh(&xfrm_state_lock
);
1592 EXPORT_SYMBOL(xfrm_state_walk
);
1594 void xfrm_state_walk_init(struct xfrm_state_walk
*walk
, u8 proto
)
1596 INIT_LIST_HEAD(&walk
->all
);
1597 walk
->proto
= proto
;
1598 walk
->state
= XFRM_STATE_DEAD
;
1601 EXPORT_SYMBOL(xfrm_state_walk_init
);
1603 void xfrm_state_walk_done(struct xfrm_state_walk
*walk
)
1605 if (list_empty(&walk
->all
))
1608 spin_lock_bh(&xfrm_state_lock
);
1609 list_del(&walk
->all
);
1610 spin_unlock_bh(&xfrm_state_lock
);
1612 EXPORT_SYMBOL(xfrm_state_walk_done
);
1614 static void xfrm_replay_timer_handler(unsigned long data
)
1616 struct xfrm_state
*x
= (struct xfrm_state
*)data
;
1618 spin_lock(&x
->lock
);
1620 if (x
->km
.state
== XFRM_STATE_VALID
) {
1621 if (xfrm_aevent_is_on(xs_net(x
)))
1622 x
->repl
->notify(x
, XFRM_REPLAY_TIMEOUT
);
1624 x
->xflags
|= XFRM_TIME_DEFER
;
1627 spin_unlock(&x
->lock
);
1630 static LIST_HEAD(xfrm_km_list
);
1632 void km_policy_notify(struct xfrm_policy
*xp
, int dir
, const struct km_event
*c
)
1634 struct xfrm_mgr
*km
;
1637 list_for_each_entry_rcu(km
, &xfrm_km_list
, list
)
1638 if (km
->notify_policy
)
1639 km
->notify_policy(xp
, dir
, c
);
1643 void km_state_notify(struct xfrm_state
*x
, const struct km_event
*c
)
1645 struct xfrm_mgr
*km
;
1647 list_for_each_entry_rcu(km
, &xfrm_km_list
, list
)
1653 EXPORT_SYMBOL(km_policy_notify
);
1654 EXPORT_SYMBOL(km_state_notify
);
1656 void km_state_expired(struct xfrm_state
*x
, int hard
, u32 portid
)
1658 struct net
*net
= xs_net(x
);
1663 c
.event
= XFRM_MSG_EXPIRE
;
1664 km_state_notify(x
, &c
);
1667 wake_up(&net
->xfrm
.km_waitq
);
1670 EXPORT_SYMBOL(km_state_expired
);
1672 * We send to all registered managers regardless of failure
1673 * We are happy with one success
1675 int km_query(struct xfrm_state
*x
, struct xfrm_tmpl
*t
, struct xfrm_policy
*pol
)
1677 int err
= -EINVAL
, acqret
;
1678 struct xfrm_mgr
*km
;
1681 list_for_each_entry_rcu(km
, &xfrm_km_list
, list
) {
1682 acqret
= km
->acquire(x
, t
, pol
);
1689 EXPORT_SYMBOL(km_query
);
1691 int km_new_mapping(struct xfrm_state
*x
, xfrm_address_t
*ipaddr
, __be16 sport
)
1694 struct xfrm_mgr
*km
;
1697 list_for_each_entry_rcu(km
, &xfrm_km_list
, list
) {
1698 if (km
->new_mapping
)
1699 err
= km
->new_mapping(x
, ipaddr
, sport
);
1706 EXPORT_SYMBOL(km_new_mapping
);
1708 void km_policy_expired(struct xfrm_policy
*pol
, int dir
, int hard
, u32 portid
)
1710 struct net
*net
= xp_net(pol
);
1715 c
.event
= XFRM_MSG_POLEXPIRE
;
1716 km_policy_notify(pol
, dir
, &c
);
1719 wake_up(&net
->xfrm
.km_waitq
);
1721 EXPORT_SYMBOL(km_policy_expired
);
1723 #ifdef CONFIG_XFRM_MIGRATE
1724 int km_migrate(const struct xfrm_selector
*sel
, u8 dir
, u8 type
,
1725 const struct xfrm_migrate
*m
, int num_migrate
,
1726 const struct xfrm_kmaddress
*k
)
1730 struct xfrm_mgr
*km
;
1733 list_for_each_entry_rcu(km
, &xfrm_km_list
, list
) {
1735 ret
= km
->migrate(sel
, dir
, type
, m
, num_migrate
, k
);
1743 EXPORT_SYMBOL(km_migrate
);
1746 int km_report(struct net
*net
, u8 proto
, struct xfrm_selector
*sel
, xfrm_address_t
*addr
)
1750 struct xfrm_mgr
*km
;
1753 list_for_each_entry_rcu(km
, &xfrm_km_list
, list
) {
1755 ret
= km
->report(net
, proto
, sel
, addr
);
1763 EXPORT_SYMBOL(km_report
);
1765 int xfrm_user_policy(struct sock
*sk
, int optname
, u8 __user
*optval
, int optlen
)
1769 struct xfrm_mgr
*km
;
1770 struct xfrm_policy
*pol
= NULL
;
1772 if (optlen
<= 0 || optlen
> PAGE_SIZE
)
1775 data
= kmalloc(optlen
, GFP_KERNEL
);
1780 if (copy_from_user(data
, optval
, optlen
))
1785 list_for_each_entry_rcu(km
, &xfrm_km_list
, list
) {
1786 pol
= km
->compile_policy(sk
, optname
, data
,
1794 xfrm_sk_policy_insert(sk
, err
, pol
);
1803 EXPORT_SYMBOL(xfrm_user_policy
);
1805 static DEFINE_SPINLOCK(xfrm_km_lock
);
1807 int xfrm_register_km(struct xfrm_mgr
*km
)
1809 spin_lock_bh(&xfrm_km_lock
);
1810 list_add_tail_rcu(&km
->list
, &xfrm_km_list
);
1811 spin_unlock_bh(&xfrm_km_lock
);
1814 EXPORT_SYMBOL(xfrm_register_km
);
1816 int xfrm_unregister_km(struct xfrm_mgr
*km
)
1818 spin_lock_bh(&xfrm_km_lock
);
1819 list_del_rcu(&km
->list
);
1820 spin_unlock_bh(&xfrm_km_lock
);
1824 EXPORT_SYMBOL(xfrm_unregister_km
);
1826 int xfrm_state_register_afinfo(struct xfrm_state_afinfo
*afinfo
)
1829 if (unlikely(afinfo
== NULL
))
1831 if (unlikely(afinfo
->family
>= NPROTO
))
1832 return -EAFNOSUPPORT
;
1833 spin_lock_bh(&xfrm_state_afinfo_lock
);
1834 if (unlikely(xfrm_state_afinfo
[afinfo
->family
] != NULL
))
1837 rcu_assign_pointer(xfrm_state_afinfo
[afinfo
->family
], afinfo
);
1838 spin_unlock_bh(&xfrm_state_afinfo_lock
);
1841 EXPORT_SYMBOL(xfrm_state_register_afinfo
);
1843 int xfrm_state_unregister_afinfo(struct xfrm_state_afinfo
*afinfo
)
1846 if (unlikely(afinfo
== NULL
))
1848 if (unlikely(afinfo
->family
>= NPROTO
))
1849 return -EAFNOSUPPORT
;
1850 spin_lock_bh(&xfrm_state_afinfo_lock
);
1851 if (likely(xfrm_state_afinfo
[afinfo
->family
] != NULL
)) {
1852 if (unlikely(xfrm_state_afinfo
[afinfo
->family
] != afinfo
))
1855 RCU_INIT_POINTER(xfrm_state_afinfo
[afinfo
->family
], NULL
);
1857 spin_unlock_bh(&xfrm_state_afinfo_lock
);
1861 EXPORT_SYMBOL(xfrm_state_unregister_afinfo
);
1863 static struct xfrm_state_afinfo
*xfrm_state_get_afinfo(unsigned int family
)
1865 struct xfrm_state_afinfo
*afinfo
;
1866 if (unlikely(family
>= NPROTO
))
1869 afinfo
= rcu_dereference(xfrm_state_afinfo
[family
]);
1870 if (unlikely(!afinfo
))
1875 static void xfrm_state_put_afinfo(struct xfrm_state_afinfo
*afinfo
)
1880 /* Temporarily located here until net/xfrm/xfrm_tunnel.c is created */
1881 void xfrm_state_delete_tunnel(struct xfrm_state
*x
)
1884 struct xfrm_state
*t
= x
->tunnel
;
1886 if (atomic_read(&t
->tunnel_users
) == 2)
1887 xfrm_state_delete(t
);
1888 atomic_dec(&t
->tunnel_users
);
1893 EXPORT_SYMBOL(xfrm_state_delete_tunnel
);
1895 int xfrm_state_mtu(struct xfrm_state
*x
, int mtu
)
1899 spin_lock_bh(&x
->lock
);
1900 if (x
->km
.state
== XFRM_STATE_VALID
&&
1901 x
->type
&& x
->type
->get_mtu
)
1902 res
= x
->type
->get_mtu(x
, mtu
);
1904 res
= mtu
- x
->props
.header_len
;
1905 spin_unlock_bh(&x
->lock
);
1909 int __xfrm_init_state(struct xfrm_state
*x
, bool init_replay
)
1911 struct xfrm_state_afinfo
*afinfo
;
1912 struct xfrm_mode
*inner_mode
;
1913 int family
= x
->props
.family
;
1916 err
= -EAFNOSUPPORT
;
1917 afinfo
= xfrm_state_get_afinfo(family
);
1922 if (afinfo
->init_flags
)
1923 err
= afinfo
->init_flags(x
);
1925 xfrm_state_put_afinfo(afinfo
);
1930 err
= -EPROTONOSUPPORT
;
1932 if (x
->sel
.family
!= AF_UNSPEC
) {
1933 inner_mode
= xfrm_get_mode(x
->props
.mode
, x
->sel
.family
);
1934 if (inner_mode
== NULL
)
1937 if (!(inner_mode
->flags
& XFRM_MODE_FLAG_TUNNEL
) &&
1938 family
!= x
->sel
.family
) {
1939 xfrm_put_mode(inner_mode
);
1943 x
->inner_mode
= inner_mode
;
1945 struct xfrm_mode
*inner_mode_iaf
;
1946 int iafamily
= AF_INET
;
1948 inner_mode
= xfrm_get_mode(x
->props
.mode
, x
->props
.family
);
1949 if (inner_mode
== NULL
)
1952 if (!(inner_mode
->flags
& XFRM_MODE_FLAG_TUNNEL
)) {
1953 xfrm_put_mode(inner_mode
);
1956 x
->inner_mode
= inner_mode
;
1958 if (x
->props
.family
== AF_INET
)
1959 iafamily
= AF_INET6
;
1961 inner_mode_iaf
= xfrm_get_mode(x
->props
.mode
, iafamily
);
1962 if (inner_mode_iaf
) {
1963 if (inner_mode_iaf
->flags
& XFRM_MODE_FLAG_TUNNEL
)
1964 x
->inner_mode_iaf
= inner_mode_iaf
;
1966 xfrm_put_mode(inner_mode_iaf
);
1970 x
->type
= xfrm_get_type(x
->id
.proto
, family
);
1971 if (x
->type
== NULL
)
1974 err
= x
->type
->init_state(x
);
1978 x
->outer_mode
= xfrm_get_mode(x
->props
.mode
, family
);
1979 if (x
->outer_mode
== NULL
) {
1980 err
= -EPROTONOSUPPORT
;
1985 err
= xfrm_init_replay(x
);
1990 x
->km
.state
= XFRM_STATE_VALID
;
1996 EXPORT_SYMBOL(__xfrm_init_state
);
1998 int xfrm_init_state(struct xfrm_state
*x
)
2000 return __xfrm_init_state(x
, true);
2003 EXPORT_SYMBOL(xfrm_init_state
);
2005 int __net_init
xfrm_state_init(struct net
*net
)
2009 INIT_LIST_HEAD(&net
->xfrm
.state_all
);
2011 sz
= sizeof(struct hlist_head
) * 8;
2013 net
->xfrm
.state_bydst
= xfrm_hash_alloc(sz
);
2014 if (!net
->xfrm
.state_bydst
)
2016 net
->xfrm
.state_bysrc
= xfrm_hash_alloc(sz
);
2017 if (!net
->xfrm
.state_bysrc
)
2019 net
->xfrm
.state_byspi
= xfrm_hash_alloc(sz
);
2020 if (!net
->xfrm
.state_byspi
)
2022 net
->xfrm
.state_hmask
= ((sz
/ sizeof(struct hlist_head
)) - 1);
2024 net
->xfrm
.state_num
= 0;
2025 INIT_WORK(&net
->xfrm
.state_hash_work
, xfrm_hash_resize
);
2026 INIT_HLIST_HEAD(&net
->xfrm
.state_gc_list
);
2027 INIT_WORK(&net
->xfrm
.state_gc_work
, xfrm_state_gc_task
);
2028 init_waitqueue_head(&net
->xfrm
.km_waitq
);
2032 xfrm_hash_free(net
->xfrm
.state_bysrc
, sz
);
2034 xfrm_hash_free(net
->xfrm
.state_bydst
, sz
);
2039 void xfrm_state_fini(struct net
*net
)
2041 struct xfrm_audit audit_info
;
2044 flush_work(&net
->xfrm
.state_hash_work
);
2045 audit_info
.loginuid
= INVALID_UID
;
2046 audit_info
.sessionid
= -1;
2047 audit_info
.secid
= 0;
2048 xfrm_state_flush(net
, IPSEC_PROTO_ANY
, &audit_info
);
2049 flush_work(&net
->xfrm
.state_gc_work
);
2051 WARN_ON(!list_empty(&net
->xfrm
.state_all
));
2053 sz
= (net
->xfrm
.state_hmask
+ 1) * sizeof(struct hlist_head
);
2054 WARN_ON(!hlist_empty(net
->xfrm
.state_byspi
));
2055 xfrm_hash_free(net
->xfrm
.state_byspi
, sz
);
2056 WARN_ON(!hlist_empty(net
->xfrm
.state_bysrc
));
2057 xfrm_hash_free(net
->xfrm
.state_bysrc
, sz
);
2058 WARN_ON(!hlist_empty(net
->xfrm
.state_bydst
));
2059 xfrm_hash_free(net
->xfrm
.state_bydst
, sz
);
2062 #ifdef CONFIG_AUDITSYSCALL
2063 static void xfrm_audit_helper_sainfo(struct xfrm_state
*x
,
2064 struct audit_buffer
*audit_buf
)
2066 struct xfrm_sec_ctx
*ctx
= x
->security
;
2067 u32 spi
= ntohl(x
->id
.spi
);
2070 audit_log_format(audit_buf
, " sec_alg=%u sec_doi=%u sec_obj=%s",
2071 ctx
->ctx_alg
, ctx
->ctx_doi
, ctx
->ctx_str
);
2073 switch(x
->props
.family
) {
2075 audit_log_format(audit_buf
, " src=%pI4 dst=%pI4",
2076 &x
->props
.saddr
.a4
, &x
->id
.daddr
.a4
);
2079 audit_log_format(audit_buf
, " src=%pI6 dst=%pI6",
2080 x
->props
.saddr
.a6
, x
->id
.daddr
.a6
);
2084 audit_log_format(audit_buf
, " spi=%u(0x%x)", spi
, spi
);
2087 static void xfrm_audit_helper_pktinfo(struct sk_buff
*skb
, u16 family
,
2088 struct audit_buffer
*audit_buf
)
2090 const struct iphdr
*iph4
;
2091 const struct ipv6hdr
*iph6
;
2096 audit_log_format(audit_buf
, " src=%pI4 dst=%pI4",
2097 &iph4
->saddr
, &iph4
->daddr
);
2100 iph6
= ipv6_hdr(skb
);
2101 audit_log_format(audit_buf
,
2102 " src=%pI6 dst=%pI6 flowlbl=0x%x%02x%02x",
2103 &iph6
->saddr
,&iph6
->daddr
,
2104 iph6
->flow_lbl
[0] & 0x0f,
2111 void xfrm_audit_state_add(struct xfrm_state
*x
, int result
,
2112 kuid_t auid
, u32 sessionid
, u32 secid
)
2114 struct audit_buffer
*audit_buf
;
2116 audit_buf
= xfrm_audit_start("SAD-add");
2117 if (audit_buf
== NULL
)
2119 xfrm_audit_helper_usrinfo(auid
, sessionid
, secid
, audit_buf
);
2120 xfrm_audit_helper_sainfo(x
, audit_buf
);
2121 audit_log_format(audit_buf
, " res=%u", result
);
2122 audit_log_end(audit_buf
);
2124 EXPORT_SYMBOL_GPL(xfrm_audit_state_add
);
2126 void xfrm_audit_state_delete(struct xfrm_state
*x
, int result
,
2127 kuid_t auid
, u32 sessionid
, u32 secid
)
2129 struct audit_buffer
*audit_buf
;
2131 audit_buf
= xfrm_audit_start("SAD-delete");
2132 if (audit_buf
== NULL
)
2134 xfrm_audit_helper_usrinfo(auid
, sessionid
, secid
, audit_buf
);
2135 xfrm_audit_helper_sainfo(x
, audit_buf
);
2136 audit_log_format(audit_buf
, " res=%u", result
);
2137 audit_log_end(audit_buf
);
2139 EXPORT_SYMBOL_GPL(xfrm_audit_state_delete
);
2141 void xfrm_audit_state_replay_overflow(struct xfrm_state
*x
,
2142 struct sk_buff
*skb
)
2144 struct audit_buffer
*audit_buf
;
2147 audit_buf
= xfrm_audit_start("SA-replay-overflow");
2148 if (audit_buf
== NULL
)
2150 xfrm_audit_helper_pktinfo(skb
, x
->props
.family
, audit_buf
);
2151 /* don't record the sequence number because it's inherent in this kind
2152 * of audit message */
2153 spi
= ntohl(x
->id
.spi
);
2154 audit_log_format(audit_buf
, " spi=%u(0x%x)", spi
, spi
);
2155 audit_log_end(audit_buf
);
2157 EXPORT_SYMBOL_GPL(xfrm_audit_state_replay_overflow
);
2159 void xfrm_audit_state_replay(struct xfrm_state
*x
,
2160 struct sk_buff
*skb
, __be32 net_seq
)
2162 struct audit_buffer
*audit_buf
;
2165 audit_buf
= xfrm_audit_start("SA-replayed-pkt");
2166 if (audit_buf
== NULL
)
2168 xfrm_audit_helper_pktinfo(skb
, x
->props
.family
, audit_buf
);
2169 spi
= ntohl(x
->id
.spi
);
2170 audit_log_format(audit_buf
, " spi=%u(0x%x) seqno=%u",
2171 spi
, spi
, ntohl(net_seq
));
2172 audit_log_end(audit_buf
);
2174 EXPORT_SYMBOL_GPL(xfrm_audit_state_replay
);
2176 void xfrm_audit_state_notfound_simple(struct sk_buff
*skb
, u16 family
)
2178 struct audit_buffer
*audit_buf
;
2180 audit_buf
= xfrm_audit_start("SA-notfound");
2181 if (audit_buf
== NULL
)
2183 xfrm_audit_helper_pktinfo(skb
, family
, audit_buf
);
2184 audit_log_end(audit_buf
);
2186 EXPORT_SYMBOL_GPL(xfrm_audit_state_notfound_simple
);
2188 void xfrm_audit_state_notfound(struct sk_buff
*skb
, u16 family
,
2189 __be32 net_spi
, __be32 net_seq
)
2191 struct audit_buffer
*audit_buf
;
2194 audit_buf
= xfrm_audit_start("SA-notfound");
2195 if (audit_buf
== NULL
)
2197 xfrm_audit_helper_pktinfo(skb
, family
, audit_buf
);
2198 spi
= ntohl(net_spi
);
2199 audit_log_format(audit_buf
, " spi=%u(0x%x) seqno=%u",
2200 spi
, spi
, ntohl(net_seq
));
2201 audit_log_end(audit_buf
);
2203 EXPORT_SYMBOL_GPL(xfrm_audit_state_notfound
);
2205 void xfrm_audit_state_icvfail(struct xfrm_state
*x
,
2206 struct sk_buff
*skb
, u8 proto
)
2208 struct audit_buffer
*audit_buf
;
2212 audit_buf
= xfrm_audit_start("SA-icv-failure");
2213 if (audit_buf
== NULL
)
2215 xfrm_audit_helper_pktinfo(skb
, x
->props
.family
, audit_buf
);
2216 if (xfrm_parse_spi(skb
, proto
, &net_spi
, &net_seq
) == 0) {
2217 u32 spi
= ntohl(net_spi
);
2218 audit_log_format(audit_buf
, " spi=%u(0x%x) seqno=%u",
2219 spi
, spi
, ntohl(net_seq
));
2221 audit_log_end(audit_buf
);
2223 EXPORT_SYMBOL_GPL(xfrm_audit_state_icvfail
);
2224 #endif /* CONFIG_AUDITSYSCALL */