[BACK]Return to extract.pl CVS log [TXT] [DIR] Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / quagga / vtysh

Diff for /embedaddon/quagga/vtysh/extract.pl between versions 1.1 and 1.1.1.3

version 1.1, 2012/02/21 17:26:12 version 1.1.1.3, 2013/07/21 23:54:40
Line 1 Line 1
#! #! /usr/bin/perl
 ##  ##
 ## vtysh/extract.pl.  Generated from extract.pl.in by configure.  ## vtysh/extract.pl.  Generated from extract.pl.in by configure.
 ##  ##
Line 37  $ignore{'"router ripng"'} = "ignore"; Line 37  $ignore{'"router ripng"'} = "ignore";
 $ignore{'"router ospf"'} = "ignore";  $ignore{'"router ospf"'} = "ignore";
 $ignore{'"router ospf <0-65535>"'} = "ignore";  $ignore{'"router ospf <0-65535>"'} = "ignore";
 $ignore{'"router ospf6"'} = "ignore";  $ignore{'"router ospf6"'} = "ignore";
   $ignore{'"router babel"'} = "ignore";
 $ignore{'"router bgp " "<1-4294967295>"'} = "ignore";  $ignore{'"router bgp " "<1-4294967295>"'} = "ignore";
 $ignore{'"router bgp " "<1-4294967295>" " view WORD"'} = "ignore";  $ignore{'"router bgp " "<1-4294967295>" " view WORD"'} = "ignore";
 $ignore{'"router isis WORD"'} = "ignore";  $ignore{'"router isis WORD"'} = "ignore";
Line 62  $ignore{'"show history"'} = "ignore"; Line 63  $ignore{'"show history"'} = "ignore";
 foreach (@ARGV) {  foreach (@ARGV) {
     $file = $_;      $file = $_;
   
    open (FH, "cpp -DHAVE_CONFIG_H -DVTYSH_EXTRACT_PL -DHAVE_IPV6 -I.. -I./ -I./.. -I../lib -I../isisd/topology  $file |");    open (FH, "gcc -E -DHAVE_CONFIG_H -DVTYSH_EXTRACT_PL -DHAVE_IPV6 -I.. -I./ -I./.. -I../lib -I../lib -I../isisd/topology  $file |");
     local $/; undef $/;      local $/; undef $/;
     $line = <FH>;      $line = <FH>;
     close (FH);      close (FH);
   
     @defun = ($line =~ /(?:DEFUN|ALIAS)\s*\((.+?)\);?\s?\s?\n/sg);      @defun = ($line =~ /(?:DEFUN|ALIAS)\s*\((.+?)\);?\s?\s?\n/sg);
    @install = ($line =~ /install_element \(\s*[0-9A-Z_]+,\s*&[^;]*;\s*\n/sg);    @install = ($line =~ /install_element\s*\(\s*[0-9A-Z_]+,\s*&[^;]*;\s*\n/sg);
   
     # DEFUN process      # DEFUN process
     foreach (@defun) {      foreach (@defun) {
Removed from v.1.1  
changed lines
  Added in v.1.1.1.3

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>