Initial commit of code released on 2002-07-15

XHELP/ACCESS

@@ -0,0 +1,20 @@
+SYNTAX: access [channel] [nick] [-min n] [-max n]
+                   [-autoop] [-noautoop]
+                   [-modif [mask]]
+
+access shows the access of nick (or yours if no nick is
+given) on channel (or current if no channel is given). The 
+following options can also be used to filter the list:
+
+     -min n        Show only users with access higher than
+                   or equal to n.
+     -max n        Show only users with access lower than or
+                   equal to n.
+     -autoop       Show only users with the autoop flag on.
+     -noautoop     Show only users with the autoop flag off.
+     -modif [mask] Show who made the last modification. If a search
+                   mask is given, only the entries that have been
+                   last modified by someone matching the mask will
+                   be given.
+
+Options can be combined at wish. (-autoop -noautoop == No match.)

XHELP/ADDUSER

@@ -0,0 +1,16 @@
+SYNTAX: adduser [channel] <nick> [mask] <access> <password>
+        modinfo [channel] <field> <nick|address> <new value>
+        remuser [channel] <nick|address>
+
+adduser gives the given access to anyone matching mask.
+nick is only used as a reference and should be the nickname the
+person uses to most. If nick is online, mask is not necessary,
+and the userhost will be looked up automatically.  If default user
+flags are defined (see help set), those flags are used.
+
+modinfo is used to modify an entry in the userlist. field can
+be either of the followings: MATCH, ACCESS, AUTOOP, PASSWORD.
+new value must be ON or OFF for field AUTOOP, or other
+valid values for the other fields.
+
+remuser removes the access of the given user.

XHELP/BAN

@@ -0,0 +1,22 @@
+SYNTAX: ban [channel] <nick|n!u@h> [duration] [level] [reason]
+        unban [channel] <nick|n!u@h>
+        cleanbanlist
+
+ban adds an entry to the 'banlist'. If channel is supplied,
+it is used instead of the current channel. duration specifies how
+long the entry should remain in the list (in hours). level is an
+integer ranging from 0 to your access level on the channel. reason
+is not mandatory and can be up to 80 characters long.
+
+The effect of this command depends on the level supplied:
+	  level 	| effect                          
+	  >= 20		| user is not allowed to be chanop
+	  >= 75		| user is not allowed to be on the
+			| channel at all.
+Intermediate levels are used internally to manage warnings.
+
+unban removes a ban from the banlist.
+
+cleanbanlist purges expired entries from the banlist. This should
+be handled automatically, so this command should only be used as a
+debug tool.

XHELP/CHANINFO

@@ -0,0 +1,3 @@
+SYNTAX: chaninfo [channel]
+
+Gives information about channel's manager.

XHELP/CLEARMODE

@@ -0,0 +1,5 @@
+SYNTAX: clearmode [channel]
+
+clearmode clears all the channel modes. This
+is useful when your channel is locked so you can't even
+join the channel.

XHELP/DEFCHAN

@@ -0,0 +1,7 @@
+SYNTAX: addchan [channel]
+        remchan [channel]
+
+addchan adds a channel to $NICK's auto-join list.
+
+remchan removes a channel from $NICK's auto-join list. The
+userlist for that channel remains unchanged.

XHELP/HELP

@@ -0,0 +1,18 @@
+SYNTAX: help <topic>
+
+help displays the help file associated with topic.
+Use showcommands to get a list of commands available
+to you. 
+
+Commands must be sent by MSG and if the command has effect
+on a specific channel, that channel's name must be the
+first argument. ie:
+        /msg $NICK op #blah nick    to op nick on channel #blah
+or      /msg $NICK op nick          if you are on channel #blah
+
+The administration of Undernet and the provider of this service
+are NOT responsible for what is going on the channels this 
+service is on.
+
+To get more information on this service, use help info
+

XHELP/HELPLIST

@@ -0,0 +1,6 @@
+X'S COMMAND LIST:
+XACCESS    XADDCHAN       XADDUSER     XBAN       XBANLIST
+XCHANINFO  XCLEARMODE     XDEOP        XHELP      XINVITE
+XJOIN      XKICK          XLBANLIST    XMAP       XMOTD
+XOP        XPART          XPASS        XREMCHAN   XREMUSER
+XSET       XSHOWCOMMANDS  XSHOWIGNORE  XSUSPEND   XUNBAN

