Viewing file:  dict.php (2.27 KB) -rw-r--r--
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
#!/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;
}
// }}}
|