pimd/pim_vty.c

   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 along
  16  * with this program; see the file COPYING; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
  18  */
  19
  20 #include <zebra.h>
  21
  22 #include "if.h"
  23 #include "linklist.h"
  24 #include "prefix.h"
  25 #include "vty.h"
  26 #include "vrf.h"
  27 #include "plist.h"
  28
  29 #include "pimd.h"
  30 #include "pim_vty.h"
  31 #include "pim_iface.h"
  32 #include "pim_cmd.h"
  33 #include "pim_str.h"
  34 #include "pim_ssmpingd.h"
  35 #include "pim_pim.h"
  36 #include "pim_oil.h"
  37 #include "pim_static.h"
  38 #include "pim_rp.h"
  39 #include "pim_msdp.h"
  40 #include "pim_ssm.h"
  41 #include "pim_bfd.h"
  42 #include "pim_bsm.h"
  43 #include "pim_vxlan.h"
  44
  45 int pim_debug_config_write(struct vty *vty)
  46 {
  47         int writes = 0;
  48
  49         if (PIM_DEBUG_MSDP_EVENTS) {
  50                 vty_out(vty, "debug msdp events\n");
  51                 ++writes;
  52         }
  53         if (PIM_DEBUG_MSDP_PACKETS) {
  54                 vty_out(vty, "debug msdp packets\n");
  55                 ++writes;
  56         }
  57         if (PIM_DEBUG_MSDP_INTERNAL) {
  58                 vty_out(vty, "debug msdp internal\n");
  59                 ++writes;
  60         }
  61         if (PIM_DEBUG_IGMP_EVENTS) {
  62                 vty_out(vty, "debug igmp events\n");
  63                 ++writes;
  64         }
  65         if (PIM_DEBUG_IGMP_PACKETS) {
  66                 vty_out(vty, "debug igmp packets\n");
  67                 ++writes;
  68         }
  69         if (PIM_DEBUG_IGMP_TRACE) {
  70                 vty_out(vty, "debug igmp trace\n");
  71                 ++writes;
  72         }
  73
  74         if (PIM_DEBUG_MROUTE) {
  75                 vty_out(vty, "debug mroute\n");
  76                 ++writes;
  77         }
  78
  79         if (PIM_DEBUG_MTRACE) {
  80                 vty_out(vty, "debug mtrace\n");
  81                 ++writes;
  82         }
  83
  84         if (PIM_DEBUG_MROUTE_DETAIL_ONLY) {
  85                 vty_out(vty, "debug mroute detail\n");
  86                 ++writes;
  87         }
  88
  89         if (PIM_DEBUG_PIM_EVENTS) {
  90                 vty_out(vty, "debug pim events\n");
  91                 ++writes;
  92         }
  93         if (PIM_DEBUG_PIM_PACKETS) {
  94                 vty_out(vty, "debug pim packets\n");
  95                 ++writes;
  96         }
  97         if (PIM_DEBUG_PIM_PACKETDUMP_SEND) {
  98                 vty_out(vty, "debug pim packet-dump send\n");
  99                 ++writes;
 100         }
 101         if (PIM_DEBUG_PIM_PACKETDUMP_RECV) {
 102                 vty_out(vty, "debug pim packet-dump receive\n");
 103                 ++writes;
 104         }
 105
 106         if (PIM_DEBUG_PIM_TRACE) {
 107                 vty_out(vty, "debug pim trace\n");
 108                 ++writes;
 109         }
 110         if (PIM_DEBUG_PIM_TRACE_DETAIL_ONLY) {
 111                 vty_out(vty, "debug pim trace detail\n");
 112                 ++writes;
 113         }
 114
 115         if (PIM_DEBUG_ZEBRA) {
 116                 vty_out(vty, "debug pim zebra\n");
 117                 ++writes;
 118         }
 119
 120         if (PIM_DEBUG_MLAG) {
 121                 vty_out(vty, "debug pim mlag\n");
 122                 ++writes;
 123         }
 124
 125         if (PIM_DEBUG_BSM) {
 126                 vty_out(vty, "debug pim bsm\n");
 127                 ++writes;
 128         }
 129
 130         if (PIM_DEBUG_VXLAN) {
 131                 vty_out(vty, "debug pim vxlan\n");
 132                 ++writes;
 133         }
 134
 135         if (PIM_DEBUG_SSMPINGD) {
 136                 vty_out(vty, "debug ssmpingd\n");
 137                 ++writes;
 138         }
 139
 140         if (PIM_DEBUG_PIM_HELLO) {
 141                 vty_out(vty, "debug pim packets hello\n");
 142                 ++writes;
 143         }
 144
 145         if (PIM_DEBUG_PIM_J_P) {
 146                 vty_out(vty, "debug pim packets joins\n");
 147                 ++writes;
 148         }
 149
 150         if (PIM_DEBUG_PIM_REG) {
 151                 vty_out(vty, "debug pim packets register\n");
 152                 ++writes;
 153         }
 154
 155         if (PIM_DEBUG_STATIC) {
 156                 vty_out(vty, "debug pim static\n");
 157                 ++writes;
 158         }
 159
 160         if (PIM_DEBUG_PIM_NHT) {
 161                 vty_out(vty, "debug pim nht\n");
 162                 ++writes;
 163         }
 164
 165         return writes;
 166 }
 167
 168 int pim_global_config_write_worker(struct pim_instance *pim, struct vty *vty)
 169 {
 170         int writes = 0;
 171         struct pim_ssm *ssm = pim->ssm_info;
 172         char spaces[10];
 173
 174         if (pim->vrf_id == VRF_DEFAULT)
 175                 snprintf(spaces, sizeof(spaces), "%s", "");
 176         else
 177                 snprintf(spaces, sizeof(spaces), "%s", " ");
 178
 179         writes += pim_msdp_peer_config_write(vty, pim, spaces);
 180         writes += pim_msdp_config_write(pim, vty, spaces);
 181
 182         if (!pim->send_v6_secondary) {
 183                 vty_out(vty, "%sno ip pim send-v6-secondary\n", spaces);
 184                 ++writes;
 185         }
 186
 187         writes += pim_rp_config_write(pim, vty, spaces);
 188
 189         if (router->register_suppress_time
 190             != PIM_REGISTER_SUPPRESSION_TIME_DEFAULT) {
 191                 vty_out(vty, "%sip pim register-suppress-time %d\n", spaces,
 192                         router->register_suppress_time);
 193                 ++writes;
 194         }
 195         if (router->t_periodic != PIM_DEFAULT_T_PERIODIC) {
 196                 vty_out(vty, "%sip pim join-prune-interval %d\n", spaces,
 197                         router->t_periodic);
 198                 ++writes;
 199         }
 200         if (pim->keep_alive_time != PIM_KEEPALIVE_PERIOD) {
 201                 vty_out(vty, "%sip pim keep-alive-timer %d\n", spaces,
 202                         pim->keep_alive_time);
 203                 ++writes;
 204         }
 205         if (pim->rp_keep_alive_time != (unsigned int)PIM_RP_KEEPALIVE_PERIOD) {
 206                 vty_out(vty, "%sip pim rp keep-alive-timer %d\n", spaces,
 207                         pim->rp_keep_alive_time);
 208                 ++writes;
 209         }
 210         if (router->packet_process != PIM_DEFAULT_PACKET_PROCESS) {
 211                 vty_out(vty, "%sip pim packets %d\n", spaces,
 212                         router->packet_process);
 213                 ++writes;
 214         }
 215         if (ssm->plist_name) {
 216                 vty_out(vty, "%sip pim ssm prefix-list %s\n", spaces,
 217                         ssm->plist_name);
 218                 ++writes;
 219         }
 220         if (pim->register_plist) {
 221                 vty_out(vty, "%sip pim register-accept-list %s\n", spaces,
 222                         pim->register_plist);
 223                 ++writes;
 224         }
 225         if (pim->spt.switchover == PIM_SPT_INFINITY) {
 226                 if (pim->spt.plist)
 227                         vty_out(vty,
 228                                 "%sip pim spt-switchover infinity-and-beyond prefix-list %s\n",
 229                                 spaces, pim->spt.plist);
 230                 else
 231                         vty_out(vty,
 232                                 "%sip pim spt-switchover infinity-and-beyond\n",
 233                                 spaces);
 234                 ++writes;
 235         }
 236         if (pim->ecmp_rebalance_enable) {
 237                 vty_out(vty, "%sip pim ecmp rebalance\n", spaces);
 238                 ++writes;
 239         } else if (pim->ecmp_enable) {
 240                 vty_out(vty, "%sip pim ecmp\n", spaces);
 241                 ++writes;
 242         }
 243
 244         if (pim->igmp_watermark_limit != 0) {
 245                 vty_out(vty, "%sip igmp watermark-warn %u\n", spaces,
 246                         pim->igmp_watermark_limit);
 247                 ++writes;
 248         }
 249
 250         if (pim->ssmpingd_list) {
 251                 struct listnode *node;
 252                 struct ssmpingd_sock *ss;
 253                 ++writes;
 254                 for (ALL_LIST_ELEMENTS_RO(pim->ssmpingd_list, node, ss)) {
 255                         char source_str[INET_ADDRSTRLEN];
 256                         pim_inet4_dump("<src?>", ss->source_addr, source_str,
 257                                        sizeof(source_str));
 258                         vty_out(vty, "%sip ssmpingd %s\n", spaces, source_str);
 259                         ++writes;
 260                 }
 261         }
 262
 263         return writes;
 264 }
 265
 266 int pim_interface_config_write(struct vty *vty)
 267 {
 268         struct pim_instance *pim;
 269         struct interface *ifp;
 270         struct vrf *vrf;
 271         int writes = 0;
 272
 273         RB_FOREACH (vrf, vrf_name_head, &vrfs_by_name) {
 274                 pim = vrf->info;
 275                 if (!pim)
 276                         continue;
 277
 278                 FOR_ALL_INTERFACES (pim->vrf, ifp) {
 279                         /* pim is enabled internally/implicitly on the vxlan
 280                          * termination device ipmr-lo. skip displaying that
 281                          * config to avoid confusion
 282                          */
 283                         if (pim_vxlan_is_term_dev_cfg(pim, ifp))
 284                                 continue;
 285
 286                         /* IF name */
 287                         if (vrf->vrf_id == VRF_DEFAULT)
 288                                 vty_frame(vty, "interface %s\n", ifp->name);
 289                         else
 290                                 vty_frame(vty, "interface %s vrf %s\n",
 291                                           ifp->name, vrf->name);
 292                         ++writes;
 293
 294                         if (ifp->desc) {
 295                                 vty_out(vty, " description %s\n", ifp->desc);
 296                                 ++writes;
 297                         }
 298
 299                         if (ifp->info) {
 300                                 struct pim_interface *pim_ifp = ifp->info;
 301
 302                                 if (PIM_IF_TEST_PIM(pim_ifp->options)) {
 303                                         vty_out(vty, " ip pim\n");
 304                                         ++writes;
 305                                 }
 306
 307                                 /* IF ip pim drpriority */
 308                                 if (pim_ifp->pim_dr_priority
 309                                     != PIM_DEFAULT_DR_PRIORITY) {
 310                                         vty_out(vty, " ip pim drpriority %u\n",
 311                                                 pim_ifp->pim_dr_priority);
 312                                         ++writes;
 313                                 }
 314
 315                                 /* IF ip pim hello */
 316                                 if (pim_ifp->pim_hello_period
 317                                     != PIM_DEFAULT_HELLO_PERIOD) {
 318                                         vty_out(vty, " ip pim hello %d",
 319                                                 pim_ifp->pim_hello_period);
 320                                         if (pim_ifp->pim_default_holdtime != -1)
 321                                                 vty_out(vty, " %d",
 322                                                         pim_ifp->pim_default_holdtime);
 323                                         vty_out(vty, "\n");
 324                                         ++writes;
 325                                 }
 326
 327                                 /* update source */
 328                                 if (PIM_INADDR_ISNOT_ANY(
 329                                             pim_ifp->update_source)) {
 330                                         char src_str[INET_ADDRSTRLEN];
 331                                         pim_inet4_dump("<src?>",
 332                                                        pim_ifp->update_source,
 333                                                        src_str,
 334                                                        sizeof(src_str));
 335                                         vty_out(vty, " ip pim use-source %s\n",
 336                                                 src_str);
 337                                         ++writes;
 338                                 }
 339
 340                                 /* IF ip igmp */
 341                                 if (PIM_IF_TEST_IGMP(pim_ifp->options)) {
 342                                         vty_out(vty, " ip igmp\n");
 343                                         ++writes;
 344                                 }
 345
 346                                 /* ip igmp version */
 347                                 if (pim_ifp->igmp_version
 348                                     != IGMP_DEFAULT_VERSION) {
 349                                         vty_out(vty, " ip igmp version %d\n",
 350                                                 pim_ifp->igmp_version);
 351                                         ++writes;
 352                                 }
 353
 354                                 /* IF ip igmp query-max-response-time */
 355                                 if (pim_ifp->igmp_query_max_response_time_dsec
 356                                     != IGMP_QUERY_MAX_RESPONSE_TIME_DSEC) {
 357                                         vty_out(vty,
 358                                                 " ip igmp query-max-response-time %d\n",
 359                                                 pim_ifp->igmp_query_max_response_time_dsec);
 360                                         ++writes;
 361                                 }
 362
 363                                 /* IF ip igmp query-interval */
 364                                 if (pim_ifp->igmp_default_query_interval
 365                                     != IGMP_GENERAL_QUERY_INTERVAL) {
 366                                         vty_out(vty,
 367                                                 " ip igmp query-interval %d\n",
 368                                                 pim_ifp->igmp_default_query_interval);
 369                                         ++writes;
 370                                 }
 371
 372                                 /* IF ip igmp last-member_query-count */
 373                                 if (pim_ifp->igmp_last_member_query_count
 374                                     != IGMP_DEFAULT_ROBUSTNESS_VARIABLE) {
 375                                         vty_out(vty,
 376                                                 " ip igmp last-member-query-count %d\n",
 377                                                 pim_ifp->igmp_last_member_query_count);
 378                                         ++writes;
 379                                 }
 380
 381                                 /* IF ip igmp last-member_query-interval */
 382                                 if (pim_ifp->igmp_specific_query_max_response_time_dsec
 383                                     != IGMP_SPECIFIC_QUERY_MAX_RESPONSE_TIME_DSEC) {
 384                                         vty_out(vty,
 385                                                 " ip igmp last-member-query-interval %d\n",
 386                                                 pim_ifp->igmp_specific_query_max_response_time_dsec);
 387                                           ++writes;
 388                                 }
 389
 390                                 /* IF ip igmp join */
 391                                 if (pim_ifp->igmp_join_list) {
 392                                         struct listnode *node;
 393                                         struct igmp_join *ij;
 394                                         for (ALL_LIST_ELEMENTS_RO(
 395                                                      pim_ifp->igmp_join_list,
 396                                                      node, ij)) {
 397                                                 char group_str[INET_ADDRSTRLEN];
 398                                                 char source_str
 399                                                         [INET_ADDRSTRLEN];
 400                                                 pim_inet4_dump(
 401                                                         "<grp?>",
 402                                                         ij->group_addr,
 403                                                         group_str,
 404                                                         sizeof(group_str));
 405                                                 if (ij->source_addr.s_addr == INADDR_ANY) {
 406                                                         vty_out(vty,
 407                                                                 " ip igmp join %s\n",
 408                                                                 group_str);
 409                                                 } else {
 410                                                         inet_ntop(AF_INET,
 411                                                                   &ij->source_addr,
 412                                                                   source_str,
 413                                                                   sizeof(source_str));
 414                                                         vty_out(vty,
 415                                                                 " ip igmp join %s %s\n",
 416                                                                 group_str, source_str);
 417                                                 }
 418                                                 ++writes;
 419                                         }
 420                                 }
 421
 422                                 if (pim_ifp->activeactive)
 423                                         vty_out(vty, " ip pim active-active\n");
 424
 425                                 /* boundary */
 426                                 if (pim_ifp->boundary_oil_plist) {
 427                                         vty_out(vty,
 428                                                 " ip multicast boundary oil %s\n",
 429                                                 pim_ifp->boundary_oil_plist);
 430                                         ++writes;
 431                                 }
 432
 433                                 writes +=
 434                                         pim_static_write_mroute(pim, vty, ifp);
 435                                 pim_bsm_write_config(vty, ifp);
 436                                 ++writes;
 437                                 pim_bfd_write_config(vty, ifp);
 438                                 ++writes;
 439                         }
 440                         vty_endframe(vty, "!\n");
 441                         ++writes;
 442                 }
 443         }
 444
 445         return writes;
 446 }