XHELP/INFO

@@ -0,0 +1,25 @@
+ Undernet's Channel Service Information                         
+This is the Undernet Channel Service written by Robin Thellend
+aka SeKs <intru@step.polymtl.ca>.
+
+A registered channel is under the responsibility of its channel
+manager who has full control over it.  To register a channel,
+complete the registration that can be found at
+http://cservice.undernet.org/regist/ and follow the instructions.
+
+It is also recommended that you read the Channel Service Committee
+Guidelines before sending in an application.  This will explain the
+process of registering a channel with the Undernet Channel Service.
+
+The guidelines are available on the WWW at
+http://cservice.undernet.org/ and by FTP at
+ftp://ftp.undernet.org/pub/irc/docs/X/CSC-guidelines
+
+They are also available from Undernet IRC by:
+/msg HelpBot get CSC-guidelines
+
+The number of channels one can register is currently limited to one 
+channel per person.  Registration takes 2 to 3 weeks to complete.
+
+For more general info, contact cservice@undernet.org
+For technical info, contact cservice-coders@undernet.org.

XHELP/INVITE

@@ -0,0 +1,6 @@
+SYNTAX: invite [#channel] <nick>
+
+invite makes $NICK invite nick to #channel for you. 
+This is useful on invite-only channels. For example, you can do
+		/msg $NICK invite #mychan mynick  
+to make $NICK invite you to your channel.

XHELP/JOIN

@@ -0,0 +1,8 @@
+SYNTAX: join <channel>
+        part [channel]
+
+join is used to make $NICK join channel. Obviously, one
+must have access on that channel in order to do that.
+
+part makes $NICK leave the current channel (or channel if
+it is specified).

XHELP/KICK

@@ -0,0 +1,6 @@
+SYNTAX: kick [channel] <nick> [reason]
+        kick [channel] <pattern> [reason]    (Level 200)
+
+This command kicks nick or any user matching the given
+match pattern. If a reason is supplied, it will be
+used as kick comment.

XHELP/MAP

@@ -0,0 +1,3 @@
+SYNTAX: map
+
+map displays how the servers are connected together.

XHELP/MOTD

@@ -0,0 +1,3 @@
+SYNTAX: motd
+
+Gives $NICK's Message Of The Day.

XHELP/OP

@@ -0,0 +1,8 @@
+SYNTAX: op [channel] <nick1> [nick2] [nick3] [...]
+        deop [channel] <nick1> [nick2] [nick3] [...]
+
+op and deop respectively give and remove channel operator
+priviledges to the specified users.
+
+Note that this command is disabled when the channel is in NoOp
+mode (SEE help set for more information).

XHELP/PASSWORD

@@ -0,0 +1,15 @@
+SYNTAX: login <channel> [your password]
+        newpass <channel> <new password>
+        deauth <channel>
+
+login is used to validate yourself. You need to use this
+command even if you don't have a password.
+
+newpass changes your password to new password. You 
+have to validate yourself before using this command.
+
+deauth is used to deauthenticate yourself on a channel;
+this is provided for the security-minded.
+
+Note: login and newpass must be sent to 
+$NICK@$SERVER for $NICK

XHELP/SET

@@ -0,0 +1,32 @@
+SYNTAX: set [channel] <variable> <value>
+
+set is used to configure $NICK's reactions upon different
+situations. variable is one of the following:
+  MassDeopPro	NickFloodPro	FloodPro  UserFlags
+  NoOp		AlwaysOp	OpOnly    StrictOp
+  Description   URL		AutoTopic
+
+MassDeopPro is the maximum number of deops one can issue
+before the MassDeop protection is activated.
+NickFloodPro is maximum number of nick changes one can do
+before the NickFlood protection is activated.
+FloodPro is the limit of lines one can send to a channel.
+NOTE: since $NICK is umode +d (Deaf) the floodpro doesn't work for
+      channels messages. It only works for TOPICs, KICKs, etc.
+UserFlags is the default flags given to a newly added user.
+NoOp is a special mode where only $NICK can be channel operator.
+AlwaysOp makes $NICK always be op.
+OpOnly disables all commands except op.
+StrictOp will only allow authenticated users to be op.
+Description will set the official channel description.
+URL will set a link to the channel home page.
+AutoTopic will reset the topic to the official URL and
+description of the channel every 30 minutes *if* the channel
+is active.
+
+MassDeopPro, NickFloodPro and FloodPro have integer values and 
+are all based on a 15-second period.
+UserFlags can be 1 (autoop) or 0 (no autoop).
+NoOp, AlwaysOp, OpOnly, StrictOp and AutoTopic have either ON or OFF
+values.
+Description and URL are strings up to 80 characters long.

XHELP/SHOWCOMMANDS

@@ -0,0 +1,4 @@
+SYNTAX: showcommands [channel]
+
+showcommands gives you the commands that are available to you
+on channel (or current if no channel is given).

XHELP/SHOWIGNORE

@@ -0,0 +1,3 @@
+SYNTAX: showignore
+
+Gives the list of users currently being ignored by $NICK.

XHELP/STATUS

@@ -0,0 +1,3 @@
+SYNTAX: status [channel]
+
+status outputs informations about channel.

XHELP/SUSPEND

@@ -0,0 +1,12 @@
+SYNTAX: suspend [channel] <nick|address> <duration> [s|m|h|d]
+        unsuspend [channel] <nick|address>
+
+The command suspend is used to remove one's access to this service
+for a certain time specified with the duration argument. Time units
+can be specified for duration (seconds,minutes,hours or days).
+
+When a user is suspended he or she cannot use any command requiring
+an access level greater than zero. One can only suspend a user who
+has an inferior access than his.
+
+unsuspend removes a suspension (same as suspend with a duration 0)

XHELP/TOPIC

@@ -0,0 +1,4 @@
+SYNTAX: topic [channel] <new topic>
+
+topic changes the topic on channel (or on the current 
+channel if none is given) to new topic.

XHELP/VERIFY

@@ -0,0 +1,7 @@
+SYNTAX: verify <nick>
+
+This command will tell you whether nick is an authenticated
+CSERVICE representative.
+
+A CSERVICE representative is capable of helping you solve problems
+you may have with the channel service.

XHELP/X

@@ -0,0 +1,6 @@
+X'S COMMAND LIST:
+XACCESS    XADDCHAN       XADDUSER     XBAN       XBANLIST
+XCHANINFO  XCLEARMODE     XDEOP        XHELP      XINVITE
+XJOIN      XKICK          XLBANLIST    XMAP       XMOTD
+XOP        XPART          XPASS        XREMCHAN   XREMUSER
+XSET       XSHOWCOMMANDS  XSHOWIGNORE  XSUSPEND   XUNBAN

XHELP/Xscript

@@ -0,0 +1,179 @@
+# This little script is intended to *ease* the use
+# of the channel service interface "X". It works pretty
+# much like the /help command, except that it's called
+# /xhelp :)
+#
+# NB. Most aliases are X's commands prefixed by 'X'.
+#
+# Feel free to distribute this package to your friends, but
+# just make sure my name stays on it. I want to make sure
+# people know where to send their complaints ;)
+#
+# seks <intru@step.polymtl.ca>
+# 95/07/13
+# update 95/12/11
+
+^SET DISPLAY OFF
+SET EXEC_PROTECTION OFF
+SET NOVICE OFF
+
+ASSIGN XHELP_DIR ~/XHELP
+#ASSIGN XHELP_DIR /usr/local/lib/irc/XHELP
+ASSIGN CAT /bin/cat
+
+ALIAS XX //QUOTE PRIVMSG X@CHANNELS.UNDERNET.ORG :$*
+ALIAS WW //QUOTE PRIVMSG W@CHANNELS2.UNDERNET.ORG :$*
+
+ALIAS XACCESS XX ACCESS
+ALIAS XADDCHAN XX ADDCHAN
+ALIAS XADDUSER XX ADDUSER
+ALIAS XBAN XX BAN
+ALIAS XBANLIST XX BANLIST
+ALIAS XCHANINFO XX CHANINFO
+ALIAS XCLEARMODE XX CLEARMODE
+ALIAS XCOMMANDS XX SHOWCOMMANDS
+ALIAS XDEOP XX DEOP
+ALIAS XINFO XHELP INFO
+ALIAS XINVITE XX INVITE
+ALIAS XJOIN XX JOIN
+ALIAS XKICK XX KICK
+ALIAS XLBANLIST XX LBANLIST
+ALIAS XMAP XX MAP
+ALIAS XMODINFO XX MODINFO
+ALIAS XMOTD XX MOTD
+ALIAS XNEWPASS XX NEWPASS
+ALIAS XOP XX OP
+ALIAS XPART XX PART
+ALIAS XPASS XX PASS
+ALIAS XREMCHAN XX REMCHAN
+ALIAS XREMUSER XX REMUSER
+ALIAS XSET XX SET
+ALIAS XSHOWCOMMANDS XX SHOWCOMMANDS
+ALIAS XSTATUS XX STATUS
+ALIAS XSUSPEND XX SUSPEND
+ALIAS XTOPIC XX TOPIC
+ALIAS XUNBAN XX UNBAN
+ALIAS XUNSUSPEND XX UNSUSPEND
+
+ALIAS WACCESS WW ACCESS
+ALIAS WADDCHAN WW ADDCHAN
+ALIAS WADDUSER WW ADDUSER
+ALIAS WBAN WW BAN
+ALIAS WBANLIST WW BANLIST
+ALIAS WCHANINFO WW CHANINFO
+ALIAS WCLEARMODE WW CLEARMODE
+ALIAS WCOMMANDS WW SHOWCOMMANDS
+ALIAS WDEOP WW DEOP
+ALIAS WINFO WHELP INFO
+ALIAS WINVITE WW INVITE
+ALIAS WJOIN WW JOIN
+ALIAS WKICK WW KICK
+ALIAS WLBANLIST WW LBANLIST
+ALIAS WMAP WW MAP
+ALIAS WMODINFO WW MODINFO
+ALIAS WMOTD WW MOTD
+ALIAS WNEWPASS WW NEWPASS
+ALIAS WOP WW OP
+ALIAS WPART WW PART
+ALIAS WPASS WW PASS
+ALIAS WREMCHAN WW REMCHAN
+ALIAS WREMUSER WW REMUSER
+ALIAS WSET WW SET
+ALIAS WSHOWCOMMANDS WW SHOWCOMMANDS
+ALIAS WSTATUS WW STATUS
+ALIAS WSUSPEND WW SUSPEND
+ALIAS WTOPIC WW TOPIC
+ALIAS WUNBAN WW UNBAN
+ALIAS WUNSUSPEND WW UNSUSPEND
+
+ALIAS XHELP
+{
+  @_COUNT=0
+  @_HELPFILES=[HELPLIST ACCESS DEFCHAN ADDUSER BAN BAN CHANINFO OP HELP INVITE INFO JOIN KICK BAN MAP MOTD OP JOIN PASSWORD DEFCHAN ADDUSER SET SHOWCOMMANDS SHOWIGNORE SUSPEND SUSPEND TOPIC BAN CLEARMODE]
+  @_HELPCOMMS=[XACCESS XADDCHAN XADDUSER XBAN XBANLIST XCHANINFO XDEOP XHELP XINVITE XINFO XJOIN XKICK XLBANLIST XMAP XMOTD XOP XPART XPASS XREMCHAN XREMUSER XSET XSHOWCOMMANDS XSHOWIGNORE XSUSPEND XUNSUSPEND XTOPIC XUNBAN XCLEARMODE]
+  ^SET HOLD_MODE ON
+  ^ON ^EXEC XHELP {
+    @_COUNT=(_COUNT+1)
+    IF ( _COUNT == 22 )
+    {
+      INPUT "More? " @_COUNT=0
+    }
+    ECHO *** $1-
+  }
+  ^ON ^EXEC_EXIT XHELP {
+    ^ON ^EXIT_EXIT -XHELP
+    ^ON ^EXEC -XHELP
+    ^ASSIGN -_COUNT
+    ^ASSIGN -_HELPFILES
+    ^ASSIGN -_HELPCOMMS
+    ^SET HOLD_MODE OFF
+    INPUT "XHelp? " IF ( [$0] ) { XHELP $* }
+  }
+
+  IF ( [$0] )
+  {
+    ECHO ***  HELP on $[55]0
+    IF ( [$[1]0] == [X] )
+    {
+      EXEC -NAME XHELP $CAT $XHELP_DIR/$WORD($RMATCH($0 $_HELPCOMMS) $_HELPFILES)
+    }
+    {
+      EXEC -NAME XHELP $CAT $XHELP_DIR/$WORD($RMATCH(X$0 $_HELPCOMMS) $_HELPFILES)
+    }
+  }
+  {
+    EXEC -NAME XHELP $CAT $XHELP_DIR/HELPLIST
+  }
+}
+
+ALIAS WHELP
+{
+  @_COUNT=0
+  @_HELPFILES=[HELPLIST ACCESS DEFCHAN ADDUSER BAN BAN CHANINFO OP HELP INVITE INFO JOIN KICK BAN MAP MOTD OP JOIN PASSWORD DEFCHAN ADDUSER SET SHOWCOMMANDS SHOWIGNORE SUSPEND SUSPEND TOPIC BAN CLEARMODE]
+  @_HELPCOMMS=[WACCESS WADDCHAN WADDUSER WBAN WBANLIST WCHANINFO WDEOP WHELP WINVITE WINFO WJOIN WKICK WLBANLIST WMAP WMOTD WOP WPART WPASS WREMCHAN WREMUSER WSET WSHOWCOMMANDS WSHOWIGNORE WSUSPEND WUNSUSPEND WTOPIC WUNBAN WCLEARMODE]
+  ^SET HOLD_MODE ON
+  ^ON ^EXEC XHELP {
+    @_COUNT=(_COUNT+1)
+    IF ( _COUNT == 22 )
+    {
+      INPUT "More? " @_COUNT=0
+    }
+    ECHO *** $1-
+  }
+  ^ON ^EXEC_EXIT WHELP {
+    ^ON ^EXIT_EXIT -WHELP
+    ^ON ^EXEC -WHELP
+    ^ASSIGN -_COUNT
+    ^ASSIGN -_HELPFILES
+    ^ASSIGN -_HELPCOMMS
+    ^SET HOLD_MODE OFF
+    INPUT "WHelp? " IF ( [$0] ) { WHELP $* }
+  }
+
+  IF ( [$0] )
+  {
+    ECHO ***  HELP on $[55]0
+    IF ( [$[1]0] == [W] )
+    {
+      EXEC -NAME WHELP $CAT $XHELP_DIR/$WORD($RMATCH($0 $_HELPCOMMS) $_HELPFILES)
+    }
+    {
+      EXEC -NAME WHELP $CAT $XHELP_DIR/$WORD($RMATCH(W$0 $_HELPCOMMS) $_HELPFILES)
+    }
+  }
+  {
+    EXEC -NAME XHELP $CAT $XHELP_DIR/HELPLIST
+  }
+}
+
+
+
+ON ^NOTICE X ECHO X** $1-
+ON ^NOTICE W ECHO W** $1-
+#ON ^SERVER_NOTICE "% % % % HACK% UWORLD%.UNDERNET.ORG MODE #% +o X*" ECHO *** X reop on $7
+#ON ^SERVER_NOTICE "% % % % HACK% UWORLD%.UNDERNET.ORG MODE #% +o W*" ECHO *** W reop on $7
+ON ^401 "% X@CHANNELS%.UNDERNET.ORG *" ECHO *** X is unreachable at the moment
+ON ^401 "% W@CHANNELS%.UNDERNET.ORG *" ECHO *** W is unreachable at the moment
+
+^SET DISPLAY ON
+ECHO *** X script loaded! (try /xhelp)

XHELP/readme

@@ -0,0 +1,30 @@
+This is the undernet channel service help package.
+
+To install it, execute this command in your home
+directory:
+     tar zxf Xhelp.tgz
+OR,  gzip -cd < Xhelp.tgz | tar xf
+
+Then, you only have to load the file ~/XHELP/Xscript
+in your IRC session. The easiest way to do it is to
+add it in your .ircrc with this command:
+
+    echo "//LOAD ~/XHELP/Xscript" >> ~/.ircrc
+
+Make sure you type both '>'. Otherwise, your .ircrc
+file will be lost.
+
+To install it for your whole system, uncompress the
+archive in your IRCLIB directory, edit the Xscript
+file so XHELP_DIR points to the correct directory and
+add the proper /LOAD in your script/local.
+
+This package is likely to require updates.
+The latest version of this package is always
+available from:
+  ftp://ca.undernet.org/pub/undernet/X/Xhelp.tgz
+
+-----
+Robin Thellend (SeKs@IRC)
+<intru@info.polymtl.ca>
+<seks@alias.undernet.org>