From: Anti V. <du...@us...> - 2004-03-30 20:49:18
|
Update of /cvsroot/tuxaator/tuxaator In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22387 Modified Files: BotCore.pm HELP insult.txt tux.sql tuxaator Log Message: + assorted fixes Index: tux.sql =================================================================== RCS file: /cvsroot/tuxaator/tuxaator/tux.sql,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** tux.sql 17 Jul 2002 09:33:05 -0000 1.5 --- tux.sql 30 Mar 2004 20:37:05 -0000 1.6 *************** *** 9,38 **** -- ! CREATE TABLE terms ( ! term varchar(60) NOT NULL default '', ! story text, ! counter int(11) default '0', ! nick varchar(12) default NULL, ! userhost varchar(200) default NULL, ! changed datetime default NULL, ! history int(11) default '1', ! operation smallint(6) default '1', ! UNIQUE KEY terms (term,history), ! KEY term (term) ) TYPE=MyISAM; -- ! -- Table structure for table 'users' -- ! CREATE TABLE users ( ! nick char(12) NOT NULL default '', ! timestamp timestamp(14) NOT NULL, ! status tinyint(4) default NULL, ! lastmsg char(255) default NULL, ! UNIQUE KEY nick (nick) ! ) TYPE=MyISAM; -- -- Table structure for table 'wanted' -- --- 9,54 ---- -- ! CREATE TABLE `terms` ( ! `term` varchar(60) NOT NULL default '', ! `story` text, ! `counter` int(10) unsigned default '0', ! `nick` varchar(50) NOT NULL default '', ! `userhost` varchar(200) NOT NULL default '', ! `changed` datetime NOT NULL default '0000-00-00 00:00:00', ! `id` bigint(20) unsigned NOT NULL auto_increment, ! PRIMARY KEY (`id`), ! KEY `term` (`term`) ) TYPE=MyISAM; -- ! -- table structure for table 'history' -- ! CREATE TABLE `history` ( ! `term` varchar(60) NOT NULL default '', ! `story` text, ! `counter` int(10) unsigned default '0', ! `nick` varchar(50) NOT NULL default '', ! `userhost` varchar(200) NOT NULL default '', ! `changed` datetime NOT NULL default '0000-00-00 00:00:00', ! `history` int(11) default '1', ! `operation` smallint(6) default '1', ! `id` bigint(20) unsigned NOT NULL auto_increment, ! PRIMARY KEY (`id`), ! KEY `term` (`term`) ! ) TYPE=MyISAM -- + -- table structure for table 'users' + -- + + CREATE TABLE `users` ( + `nick` char(50) NOT NULL default '', + `timestamp` timestamp(14) NOT NULL, + `status` tinyint(4) NOT NULL default '0', + `lastmsg` char(255) NOT NULL default '', + UNIQUE KEY `nick` (`nick`) + ) TYPE=MyISAM; + -- -- Table structure for table 'wanted' -- *************** *** 44,107 **** ) TYPE=MyISAM; - -- - -- Table structure for table 'xjump' - -- - - CREATE TABLE xjump ( - id bigint(20) unsigned NOT NULL auto_increment, - name char(255) default NULL, - score bigint(20) unsigned default NULL, - host char(255) default NULL, - time bigint(20) default NULL, - wasted_time bigint(20) unsigned default NULL, - PRIMARY KEY (id), - KEY name (name), - KEY score (score) - ) TYPE=MyISAM; - - -- - -- Table structure for table 'xjump_users' - -- - - CREATE TABLE xjump_users ( - id bigint(20) unsigned NOT NULL auto_increment, - name char(255) default NULL, - top bigint(20) unsigned default NULL, - time bigint(20) unsigned default '0', - wasted_time bigint(20) unsigned default '0', - host char(255) default NULL, - PRIMARY KEY (id), - KEY name (name) - ) TYPE=MyISAM; - - -- - -- Table structure for table 'xpipeman' - -- - - CREATE TABLE xpipeman ( - id bigint(20) unsigned NOT NULL auto_increment, - name char(255) default NULL, - score bigint(20) unsigned default NULL, - host char(255) default NULL, - time bigint(20) default NULL, - wasted_time bigint(20) default NULL, - PRIMARY KEY (id), - KEY name (name), - KEY score (score) - ) TYPE=MyISAM; - - -- - -- Table structure for table 'xpipeman_users' - -- - - CREATE TABLE xpipeman_users ( - id bigint(20) unsigned NOT NULL auto_increment, - name char(255) default NULL, - top bigint(20) default NULL, - time bigint(20) default NULL, - wasted_time bigint(20) default NULL, - host char(255) default NULL, - PRIMARY KEY (id), - KEY name (name) - ) TYPE=MyISAM; - --- 60,61 ---- Index: BotCore.pm =================================================================== RCS file: /cvsroot/tuxaator/tuxaator/BotCore.pm,v retrieving revision 1.7 retrieving revision 1.8 diff -C2 -d -r1.7 -r1.8 *** BotCore.pm 20 Dec 2003 23:01:21 -0000 1.7 --- BotCore.pm 30 Mar 2004 20:37:05 -0000 1.8 *************** *** 48,51 **** --- 48,56 ---- my $allowed = 0; my ($key,$value); + # since regexps are allowed, there is no other way to + # do this check + + # and just perhaps I should figure out a new way to + # do user acl checks while (($key, $value) = each %{$class->{"users"}}) { *************** *** 85,88 **** --- 90,97 ---- } + sub load_plugin_config { + print "loading plugin config!\n"; + } + sub load_messages { my $basedir = shift; *************** *** 176,183 **** # add a pointer to the module $handlers{$handler}->{'id'} = $id; - #while(my($k1,$v1) = each %{%handlers->{$handler}}) - #{ - # print "k1 = $k1, v1 = $v1\n"; - #}; $self->register_msg_handler($handler,%handlers->{$handler}); }; --- 185,188 ---- *************** *** 208,210 **** --- 213,216 ---- }; + 1; Index: tuxaator =================================================================== RCS file: /cvsroot/tuxaator/tuxaator/tuxaator,v retrieving revision 1.85 retrieving revision 1.86 diff -C2 -d -r1.85 -r1.86 *** tuxaator 21 Dec 2003 18:38:26 -0000 1.85 --- tuxaator 30 Mar 2004 20:37:05 -0000 1.86 *************** *** 12,15 **** --- 12,16 ---- use Plugins::Log; use BotCore; + use Tuxaator::Plugin; use File::Glob ':glob'; my ($irc,$whoami,$driver,$dbh,%last,%plugins,%msg_handlers,$DEBUG); *************** *** 18,21 **** --- 19,23 ---- my $Kernel; my $Log; + my $Plugin; my $basedir = $ENV{'PWD'}; *************** *** 82,85 **** --- 84,88 ---- my @plugins_to_load = bsd_glob('Plugins/*/Plugin.pm'); + # well, dat is no good, I need to way to specify plugins in the ini file foreach my $plugin (@plugins_to_load) { *************** *** 180,183 **** --- 183,187 ---- $Output = new Plugins::Output($conn); $Log = new Plugins::Log($basedir . "/log"); + #$Plugin = new Tuxaator::Plugin($conn,$config); $settings{'nick'} = $config{'nick'}; *************** *** 396,399 **** --- 400,404 ---- } + sub DESTROY { print "teardown!\n"; Index: insult.txt =================================================================== RCS file: /cvsroot/tuxaator/tuxaator/insult.txt,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** insult.txt 17 Jul 2002 09:26:44 -0000 1.1 --- insult.txt 30 Mar 2004 20:37:05 -0000 1.2 *************** *** 2,9 **** {}: sa oled loll nagu lauajalg. Tead {}, mine osta õige üks tükk seepi. - {}: sa oled loll kui leivaauto. Erikuradikinomees sa {} oled, reede 6hta ircus! {}: sa oled yks plekist persega vedruvasikas. {}: k2i jala. {}: kalla end piimaga üle ja pane traktori kõrval põlema. Oh püha perse kiriku laes, kuskohas küll {}'suguseid produtseeritakse. --- 2,9 ---- {}: sa oled loll nagu lauajalg. Tead {}, mine osta õige üks tükk seepi. Erikuradikinomees sa {} oled, reede 6hta ircus! {}: sa oled yks plekist persega vedruvasikas. {}: k2i jala. + {}, sa vana pede, sinu kohta on artikkel: http://www.{}.isgay.com/ {}: kalla end piimaga üle ja pane traktori kõrval põlema. Oh püha perse kiriku laes, kuskohas küll {}'suguseid produtseeritakse. *************** *** 22,39 **** {}: mitu korda ma pean vett tõmbama, et sa ära kaoksid? {}: oled sa alati nii loll või on sul lihtsalt blond hetk?? ! Q: Mida ütles jumal, kui ta {}' lõi? A: Oh shit! ! Q: Kui Emprite State Building'u katuselt kukuvad alla paks neeger ja {}, siis kumb jõuab alla esimesena? A: Pole valge mehe asi. ! Q: Mis on {}' jaoks pikk ja raske? A: Algkool {}: sa pole just karbi kõige kirkam kriit {}: sa oled erakordselt sita väljanägemisega. On see mingi uus trend? ! {}: kumb meist nüüd rohtu peaks võtma? {}: mõni küla on sinu pärast praegu ilma lollita. ! {}: on see kitsehabe või on lind su lõua täis sittunud? {}: palun seisa allatuult. {}: sae pekki. ! Kuule {}, sina kõdunenud kammeljas, sina mädanenud mudakukk, sina solgitud särg, mine osa omale õng. {}: näri muru! ! {}: ime kanni! ! {}: ära plõksi! {}: tead mis, PANE ENNAST PÕLEMA! {}: söö sitta! (miljardid kärbsed ei saa ju ometi valel teel olla) --- 22,38 ---- {}: mitu korda ma pean vett tõmbama, et sa ära kaoksid? {}: oled sa alati nii loll või on sul lihtsalt blond hetk?? ! K: Mida ütles jumal, kui ta {}' tegi? V: Oh shit! ! K: Kui Emprite State Building'u katuselt kukuvad alla paks neeger ja {}, siis kumb jõuab alla esimesena? V: Pole valge mehe asi. ! K: Mis on {}' jaoks pikk ja raske? V: Algkool {}: sa pole just karbi kõige kirkam kriit {}: sa oled erakordselt sita väljanägemisega. On see mingi uus trend? ! {}: kumb meist nüüd mürki peaks võtma? {}: mõni küla on sinu pärast praegu ilma lollita. ! {}: on see kitsehabe või on tuvid su lõua täis sittunud? {}: palun seisa allatuult. {}: sae pekki. ! Kuule {}, sina kõdunenud kammeljas, sina mädanenud mudakukk, sina solgitud särg, mine osta omale õng. {}: näri muru! ! {}: kes sinusugusele kulendile suu andis? {}: tead mis, PANE ENNAST PÕLEMA! {}: söö sitta! (miljardid kärbsed ei saa ju ometi valel teel olla) *************** *** 41,54 **** {}: sa oled meditsiiniline ime {}: sa näed ikka vahva välja! See kleit su seljas on pilapoest, eks? ! {}: milline seitmsest pöialpoisist Sina oled? {}: kao eemale! Sa seisad mu aura peal! . o O ( Kus on geenipolitsei? Siin on mingi jälk {} ) O o . {}: kes ma Sinu arust olen? Kärbsepaber idiootidele? {}: on Sul minut aega? Räägi mulle ära kõik, mida Sa üldse tead. {}: Su jutt kõlab nagu eesti keel, aga ma ei saa mitte halligi aru. {}: kõik mu eelarvamused Sinu suhtes on ajapikku tõeks osutunud. ! {}: see, kui keegi sind ei mõista, ei tähenda veel, et sa oled kunstnik, {}: Sa varud ilmselt alati spetsiaalselt aega, et end avalikus kohas lolliks teha. {}: Kuuldavasti oli sul kunagi yks mõte, aga see suri yksinduse kätte ära. {}: Ma vihkan kõiki. Sina oled järgmine. {}: Ja sinu täiesti mõttetu arvamus on...? --- 40,81 ---- {}: sa oled meditsiiniline ime {}: sa näed ikka vahva välja! See kleit su seljas on pilapoest, eks? ! {}: milline seitsmest pöialpoisist Sina oled? {}: kao eemale! Sa seisad mu aura peal! + {} on mees, kes ei tee palju sõnu. Aga möliseb ikkagi rohkem kui vaja. . o O ( Kus on geenipolitsei? Siin on mingi jälk {} ) O o . + . o O ( Millise kivi alt küll sellised lontrused nagu {} välja ronivad.. ) O o . {}: kes ma Sinu arust olen? Kärbsepaber idiootidele? {}: on Sul minut aega? Räägi mulle ära kõik, mida Sa üldse tead. + {}: sa oled nii loll, et sobiksid ideaalselt Võrno saatesse. {}: Su jutt kõlab nagu eesti keel, aga ma ei saa mitte halligi aru. {}: kõik mu eelarvamused Sinu suhtes on ajapikku tõeks osutunud. ! {}: ilmselgelt on ainuke lahendus sinu probleemile suitsiid. ! {}: see et keegi sind ei mõista, ei tähenda veel et oled kunstnik. {}: Sa varud ilmselt alati spetsiaalselt aega, et end avalikus kohas lolliks teha. {}: Kuuldavasti oli sul kunagi yks mõte, aga see suri yksinduse kätte ära. {}: Ma vihkan kõiki. Sina oled järgmine. {}: Ja sinu täiesti mõttetu arvamus on...? + {}: Pista pea perse ja tee porgandi häält. + {}: Kas sa nüüd taipad, mis juhtub kui sugulased omavahel abielluvad? + {}: Mõistuse poolest on sulle kõige lähemal reha, või äärmisel juhul labidas. + {}: Maakeral ei ole enam ruumi. Mine koju. + {}: Mine hoia oma pead vee all. + Isegi lollide maailmameistrivõistlustel saaks {} teise koha, kuna ta on lihtsalt niivõrd loll.... + {}: mine ära enne kui ma sind ümber lükkan. + Näe, tõmbasin küll vett, aga {} ikka alla ei läinud. + Miskit rõvedat pininat tuleb kusagilt. Aaa, see oled sina, {}! + Tere {}! Kuidas viinaravi edeneb? + Vaene {}, kas sa jäid rongi alla või oledki sellisena sündinud? + {}: Piiblis on kirjas: "Juudas eemaldus ja läks ja poos end üles." Ja veel: "Mine tee sina samuti" + {}, miks sa ei lase oma mõistust teritada? + {}, tee mulle üks teene - ära unusta koduteel vales kohas tänavat ületada. + {}, mängime kodu, Sina oled uks ja mina löön su kinni. + {}, lähme kusagile, kus me saaksime teineteisest lahus olla. + Ma ei unusta kunagi ühtegi nägu, aga {} puhul olen ma valmis erandi tegema. + {}, vaata, rong läheneb! Roni rööbastele! + {}, Sul on väga huvitav nägu, mitu korda Sind sinna löödud on? + {}, mängime hobusdt. Mina olen esimene ots ja sina võid lihtsalt iseennast mängida. + {} nalju tervitab alati suur vaikusepahvak. + Ahv heitis {}'le ühe pilgu ning karjus: "Persse see Darwini teooria - mina endast inimest teha ei lase!" + Peab tunnistama, et {}'i sugused mehed ei kasva puu otsas - nad ripuvad okste küljes. + Kas tõesti on sõnade helge pea ja {} vahel nii suur erinevus? Index: HELP =================================================================== RCS file: /cvsroot/tuxaator/tuxaator/HELP,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** HELP 17 Oct 2001 10:25:24 -0000 1.2 --- HELP 30 Mar 2004 20:37:05 -0000 1.3 *************** *** 27,30 **** --- 27,35 ---- Description: shows all (actuall only first 50) definitions with contain the word Linux + Command: history + Syntax: !history keyword + Example: !history tuxaator + Description: + Command: seen Syntax !seen <user> |