Skip to Main Content
Hacking: The Next Generation
book

Hacking: The Next Generation

by Nitesh Dhanjani, Billy Rios, Brett Hardin
August 2009
Beginner content levelBeginner
298 pages
9h 5m
English
O'Reilly Media, Inc.
Content preview from Hacking: The Next Generation

Appendix B. Cache_Snoop.pl

Cache_snoop.pl is a script to aid in exploiting DNS servers that are susceptible to DNS cache snooping. The script enumerates a list of domain names, obtained from a text file, and verifies whether the remote DNS server contains a record for any given domain name. In addition, the script compares the TTL value obtained from the authoritative name server to see when the record was originally requested.

#!/usr/bin/perl # cache_snoop.pl # Developed by: Brett Hardin $version = "1.0"; use Getopt::Long; my $options = GetOptions ( "help" => \$help, "save" => \$save, "dns=s" => \$dns_server, "ttl" => \$ttl_option, "queries=s" => \$queries ); if($help ne "") { &Help; } if($dns_server eq "") { die "Usage: cache_snoop.pl -dns <DNS IP> -queries <QUERY FILE>\n"; } open(FILE, $queries) or die "Usage: cache_snoop.pl -dns <DNS IP> -queries <QUERY FILE>\n"; @sites = <FILE>; #FIRST RUN IS FOR FINDING OUT DEFAULT TTL if($ttl_option ne "") { print "Finding Default TTL's...\n"; &default_TTL; } for $site (@sites) { chomp($site); $default_TTL = $TTL_list{$site}; if($site =~ /^\#/) { print $site . "\n"; next; } if($site =~ /^$/) { print "\n"; next;} $results = `dig \@$dns_server $site A +norecurse`; if ($results =~ /ANSWER: 0,/) { print "[NO] " . $site . " not visited\n"; } else { @edited_result = split(/\n/, $results); @greped_result = grep(/^$site\./, @edited_result); @A_Broke = split(/\s+/, $greped_result[0]); $TTL = $A_Broke[1]; print "[YES] " . $site . " ($TTL"; if($ttl_option ...
Become an O’Reilly member and get unlimited access to this title plus top books and audiobooks from O’Reilly and nearly 200 top publishers, thousands of courses curated by job role, 150+ live events each month,
and much more.
Start your free trial

You might also like

Building a Modern Security Program

Building a Modern Security Program

Zane Lackey, Rebecca Huehls
Network Security Hacks

Network Security Hacks

Andrew Lockhart
Ransomware

Ransomware

Allan Liska, Timothy Gallo

Publisher Resources

ISBN: 9780596806309Errata Page