# # Configuration for the DNS Sleuth # (c) 1999--2001 Martin Mares # # This file is just a piece of Perl code imported during # initialization of the Sleuth script, so you can do here # any Perl magic you wish. # # Path to the DNS module #push @INC, "/home/mj/perl/lib/site_perl"; # Hosts we check recursive resolving on @test_hosts = ( 'www.ucw.cz', 'atrey.karlin.mff.cuni.cz', 'metalab.unc.edu' ); # Assign categories to all error messages: # '0' ignore # '.' informational message # 'W' warning # 'E' error # 'F' fatal error # Consult the README for a list of all the check names. %sev = %{{ 'selfa' => 'E', 'badname' => 'E', 'badrn' => 'E', 'xtoplev' => 'F', 'alknown' => 'F', 'snauth' => 'F', 'axfer' => 'E', 'twons' => 'E', 'reserr' => 'E', 'pcname' => 'E', 'rcname' => 'E', 'badrev' => 'E', 'norev' => 'E', 'inexrev' => 'W', 'soamail' => 'E', 'soammx' => 'E', 'soaamx' => 'W', 'soammxa' => 'E', 'soaorg' => 'E', 'recchk' => 'W', 'nolocal' => 'W', 'badloc' => 'E', 'revloc' => 'W', 'nosecns' => 'E', 'badrevn' => 'E', 'badrevr' => 'E', 'arev' => 'W', 'outzone' => 'E', 'wildac' => 'W', 'wild' => 'W', 'revcn' => 'E', 'ptrnoa' => 'E', 'ptrbada' => 'E', 'reccn' => 'E', 'suspcn' => 'W', 'dangcn' => 'E', 'dangcnr' => 'W', 'missa' => 'E', 'obsrec' => 'E', 'supsoa' => 'E', 'ptrfwd' => 'W', 'mxpref' => 'E', 'cnclash' => 'E', 'lamer' => 'E', 'oodsec' => 'E', 'alldig' => 'E', 'privadr' => 'W', 'suspttl' => 'W', 'unxtype' => 'W', 'suspexp' => 'W', 'suspmtl' => 'W', 'wks' => 'W', 'ornotns' => 'W', 'diffns' => 'E', 'duprec' => 'E', 'unkrevz' => 'E', 'srvnam' => 'E', 'srvpar' => 'E', 'srvdest' => 'E', 'ipaname' => 'E', 'needaa' => 'E', 'zcname' => 'F', # These have to be fatal 'znexist' => 'F', 'nonsa' => 'F', 'missns' => 'F', 'dnserr' => 'F', 'utoplev' => 'F', 'rtoplev' => 'F', 'noserv' => 'F', '*' => '*', # Internal use only, don't modify '>' => '>', '.' => '.' }}; # URL for RFC references and RFC section references $rfc_url = '"http://www.cis.ohio-state.edu/cgi-bin/rfc/rfc$1.html"'; $rfc_sec_url = '"http://www.cis.ohio-state.edu/cgi-bin/rfc/rfc$1.html#sec-$2"'; 1; # To make file loading successful :)