Linux ns1.utparral.edu.mx 6.8.0-79-generic #79~22.04.1-Ubuntu SMP PREEMPT_DYNAMIC Fri Aug 15 16:54:53 UTC 2 x86_64
Apache/2.4.58 (Unix) OpenSSL/1.1.1w PHP/8.2.12 mod_perl/2.0.12 Perl/v5.34.1
: 10.10.1.9 | : 10.10.1.254
Cant Read [ /etc/named.conf ]
daemon
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
README
+ Create Folder
+ Create File
/
opt /
lampp /
lib /
php /
doc /
Net_Dict /
docs /
[ HOME SHELL ]
Name
Size
Permission
Action
dict.php
2.27
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : dict.php
#!/usr/local/bin/php -q <?php // {{{ includes require 'Console/Getopt.php'; require 'Net/Dict.php'; // }}} // {{{ get options $longOptions = array('help', 'match=', 'databases', 'strategies', 'info=', 'server', 'status'); $con = new Console_Getopt; $args = $con->readPHPArgv(); // array_shift($args); $options = $con->getopt($args, '', $longOptions); if (PEAR::isError($options)) { die($options->getMessage()); } // }}} // {{{ help! function help() { echo <<<HELP Usage: dict [OPTIONS] keyword Options: --help Prints this help screen --matches=word Show DB matches for word --databases Show DB list --strategies Show Strategy list --info=DATABASE Show Info on DB --server Show Server Info --status Show Status HELP; exit(0); } if ('--help' == $options[0][0][0] or ( empty($options[0][0][0]) and empty($options[1][0]) ) ) help(); // }}} // {{{ connect $d = new Net_Dict; $conn = $d->connect(); if (PEAR::isError($conn)) { die($conn->getMessage()); } // }}} // {{{ define if (!empty($options[1][0])) { foreach ($options[1] as $keyword) { $defs = $d->define($keyword); if (PEAR::isError($defs)) { die($defs->getMessage()); } foreach ($defs as $def) { echo $def['definition']; } } } // }}} // {{{ options switch ($options[0][0][0]) { case '--help': help(); break; case '--match': foreach($d->match($options[0][0][1]) as $matches) echo $matches['database'] . ' : ' . $matches['word'] . "\n"; break; case '--databases': foreach ($d->showDatabases() as $db) echo $db['database'] . ' : ' . $db['description']."\n"; break; case '--strategies': foreach ($d->showStrategies() as $strat) echo $strat['strategy'] . ' : ' . $strat['description'] . "\n"; break; case '--info': $info = $d->showInfo($options[0][0][1]); if (PEAR::isError($info)) die($info->getMessage()); echo $info; break; case '--server': $server = $d->showServer(); if (PEAR::isError($server)) die($server->getMessage()); echo $server; break; case '--status': echo $d->status(); break; default: break; } // }}}
Close