]>
Commit | Line | Data |
---|---|---|
12e41d03 DL |
1 | /* |
2 | PIM for Quagga | |
3 | Copyright (C) 2008 Everton da Silva Marques | |
4 | ||
5 | This program is free software; you can redistribute it and/or modify | |
6 | it under the terms of the GNU General Public License as published by | |
7 | the Free Software Foundation; either version 2 of the License, or | |
8 | (at your option) any later version. | |
9 | ||
10 | This program is distributed in the hope that it will be useful, but | |
11 | WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
13 | General Public License for more details. | |
14 | ||
15 | You should have received a copy of the GNU General Public License | |
16 | along with this program; see the file COPYING; if not, write to the | |
17 | Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, | |
18 | MA 02110-1301 USA | |
12e41d03 DL |
19 | */ |
20 | ||
21 | #include <zebra.h> | |
22 | ||
23 | #include "log.h" | |
24 | #include "memory.h" | |
9df99407 | 25 | #include "if.h" |
dfe43e25 DW |
26 | #include "prefix.h" |
27 | #include "vty.h" | |
28 | #include "plist.h" | |
1bc98276 CS |
29 | #include "hash.h" |
30 | #include "jhash.h" | |
12e41d03 DL |
31 | |
32 | #include "pimd.h" | |
33 | #include "pim_cmd.h" | |
34 | #include "pim_iface.h" | |
35 | #include "pim_zebra.h" | |
36 | #include "pim_str.h" | |
37 | #include "pim_oil.h" | |
38 | #include "pim_pim.h" | |
39 | #include "pim_upstream.h" | |
12e41d03 DL |
40 | #include "pim_rpf.h" |
41 | #include "pim_ssmpingd.h" | |
6250610a | 42 | #include "pim_static.h" |
36d6bd7d | 43 | #include "pim_rp.h" |
15a5dafe | 44 | #include "pim_ssm.h" |
0b6817c5 | 45 | #include "pim_zlookup.h" |
1bc98276 | 46 | #include "pim_nht.h" |
12e41d03 DL |
47 | |
48 | const char *const PIM_ALL_SYSTEMS = MCAST_ALL_SYSTEMS; | |
49 | const char *const PIM_ALL_ROUTERS = MCAST_ALL_ROUTERS; | |
50 | const char *const PIM_ALL_PIM_ROUTERS = MCAST_ALL_PIM_ROUTERS; | |
51 | const char *const PIM_ALL_IGMP_ROUTERS = MCAST_ALL_IGMP_ROUTERS; | |
52 | ||
469351b3 | 53 | struct thread_master *master = NULL; |
12e41d03 DL |
54 | uint32_t qpim_debugs = 0; |
55 | int qpim_mroute_socket_fd = -1; | |
56 | int64_t qpim_mroute_socket_creation = 0; /* timestamp of creation */ | |
12e41d03 | 57 | int qpim_t_periodic = PIM_DEFAULT_T_PERIODIC; /* Period between Join/Prune Messages */ |
12e41d03 | 58 | struct pim_assert_metric qpim_infinite_assert_metric; |
deab75f7 | 59 | long qpim_rpf_cache_refresh_delay_msec = 50; |
59ba0ac3 | 60 | struct thread *qpim_rpf_cache_refresher = NULL; |
12e41d03 DL |
61 | int64_t qpim_rpf_cache_refresh_requests = 0; |
62 | int64_t qpim_rpf_cache_refresh_events = 0; | |
63 | int64_t qpim_rpf_cache_refresh_last = 0; | |
64 | struct in_addr qpim_inaddr_any; | |
59ba0ac3 | 65 | struct list *qpim_ssmpingd_list = NULL; |
12e41d03 DL |
66 | struct in_addr qpim_ssmpingd_group_addr; |
67 | int64_t qpim_scan_oil_events = 0; | |
68 | int64_t qpim_scan_oil_last = 0; | |
69 | int64_t qpim_mroute_add_events = 0; | |
70 | int64_t qpim_mroute_add_last = 0; | |
71 | int64_t qpim_mroute_del_events = 0; | |
72 | int64_t qpim_mroute_del_last = 0; | |
59ba0ac3 | 73 | struct list *qpim_static_route_list = NULL; |
4304f95c | 74 | unsigned int qpim_keep_alive_time = PIM_KEEPALIVE_PERIOD; |
01408ede | 75 | signed int qpim_rp_keep_alive_time = 0; |
284b4301 | 76 | int64_t qpim_nexthop_lookups = 0; |
8e4c9ef3 | 77 | int qpim_packet_process = PIM_DEFAULT_PACKET_PROCESS; |
cba44481 CS |
78 | uint8_t qpim_ecmp_enable = 0; |
79 | uint8_t qpim_ecmp_rebalance_enable = 0; | |
80 | struct pim_instance *pimg = NULL; | |
12e41d03 | 81 | |
4a4c4a07 DS |
82 | int32_t qpim_register_suppress_time = PIM_REGISTER_SUPPRESSION_TIME_DEFAULT; |
83 | int32_t qpim_register_probe_time = PIM_REGISTER_PROBE_TIME_DEFAULT; | |
84 | ||
1bc98276 CS |
85 | static struct pim_instance *pim_instance_init (vrf_id_t vrf_id, afi_t afi); |
86 | static void pim_instance_terminate (void); | |
87 | ||
88 | static int | |
89 | pim_vrf_new (struct vrf *vrf) | |
90 | { | |
91 | zlog_debug ("VRF Created: %s(%d)", vrf->name, vrf->vrf_id); | |
92 | return 0; | |
93 | } | |
94 | ||
95 | static int | |
96 | pim_vrf_delete (struct vrf *vrf) | |
97 | { | |
98 | zlog_debug ("VRF Deletion: %s(%d)", vrf->name, vrf->vrf_id); | |
99 | return 0; | |
100 | } | |
101 | ||
102 | static int | |
103 | pim_vrf_enable (struct vrf *vrf) | |
104 | { | |
105 | ||
106 | if (!vrf) // unexpected | |
107 | return -1; | |
108 | ||
109 | if (vrf->vrf_id == VRF_DEFAULT) | |
110 | { | |
111 | pimg = pim_instance_init (VRF_DEFAULT, AFI_IP); | |
112 | if (pimg == NULL) | |
6ca7dd90 DS |
113 | { |
114 | zlog_err ("%s %s: pim class init failure ", __FILE__, | |
115 | __PRETTY_FUNCTION__); | |
116 | /* | |
117 | * We will crash and burn otherwise | |
118 | */ | |
119 | exit(1); | |
09639810 DS |
120 | } |
121 | ||
122 | pimg->send_v6_secondary = 1; | |
71bbe73d | 123 | |
1bc98276 CS |
124 | } |
125 | return 0; | |
126 | } | |
127 | ||
128 | static int | |
129 | pim_vrf_disable (struct vrf *vrf) | |
130 | { | |
131 | if (vrf->vrf_id == VRF_DEFAULT) | |
132 | return 0; | |
133 | ||
134 | if (vrf->vrf_id == VRF_DEFAULT) | |
135 | pim_instance_terminate (); | |
136 | ||
137 | /* Note: This is a callback, the VRF will be deleted by the caller. */ | |
138 | return 0; | |
139 | } | |
140 | ||
141 | void | |
142 | pim_vrf_init (void) | |
143 | { | |
144 | vrf_add_hook (VRF_NEW_HOOK, pim_vrf_new); | |
145 | vrf_add_hook (VRF_ENABLE_HOOK, pim_vrf_enable); | |
146 | vrf_add_hook (VRF_DISABLE_HOOK, pim_vrf_disable); | |
147 | vrf_add_hook (VRF_DELETE_HOOK, pim_vrf_delete); | |
148 | ||
149 | vrf_init (); | |
150 | } | |
151 | ||
152 | static void | |
153 | pim_vrf_terminate (void) | |
154 | { | |
155 | vrf_add_hook (VRF_NEW_HOOK, NULL); | |
156 | vrf_add_hook (VRF_ENABLE_HOOK, NULL); | |
157 | vrf_add_hook (VRF_DISABLE_HOOK, NULL); | |
158 | vrf_add_hook (VRF_DELETE_HOOK, NULL); | |
159 | ||
160 | vrf_terminate (); | |
161 | } | |
162 | ||
163 | /* Key generate for pim->rpf_hash */ | |
164 | static unsigned int | |
165 | pim_rpf_hash_key (void *arg) | |
166 | { | |
167 | struct pim_nexthop_cache *r = (struct pim_nexthop_cache *) arg; | |
168 | ||
169 | return jhash_1word (r->rpf.rpf_addr.u.prefix4.s_addr, 0); | |
170 | } | |
171 | ||
172 | /* Compare pim->rpf_hash node data */ | |
173 | static int | |
174 | pim_rpf_equal (const void *arg1, const void *arg2) | |
175 | { | |
176 | const struct pim_nexthop_cache *r1 = | |
177 | (const struct pim_nexthop_cache *) arg1; | |
178 | const struct pim_nexthop_cache *r2 = | |
179 | (const struct pim_nexthop_cache *) arg2; | |
180 | ||
181 | return prefix_same (&r1->rpf.rpf_addr, &r2->rpf.rpf_addr); | |
182 | } | |
183 | ||
184 | /* Cleanup pim->rpf_hash each node data */ | |
185 | static void | |
186 | pim_rp_list_hash_clean (void *data) | |
187 | { | |
188 | struct pim_nexthop_cache *pnc; | |
189 | ||
190 | pnc = (struct pim_nexthop_cache *) data; | |
191 | if (pnc->rp_list->count) | |
192 | list_delete_all_node (pnc->rp_list); | |
193 | if (pnc->upstream_list->count) | |
194 | list_delete_all_node (pnc->upstream_list); | |
195 | } | |
196 | ||
15a5dafe | 197 | void |
198 | pim_prefix_list_update (struct prefix_list *plist) | |
199 | { | |
200 | pim_rp_prefix_list_update (plist); | |
201 | pim_ssm_prefix_list_update (plist); | |
202 | } | |
203 | ||
1bc98276 CS |
204 | static void |
205 | pim_instance_terminate (void) | |
206 | { | |
207 | /* Traverse and cleanup rpf_hash */ | |
6ca7dd90 | 208 | if (pimg->rpf_hash) |
1bc98276 CS |
209 | { |
210 | hash_clean (pimg->rpf_hash, (void *) pim_rp_list_hash_clean); | |
211 | hash_free (pimg->rpf_hash); | |
6ca7dd90 DS |
212 | pimg->rpf_hash = NULL; |
213 | } | |
214 | ||
215 | if (pimg->ssm_info) | |
216 | { | |
217 | pim_ssm_terminate (pimg->ssm_info); | |
218 | pimg->ssm_info = NULL; | |
1bc98276 CS |
219 | } |
220 | ||
221 | XFREE (MTYPE_PIM_PIM_INSTANCE, pimg); | |
222 | } | |
223 | ||
12e41d03 DL |
224 | static void pim_free() |
225 | { | |
226 | pim_ssmpingd_destroy(); | |
227 | ||
040d86ad | 228 | pim_oil_terminate (); |
12e41d03 | 229 | |
0f588989 | 230 | pim_upstream_terminate (); |
6250610a JAG |
231 | |
232 | if (qpim_static_route_list) | |
233 | list_free(qpim_static_route_list); | |
28b0c6b3 | 234 | |
ea4a71fc | 235 | pim_if_terminate (); |
36d6bd7d | 236 | pim_rp_free (); |
59d4564e | 237 | |
44a13ae3 | 238 | pim_route_map_terminate(); |
0b6817c5 DS |
239 | |
240 | zclient_lookup_free (); | |
241 | ||
242 | zprivs_terminate(&pimd_privs); | |
12e41d03 DL |
243 | } |
244 | ||
1bc98276 CS |
245 | static struct pim_instance * |
246 | pim_instance_init (vrf_id_t vrf_id, afi_t afi) | |
247 | { | |
248 | struct pim_instance *pim; | |
249 | ||
250 | pim = XCALLOC (MTYPE_PIM_PIM_INSTANCE, sizeof (struct pim_instance)); | |
251 | if (!pim) | |
252 | return NULL; | |
253 | ||
254 | pim->vrf_id = vrf_id; | |
255 | pim->afi = afi; | |
256 | ||
a7b2b1e2 | 257 | pim->spt_switchover = PIM_SPT_IMMEDIATE; |
1bc98276 CS |
258 | pim->rpf_hash = hash_create_size (256, pim_rpf_hash_key, pim_rpf_equal); |
259 | ||
260 | if (PIM_DEBUG_ZEBRA) | |
261 | zlog_debug ("%s: NHT rpf hash init ", __PRETTY_FUNCTION__); | |
262 | ||
15a5dafe | 263 | pim->ssm_info = pim_ssm_init (vrf_id); |
264 | if (!pim->ssm_info) { | |
265 | pim_instance_terminate (); | |
266 | return NULL; | |
267 | } | |
1bc98276 CS |
268 | |
269 | return pim; | |
270 | } | |
271 | ||
12e41d03 DL |
272 | void pim_init() |
273 | { | |
01408ede DS |
274 | qpim_rp_keep_alive_time = PIM_RP_KEEPALIVE_PERIOD; |
275 | ||
36d6bd7d DS |
276 | pim_rp_init (); |
277 | ||
12e41d03 DL |
278 | if (!inet_aton(PIM_ALL_PIM_ROUTERS, &qpim_all_pim_routers_addr)) { |
279 | zlog_err("%s %s: could not solve %s to group address: errno=%d: %s", | |
280 | __FILE__, __PRETTY_FUNCTION__, | |
281 | PIM_ALL_PIM_ROUTERS, errno, safe_strerror(errno)); | |
282 | zassert(0); | |
283 | return; | |
284 | } | |
285 | ||
040d86ad | 286 | pim_oil_init (); |
12e41d03 | 287 | |
0f588989 | 288 | pim_upstream_init (); |
12e41d03 | 289 | |
6250610a JAG |
290 | qpim_static_route_list = list_new(); |
291 | if (!qpim_static_route_list) { | |
292 | zlog_err("%s %s: failure: static_route_list=list_new()", | |
293 | __FILE__, __PRETTY_FUNCTION__); | |
294 | return; | |
295 | } | |
296 | qpim_static_route_list->del = (void (*)(void *)) pim_static_route_free; | |
297 | ||
b8d16be2 | 298 | pim_mroute_socket_enable(); |
12e41d03 | 299 | |
12e41d03 DL |
300 | qpim_inaddr_any.s_addr = PIM_NET_INADDR_ANY; |
301 | ||
302 | /* | |
303 | RFC 4601: 4.6.3. Assert Metrics | |
304 | ||
305 | assert_metric | |
306 | infinite_assert_metric() { | |
307 | return {1,infinity,infinity,0} | |
308 | } | |
309 | */ | |
310 | qpim_infinite_assert_metric.rpt_bit_flag = 1; | |
311 | qpim_infinite_assert_metric.metric_preference = PIM_ASSERT_METRIC_PREFERENCE_MAX; | |
312 | qpim_infinite_assert_metric.route_metric = PIM_ASSERT_ROUTE_METRIC_MAX; | |
313 | qpim_infinite_assert_metric.ip_address = qpim_inaddr_any; | |
314 | ||
315 | pim_if_init(); | |
316 | pim_cmd_init(); | |
317 | pim_ssmpingd_init(); | |
318 | } | |
319 | ||
320 | void pim_terminate() | |
321 | { | |
322 | pim_free(); | |
1bc98276 CS |
323 | |
324 | /* reverse prefix_list_init */ | |
325 | prefix_list_add_hook (NULL); | |
326 | prefix_list_delete_hook (NULL); | |
327 | prefix_list_reset (); | |
328 | ||
329 | pim_vrf_terminate (); | |
12e41d03 | 330 | } |