Changeset 663 for trunk


Ignore:
Timestamp:
01/11/06 15:46:46 (6 years ago)
Author:
james
Message:

notice when plugins don't register anything
fixed some broken plugins
attempt (but incomplete) to fix dildo plugin
added abilty to filter bmotion log messages
added management plugin for above
improve checking for stuck loops
use local storage dir for abstracts
use more efficient way for abstract dupe checking
added diagnostic stuff to check if some plugins loaded
don't run diagnostics while loading for testing
fix receiving broken interbot output (like "50,something") by stripping out the "50,"
load settings from local dir if available
alert user if we can't load settings

Location:
trunk
Files:
1 added
2 deleted
23 edited
2 copied

Legend:

Unmodified
Added
Removed

  • trunk

    • Property svn:ignore set to
      local

  • trunk/bMotion.tcl

    r658 r663  
    1717set bMotionLocal "$bMotionRoot/local" 
    1818 
     19if {![info exists bMotion_log_regexp]} { 
     20        set bMotion_log_regexp "" 
     21} 
    1922 
    2023if {![info exists bMotion_testing]} { 
    … …  
    4447 
    4548proc bMotion_putloglev { level star text } { 
    46   global bMotion_testing bMotionCache 
     49  global bMotion_testing bMotionCache bMotion_log_regexp 
     50         
     51        if {$bMotion_log_regexp != ""} { 
     52                if {![regexp -nocase $bMotion_log_regexp $text]} { 
     53                        return 0 
     54                } 
     55        } 
     56 
    4757  regsub "bMotion:" $text "" text 
    4858  set text2 "" 
    … …  
    8292  putlog "... loading settings" 
    8393} 
    84 source "$bMotionModules/settings.tcl" 
     94# try the original location first 
     95set bMotion_loaded_settings 0 
     96if [file exists "$bMotionModules/settings.tcl"] { 
     97        source "$bMotionModules/settings.tcl" 
     98        set bMotion_loaded_settings 1 
     99} 
    85100 
    86101#try to load a file for this bot 
    … …  
    89104    source "$bMotionModules/settings_${botnet-nick}.tcl" 
    90105    bMotion_putloglev d * "loaded settings for this bot from settings_${botnet-nick}.tcl" 
    91   } 
     106                set bMotion_loaded_settings 1 
     107  } 
     108} 
     109 
     110#try to load from the local dir 
     111if [file exists "$bMotionLocal/settings.tcl"] { 
     112        source "$bMotionLocal/settings.tcl" 
     113        bMotion_putloglev d * "loaded local settings from $bMotionLocal/settings.tcl" 
     114        set bMotion_loaded_settings 1 
     115} 
     116 
     117if {$bMotion_loaded_settings == 0} { 
     118        putlog "bMotion: FATAL! Could not load from any settings file! bMotion is not going to work! :(" 
    92119} 
    93120 
    … …  
    166193set files [lsort [glob -nocomplain "$bMotionModules/extra/*.tcl"]] 
    167194foreach f $files { 
    168   bMotion_putloglev 1 * "loading module: $f" 
     195  bMotion_putloglev 1 * "... loading extra module: $f" 
    169196  catch { 
    170197    source $f 
    … …  
    178205#load local abstracts 
    179206catch { 
    180   if {${botnet-nick} != ""} { 
    181     source "$bMotionModules/abstracts_${botnet-nick}.tcl" 
    182     bMotion_putloglev d * "loaded abstracts for this bot from abstracts_${botnet-nick}.tcl" 
    183   } 
     207        source "$bMotionLocal/abstracts.tcl" 
     208        bMotion_putloglev d * "loaded abstracts for this bot from local abstracts.tcl" 
    184209} 
    185210 
    … …  
    206231} 
    207232 
     233if {$bMotion_testing == 0} { 
     234        bMotion_diagnostic_utimers 
     235        bMotion_diagnostic_timers 
     236} 
     237 
    208238set bMotion_loading 0 
    209239set bMotion_testing 0 
    210240 
    211 bMotion_diagnostic_utimers 
    212 bMotion_diagnostic_timers 
    213241 
    214242# set this to 0 to stop showing the copyright 

  • trunk/local/abstracts/fr

    • Property svn:ignore set to
      *.txt

  • trunk/local/facts

    • Property svn:ignore set to
      facts.txt

  • trunk/modules/abstract.tcl

    r577 r663  
    9595bMotion_counter_init "abstracts" "gets" 
    9696 
     97set bMotion_abstract_dir "$bMotionLocal/abstracts/$bMotionInfo(language)" 
     98 
    9799# garbage collect the abstracts arrays 
    98100proc bMotion_abstract_gc { } { 
    … …  
    128130    bMotion_putloglev d * "expired $expiredCount abstracts: $expiredList" 
    129131  } 
    130  
    131132} 
    132133 
    … …  
    135136  global bMotion_abstract_contents bMotion_abstract_timestamps 
    136137  global bMotionModules bMotion_testing bMotion_loading 
    137   global bMotionInfo bMotion_abstract_languages 
     138  global bMotionInfo bMotion_abstract_languages bMotion_abstract_dir 
    138139 
    139140  #set timestamp to now 
    … …  
    142143 
    143144  #load any existing abstracts 
    144   if [file exists "[pwd]/$bMotionModules/abstracts/$lang/${abstract}.txt"] { 
     145  if [file exists "$bMotion_abstract_dir/${abstract}.txt"] { 
    145146    bMotion_abstract_load $abstract 
    146147  } else { 
    147148    # check that the language directory exists while we're at it 
    148     set dir "$bMotionModules/abstracts/$lang" 
    149     if { ![file exists $dir] } { 
    150       [file mkdir "$bMotionModules/abstracts/$lang"] 
     149    if { ![file exists $bMotion_abstract_dir] } { 
     150      [file mkdir $bMotion_abstract_dir] 
    151151    } 
    152152    #file doesn't exist - create an empty one 
    … …  
    155155    set bMotion_abstract_languages($abstract) "$lang" 
    156156    bMotion_putloglev 1 * "Creating new abstract file for $abstract" 
    157     set fileHandle [open "[pwd]/$bMotionModules/abstracts/$lang/${abstract}.txt" "w"] 
     157    set fileHandle [open "$bMotion_abstract_dir/${abstract}.txt" "w"] 
    158158    puts $fileHandle " " 
    159159  } 
    … …  
    170170  global bMotion_loading bMotion_testing 
    171171  global bMotionInfo bMotion_abstract_languages 
    172   set lang $bMotionInfo(language) 
    173  
    174   bMotion_putloglev 1 * "Attempting to load $bMotionModules/abstracts/$lang/${abstract}.txt" 
    175  
    176   if {![file exists "$bMotionModules/abstracts/$lang/${abstract}.txt"]} { 
     172        global bMotion_abstract_dir 
     173  set lang $bMotionInfo(language) 
     174 
     175  bMotion_putloglev 1 * "Attempting to load $bMotion_abstract_dir/${abstract}.txt" 
     176 
     177  if {![file exists "$bMotion_abstract_dir/${abstract}.txt"]} { 
    177178    return 
    178179  } 
    … …  
    193194  set bMotion_abstract_ondisk [lreplace $bMotion_abstract_ondisk $index $index] 
    194195 
    195   set fileHandle [open "$bMotionModules/abstracts/$lang/${abstract}.txt" "r"] 
     196  set fileHandle [open "$bMotion_abstract_dir/${abstract}.txt" "r"] 
    196197  set line [gets $fileHandle] 
    197198  set needReSave 0 
    … …  
    201202    set line [string trim $line] 
    202203    if {$line != ""} { 
    203       if {[lsearch -exact $bMotion_abstract_contents($abstract) $line] == -1} { 
    204         lappend bMotion_abstract_contents($abstract) $line 
    205       } else { 
    206         bMotion_putloglev 4 * "dropping duplicate $line for abstract $abstract" 
    207         set needReSave 1 
    208       } 
     204                        lappend bMotion_abstract_contents($abstract) $line 
    209205      incr count 
    210       #if {[expr $count % 200] == 0} { 
    211         #putlog "  still loading abstract $abstract: $count ..." 
    212       #} 
    213206    } 
    214207    set line [gets $fileHandle] 
    215208  } 
     209 
     210        #optimise 
     211        set bMotion_abstract_contents($abstract) [lsort -unique $bMotion_abstract_contents($abstract)] 
     212        set newcount [llength $bMotion_abstract_contents($abstract)] 
     213        if {$newcount < $count} { 
     214                bMotion_putloglev d * "Shrunk abstract $abstract by [expr $count - $newcount] items by de-duping" 
     215                set needReSave 1 
     216        } 
    216217 
    217218  if {[info exists fileHandle]} { 
    … …  
    228229  global bMotion_abstract_contents bMotion_abstract_timestamps bMotion_abstract_max_age 
    229230  global bMotionModules bMotionInfo 
     231        global bMotion_abstract_dir 
    230232  set lang $bMotionInfo(language) 
    231233 
    … …  
    240242    bMotion_putloglev 2 * "updating abstracts '$abstract' on disk" 
    241243    if {$save} { 
    242       set fileHandle [open "[pwd]/$bMotionModules/abstracts/$lang/${abstract}.txt" "a+"] 
     244      set fileHandle [open "$bMotion_abstract_dir/${abstract}.txt" "a+"] 
    243245      puts $fileHandle $text 
    244246      close $fileHandle 
    … …  
    251253    if {$save} { 
    252254      bMotion_putloglev 2 * "updating abstracts '$abstract' on disk and in memory" 
    253       set fileHandle [open "[pwd]/$bMotionModules/abstracts/$lang/${abstract}.txt" "a+"] 
     255      set fileHandle [open "$bMotion_abstract_dir/${abstract}.txt" "a+"] 
    254256      puts $fileHandle $text 
    255257      close $fileHandle 
    … …  
    263265  global bMotionModules bMotion_testing bMotion_loading 
    264266  global bMotion_abstract_max_number bMotionInfo bMotion_abstract_languages 
     267        global bMotion_abstract_dir 
    265268  set lang $bMotionInfo(language) 
    266269 
    … …  
    281284  bMotion_putloglev 1 * "Saving abstracts '$abstract' to disk" 
    282285 
    283   set fileHandle [open "[pwd]/$bMotionModules/abstracts/$lang/${abstract}.txt" "w"] 
     286  set fileHandle [open "$bMotion_abstract_dir/${abstract}.txt" "w"] 
    284287  set number [llength $bMotion_abstract_contents($abstract)] 
    285288  if {$number > $bMotion_abstract_max_number} { 
    … …  
    290293    if {$tidy} { 
    291294      if {[rand 100] < 10} { 
    292         bMotion_putloglev d * "Dropped '$a' from abstract $abstract" 
     295        bMotion_putloglev 3 * "Dropped '$a' from abstract $abstract" 
    293296        incr drop_count 
    294297        continue 
    … …  
    351354 
    352355proc bMotion_abstract_batchadd { abstract stuff } { 
    353   bMotion_putloglev d * "batch-adding to $abstract" 
     356  bMotion_putloglev 1 * "batch-adding to $abstract" 
    354357  foreach i $stuff { 
    355358    bMotion_abstract_add $abstract $i 0 
    … …  
    441444  foreach f $files { 
    442445    catch { 
    443       [file rename -force -- $f "${dir}/"] 
     446                        [file rename -force -- $f "${dir}/"] 
    444447    } 
    445448  } 

  • trunk/modules/diagnostics.tcl

    r509 r663  
    125125} 
    126126 
     127proc bMotion_diagnostic_plugins { } { 
     128        bMotion_putloglev 5 * "bMotion_diagnostic_plugins" 
     129        foreach t {simple complex admin output action_simple action_complex irc_event} { 
     130                set arrayName "bMotion_plugins_$t" 
     131                upvar #0 $arrayName cheese 
     132                if {[llength [array names cheese]] == 0} { 
     133                        putlog "bMotion: diagnostics: No $t plugins loaded, something is wrong!" 
     134                } 
     135        } 
     136} 
     137 
    127138proc bMotion_diagnostic_auto { min hr a b c } { 
     139        bMotion_putloglev 5 * "bMotion_diagnostic_auto" 
    128140  putlog "bMotion: running level 4 self-diagnostic" 
    129141  bMotion_diagnostic_timers 
    … …  
    131143} 
    132144 
    133 bMotion_putloglev d * "Running a level 5 self-diagnostic..." 
     145if {$bMotion_testing == 0} { 
     146        bMotion_putloglev d * "Running a level 5 self-diagnostic..." 
    134147 
    135 bMotion_diagnostic_channel1 
    136 bMotion_diagnostic_channel2 
    137 bMotion_diagnostic_channel3 
     148        bMotion_diagnostic_channel1 
     149        bMotion_diagnostic_channel2 
     150        bMotion_diagnostic_channel3 
     151        bMotion_diagnostic_plugins 
    138152 
    139 bMotion_putloglev d * "Diagnostics complete." 
     153        bMotion_putloglev d * "Diagnostics complete." 
     154} 
    140155 
    141156bind time - "30 * * * *" bMotion_diagnostic_auto 

  • trunk/modules/facts/facts.txt

    r662 r663  
    1 what,town out 
    2 what,episode boring 
    3 what,today the first day in 
    4 what,today n't religion 
    5 what,today especially unproductive 
    6 what,today like an empty day 
    7 what,today louis braille's birthday 
    8 what,xmas coming properly now 
    9 what,xmas annual leave 
    10 what,xmas like that 
    11 what,xmas officially over 
    12 what,xmas over 
    13 what,xmas good 
     1what,shower a good thing 
     2what,town being shafted 
     3what,mic selected there 
     4what,today %OWNER{Greeneyez} friday 
     5what,today %OWNER{WigglePig} monday 
     6what,today dragging 
     7what,today friday 
    148what,exe very close 
    15 what,alcoholism so much worse 
    16 what,gw one thing he's an oilman 
     9what,maths too 
     10what,maths flawed 
     11what,maths logical 
     12what,maths beautiful 
     13what,maths wrong 
     14what,http://www.ebuyer.com/customer/products/index.html?rb=12465845442&action=c2hvd19wcm9kdwn0x292zxj2awv3&product_uid=89167 the most likely candidate 
     15what,rest just fine 
     16what,rest downloaded 
    1717what,ie ancient 
    1818what,ie icky 
    1919what,ie already in memory 
    2020what,ie just naughty 
    21 what,kong about 
    22 what,cath watching 
    23 what,cath forgiven 
    24 what,cath now eating everything in sight 
    25 what,cath a man anyway 
    2621what,dinner burning or something 
    27 what,dinner nearly ready 
    28 what,dinner done 
    29 what,dinner ready 
    30 what,dinner something else 
    31 what,shark not edible 
    32 what,neck aching again 
    33 what,neck hurting 
    34 what,neck filled with d00m 
    35 what,`susan also 
    36 what,`susan in love with andrew 
    37 what,`susan beautiful 
    38 what,typing interesting 
    39 what,hand much older than i am 
    40 what,movement quite real 
     22what,cath immune to e-coli 
     23what,cath just very lovely 
     24what,get gone 
     25what,hq in exeter 
     26what,xbox huge 
     27what,excession on 
     28what,thing billed as e-learning 
     29what,thing shut 
     30what,thing quite amusing 
     31what,thing for 
     32what,thing human 
     33what,thing right in %OWNER{wizwoz} hand 
     34what,thing the warnings on the adverts 
     35what,thing quite good 
     36what,thing pretty cool 
     37what,thing you then have fish-in-pancake 
     38what,thing a load of old toss 
     39what,thing a mistake 
     40what,thing the key 
     41what,thing that 
     42what,thing though 
     43what,thing terrible 
     44what,thing eating %OWNER{Cath2} computer 
     45what,thing very very good fun 
     46what,`susan a center 
     47what,ii overthrown 
     48what,already scrapped 
     49what,monicaoff a she 
     50what,monicaoff all the eye candy we need 
     51what,monicaoff playing snap 
     52what,hand cool 
     53what,hand cold 
     54what,cooker perfect for omelettes 
     55what,cooker cool 
     56what,cooker terrible 
    4157what,software broken and he couldn't do it 
    4258what,software called warez 
    4359what,software bug-free 
    4460what,software malware 
    45 what,software stupid 
    46 what,contact down to you at all 
    47 what,name, michael ca- aaaarrgh 
    48 what,think the best 
    49 what,think enough to put anyone off 
    50 what,in less than 500 
    51 what,in about 75 
    52 what,vob raw dvd 
    53 what,sky dark with storm 
    54 what,sky going 
    55 what,ring not underwear notopic 
    56 what,jf coming down tomorrow 
    57 what,ire island 
    58 what,jorgje born in 71 
    59 what,jorgje a swine 
    60 what,jorgje like that 
    61 what,sister in pub 
    62 what,sister chubby 
    63 what,tea clean shaven 
    64 what,tea ready before you get there 
    65 what,tea made 
    66 what,swimming the only sport i like to do 
    67 what,beetroot nice 
    68 what,enabled) good for acne 
    69 what,need a soundblaster live 
    70 what,need the right man 
    71 what,need 1 very special woman 
    72 what,need a party i can take them to 
    73 what,chicken almost the only meat i eat 
    74 what,everyone lovely in 
    75 what,everyone this year 
    76 what,everyone dying launghing 
    77 what,everyone bogie green 
    78 what,everyone grey 
    79 what,everyone pissed in %OWNER{Cath2Wrk} office 
    80 what,everyone so nasty to greeneyez 
    81 what,everyone being so nasty 
    82 what,everyone here 
    83 what,everyone a journalist 
    84 what,dev a wendy i think 
    85 what,stuff captioned 
    86 what,stuff a nightmare for fragmentation 
    87 what,stuff rare 
    88 what,stuff so expensive 
    89 what,stevens on the list 
    90 what,stevens on there 
    91 what,name quite funny 
    92 what,name caff 
    93 what,days a bad thing 
    94 what,blanket great 
    95 what,anyone in 
    96 what,anyone here 
    97 what,lodge booked out 
    98 what,lodge booked up for doubles 
    99 what,maid what i need 
    100 what,system competent though ctr 
    101 what,people still bad 
     61what,contact really a great movie 
     62what,striesand blonde 
     63what,in the governement 
     64what,for just shattered 
     65what,for the passthru 
     66what,paradise' something of an oxymoron 
     67what,jorgje on mushrooms 
     68what,jorgje teh magic horse 
     69what,tea good 
     70what,tea great 
     71what,manager buying a spam 
     72what,decaf not fucking coffee 
     73what,decaf like drinking alcoholfree beer 
     74what,everyone doing it different ways 
     75what,everyone charging to the wrong codes 
     76what,everyone quoting each other 
     77what,christel ok up until he added the walk 
     78what,christel bad at saying no 
     79what,christel i have now put on elton john 
     80what,christel at work 
     81what,col sufficiently ashamed 
     82what,col right 
     83what,noone selling one on ebay 
     84what,meobets a bot in there 
     85what,hormone produced by the adrenal glands 
     86what,tomorrow to get drunk 
     87what,tiredness massive 
     88what,name given to the fleshy part of a 
     89what,name quite appropriate 
     90what,name prince 
     91what,name about 10 chars 
     92what,name there too 
     93what,charles the bad guy 
     94what,bells paintstripper 
     95what,launch now officially interesting 
     96what,launch a mistake 
     97what,florida-exeter a bit of a hike 
     98what,20?c bearable but -30 
     99what,no.2 nice 
    102100what,ps2 larger than it needs to be 
    103 what,jello low in cholesterol 
    104 what,suspension shot 
    105 what,desk more or less tidy 
    106 what,out a bad move 
    107 what,garion ickle 
     101what,system discovered in 
     102what,system discovered 
     103what,system crap 
     104what,system based upon 
     105what,system faster too 
     106what,effect said to be good 
     107what,effect mid-2004 
     108what,effect disabled 
     109what,ps3 probably easter 07 her4e 
     110what,desk looking a bit of a mess again 
     111what,communism a good second place 
    108112what,opening a complete triumph 
    109 what,opening better 
    110 what,rose lovely 
     113what,vehicle locked 
     114what,mr2 a little twitching in the snow 
     115what,mr2 the better looking beast 
     116what,each a 1 in chance 
     117what,special trout a la crem 
    111118what,english so 20th century 
    112 what,english a bit difficult 
    113 what,english johnsons 
    114 what,urine good for the skin 
    115 what,pikachu anywhere near that mind 
    116 what,spb in deed correct 
    117 what,love high in cholesterol 
    118 what,makie hoping for carlos sainz 
    119 what,woodsville a hamlet or something similar 
    120 what,son a gamer 
    121 what,pkcs7 an envelope 
    122 what,me chicken 
    123 what,game coming out 
    124 what,lady a tramp 
    125 what,lady so nice 
    126 what,susan kicked by talksalot 
    127 what,hamlet smaller than a village 
    128 what,dunos: there a word for 
    129 what,dunos: anyone from exeter coming up 
    130 what,delilah a bot 
    131 what,services shit 
    132 what,range all tongue and groove 
    133 what,ham the ultimate christmas meal 
    134 what,ham the same as canned ham 
    135 what,scrooged also a nice take i thought 
    136 what,scrooged on at 10 
    137 what,delia lokoing more promising 
    138 what,joystick a pile of crap 
    139 what,insurance about 
    140 what,insurance 860 
    141 what,mobile not where i left it last night 
    142 what,ml starting to show its age 
    143 what,hauntedun terrified 
    144 what,picture award winning material 
    145 what,picture awesome 
    146 what,may-key how i see it 
    147 what,huley in this too 
    148 what,pikmin lovely isnt it 
    149 what,paxo also delicious 
    150 what,related ass 
    151 what,hangover going to be a severe one 
    152 what,dance funny 
    153 what,series running now 
    154 what,series great 
    155 what,everything insulting if you want it to be 
    156 what,everything in oen place 
    157 what,aim even worse 
    158 what,live on the coast and so is he 
    159 what,radeon great 
    160 what,scruffy too old for shenanigans anyway 
    161 what,london just one big slum to dunos 
    162 what,london pretty good 
    163 what,yaakov just saying 
    164 what,yaakov smrt 
    165 what,yaakov a prude 
     119what,8210 really 
     120what,friends thumbs out rather than in 
     121what,finger a bit bent 
     122what,ghostbusters on tv tonight 
     123what,ghostbusters on 4 at 8pm 
     124what,had a speccy in 86 
     125what,makie still unsure 
     126what,program a thing of beauty 
     127what,email in response to %OWNER{MatryxWrk} 
     128what,else planning on coming in today 
     129what,gravel natural gravel 
     130what,arcs where i went with school 
     131what,arcs where i went 
     132what,hugging most fantastic 
     133what,problem elsewhere anyway 
     134what,problem usually with how it is done 
     135what,md from there 
     136what,skating one of those grey-area things 
     137what,game a ps1 game re-released 
     138what,me looking for a new domain host 
     139what,me gone 
     140what,me around 
     141what,a/c broken 
     142what,ketchup the meaning of life itself 
     143what,atoms called 
     144what,pam_emacs.so next 
     145what,adams worse than andre 
     146what,mortgage only 350ish 
     147what,mortgage pretty damned impossible 
     148what,rc3 out 
     149what,garden a natural wilderness 
     150what,emokid typically bisexual 
     151what,gamecube in the loft 
     152what,mm still mm2 on snes though 
     153what,water rubbish 
     154what,chris's otis 
     155what,picture then posted 
     156what,fail a good word 
     157what,list 17 games before april 
     158what,sameer a full time chore 
     159what,black like having a built-in tan 
     160what,black a crime 
     161what,black the best drink ever 
     162what,bulb a long life bulb for cath 
     163what,cucumber not 6mill 
     164what,splodgey an excellent name 
     165what,ms having problems isnt it 
     166what,presenter in sight of natasha 
     167what,idiocy amazing 
     168what,beckt here 
     169what,design crap 
     170what,hay nick a heroin addict 
     171what,hay for horses' 
     172what,series disappointing 
     173what,midlands meant to get a bit nippy 
     174what,much a new mini cooper 
     175what,message ticket number 1 
     176what,no all mine mine mine 
     177what,no not a no 
     178what,no a maybe 
     179what,everything still working 
     180what,everything fine 
     181what,everything damage 
     182what,everything better when it's of justice 
     183what,everything marked up by 15 
     184what,everything sex-related 
     185what,everything nice in moderations 
     186what,everything working on this now 
     187what,everything working 
     188what,everything bollocksed 
     189what,everything going to be okay 
     190what,becky in %OWNER{Bagpuss} face 
     191what,lead massively slashed 
     192what,nes frightning 
     193what,thingie in a bit of an awkward place 
     194what,greeneyed in the print roojm 
     195what,greeneyed lost last night 
     196what,greeneyed playing a bit of trivia 
     197what,blueyonder of competence 
     198what,lunchtime quite hot 
     199what,sleep making badsheepy go strange 
     200what,sleep for the weak 
     201what,sleep for the week 
     202what,hmv.co.uk a fine url 
     203what,cazzr 'randomnly generated' 
     204what,cazzr atually showing now 
     205what,cazzr helping 
     206what,cazzr virtually typing lying down 
     207what,cazzr of course looking forwards too 
     208what,pc still a athlon 700 
    166209what,job on campus anyhow 
    167210what,job kinda like telesales 
    168211what,job to play sims 
    169 what,job on the game plan for this year 
    170 what,yet...life still good 
    171 what,space truly awesome 
    172 what,boysstuff cool 
    173 what,greg for eating 
    174 what,irate from ire 
    175 what,barcelona alright 
    176 what,complaint that they don't support 
    177 what,wantign going to swing it for wizwoz then 
    178 what,answer william wordsworth 
     212what,govvy okay 
     213what,yaakov losing weight 
     214what,yaakov 5'10 
     215what,yaakov also 
     216what,yaakov about 16 
     217what,dakar the capital of 
     218what,dakar the capital of ______ 
     219what,dakar the 
     220what,dakar the capital 
     221what,gen2 pretty limited 
     222what,drunk fairly easy 
     223what,child fair of face 
     224what,mph so hard to get in a gtruck 
     225what,fresno 9am to 6pm or something 
     226what,nice great 
     227what,cure a drink 
     228what,cure admitting you have a problem 
     229what,level fun 
     230what,answer bison 
     231what,answer duckburg 
     232what,answer tcp antiseptic 
     233what,answer anti-lock braking system 
     234what,answer mayor 
     235what,answer the family truckster 
     236what,answer pearl 
     237what,answer one woman or two 
     238what,answer phoenix 
     239what,answer cat ballou 
     240what,answer lachanophobia 
     241what,answer chipmunks 
     242what,answer john wayne 
    179243what,answer cirrate 
    180 what,answer phantom 
    181 what,answer gasser 
    182 what,answer prawner 
     244what,answer petrol 
     245what,answer richie 
     246what,answer wings 
     247what,answer aldous huxley 
     248what,answer leather maker 
     249what,answer france 
     250what,answer brad pitt 
     251what,answer captain kirk 
     252what,answer lizard 
     253what,answer linda hunt 
     254what,answer mills 
     255what,answer leviticus 
     256what,answer shampoo 
     257what,answer capra 
     258what,answer chickpeas 
     259what,answer the raven 
     260what,answer 230 
     261what,answer boatniks 
     262what,answer the sheepman 
    183263what,answer elizabeth taylor 
    184264what,answer woody allen 
     265what,answer rush 
     266what,answer blank verse 
     267what,answer chile 
     268what,answer roz 
    185269what,answer vinyl 
    186 what,answer shaquille o'neal 
     270what,answer fledgling 
     271what,answer empire state building 
     272what,answer iron butterfly 
     273what,answer 2 million 
     274what,answer saint-pierre 
     275what,answer the jetsons 
     276what,answer perrault 
     277what,answer murdering his wife 
    187278what,answer alexander 
     279what,answer captain america 
     280what,answer rover 
     281what,answer blue ridge brewery 
    188282what,answer 1973 
    189 what,answer ha ha only kidding 
    190 what,answer the mg 
    191 what,answer ngauruhoe 
     283what,answer short of time must go 
     284what,answer nomes 
     285what,answer helium 
     286what,answer the koran 
     287what,answer elton john 
     288what,answer jason narvy 
    192289what,answer michael collins 
    193 what,answer rockefeller 
     290what,answer october 4 
    194291what,answer candido jacuzzi 
    195 what,flatley ice dancing 
    196 what,flatley like 70 
    197 what,ban only for sport events 
    198 what,ctr drunk 
    199 what,ctr presented with a few options 
    200 what,ctr back on %OWNER{ctr} imac 
    201 what,or it censi 
    202 what,or that just a credit card 
    203 what,or drunk or something 
    204 what,or i mistaken 
    205 what,or it too expensive 
    206 what,os in the rom 
    207 what,griddle a skillet 
    208 what,wine nice too hehe 
    209 what,wine kicking in 
    210 what,wine dry it is sweet 
    211 what,status ecclesfield 
    212 what,dwarf not a bad sci-fi movie 
    213 what,nick just very snuggable 
    214 what,trek better than no trek 
    215 what,document now 50 meg 
    216 what,wigglepig particularly proud of %OWNER{WigglePig} 
    217 what,wigglepig stuck here 
    218 what,wigglepig very wasted 
    219 what,wigglepig well into the first series of 
    220 what,wigglepig uber-tired 
    221 what,wigglepig soooo glad i'm not going 
    222 what,wigglepig poor 
    223 what,truly a revelation though 
    224 what,truly a season of miracles 
    225 what,year manic though 
    226 what,normal 1-5 
    227 what,no, entirely sober 
    228 what,channel dying whether i talk or not 
    229 what,axle not inclined to do 
    230 what,braille the the only thing it could be 
    231 what,china to much about money right now 
    232 what,chloe playing with everything 
    233 what,ps non-trivial with word 
    234 what,grimm really surreal 
    235 what,word king image 
    236 what,cut quite handy too 
    237 what,same from dave b 
    238 what,room) jumpable 
    239 what,greeneyez still online 
    240 what,greeneyez not 
    241 what,greeneyez being naughty 
    242 what,greeneyez in bed 
    243 what,greeneyez first to ring the police 
    244 what,greeneyez on holiday yesterday 
    245 what,greeneyez born i think 
    246 what,greeneyez now 
    247 what,greeneyez very small at birth 
    248 what,greeneyez not engineer 
    249 what,greeneyez suspicious 
    250 what,greeneyez wondering 
     292what,sport played on a field known 
     293what,apparently wired 
     294what,apparently topic 
     295what,ctr currently sat at %OWNER{ctr} mums house 
     296what,ctr quite enjoying it 
     297what,or i a page 
     298what,or i a page in your 
     299what,or i a page in your history book 
     300what,or that even a movie 
     301what,or it 7 
     302what,or that long gone 
     303what,or that not hte cas 
     304what,or there next week 
     305what,or it mr vhs 
     306what,or i thinking of something else 
     307what,or it just a crack for a file 
     308what,or that ca//is 
     309what,or that stockings 
     310what,or that you 
     311what,or that too harsh 
     312what,or that a boeing 
     313what,or it woman only 
     314what,or not installed 
     315what,or it 62/3 
     316what,or that abusing %OWNER{Greeneyez} position 
     317what,consolas pretty sweet 
     318what,mircstats the best 
     319what,kev trying to say is 
     320what,wigglepig to be compelled to partake 
     321what,wigglepig le tired 
     322what,wigglepig unable to suffer fools 
     323what,drivers good 
     324what,wigghome well aware of that 
     325what,spoogle being introduced to someone 
     326what,pro free and makes iso's 
     327what,pro the lil white one 
     328what,channel the best 
     329what,desktop most assuredly unsetup 
     330what,god the best' 
     331what,religious' bad or something 
     332what,brands worrying 
     333what,play.com too expensive 
     334what,psi either but it all sounded good 
     335what,smell still here 
     336what,suneeyd on a winning spree 
     337what,same as any performer has skill 
     338what,greeneyez happy for him 
     339what,greeneyez i'm not sure how that links in 
     340what,greeneyez really quite bored 
     341what,greeneyez thinking that 
     342what,greeneyez thinking wednesday 
     343what,greeneyez amazing it is true 
     344what,greeneyez only joking 
     345what,greeneyez watching 
     346what,greeneyez ashamed of that one 
     347what,greeneyez putting %OWNER{Greeneyez} old name in 
     348what,greeneyez shocked 
     349what,greeneyez going to show off cath 
     350what,greeneyez watching 30 days on more 4 
     351what,greeneyez seriously tired 
     352what,greeneyez seriously told off about it 
     353what,greeneyez shit at drawing 
     354what,greeneyez some dude in a dodgy channel 
     355what,greeneyez planning 
     356what,greeneyez enjoying it 
     357what,greeneyez thinking yummy xmas goodies 
     358what,cider alright 
     359what,cider horrible 
    251360what,bmotion a very nice script 
    252 what,alex from potters bar 
    253 what,work so unappealing 
    254 what,work annoying and holidays are nice 
    255 what,cholesterol raving about 
    256 what,sa running at 233mhz 
    257 what,concept physically disgusting 
    258 what,hnsk cuter than red squirrel 
    259 what,hnsk drunk yesterday 
    260 what,packing not a problem 
    261 what,secret safe with us 
    262 what,graduation yesterday so i imagien it is 
    263 what,reagan expecting greeneyez 
    264 what,combat like in that 
    265 what,christmas never over 
    266 what,carpet definately released 
    267 what,saving difficult 
    268 what,atlantis the best sci fi 
     361what,n64 called 
     362what,smartindent' reset 
     363what,converter 80 euro 
     364what,sticks inherently silly 
     365what,unless in management 
     366what,work quite a good idea 
     367what,work still not back 
     368what,work so useful heh 
     369what,work dead 
     370what,uknova good for uk tv shows 
     371what,concept new to cath2 
     372what,265 alive 
     373what,avisynth sexy and you will like it 
     374what,important happening right smek 
     375what,christmas a bit harsh 
     376what,christmas a longer period 
     377what,minidisc a good example of death 
     378what,sarah's good 
    269379what,really as bad bc as it is now 
    270380what,really religion free 
    271381what,really fixed 
    272382what,really a spur of the moment thing 
    273 what,really through his stomach 
    274 what,really terrible 
    275 what,really nice 
    276 what,really in 15 minuets 
    277 what,really good at times 
    278 what,disk an excuse for legal backups 
    279 what,feast greatly amusing 
    280 what,bed where i'm headed 
    281 what,bed made 
    282 what,bed 220 cm on 180 cm 
    283 what,bed nice and soft and snuggley 
     383what,pepsi the one and only 
     384what,dog whining by the door 
     385what,audio all messed up 
     386what,audio part of an 
     387what,entry mind numbing 
     388what,pollen around 
     389what,and off 
     390what,twells in teh kent 
     391what,psx over 11 months 
     392what,2001 starting to get to duds then 
     393what,bed all you need 
     394what,bed preferrable to working out 
    284395what,spoonman the subject of a song by 
    285396what,spoonman the subject of 
    286 what,giles the best tho 
    287 what,daughter hot 
    288 what,house still nice and clean 
    289 what,house cleanish 
    290 what,exeter average for smileys 
    291 what,farmer out shooting things 
    292 what,daniel as sarcastic as dragen 
    293 what,drill scary 
    294 what,alternative nut roast or something 
    295 what,hold about to fail 
    296 what,mozzarella the same 
    297 what,colin_m told by the man 
    298 what,colin_m at university 
    299 what,so considering a new mac 
    300 what,excellent that toaster james 
    301 what,lcars one mean mamma jamma 
    302 what,tofu good for you 
    303 what,triangle a punch in the face anyway 
    304 what,b/day boxing day 
     397what,knee killing greeneyez so i went private 
     398what,house vibrating 
     399what,exeter windows 2 
     400what,exeter window 2 
     401what,exeter suffering from some form of / 
     402what,havoc- a spammer 
     403what,fzero fun 
     404what,mario kinda fun 
     405what,maley the coast guard cutter 
     406what,maley the coast 
     407what,present not dr 
     408what,fred probably too common 
     409what,so not organised enough 
     410what,so bad anything 
     411what,phone orange 
     412what,phone beige 
     413what,online a new thing 
     414what,leaflet on %OWNER{JamesOff} desk 
     415what,accent fantastic 
    305416what,flat a little empty at the moment 
    306 what,flat dire 
    307 what,mimirclaws to long too 
    308 what,chabs old 
    309 what,dragen op 
    310 what,tell populated mainly by mediums 
    311 what,book about slag heaps 
    312 what,bill huge anyways 
    313 what,bejewelled an uber addictive flash game 
    314 what,burberry poshish 
    315 what,totnes the closest railway station 
    316 what,government getting increasingly insane 
    317 what,keat far to fat 
    318 what,wow a game yeah 
    319 what,chips always the answer 
    320 what,mum really a good cook 
    321 what,mum getting them over xmas 
    322 what,tronday officially recognised 
    323 what,lat like fat so went accross 
    324 what,cleaner samsung 
    325 what,spb- going to say i had a pen 
     417what,constellation the night's brightest star 
     418what,comedy concerned 
     419what,dragen genetically challenged 
     420what,fries a bmotion classic 
     421what,blair made to look a foo 
     422what,mrsmiley after you 
     423what,290 %OWNER{Duds} one 
     424what,excess bad 
     425what,horror another thing i don't get 
     426what,ramsdens utter rubbish 
     427what,knew pain 
     428what,excuse not valid 
     429what,wow a rip off 
     430what,him dead 
     431what,mum clinically insane 
     432what,result correct 
     433what,voting over 
     434what,stroh just nasty 
     435what,river the temple of karnak 
     436what,river the city of mandalay situated 
     437what,taste so playschool 
     438what,winter %OWNER{Cath2Wrk} least 
     439what,moondawn@curses.inc) last seen quitting from 
     440what,cath2 a featherweight 
    326441what,calculator %OWNER{dunos} computer 
    327442what,tv down 
    328443what,tv a moot point 
    329 what,tv licenced 
    330 what,tv very useful 
    331 what,tv actually quite good 
    332 what,windows a pain 
    333 what,windows trying to expand it 
    334 what,midi a girl 
     444what,mars sometimes 
     445what,mars sometimes called the ___ 
    335446what,blog linked from wikipedia 
    336 what,blog really 
    337 what,blog 5th 
    338 what,post a windup 
    339 what,cath2wrk also titchy 
    340 what,cath2wrk already dozing at %OWNER{Cath2Wrk} desk 
    341 what,cath2wrk a long term fraud then 
    342 what,cath2wrk seriously falling asleep now 
    343 what,cath2wrk there and could share it 
    344 what,cath2wrk expecting 
    345 what,cath2wrk going to say 
    346 what,books the one thing i spend money on 
    347 what,road covered in ice already 
    348 what,movie out 
    349 what,us classed as overweight/obese 
    350 what,bigbug pretty much thinking 
    351 what,point is that i thought about it lol 
    352 what,behaving for 
    353 what,spb-: end of series just now 
    354 what,brain too busy going 
    355 what,brain something of a giveaway 
    356 what,brain interesting 
    357 what,brain going 
    358 what,brain a wonderfulorgan 
    359 what,sensible for accountants 
    360 what,paragraph excepitonally offputting 
    361 what,someone a pedo than trek talk 
    362 what,demise being plotted 
    363 what,upgrade in part driven by half life 2 
    364 what,number 732 
    365 what,number different 
    366 what,option always handy 
    367 what,option supplied at invocation 
    368 what,album rather good 
    369 what,period over 
    370 what,nobody hurt 
     447what,occupation associated with 
     448what,post only a couple down 
     449what,cath2wrk talented or something 
     450what,cath2wrk yesterday 
     451what,cath2wrk going with obviously 
     452what,cath2wrk only testing ctrl-r 
     453what,cath2wrk off home 
     454what,cath2wrk thinking more the west end 
     455what,cath2wrk very tired also 
     456what,cath2wrk the only one here til 9 
     457what,anon_mati new here 
     458what,1932 elia is first woman to make 
     459what,susan@adsl-69-227-32-158.dsl.pltn13.pacbell.net) last seen quitting 
     460what,round a note reading 
     461what,wrack shit 
     462what,ours tiny 
     463what,ours the same 
     464what,kernel a good one 
     465what,point 1 2 14 
     466what,servers basically zero 
     467what,club that you do not talk about mu 
     468what,forecast for saturday 
     469what,bonus you have a spare character 
     470what,ibm quieter 
     471what,flights theflightcentre 
     472what,yeah... odd 
     473what,big your dump rosie 
     474what,throat hurting 
    371475what,off over 
    372476what,off all 
    373 what,off next thursday 
    374477what,slave as good as another 
    375 what,fan bugging it 
    376 what,balance well off 
    377 what,hand, damn ecstatic 
    378 what,arm not recomended 
    379 what,leg so damn painful these days 
    380 what,piggy a bit hardcore to be dorothy 
    381 what,vaghugn talking in the past tense 
    382 what,success set to high 
    383 what,sata seagate 
    384 what,laurie funny in anything 
    385 what,harbinger qutie passable 
    386 what,nero lying 
    387 what,really...i duly impressed 
    388 what,nickname desertfox 
    389 what,fifa actually good 
    390 what,ww quite good 
    391 what,dragons pretty ace 
    392 what,steve such a nob 
    393 what,steve up to his old tricks 
    394 what,snack required 
    395 what,xp about 2 
    396 what,back nothingness 
    397 what,brecon not an easy thing to do 
    398 what,poverty one of the pillars of buddhism 
    399 what,moore teh g00d 
    400 what,floor a bit too hard for bimbltron 
    401 what,simsea wrong the first time 
    402 what,japan exceptionally racist 
    403 what,jonquil dirty love 
    404 what,snuffel not sure i like diskeeper 
    405 what,snuffel going to take a shower 
    406 what,snuffel also downloading from usenet 
    407 what,snuffel correct 
    408 what,snuffel getting hungry 
    409 what,snuffel still working 
    410 what,snuffel installing oracle stuff 
    411 what,snuffel hallucinating 
    412 what,snuffel in bed 
    413 what,snuffel still sleeping 
    414 what,snuffel sorry for you 
    415 what,snuffel going to bed early tonight 
    416 what,devon pretty 
    417 what,devon very relaxed 
    418 what,decemeber a thursday 
    419 what,watashiki right 
    420 what,watashiki like 
    421 what,van always parked 
    422 what,van that 
    423 what,van about to go bang 
    424 what,boiler in the kitchen 
    425 what,guy quite special 
    426 what,guy a real son of a bitch 
    427 what,guy now married 
    428 what,guy a friend of hers 
    429 what,car the cheap insurance too 
    430 what,based good for you 
    431 what,boss much more fun 
    432 what,degrees quite clever 
    433 what,cooper on early 
    434 what,chat free 
    435 what,cat a nut 
    436 what,cat retarded lol 
    437 what,sad that 
    438 what,music threatened with closure before 
    439 what,music mine 
    440 what,2 on tv ya know 
    441 what,2 out btw 
    442 what,yr only fun some ppl get ya know 
    443 what,3 like 1990 or something 
    444 what,development complete or we move 
    445 what,development a lot better in it 
     478what,journey important 
     479what,notwest instant 
     480what,gui a web browser 
     481what,fan fixed 
     482what,assimilation futile 
     483what,solution to install one then 
     484what,leg hurting 
     485what,ports for freebsd users 
     486what,irony i just fixed that on notopic 
     487what,wtf with today 
     488what,wtf a boffin 
     489what,wtf that 
     490what,wtf a licence file 
     491what,mattyb talking to you 
     492what,freezing what it is alright 
     493what,freezing what it was 4 hours ago 
     494what,snow a foolish idea 
     495what,annorax about to paste that 
     496what,deathwaltz the best one 
     497what,deathwaltz just fun 
     498what,device patented by cecil booth 
     499what,speed 20mph 
     500what,back hurting 
     501what,flightplan apparently pretty dodgy 
     502what,access universally horrible 
     503what,seattle pretty botched 
     504what,simsea using them 
     505what,mattttt fine 
     506what,officially in goldmine 
     507what,snuffel getting ill 
     508what,snuffel sooo cold 
     509what,snuffel getting %OWNER{Snuffel} new phone soon 
     510what,snuffel going to bed 
     511what,snuffel going to bed now 
     512what,snuffel supposed to pay for 
     513what,kqueue/epoll far better 
     514what,turkey good though 
     515what,turkey a hp media centre pc 
     516what,turkey that it wasn't in a nice case 
     517what,turkey a belkin 802 
     518what,destruction nice 
     519what,walking slow 
     520what,watashiki a bird 
     521what,watashiki currently drinking a hot toddy 
     522what,watashiki hugging cable 
     523what,guy weird 
     524what,car on fire 
     525what,trivia already running 
     526what,1 time to wake up 
     527what,1 surely excellent 
     528what,1 on efnet 
     529what,bird called a 
     530what,caffeine not distinctive 
     531what,fave the tgi fridays menu 
     532what,exactly a scotch egg 
     533what,atm a penguin expert 
    446534what,mattyt a call centre monkey 
     535what,mattyt offering them 
    447536what,mattyt here by %OWNER{MattyT} lonesome 
    448537what,mattyt not a massive fan of christmas 
     538what,mattyt the modern scrooge 
    449539what,mattyt leaving s 
    450540what,mattyt sure that it is fine 
    451541what,mattyt orf homeski 
    452 what,mattyt outa here 
    453 what,mattyt sure it was herpes psu 
    454 what,mattyt not a battery 
    455 what,mattyt spotting a theme here 
    456 what,mattyt down there 
    457 what,mattyt saying no it is not alright 
    458 what,mattyt informed late 
    459 what,mattyt off to campus 
    460 what,mattyt back in exeter i 
    461 what,mattyt not sure yet 
    462 what,mattyt on hold 
    463 what,mattyt teh suck at taking back dvds 
    464 what,mattyt orf 
    465 what,4 the new one 
    466 what,4 a bit wank though 
    467 what,5 about 
    468 what,ltcmddata back 
    469 what,maxi enjoying the countdown music 
    470 what,maxi not late 
    471 what,end nigh 
    472 what,reason making bimbltron all excited 
    473 what,reason working again 
    474 what,ellen in edtv 
     542what,3 another one 
     543what,3 on platinum now 
     544what,3 much better 
     545what,3 a mistake 
     546what,1973 launched 
     547what,4 teh best 
     548what,4 fantastic 
     549what,[ad] asleep by now 
     550what,[ad] cheffing 
     551what,[ad] going to try for wilberforce 
     552what,skiing not gay 
     553what,skiing just silly 
     554what,skiing a bit gay 
     555what,skiing manly 
     556what,bovril a poor substitute 
     557what,mediawikis pointless anyway 
    475558what,distinction subtle but important 
    476 what,sam little when i got them 
    477 what,dunos given the option of a 
    478 what,dunos going to buy a colour laser 
    479 what,dunos saving %OWNER{dunos} money 
    480 what,dunos currently with elephant 
    481 what,dunos in saving mode at the moment 
    482 what,dunos off to bed 
    483 what,dunos a whole year older 
    484 what,dunos really tired or been drinking 
    485 what,dunos older 
    486 what,damo hiding in his room from nobby 
    487 what,product tied 
    488 what,359 i rite 
    489 what,assistant a bit geeky 
     559what,dunos using level 2 sarcasm 
     560what,dunos well proud of myself 
     561what,dunos confused 
     562what,dunos ripping what i need 
     563what,dunos back with natwest 
     564what,dunos not currently in debt 
     565what,dunos looking at a wired model 
     566what,dunos taking ecanacia and vitamin c 
     567what,dunos guessing hippy music 
     568what,dunos not that hungry 
     569what,dunos being made to watch 
     570what,dunos well impressed 
     571what,dunos getting fatter again 
     572what,dunos not a dog person 
     573what,dunos crap at badminton 
     574what,dunos bored and slightly drunk 
     575what,dunos back online 
     576what,dunos trying to get out of the pool 
     577what,dunos going to ring them 
     578what,dunos imagining it will be early may 
     579what,xorian %OWNER{Freya} brother 
     580what,64664 your friend 
     581what,seizures the neck 
    490582what,motivation a strange thing 
    491 what,conversation making wizwoz look sane 
    492 what,uma always nice 
    493 what,yeah, nice in the test drive 
    494 what,second in response to you 
    495 what,ipod around 
    496 what,irc.freenode taken out 
    497 what,castle only a 140 km drive 
    498 what,penalty wrong 
    499 what,murphy an optimist 
    500 what,chablis completely holidayed out 
    501 what,chablis wrong 
    502 what,notopic: sterdam airport is ok 
    503 what,chair probably easier 
    504 what,screen not refreshing well 
    505 what,life running atm 
    506 what,life quite possibly half over lol 
     583what,lager) just pointless 
     584what,t-dub new to this 
     585what,dogstar so stoned 
     586what,eclipse 'up' 
     587what,closest a french efnet server irc 
     588what,notopic: good fun 
     589what,notopic: now 
     590what,life mostly silly 
     591what,life subjective 
     592what,life before one knows 
     593what,life around 2 hours 
     594what,life now over 
     595what,screen a-mazing 
     596what,screen pretty good 
     597what,screen so awful 
     598what,screen in caps in this room 
    507599what,for) very good 
    508 what,model provided by the database layer 
    509 what,story the oompa loompa in charlie 
    510 what,sign ace 
    511 what,sign what the s stood for 
    512600what,interface really easy to use 
    513 what,moderation prob the key 
    514 what,woman a qt 
    515 what,br> the version number 
    516 what,pebl quite good i think 
    517 what,saw a uni one 
    518 what,hot very very bad 
    519 what,thunderbird only 11 for cath2wrk 
    520 what,thunderbird broken 
    521 what,gimi being mean to wizwoz 
    522 what,vegas a fat 
    523 what,|kev| planning to do that 
    524 what,|kev| about to say 
    525 what,|kev| going to do 
    526 what,|kev| not mean 
     601what,show only 175mb 
     602what,price-point realistic 
     603what,ryan really very moving 
     604what,gardner nothing like your name 
     605what,ultrablad new 
     606what,opinion increasing 
     607what,gym a weird one 
    527608what,1997, tycoon 
    528 what,cube pikmin 1 and 2 
    529 what,yule good 
    530 what,closing us coming home and stuff 
    531 what,test a load of crap anyway 
    532 what,entertaining it 
    533 what,wall a little higher than the bus 
    534 what,protest gone 
    535 what,cds those plastic wallet things 
    536 what,drive a sekrit 
    537 what,drive healthy 
    538 what,drive nt actually made by ms is it 
    539 what,[beta] at uni 
    540 what,norm gettin married omg 
    541 what,uni deserted 
    542 what,address quite fine 
    543 what,old now about 1 
    544 what,person typing 
    545 what,lift ludicrously hot 
     609what,|kev| being unreasonable 
     610what,|kev| wrong 
     611what,|kev| at work 
     612what,troy in which modern country 
     613what,walk sleepiness 
     614what,traffic so loud in our lounge 
     615what,connection restored by 7 
     616what,connection cable 
     617what,adopt by buying a baby off ebay 
     618what,prefix, widely heard 
     619what,firefox crashing 
     620what,firefox coming at 4kbs 
     621what,firefox more crash prone than ie 
     622what,firefox never a problem before 
     623what,firefox using 230mb of memory 
     624what,firefox good 
     625what,winamp cool 
    546626what,ffs acceptable 
    547 what,pointless that 
     627what,target on the bill 
     628what,person semi-impersonating 
     629what,minumum peanuts 
     630what,linux competent 
     631what,echinacea nontoxic 
    548632what,morning dragging rather 
    549 what,morning certainly suspicioud 
    550 what,punxsutawney another strange name 
    551 what,sec dry 
    552 what,demon about to die again 
    553 what,electric turned off 
    554 what,pepper good for you 
    555 what,hour perhaps a little ambitious 
    556 what,vol-au-vent yummy too 
    557 what,girlfriend better than the last one 
    558 what,www.flibble.exeter.ac.uk icky 
    559 what,an p here is 10 
    560 what,coffee going to be in short supply 
    561 what,course that 
    562 what,spec english 
    563 what,rally superb 
    564 what,parking five quid a night 
    565 what,as wizwoz it seems 
    566 what,as evolving story 
    567 what,as at least 1 of her kids 
    568 what,things american 
    569 what,song awful 
    570 what,minder never online anymore 
    571 what,minder just an unused eggdrop 
    572 what,minder here 
    573 what,actually a wine called norton 
    574 what,joost feeling ill 
    575 what,jam also called preserves 
    576 what,james prob arriving 5ish 
    577 what,zoop a puzzle game 
    578 what,mind made of mud 
    579 what,11am hometime on friday 
     633what,tvbegone now fixed 
     634what,two that i prefered it before 
     635what,two hilarious 
     636what,stuffonmycat cruel 
     637what,some just 
     638what,1.5 really very fast 
     639what,1.5 so fast 
     640what,1.5 alot faster actually 
     641what,1.5 alot nicer than 1 
     642what,tagetes a variety of which 
     643what,legooolas thinking 
     644what,legooolas driving his feet 
     645what,legooolas spamming them 
     646what,legooolas also in a boycotting sony mood 
     647what,legooolas the department 
     648what,legooolas aware 
     649what,legooolas just relaying what i heard 
     650what,1:20 when the cool kids go to bed 
     651what,hackmed hackmed 
     652what,girlfriend always having 'fat days' 
     653what,general still independant 
     654what,coffee more usual 
     655what,boddy the murder 
     656what,shbat arabic 
     657what,shbat arabic for 
     658what,shbat arabic for what month 
     659what,talking a real language 
     660what,pdf fun 
     661what,i* not ghey 
     662what,hypermoose cooler 
     663what,sorry, on phone 
     664what,wildman just joking before 
     665what,things just regular copyright i think 
     666what,things severely limited 
     667what,things minimal 
     668what,things the flash and java plugins 
     669what,effort used on corrective maintenance 
     670what,know after a php coder 
     671what,know ros 
    580672what,food a good cure 
    581 what,food damn good 
    582 what,food bad 
    583 what,food somewhat less than that 
    584 what,food cheese 
    585 what,food coffee 
    586 what,food brainfood 
    587 what,tahoe prettier 
    588 what,achievement it 
    589 what,control a wonderful thing 
    590 what,anything possible 
    591 what,delorean sometimes referred to as the 
    592 what,meats the horrible 
     673what,james elsewhere 10mins ago 
     674what,james undressing 
     675what,james due to get 10 inches 
     676what,cleaning in the bathroom and kitchen 
     677what,banana really hurting %OWNER{Greeneyez} tummy 
     678what,box hillariously awful 
     679what,mine an abit 
     680what,mine older we kept mine 
     681what,mine in the garage 
     682what,mine back up now 
     683what,mine huge 
     684what,one awesome 
    593685what,one miss tibbs 
    594686what,one cmj 
     687what,one paticually nice 
     688what,one 62mb i think 
    595689what,one quite that much 
    596 what,one particularly incompetent 
     690what,one funny 
     691what,one good too i thought 
     692what,one that it makes no difference 
    597693what,one more interlectual 
     694what,one andi giving rosie his heart 
     695what,one called 
    598696what,one fun 
    599 what,one hideous 
    600 what,one probably the bat phone 
    601 what,one vietnamese too 
    602 what,one on purpose 
    603 what,one a bit of a nono 
    604 what,one wrq 
    605 what,one mucho better 
    606 what,one a bit pants 
    607 what,one two inches thick 
    608 what,one home 
    609 what,one not a engineer 
    610 what,one the better of the two 
    611 what,one a superb conversion 
    612 what,one excellent 
    613 what,one interested in 
    614 what,one essential 
    615 what,one here 
    616 what,one a doozy 
    617 what,one more fun and go with that 
    618 what,password misleading 
    619 what,password just the other day 
    620 what,thumbnail meant to be in the first place 
    621 what,threshold terrible 
    622 what,chimmy_ paying for 3mbit 
    623 what,chimmy_ on a geforce 2 for 5 yeras 
    624 what,conversion terrible 
    625 what,guess quite okay considering 
    626 what,spending out the way 
    627 what,film is what i meant 
    628 what,film jammed in it 
    629 what,router/wap netgear 
    630 what,iran next personally 
    631 what,deviation unacceptable 
    632 what,collegues selling xboxes on ebay 
    633 what,library totally free 
    634 what,library good 
    635 what,bin/cue an odd format for dvdr 
    636 what,nazareth on tv 
    637 what,urgusabic quite shocked 
    638 what,urgusabic a newbie 
    639 what,urgusabic n't being gay 
    640 what,urgusabic hoping 
    641 what,sarah using it on a bed 
    642 what,o %OWNER{JamesOff} ankle 
    643 what,consumption surely a positive indicator 
     697what,one working fine 
     698what,one nice anyways 
     699what,one not on cube 
     700what,one fine 
     701what,password not 
     702what,kids an injustice 
     703what,notopic drunk 
     704what,outage fixed 
     705what,church based on hypocrisy and hatred 
     706what,church bollocks 
     707what,konqueror basically the same browser 
     708what,scorponok going to state that in fact 
     709what,scorponok hurling it around 
     710what,jordan hebrew for 'the descender' 
     711what,lcfr excellent 
     712what,cpt_kirk doing a run right now 
     713what,cpt_kirk on season iii of tos 
     714what,cpt_kirk thinking printers 
     715what,knowledge quite limited 
     716what,curves 50/50 strength / cardio 
     717what,film a massive improvement 
     718what,err coz i'm silly 
     719what,assignment due 
     720what,j good 
     721what,bowling ok once in a while 
     722what,bowling quite a bit easier 
     723what,gba really really cool 
     724what,pen in short supply 
     725what,vid a bit sad 
     726what,gez^ not jon foster 
     727what,newt.... for newton abbot 
     728what,avox talking to you 
     729what,user@60.49.35.117) last seen quitting from 
     730what,nothing good 
     731what,sarah in london today 
    644732what,eb though 
    645 what,eb shocking tho 
    646 what,foot still enormous 
    647 what,foot now going slightly bruisy too 
    648 what,foot almost skeletal again 
    649 what,foreskin supposed to be like 
    650 what,sony quite happy 
    651 what,sauce super yum 
    652 what,dad desperate for computer fixing 
    653 what,dad not smart 
    654 what,dad an identical twin 
    655 what,dad a bit pissed off 
    656 what,dad amazing 
    657 what,dad drunk and in theory on it 
    658 what,dad 60 years old in 4 days' time 
     733what,long jesus' 
     734what,long jesus' temptation in 
     735what,long jesus' temptation in the 
     736what,long jesus' temptation 
     737what,long the le mans endurance motor 
     738what,long the le mans 
     739what,long the danube 
     740what,is, a chat rooms 
    659741what,magic the last 
    660 what,ever bad and evil 
    661 what,residence very steamy these days 
    662 what,newyear more than 8 days away 
    663 what,grissom kinda cute 
    664 what,andi like 
    665 what,possibly ass some kind of girly fuzz 
    666 what,chablis|| not old tyvm 
    667 what,chablis|| younger than you are 
    668 what,chablis|| easily amused 
    669 what,ds kicking psp arse elsewhere btw 
    670 what,men sexy 
     742what,router a load of rubbish 
     743what,sony their forte 
     744what,sony insane 
     745what,dad 57 this year 
     746what,dad kevin 
     747what,dad lovely 
     748what,dad judging yesterday 
     749what,dad that 
     750what,role won by joan fontaine 
     751what,type fucked then 
     752what,code right 
     753what,code the way to go 
     754what,console nicer 
     755what,t|c playing up 
     756what,coughing driving cath2 insane 
     757what,training funny 
     758what,floyd pink too 
     759what,floyd brilliant 
     760what,anydvd your friend though 
     761what,details always an offence 
     762what,building finished in 
     763what,building finished in 1931 
     764what,girl too young for mattyt 
     765what,sid here 
    671766what,scientology based upon ohm's law 
    672 what,bimbltron wondering if he might hear bimbltron 
    673 what,bimbltron nearer 
    674 what,bimbltron out of date 
    675 what,bimbltron planning on 
    676 what,bimbltron special 
    677 what,doing talking about xmas atm 
    678 what,testo's selling singing sandwiches 
    679 what,restaurant very hard 
    680 what,history a sexist term 
    681 what,ep14 only a week later in the us 
     767what,money n't squandered 
     768what,money tight 
     769what,bimbltron wondering that 
     770what,laver spooky as fuck at night 
    682771what,single very good 
    683772what,dan pregnant 
    684 what,dan the simpler one 
    685 what,diskeeper working properly 
    686 what,diskeeper defragging the files in e 
    687 what,sp) also handy 
    688 what,ep called 
    689 what,character a dancer 
    690 what,play debatable 
    691 what,dave here 
    692 what,galactic horizontal takeoff 
    693 what,m40 good for that too 
    694 what,skutter in good health 
    695 what,most using 
    696 what,movies still not legal there 
    697 what,pic a complete pose 
    698 what,pic really good 
    699 what,9th a su too 
    700 what,salad %OWNER{Chablis||} friend 
    701 what,westminster part of london 
    702 what,gerrad a good name 
    703 what,bagpuss cold 
    704 what,bagpuss getting 20-30 a day 
    705 what,pie a generic term 
    706 what,pie so delicious 
    707 what,in/out ace 
    708 what,easytag fairly nice 
     773what,office becoming most tiresome 
     774what,hair also gay 
     775what,hair good 
     776what,trucks a bad mix 
     777what,interview tomorrow 
     778what,games important 
     779what,dave also pretty useless 
     780what,dave undoubtedly on the way back up 
     781what,dave leaving 
     782what,sim uberatractive 
     783what,pgr a waste of both time and money 
     784what,gc teeny 
     785what,gc cute 
     786what,gc worth it just for f-zero 
     787what,junction very good 
     788what,mirc probably the best 
     789what,pic excellent 
     790what,6680 a nice phone too 
     791what,wat plan van aanpak in het engels 
     792what,cold... working on car earlier 
     793what,rsi a niggling ache 
    709794what,diesel 91p per litre 
    710 what,diesel the only being who has solved 
    711 what,diesel cheaper 
    712 what,face funny 
    713 what,david being mean to islean again 
    714 what,walmart going in 
    715 what,bang a pop song 
    716 what,advertisething so wrong 
    717 what,zeebwich thinking with cook as 
    718 what,zeebwich %OWNER{Jorgje} weakness 
    719 what,baileys nice 
    720 what,wizwoz bored 
    721 what,wizwoz having the other day 
    722 what,wizwoz going to ask you that 
    723 what,wizwoz officially naked 
    724 what,wizwoz young 
    725 what,wizwoz born in october 
    726 what,wizwoz in text 
    727 what,wizwoz shocked and dismayed 
    728 what,wizwoz very good at it lol 
    729 what,wizwoz told 
    730 what,wizwoz thinking 
    731 what,wizwoz supposed to be back for 2 
    732 what,wizwoz engaged 
    733 what,wizwoz like 
    734 what,wizwoz old 
    735 what,wizwoz trying to do before 
    736 what,wizwoz just like her husband 
    737 what,wizwoz married then 
    738 what,wizwoz drunk 
    739 what,wizwoz looking for wizwoz on a map 
    740 what,wizwoz in the kitchen 
    741 what,wizwoz a teen mom a couple of times 
    742 what,wizwoz underage 
    743 what,wizwoz as polite as i could be 
    744 what,hc much more active 
    745 what,vexxed great 
    746 what,vexxed perfect for that 
    747 what,riker in the final ep 
    748 what,evans so funny 
     795what,face down here on %OWNER{Duds} head 
     796what,face a picture 
     797what,jaydan around for xmas 
     798what,jaydan aiming for trip to pub thing 
     799what,line fucked with the episode 
     800what,line fuck off 
     801what,baileys yummy 
     802what,way something of a quick fix 
     803what,way i calling ym kid katherine 
     804what,voda czech for water 
     805what,spin heady 
     806what,licence in %OWNER{Greeneyez} name 
     807what,reserve dead 
     808what,bibliophobia a fear of __________ 
     809what,bank never 
     810what,hd 40mb 
    749811what,place a bit of a huge mess 
    750 what,place chocablock but hey 
    751 what,place lame 
    752 what,place good in that respect 
     812what,drives sata2 
     813what,setenv met with fuck off and die 
     814what,futurama getting a movie 
    753815what,tap run for ages 
    754 what,something wrong here 
    755 what,something going to go all wrong 
    756 what,something square 
    757 what,park only 38 
    758 what,topic right 
    759 what,stuff' not dirty when makie does it 
    760 what,gp the worst 
     816what,bucket smelly 
     817what,baseball a poor imitation of rounders 
     818what,baseball utter bunk duds 
     819what,something obviously wrong here 
     820what,democracy it is too commercial 
     821what,democracy nothing but mob rule 
     822what,birthday celebrated february 

  • trunk/modules/interbot.tcl

    r584 r663  
    185185      set bMotionInfo(silence) 2 
    186186    } 
     187                 
     188                #check we haven't been sent broken text to output by %bot 
     189                regsub "^[0-9]+,(.+)" $txt "\1" txt 
     190 
    187191    bMotionDoAction $channel $bot $txt "" 0 1 
    188192    bMotion_putloglev 1 * "bMotion: done say command from $bot" 

  • trunk/modules/output.tcl

    r659 r663  
    133133 
    134134    while {[string match "*%|*" $text]} { 
     135                        set origtext $text 
    135136      set sentence [string range $text 0 [expr [string first "%|" $text] -1]] 
    136137      if {$sentence != ""} { 
    … …  
    143144      } 
    144145      set text [string range $text [expr [string first "%|" $text] + 2] end] 
    145       incr loopCount 
    146       if {$loopCount > 20} { 
     146                        if {$text == $origtext} { 
    147147        putlog "bMotion ALERT! Bailed in bMotionDoAction with $text. Lost output." 
    148148        return 0 

  • trunk/modules/plugins.tcl

    r588 r663  
    112112 
    113113 
    114  
    115 ## Load an admin plugin 
    116 #proc bMotion_plugin_add_admin { id match flags callback language } { 
    117 #  global bMotion_plugins_admin plugins bMotion_testing 
    118 # 
    119 #  if {$bMotion_testing == 0} { 
    120 #    catch { 
    121 #      set test $bMotion_plugins_admin($id) 
    122 #      putlog "bMotion: ALERT! admin plugin $id is defined more than once" 
    123 #      return 0 
    124 #    } 
    125 #  } 
    126 # 
    127 #  if [bMotion_plugin_check_allowed "admin:$id"] { 
    128 #    set bMotion_plugins_admin($id) "${match}Š${flags}Š${callback}Š${language}" 
    129 #    bMotion_putloglev 2 * "bMotion: added admin plugin: $id" 
    130 #    append plugins "$id," 
    131 #    return 1 
    132 #  } 
    133 #  bMotion_putloglev d * "bMotion: ignoring disallowed plugin admin:$id" 
    134 #} 
    135  
    136  
    137 ## Find an admin plugin 
    138 #proc bMotion_plugin_find_admin { text lang } { 
    139 #  global bMotion_plugins_admin 
    140 #  set s [array startsearch bMotion_plugins_admin] 
    141 # 
    142 #  while {[set key [array nextelement bMotion_plugins_admin $s]] != ""} { 
    143 #    if {$key == "dummy"} { continue } 
    144 #    set val $bMotion_plugins_admin($key) 
    145 #    set blah [split $val "Š"] 
    146 #    set rexp [lindex $blah 0] 
    147 #    set flags [lindex $blah 1] 
    148 #    set callback [lindex $blah 2] 
    149 #    set language [lindex $blah 3] 
    150 #    if {[string match $lang $language] || ($language == "any")|| ($language == "all")} { 
    151 #      if [regexp -nocase $rexp $text] { 
    152 #        array donesearch bMotion_plugins_admin $s 
    153 #        return "${flags}Š$callback" 
    154 #      } 
    155 #    } 
    156 #  } 
    157 #  array donesearch bMotion_plugins_admin $s 
    158 #  return "" 
    159 #} 
    160  
    161 ## Load management plugin 
     114## Load management plugin: TODO: Still generating dups? 
    162115proc bMotion_plugin_add_management { id match flags callback { language "" } { helpcallback "" } } { 
    163116  global bMotion_plugins_management plugins bMotion_testing 
    … …  
    166119    catch { 
    167120      set test $bMotion_plugins_management($id) 
    168       putlog "bMotion: ALERT! management plugin $id is defined more than once" 
    169       return 0 
    170     } 
    171   } 
    172  
    173   if [bMotion_plugin_check_allowed "management:$id"] { 
    174     set bMotion_plugins_management($id) "${match}Š${flags}Š${callback}Š${helpcallback}" 
    175     bMotion_putloglev 2 * "bMotion: added management plugin: $id" 
    176     append plugins "$id," 
    177     return 1 
    178   } 
    179   bMotion_putloglev d * "bMotion: ignoring disallowed plugin management:$id" 
     121      putlog "bMotion: ALERT! management plugin $id is defined more than once ($bMotion_testing)" 
     122      return 0 
     123    } 
     124                if [bMotion_plugin_check_allowed "management:$id"] { 
     125                        set bMotion_plugins_management($id) "${match}Š${flags}Š${callback}Š${helpcallback}" 
     126                        bMotion_putloglev 2 * "bMotion: added management plugin: $id" 
     127                        append plugins "$id," 
     128                        return 1 
     129                } 
     130                bMotion_putloglev d * "bMotion: ignoring disallowed plugin management:$id" 
     131        } 
    180132} 
    181133 
    … …  
    228180      return 0 
    229181    } 
    230   } 
    231   if [bMotion_plugin_check_allowed "complex:$id"] { 
    232     set bMotion_plugins_complex($id) "${match}Š${chance}Š${callback}Š${language}" 
    233     bMotion_putloglev 2 * "bMotion: added complex plugin: $id" 
    234     append plugins "$id," 
    235     return 1 
    236   } 
    237   bMotion_putloglev d * "bMotion: ignoring disallowed plugin complex:$id" 
    238  
     182                if [bMotion_plugin_check_allowed "complex:$id"] { 
     183                        set bMotion_plugins_complex($id) "${match}Š${chance}Š${callback}Š${language}" 
     184                        bMotion_putloglev 2 * "bMotion: added complex plugin: $id" 
     185                        append plugins "$id," 
     186                        return 1 
     187                } 
     188                bMotion_putloglev d * "bMotion: ignoring disallowed plugin complex:$id" 
     189  } 
    239190} 
    240191 
    … …  
    280231      return 0 
    281232    } 
    282   } 
    283   if [bMotion_plugin_check_allowed "output:$id"] { 
    284     set bMotion_plugins_output($id) "${callback}Š${enabled}Š$language" 
    285     bMotion_putloglev 2 * "bMotion: added output plugin: $id" 
    286     append plugins "$id," 
    287     return 1 
    288   } 
    289   bMotion_putloglev d * "bMotion: ignoring disallowed plugin output:$id" 
     233                if [bMotion_plugin_check_allowed "output:$id"] { 
     234                        set bMotion_plugins_output($id) "${callback}Š${enabled}Š$language" 
     235                        bMotion_putloglev 2 * "bMotion: added output plugin: $id" 
     236                        append plugins "$id," 
     237                        return 1 
     238                } 
     239                bMotion_putloglev d * "bMotion: ignoring disallowed plugin output:$id" 
     240        } 
    290241} 
    291242 
    … …  
    323274      return 0 
    324275    } 
    325   } 
    326   if [bMotion_plugin_check_allowed "action_simple:$id"] { 
    327     set bMotion_plugins_action_simple($id) "${match}Š${chance}Š${response}Š$language" 
    328     bMotion_putloglev 2 * "bMotion: added simple action plugin: $id" 
    329     append plugins "$id," 
    330     return 1 
    331   } 
    332   bMotion_putloglev d * "bMotion: ignoring disallowed plugin action_simple:$id" 
    333  
     276                if [bMotion_plugin_check_allowed "action_simple:$id"] { 
     277                        set bMotion_plugins_action_simple($id) "${match}Š${chance}Š${response}Š$language" 
     278                        bMotion_putloglev 2 * "bMotion: added simple action plugin: $id" 
     279                        append plugins "$id," 
     280                        return 1 
     281                } 
     282                bMotion_putloglev d * "bMotion: ignoring disallowed plugin action_simple:$id" 
     283        } 
    334284} 
    335285 
    … …  
    371321      return 0 
    372322    } 
    373   } 
    374   if [bMotion_plugin_check_allowed "action_complex:$id"] { 
    375     set bMotion_plugins_action_complex($id) "${match}Š${chance}Š${callback}Š${language}" 
    376     bMotion_putloglev 2 * "bMotion: added complex action plugin: $id" 
    377     append plugins "$id," 
    378     return 1 
    379   } 
    380   bMotion_putloglev d * "bMotion: ignoring disallowed plugin action_complex:$id" 
    381  
     323                if [bMotion_plugin_check_allowed "action_complex:$id"] { 
     324                        set bMotion_plugins_action_complex($id) "${match}Š${chance}Š${callback}Š${language}" 
     325                        bMotion_putloglev 2 * "bMotion: added complex action plugin: $id" 
     326                        append plugins "$id," 
     327                        return 1 
     328                } 
     329                bMotion_putloglev d * "bMotion: ignoring disallowed plugin action_complex:$id" 
     330        } 
    382331} 
    383332 
    … …  
    414363 
    415364proc bMotion_plugin_check_depend { depends } { 
    416  
    417365  #pass a string in the format "type:plugin,type:plugin,..." 
    418  
    419366  if {$depends == ""} { 
    420367    return 1 
    … …  
    445392 
    446393proc bMotion_plugin_check_allowed { name } { 
    447  
    448394  #pass a string in the format "type:plugin" 
    449395  #setting in config should be "type:plugin,type:plugin,..." 
    450  
    451396  global bMotionSettings 
    452397 
    … …  
    488433      return 0 
    489434    } 
    490   } 
    491   if [bMotion_plugin_check_allowed "irc:$id"] { 
    492     set bMotion_plugins_irc_event($id) "$typeŠ${match}Š$chanceŠ$callbackŠ$language" 
    493     bMotion_putloglev 2 * "bMotion: added IRC event plugin: $id" 
    494     append plugins "$id," 
    495     return 1 
    496   } 
    497   bMotion_putloglev d * "bMotion: ignoring disallowed plugin irc:$id" 
    498  
     435                if [bMotion_plugin_check_allowed "irc:$id"] { 
     436                        set bMotion_plugins_irc_event($id) "$typeŠ${match}Š$chanceŠ$callbackŠ$language" 
     437                        bMotion_putloglev 2 * "bMotion: added IRC event plugin: $id" 
     438                        append plugins "$id," 
     439                        return 1 
     440                } 
     441                bMotion_putloglev d * "bMotion: ignoring disallowed plugin irc:$id" 
     442        } 
    499443} 
    500444 
    … …  
    536480 
    537481## Load the simple plugins 
    538 set plugins "" 
    539 catch { source "$bMotionPlugins/simple.tcl" } 
    540 #set plugins [string range $plugins 0 [expr [string length $plugins] - 2]] 
    541 #bMotion_putloglev d * "bMotion: simple plugins loaded: $plugins" 
     482source "$bMotionPlugins/simple.tcl" 
    542483 
    543484## Load the admin (management) plugins 
    544 set plugins "" 
    545485catch { source "$bMotionPlugins/admin.tcl" } 
    546 #set plugins [string range $plugins 0 [expr [string length $plugins] - 2]] 
    547 #bMotion_putloglev d * "bMotion: admin plugins loaded: $plugins" 
    548486 
    549487## Load the complex plugins 
    550 set plugins "" 
    551488catch { source "$bMotionPlugins/complex.tcl" } 
    552 #set plugins [string range $plugins 0 [expr [string length $plugins] - 2]] 
    553 #bMotion_putloglev d * "bMotion: complex plugins loaded: $plugins" 
    554489 
    555490## Load the output plugins 
    556 set plugins "" 
    557491catch { source "$bMotionPlugins/output.tcl" } 
    558 #set plugins [string range $plugins 0 [expr [string length $plugins] - 2]] 
    559 #bMotion_putloglev d * "bMotion: output plugins loaded: $plugins" 
    560492 
    561493## Load the simple action plugins 

  • trunk/plugins/action_complex.tcl

    r461 r663  
    2020  set files [glob -nocomplain "$bMotionPlugins/$language/action_complex_*.tcl"] 
    2121  foreach f $files { 
     22                set count [llength [array names bMotion_plugins_action_complex]] 
    2223    bMotion_putloglev 1 * "bMotion: loading ($language) complex action plugin file $f" 
    2324    catch { 
    2425      source $f 
    25     } 
     26    } err 
     27                set newcount [llength [array names bMotion_plugins_action_complex]] 
     28                if {($bMotion_testing == 0) && ($newcount == $count)} { 
     29                        putlog "bMotion: ALERT! complex action plugin file $f added no plugins" 
     30                        putlog "Possible error: $err" 
     31                } 
    2632  } 
    2733} 

  • trunk/plugins/action_simple.tcl

    r2 r663  
    1515#                         name  regexp            %   responses 
    1616#bMotion_plugin_add_action_simple "licks" "(licks|bites) %botnicks" 100 [list "%VAR{rarrs}"] 
     17#TODO: Move this 
    1718bMotion_plugin_add_action_simple "moo" "^(goes |does a )?moo+s?( at %botnicks)?" 40 [list "%VAR{moos}"] "all" 
    1819 
    … …  
    2223set files [glob -nocomplain "$bMotionPlugins/action_simple_*.tcl"] 
    2324foreach f $files { 
     25        set count [llength [array names bMotion_plugins_action_simple]] 
    2426  bMotion_putloglev 1 * "bMotion: loading simple action plugin file $f" 
    2527  catch { 
    2628    source $f 
    27   } 
     29  } err 
     30        set newcount [llength [array names bMotion_plugins_action_simple]] 
     31        if {($bMotion_testing == 0) && ($newcount == $count)} { 
     32                putlog "bMotion: ALERT! simple action plugin file $f added no plugins" 
     33                putlog "Possible error: $err" 
     34        } 
    2835} 

  • trunk/plugins/admin.tcl

    r461 r663  
    2020  set files [glob -nocomplain "$bMotionPlugins/$language/admin_*.tcl"] 
    2121  foreach f $files { 
     22                set count [llength [array names bMotion_plugins_admin]] 
    2223    bMotion_putloglev 1 * "bMotion: loading ($language) admin plugin file $f" 
    2324    catch { 
    2425      source $f 
    25     } 
     26    } err 
     27                set newcount [llength [array names bMotion_plugins_admin]] 
     28                if {($bMotion_testing == 0) && ($newcount == $count)} { 
     29                        putlog "bMotion: ALERT! admin plugin file $f added no plugins" 
     30                        putlog "Possible error: $err" 
     31                } 
    2632  } 
    2733} 

  • trunk/plugins/admin_plugin.tcl

    r540 r663  
    1717 
    1818proc bMotion_plugin_management_plugins { handle { arg "" }} { 
    19  
    2019  #plugin remove <type> <id> 
    2120  if [regexp -nocase {remove ([^ ]+) (.+)} $arg matches t id] { 
    … …  
    9291    } 
    9392    foreach t {simple complex output admin action_simple action_complex irc_event management} { 
    94     set arrayName "bMotion_plugins_$t" 
    95     upvar #0 $arrayName cheese 
    96     set plugins [array names cheese] 
    97     set plugins [lsort $plugins] 
    98     set a "\002$t\002: " 
    99     set count 0 
    100     foreach n $plugins { 
    101         if {($re == "") || [regexp -nocase $re $n]} { 
    102       if {[string length $a] > 55} { 
    103             bMotion_putadmin "$a" 
    104         set a "     " 
    105       } 
    106       if {$n != "dummy"} { 
    107       incr count 
    108       incr total 
    109         if {$t == "output"} { 
    110           set details $cheese($n) 
    111           set blah [split $details "Š"] 
    112           set enabled [lindex $blah 1] 
    113           if {$enabled} { 
    114             append a "$n\[on\], " 
    115           } else { 
    116             append a "$n\[off\], " 
    117           } 
    118         } else { 
    119           append a "$n, " 
    120         } 
    121       } 
    122     } 
    123       } 
    124     set a [string range $a 0 [expr [string length $a] - 3]] 
    125       if {($re != "") && $count} { 
    126         bMotion_putadmin "$a ($count)\n" 
    127   } 
    128     } 
    129     bMotion_putadmin "Total plugins: $total" 
    130     return 0 
    131   } 
     93                        set arrayName "bMotion_plugins_$t" 
     94                        upvar #0 $arrayName cheese 
     95                        set plugins [array names cheese] 
     96                        set plugins [lsort $plugins] 
     97                        set a "\002$t\002: " 
     98                        set count 0 
     99                        foreach n $plugins { 
     100                                if {($re == "") || [regexp -nocase $re $n]} { 
     101                                        if {[string length $a] > 55} { 
     102                                                bMotion_putadmin "$a" 
     103                                                set a "     " 
     104                                        } 
     105                                        if {$n != "dummy"} { 
     106                                                incr count 
     107                                                incr total 
     108                                                if {$t == "output"} { 
     109                                                        set details $cheese($n) 
     110                                                        set blah [split $details "Š"] 
     111                                                        set enabled [lindex $blah 1] 
     112                                                        if {$enabled} { 
     113                                                                append a "$n\[on\], " 
     114                                                        } else { 
     115                                                                append a "$n\[off\], " 
     116                                                        } 
     117                                                } else { 
     118                                                        append a "$n, " 
     119                                                } 
     120                                        } 
     121                                } 
     122                        } 
     123                        set a [string range $a 0 [expr [string length $a] - 3]] 
     124                        if {($re != "") && $count} { 
     125                                bMotion_putadmin "$a ($count)\n" 
     126                        } 
     127                } 
     128                bMotion_putadmin "Total plugins: $total" 
     129                return 0 
     130        } 
    132131 
    133132  #all else fails, give usage: 

  • trunk/plugins/complex.tcl

    r461 r663  
    2020  set files [glob -nocomplain "$bMotionPlugins/$language/complex_*.tcl"] 
    2121  foreach f $files { 
     22                set count [llength [array names bMotion_plugins_complex]] 
    2223    bMotion_putloglev 1 * "bMotion: loading ($language) complex plugin file $f" 
    2324    catch { 
    2425      source $f 
    25     } 
     26    } err 
     27                set newcount [llength [array names bMotion_plugins_complex]] 
     28                if {($bMotion_testing == 0) && ($newcount == $count)} { 
     29                        putlog "bMotion: ALERT! complex plugin file $f added no plugins" 
     30                        putlog "Possible error: $err" 
     31                } 
    2632  } 
    2733} 

  • trunk/plugins/en/action_complex_hands_dildo.tcl

    r662 r663  
    175175    return 0 
    176176  } 
    177    
    178177} 

  • trunk/plugins/en/complex_action_hands_dildo.tcl

    r662 r663  
    1515 
    1616#we need complex_action:hands 
    17 if {![bMotion_plugin_check_depends "action_complex:hands"} { 
     17if {![bMotion_plugin_check_depend "action_complex:hands"]} { 
    1818        return 0 
    1919} 
    … …  
    171171    return 0 
    172172  } 
    173    
    174173} 

  • trunk/plugins/en/complex_goodwork.tcl

    r662 r663  
    33# $Id$ 
    44# 
    5 # vim: fdm=indent fdn=1 
    65 
    76############################################################################### 
    … …  
    1413############################################################################### 
    1514 
    16 bMotion_plugin_add_complex "goodwork" "^(well done|good (work|show|job)),? %botnicks\.?$" 100 bMotion_plugin_complex_goodwork 
     15bMotion_plugin_add_complex "goodwork" "^(well done|good (work|show|job)),? %botnicks\.?$" 100 bMotion_plugin_complex_goodwork "en" 
    1716 
    1817proc bMotion_plugin_complex_goodwork { nick host handle channel text } { 

  • trunk/plugins/en/complex_wins.tcl

    r662 r663  
    1212############################################################################### 
    1313 
    14 bMotion_plugin_add_complex "wins" "^${botnicks}(:?) (wins|exactly|precisely|perfect|nice one|yes)[!1.]*$" 100 bMotion_plugin_complex_wins "en" 
     14bMotion_plugin_add_complex "wins" "^${botnicks}(:?) (wins|exactly|precisely|perfect|nice one|yes)\[!1.\]*$" 100 bMotion_plugin_complex_wins "en" 
    1515 
    1616proc bMotion_plugin_complex_wins { nick host handle channel text } { 

  • trunk/plugins/en/simple_hnn.tcl

    r439 r663  
    1313############################################################################### 
    1414 
    15 bMotion_plugin_add_simple "hnnn" "^hn{3,}" 70 [list "%VAR{blindings}"] 
     15bMotion_plugin_add_simple "hnnn" "^hn{3,}" 70 [list "%VAR{blindings}"] "en" 

  • trunk/plugins/en/simple_zzz.tcl

    r439 r663  
    1313############################################################################### 
    1414 
    15 bMotion_plugin_add_simple "zzz" "^zzz+" 50 [list "%VAR{handcoffees}"] 
     15bMotion_plugin_add_simple "zzz" "^zzz+" 50 [list "%VAR{handcoffees}"] "en" 

  • trunk/plugins/irc_event.tcl

    r461 r663  
    2020  set files [glob -nocomplain "$bMotionPlugins/$language/irc_*.tcl"] 
    2121  foreach f $files { 
     22                set count [llength [array names bMotion_plugins_irc_event]] 
    2223    bMotion_putloglev 1 * "bMotion: loading ($language) irc event plugin file $f" 
    2324    catch { 
    2425      source $f 
    25     } 
     26    } err 
     27                set newcount [llength [array names bMotion_plugins_irc_event]] 
     28                if {($bMotion_testing == 0) && ($newcount == $count)} { 
     29                        putlog "bMotion: ALERT! complex plugins file $f added no plugins" 
     30                        putlog "Possible error: $err" 
     31                } 
    2632  } 
    2733} 

  • trunk/plugins/output.tcl

    r2 r663  
    1818  set files [glob -nocomplain "$bMotionPlugins/$language/output_*.tcl"] 
    1919  foreach f $files { 
     20                set count [llength [array names [bMotion_plugins_output]] 
    2021    bMotion_putloglev 1 * "bMotion: loading ($language) output plugin file $f" 
    2122    catch { 
    2223      source $f 
    23     } 
     24    } err 
     25                set newcount [llength [array names bMotion_plugins_output]] 
     26                if {($bMotion_testing == 0) && ($newcount == $count)} { 
     27                        putlog "bMotion: ALERT! output plugin file $f added no plugins" 
     28                        putlog "Possible error: $err" 
     29                } 
    2430  } 
    2531} 

  • trunk/plugins/simple.tcl

    r461 r663  
    2020  set files [glob -nocomplain "$bMotionPlugins/$language/simple_*.tcl"] 
    2121  foreach f $files { 
     22                set count [llength [array names bMotion_plugins_simple]] 
    2223    bMotion_putloglev 1 * "bMotion: loading ($language) simple plugin file $f" 
    2324    catch { 
    2425      source $f 
    25     } 
     26    } err 
     27                set newcount [llength [array names bMotion_plugins_simple]] 
     28                if {($bMotion_testing == 0) && ($newcount == $count)} { 
     29                        putlog "bMotion: ALERT! Loading plugins file $f did not add any plugins!" 
     30                        putlog "Possible error: $err" 
     31                } 
    2632  } 
    2733} 
Note: See TracChangeset for help on using the changeset viewer.