1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116
|
#!perl -T
use strict;
use Test::More;
use Net::Pcap;
plan tests => 102;
# check that the following functions are available (old API)
can_ok( 'Net::Pcap', 'Net::Pcap::lookupdev' );
can_ok( 'Net::Pcap', 'Net::Pcap::findalldevs' );
can_ok( 'Net::Pcap', 'Net::Pcap::lookupnet' );
can_ok( 'Net::Pcap', 'Net::Pcap::open_live' );
can_ok( 'Net::Pcap', 'Net::Pcap::open_dead' );
can_ok( 'Net::Pcap', 'Net::Pcap::setnonblock' );
can_ok( 'Net::Pcap', 'Net::Pcap::getnonblock' );
can_ok( 'Net::Pcap', 'Net::Pcap::loop' );
can_ok( 'Net::Pcap', 'Net::Pcap::open_offline' );
can_ok( 'Net::Pcap', 'Net::Pcap::close' );
can_ok( 'Net::Pcap', 'Net::Pcap::dispatch' );
can_ok( 'Net::Pcap', 'Net::Pcap::next' );
can_ok( 'Net::Pcap', 'Net::Pcap::next_ex' );
can_ok( 'Net::Pcap', 'Net::Pcap::compile' );
can_ok( 'Net::Pcap', 'Net::Pcap::compile_nopcap' );
can_ok( 'Net::Pcap', 'Net::Pcap::freecode' );
can_ok( 'Net::Pcap', 'Net::Pcap::setfilter' );
can_ok( 'Net::Pcap', 'Net::Pcap::dump_open' );
can_ok( 'Net::Pcap', 'Net::Pcap::dump' );
can_ok( 'Net::Pcap', 'Net::Pcap::dump_flush' );
can_ok( 'Net::Pcap', 'Net::Pcap::dump_file' );
can_ok( 'Net::Pcap', 'Net::Pcap::dump_close' );
can_ok( 'Net::Pcap', 'Net::Pcap::datalink' );
can_ok( 'Net::Pcap', 'Net::Pcap::set_datalink' );
can_ok( 'Net::Pcap', 'Net::Pcap::datalink_name_to_val' );
can_ok( 'Net::Pcap', 'Net::Pcap::datalink_val_to_name' );
can_ok( 'Net::Pcap', 'Net::Pcap::datalink_val_to_description' );
can_ok( 'Net::Pcap', 'Net::Pcap::snapshot' );
can_ok( 'Net::Pcap', 'Net::Pcap::is_swapped' );
can_ok( 'Net::Pcap', 'Net::Pcap::major_version' );
can_ok( 'Net::Pcap', 'Net::Pcap::minor_version' );
can_ok( 'Net::Pcap', 'Net::Pcap::lib_version' );
can_ok( 'Net::Pcap', 'Net::Pcap::stats' );
can_ok( 'Net::Pcap', 'Net::Pcap::file' );
can_ok( 'Net::Pcap', 'Net::Pcap::fileno' );
can_ok( 'Net::Pcap', 'Net::Pcap::get_selectable_fd' );
can_ok( 'Net::Pcap', 'Net::Pcap::geterr' );
can_ok( 'Net::Pcap', 'Net::Pcap::strerror' );
can_ok( 'Net::Pcap', 'Net::Pcap::perror' );
can_ok( 'Net::Pcap', 'Net::Pcap::createsrcstr' );
can_ok( 'Net::Pcap', 'Net::Pcap::parsesrcstr' );
can_ok( 'Net::Pcap', 'Net::Pcap::getevent' );
can_ok( 'Net::Pcap', 'Net::Pcap::open' );
can_ok( 'Net::Pcap', 'Net::Pcap::sendpacket' );
can_ok( 'Net::Pcap', 'Net::Pcap::setbuff' );
can_ok( 'Net::Pcap', 'Net::Pcap::setuserbuffer' );
can_ok( 'Net::Pcap', 'Net::Pcap::setmintocopy' );
can_ok( 'Net::Pcap', 'Net::Pcap::setmode' );
can_ok( 'Net::Pcap', 'Net::Pcap::sendqueue_alloc' );
can_ok( 'Net::Pcap', 'Net::Pcap::sendqueue_queue' );
can_ok( 'Net::Pcap', 'Net::Pcap::sendqueue_transmit' );
# check that the following functions are available (new API)
can_ok( 'Net::Pcap', 'pcap_lookupdev' );
can_ok( 'Net::Pcap', 'pcap_findalldevs' );
can_ok( 'Net::Pcap', 'pcap_lookupnet' );
can_ok( 'Net::Pcap', 'pcap_open_live' );
can_ok( 'Net::Pcap', 'pcap_open_dead' );
can_ok( 'Net::Pcap', 'pcap_setnonblock' );
can_ok( 'Net::Pcap', 'pcap_getnonblock' );
can_ok( 'Net::Pcap', 'pcap_loop' );
can_ok( 'Net::Pcap', 'pcap_open_offline' );
can_ok( 'Net::Pcap', 'pcap_close' );
can_ok( 'Net::Pcap', 'pcap_dispatch' );
can_ok( 'Net::Pcap', 'pcap_next' );
can_ok( 'Net::Pcap', 'pcap_next_ex' );
can_ok( 'Net::Pcap', 'pcap_compile' );
can_ok( 'Net::Pcap', 'pcap_compile_nopcap' );
can_ok( 'Net::Pcap', 'pcap_freecode' );
can_ok( 'Net::Pcap', 'pcap_setfilter' );
can_ok( 'Net::Pcap', 'pcap_dump_open' );
can_ok( 'Net::Pcap', 'pcap_dump' );
can_ok( 'Net::Pcap', 'pcap_dump_flush' );
can_ok( 'Net::Pcap', 'pcap_dump_file' );
can_ok( 'Net::Pcap', 'pcap_dump_close' );
can_ok( 'Net::Pcap', 'pcap_datalink' );
can_ok( 'Net::Pcap', 'pcap_set_datalink' );
can_ok( 'Net::Pcap', 'pcap_datalink_name_to_val' );
can_ok( 'Net::Pcap', 'pcap_datalink_val_to_name' );
can_ok( 'Net::Pcap', 'pcap_datalink_val_to_description' );
can_ok( 'Net::Pcap', 'pcap_snapshot' );
can_ok( 'Net::Pcap', 'pcap_is_swapped' );
can_ok( 'Net::Pcap', 'pcap_major_version' );
can_ok( 'Net::Pcap', 'pcap_minor_version' );
can_ok( 'Net::Pcap', 'pcap_lib_version' );
can_ok( 'Net::Pcap', 'pcap_stats' );
can_ok( 'Net::Pcap', 'pcap_file' );
can_ok( 'Net::Pcap', 'pcap_fileno' );
can_ok( 'Net::Pcap', 'pcap_get_selectable_fd' );
can_ok( 'Net::Pcap', 'pcap_geterr' );
can_ok( 'Net::Pcap', 'pcap_strerror' );
can_ok( 'Net::Pcap', 'pcap_perror' );
can_ok( 'Net::Pcap', 'pcap_createsrcstr' );
can_ok( 'Net::Pcap', 'pcap_parsesrcstr' );
can_ok( 'Net::Pcap', 'pcap_getevent' );
can_ok( 'Net::Pcap', 'pcap_open' );
can_ok( 'Net::Pcap', 'pcap_sendpacket' );
can_ok( 'Net::Pcap', 'pcap_setbuff' );
can_ok( 'Net::Pcap', 'pcap_setuserbuffer' );
can_ok( 'Net::Pcap', 'pcap_setmintocopy' );
can_ok( 'Net::Pcap', 'pcap_setmode' );
can_ok( 'Net::Pcap', 'pcap_sendqueue_alloc' );
can_ok( 'Net::Pcap', 'pcap_sendqueue_queue' );
can_ok( 'Net::Pcap', 'pcap_sendqueue_transmit' );
|