schpati000.pl

AndyChat 是一种用Perl 来编写的多协议的控制台聊天程序。它的目的在于提供一种共同的控制台界面

#!/usr/bin/perl
#
# Schpati - Pre-Alpha of AndyChat v3.xx
#
# Started on Wednesday, 9th of February, 2000 around 11pm
#
# Build 3021 - 21st of July, 2002
# -  (2.06am) Added /MOTD and /QUOTE commands
# -  (3.11am) Added timestamping to the text input preview area
#
# Build 2627 - 27th of February, 2002
# -  (9.45am) Fixed /mode intermittent issues
#
# Build 1931 - 31st of July, 2001
# -  (9.30am) Implemented more fixes for reconnect problems
#
# Build 1311 - 11th of January, 2001
# - (11.29am) PgUp/PgDn no longer work when you're in a different window view
# -  (3.03pm) "End" is supported in 'my' console again
#
# Build 1310 - 10th of January, 2001
# - (11.29pm) Massive code rearranging to the use the Translate function as efficiently as possible
#
# Build 1309 - 9th of January, 2001
# -  (3.45pm) Trying to implement GetLLine2 to handle cursor movements
# -  (4.05pm) Cursor movements + live rendering = fun, hrmph!
# - (11.22pm) Moved /P stuff for ICQ stuff into a_protocols_icq.pl
# - (11.27pm) Added /URL [uin] [url] [message] - not fully implemented
#
# Build 1302 - 2nd of January, 2001
# -  (3.07pm) Finished implementing /redrawscreen to really redraw the screen
#
# Build 1213 - 13th of December, 2000
# -  (1.06am) Implemented /mode silly completion support even though mode is not properly supported
# -  (1.26am) Implemented /mode support, stormy.. the weather and the support
# -  (1.30am) Fixed a bug with modes with spaces
#
# Build 1121 - 21st of November, 2000
# -  (5.40pm) Implemented various bits for Club Gabbay including /refresh
#
# Build 1004 - 4th of October, 2000
# -  (1.28am) Fixed 0 at beginning of line problem
# -  (1.34am) Fixed colour at beginning of line problem
#
# Build 0928 - 28th of September, 2000
# -  (8.38pm) Added a couple of optimizations to stop 100% CPU usage on scrolly bits
#
# Build 0926 - 26th of September, 2000
# -  ( ---- ) Implemented nick completion into new GetLLine
# -  (3.55am) Added prefix for /query to GetLLine
# -  (3.57am) You can now enable/disable scrollyhelp in andychat.ini
#
# Build 0925 - 25th of September, 2000
# -  (2.20am) The new GetLLine routine is nicely underway.  A bit slow so far, but oh well :)
# -  (3.09am) Live colour rendering is in!! ctrl-k, number, text, ctrl-k.
# - (11.45pm) Added up/down keyboard buffer into new GetLLine
#
# Build 0924 - 24th of September, 2000
# - (10.52pm) Removed silly 12 character nick limit
#
# Build 0624 - 24th of June, 2000
# -  (4.24am) For conversation in #umbclinux, "/SET improperspace 1" :-)
# - (10.28am) Fixes to /RECONNECT so it .. reconnects :)
# - (10.30am) /RECONNECT <server> [port] to reconnect all stuff on different server
#
# Build 0623 - 23rd of June, 2000
# -  (5.11pm) Finished adding "on startup, join irc servers and channels in this order" feature
#
# Build 0621 - 21st of June, 2000
# - (12.36am) Workaround for codepage problem in consoles!
#
# Build 0620 - 20th of June, 2000
# - (10.58pm) /SET and /UNSET commands for setting, unsetting variables :)
# - (11.16pm) Fixed command scrollback mispositioning
# - (11.18pm) Fixed repeating commands in command scrollback buffer bug
# - (11.38pm) Removed traces of chr(237)
#
# Build 0619 - 19th of June, 2000
# - (10.35pm) Various changes from $my to $irc__server
#
# Build 0618 - 18th of June, 2000
# -  (9.41pm) Fixed ALT-[n] to imaginary window problem and lock-up :)
# -  (9.42pm) Optimised it a little further
# -  (9.50pm) Started more advanced /WINDOW command set, first abolish /WINDOW [n]
#
# Build 0616 - 16th of June, 2000 (by the way, it is cold at 6am)
# -  (6.00am) /MODE now views modes
# -  (8.00am) /REJOIN command for no reason
# -  ( ---- ) /RECONNECT command added (mainly to test reconnects)
# - (10.06am) /AWAY now stores away status and restores upon reconnect :)
# - (10.13am) No more infinite reconnects on /QUIT :)
# - (12.12am) /AME and /ASAY functions are in
# - (12.27am) /AAME and /AASAY functions are in
# - (12.31am) /AAWAY implemented
#
# Build 0613 - 13th of June, 2000
# -  ( ---- ) /ICQ PARSE [uin] for starting the Licq parser
# -  ( ---- ) /ICQ RMS [ip] [port] [uin] [pass] to start the Licq RMS plug-in
# - (10.26pm) Minor code optimisations
#
# Build 0606 - 6th of June, 2000
# -  (6.12am) Do not allow messages/actions to users before DCC CHAT is fully established
#
# Build 0602 - 2nd of June, 2000
# -  (1.34am) Implemented /MSG, /ME and /QUERYing for DCC CHATs
# -  (1.42am) /ME now sends CTCP_MESSAGE before /me's in queries.  Is this right?  BitchX thinks so.
# -  (2.02am) Started work on /DCC CHAT <nick>
# -  ( ---- ) /DCC CHAT [nick] works (bit dodgy on sending)
# -  ( ---- ) /DCC GET [nick] works
# -  (6.33pm) /DCC SEND [nick] works (bit dodgy)
# -  (6.53pm) Close all DCCs nicely on exit :)
#
# Build 0528 - 28th of May, 2000
# -  (4.35pm) Better windowcount routines (which work properly)
# -  (4.36pm) Window kills now cause a jump to the previous window instead of next window
# -  (6.52pm) ALT-[n] goes to window [n], hit again and it goes to window [n+10]
# -  (7.10pm) Actually got the above working :)  Also, ALT-0 never worked before, it does now.
#
# Build 0526 - 26th of May, 2000
# -  (2.02am) Fixed key buffer not working :))
# -  (2.16am) Fixed Function Keys again..
# -  (5.44pm) Disabled ctrl-c
# -  (8.20pm) Bad idea
#
# Build 0524 - 24th of May, 2000
# - (12.28am) Fixed left bar confusion of characters :)
#
# Build 0522 - 22nd of May, 2000
# - (12.53pm) Have been working on new keyboard input routines for the last week..
#             Which unfortunately have provided less of an improvement than I have hoped.
#             AndyChat no longer requires TermReadKey.
#
# Build 0507 - 7th of May, 2000
# -  (7.45am) PgUp, PgDn, End all work nicely :)
# -  (8.09am) [ESC] to kill dead windows :)
#
# Build 0506 - 6th of May, 2000
# -  (3.07am) Removed /PLAYFILE and /STOPFILE until I can manage them better
# -  (4.58am) Bit of work on the arrow key handling and stuff (twas getting silly)
#
# Build 0505 - 5th of May, 2000
# -  (5.34am) Started work on new Curses window based stuff
#
# Build 0430 - 30th of April, 2000
# -  (8.00pm) Added handler for on_ctime
# - (12.37am) Fixed RedrawChanInfo() bug on /window kill
#
# Build 0429 - 29th of April, 2000
# -  (7.39pm) Started work on new advanced editor routines
# - (10.05pm) Config element new_ircname for defining name in IRC
# - (10.17pm) Fix for already in channel stuff not working
# - (10.17pm) Fixes for some op functions and stuff phantoming from earlier
# - (10.40pm) Several RedrawActivity tie-ins
# - (10.53pm) Several RedrawChanInfo optimises
# - (11.19pm) Buggered up some RedrawChanInfo optimises (fixed)
# - (12.01am) Fix for RedrawChanInfo glitch
# - (12.03am) Fix for backspace @ char 0
# - (12.23am) Editing things in the distro directory and then running the non-distro version is a bad idea :)
# - (12.23am) After realising I was working with 2 different versions, fixed some backspace @ char 0 probs :)
#
# Build 0412 - 12th of April, 2000
# -  (2.50am) Real name = AndyChat [version] - http://andy.secret.com.au/
# -  (2.56am) Added on_kick handler
# -  (9.06pm) More ` fixes
# -  (3.35am) Finished adding /kick command (?)
# -  (3.49am) Added /OP and /DOP commands
# -  (4.54am) Implemented /PING (1 hour!?  Don't know what happened there! :P)
#
# Build 0411 - 11th of April, 2000
# - (11.25pm) Real name = AndyChat [version] - http://www.secret.com.au/progs/andychat/
#
# Build 0409 - 9th of April, 2000
# - (12.01pm) Remove $my changing when doing /NICK, should fix earlier bugs
# -  (3.36pm) Set $window{sortusers} upon /JOIN
# -  (3.54pm) Fixed /NICK changing bug when not in a channel
# -  (4.15pm) Don't allow a /IRC server in a window which is already linked to server
# -  (4.42pm) Fixed some * issues (ie. nickname in use upon login)
#
# Build 0408 - 8th of April, 2000
# -  (4.10pm) Implemented PgUp/PgDn for old /LEFT stuffz
# -  (4.30pm) Added [Server Messages] window based on a bug and I like it :P