Commit | Line | Data |
---|---|---|
1067fd0f | 1 | /* |
10cc936d KB |
2 | * Copyright (c) 1992, 1993 |
3 | * The Regents of the University of California. All rights reserved. | |
1067fd0f KS |
4 | * |
5 | * %sccs.include.redist.c% | |
6 | * | |
10cc936d | 7 | * @(#)tuba_table.c 8.1 (Berkeley) %G% |
1067fd0f | 8 | */ |
21715d8e KS |
9 | #include <sys/param.h> |
10 | #include <sys/systm.h> | |
11 | #include <sys/proc.h> | |
12 | #include <sys/mbuf.h> | |
13 | #include <sys/socket.h> | |
14 | #include <sys/socketvar.h> | |
15 | #include <sys/domain.h> | |
16 | #include <sys/protosw.h> | |
17 | #include <sys/ioctl.h> | |
18 | #include <sys/time.h> | |
19 | #include <sys/kernel.h> | |
1067fd0f | 20 | |
21715d8e KS |
21 | #include <net/if.h> |
22 | #include <net/af.h> | |
23 | #include <net/radix.h> | |
1067fd0f | 24 | |
21715d8e | 25 | #include <netiso/iso.h> |
77db2796 | 26 | #include <netiso/tuba_table.h> |
1067fd0f KS |
27 | |
28 | int tuba_table_size; | |
29 | struct tuba_cache **tuba_table; | |
30 | struct radix_node_head *tuba_tree; | |
31 | extern int arpt_keep, arpt_prune; /* use same values as arp cache */ | |
32 | ||
33 | void | |
34 | tuba_timer() | |
35 | { | |
36 | int s = splnet(); | |
37 | int i; | |
21715d8e | 38 | register struct tuba_cache *tc; |
1067fd0f KS |
39 | long timelimit = time.tv_sec - arpt_keep; |
40 | ||
41 | timeout(tuba_timer, (caddr_t)0, arpt_prune * hz); | |
42 | for (i = tuba_table_size; i > 0; i--) | |
43 | if ((tc = tuba_table[i]) && (tc->tc_refcnt == 0) && | |
44 | (tc->tc_time < timelimit)) { | |
45 | tuba_table[i] = 0; | |
d32cd81f | 46 | rn_delete(&tc->tc_siso.siso_addr, NULL, tuba_tree); |
1067fd0f KS |
47 | free((caddr_t)tc, M_RTABLE); |
48 | } | |
49 | splx(s); | |
50 | } | |
51 | ||
21715d8e | 52 | tuba_table_init() |
1067fd0f | 53 | { |
0ef321d4 | 54 | rn_inithead((void **)&tuba_tree, 40); |
1067fd0f KS |
55 | timeout(tuba_timer, (caddr_t)0, arpt_prune * hz); |
56 | } | |
57 | ||
58 | int | |
7cfe65b5 KS |
59 | tuba_lookup(siso, wait) |
60 | register struct sockaddr_iso *siso; | |
1067fd0f | 61 | { |
21715d8e | 62 | struct radix_node *rn, *rn_match(); |
1067fd0f | 63 | register struct tuba_cache *tc; |
21715d8e | 64 | struct tuba_cache **new; |
77db2796 | 65 | int dupentry = 0, sum_a = 0, sum_b = 0, old_size, i; |
1067fd0f | 66 | |
7cfe65b5 KS |
67 | if ((rn = rn_match((caddr_t)&siso->siso_addr, tuba_tree->rnh_treetop)) |
68 | && ((rn->rn_flags & RNF_ROOT) == 0)) { | |
1067fd0f KS |
69 | tc = (struct tuba_cache *)rn; |
70 | tc->tc_time = time.tv_sec; | |
71 | return (tc->tc_index); | |
72 | } | |
73 | if ((tc = (struct tuba_cache *)malloc(sizeof(*tc), M_RTABLE, wait)) | |
74 | == NULL) | |
75 | return (0); | |
21715d8e | 76 | bzero((caddr_t)tc, sizeof (*tc)); |
7cfe65b5 KS |
77 | bcopy(siso->siso_data, tc->tc_siso.siso_data, |
78 | tc->tc_siso.siso_nlen = siso->siso_nlen); | |
d32cd81f | 79 | rn_insert(&tc->tc_siso.siso_addr, tuba_tree, &dupentry, tc->tc_nodes); |
8c53a772 KS |
80 | if (dupentry) |
81 | panic("tuba_lookup 1"); | |
ff38aee7 KS |
82 | tc->tc_siso.siso_family = AF_ISO; |
83 | tc->tc_siso.siso_len = sizeof(tc->tc_siso); | |
1067fd0f | 84 | tc->tc_time = time.tv_sec; |
7cfe65b5 | 85 | for (i = sum_a = tc->tc_siso.siso_nlen; --i >= 0; ) |
1770ae00 | 86 | (i & 1 ? sum_a : sum_b) += (u_char)tc->tc_siso.siso_data[i]; |
8c53a772 KS |
87 | REDUCE(tc->tc_sum, (sum_a << 8) + sum_b); |
88 | HTONS(tc->tc_sum); | |
315cfecc | 89 | SWAB(tc->tc_ssum, tc->tc_sum); |
1067fd0f KS |
90 | for (i = tuba_table_size; i > 0; i--) |
91 | if (tuba_table[i] == 0) | |
8c53a772 | 92 | goto fixup; |
77db2796 | 93 | old_size = tuba_table_size; |
1067fd0f KS |
94 | if (tuba_table_size == 0) |
95 | tuba_table_size = 15; | |
96 | if (tuba_table_size > 0x7fff) | |
97 | return (0); | |
98 | tuba_table_size = 1 + 2 * tuba_table_size; | |
99 | i = (tuba_table_size + 1) * sizeof(tc); | |
100 | new = (struct tuba_cache **)malloc((unsigned)i, M_RTABLE, wait); | |
101 | if (new == 0) { | |
102 | tuba_table_size = old_size; | |
d32cd81f | 103 | rn_delete(&tc->tc_siso.siso_addr, NULL, tuba_tree); |
1067fd0f KS |
104 | free((caddr_t)tc, M_RTABLE); |
105 | return (0); | |
106 | } | |
107 | bzero((caddr_t)new, (unsigned)i); | |
77db2796 | 108 | if (tuba_table) { |
1067fd0f | 109 | bcopy((caddr_t)tuba_table, (caddr_t)new, i >> 1); |
77db2796 KS |
110 | free((caddr_t)tuba_table, M_RTABLE); |
111 | } | |
112 | tuba_table = new; | |
8c53a772 KS |
113 | i = tuba_table_size; |
114 | fixup: | |
115 | tuba_table[i] = tc; | |
116 | tc->tc_index = i; | |
1067fd0f KS |
117 | return (tc->tc_index); |
118 | } |