ircsupport 0.1.0

data/lib/ircsupport/modes.rb

@@ -0,0 +1,101 @@
+module IRCSupport
+  module Modes
+    # @param [Array] modes The modes you want to parse.
+    # @return [Array] Each element will be a hash with two keys: `:set`,
+    #   a boolean indicating whether the mode is being set (instead of unset);
+    #   and `:mode`, the mode character.
+    def parse_modes(modes)
+      mode_changes = []
+      modes.scan(/[-+]\w+/).each do |modegroup|
+        set, modegroup = modegroup.split '', 2
+        set = set == '+' ? true : false
+        modegroup.split('').each do |mode|
+          mode_changes << { set: set, mode: mode }
+        end
+      end
+      return mode_changes
+    end
+
+    # @param [Array] modes The modes you want to parse.
+    # @option opts [Hash] :chanmodes The channel modes which are allowed. This is
+    #   the same as the "CHANMODES" isupport option.
+    # @option opts [Hash] :statmodes The channel modes which are allowed. This is
+    #   the same as the keys of the "PREFIX" isupport option.
+    # @return [Array] Each element will be a hash with three keys: `:set`,
+    #   a boolean indicating whether the mode is being set (instead of unset);
+    #   `:mode`, the mode character; and `:argument`, the argument to the mode,
+    #   if any.
+    def parse_channel_modes(modeparts, opts = {})
+      chanmodes = opts[:chanmodes] || {
+        'A' => %w{b e I},
+        'B' => %w{k},
+        'C' => %w{l},
+        'D' => %w{i m n p s t a q r},
+      }
+      statmodes = opts[:statmodes] || %w{o h v}
+
+      mode_changes = []
+      modes, *args = modeparts
+      parse_modes(modes).each do |mode_change|
+        set, mode = mode_change[:set], mode_change[:mode]
+        case
+        when chanmodes["A"].include?(mode) || chanmodes["B"].include?(mode)
+          mode_changes << {
+            mode: mode,
+            set: set,
+            argument: args.shift
+          }
+        when chanmodes["C"].include?(mode)
+          mode_changes << {
+            mode: mode,
+            set: set,
+            argument: args.shift.to_i
+          }
+        when chanmodes["D"].include?(mode)
+          mode_changes << {
+            mode: mode,
+            set: set,
+          }
+        else
+          raise ArgumentError, "Unknown mode: #{mode}"
+        end
+      end
+
+      return mode_changes
+    end
+
+    # @param [String] modes A string of modes you want to condense
+    #   (remove duplicates).
+    # @return [Strings] A condensed mode string.
+    def condense_modes(modes)
+      action = nil
+      result = ''
+      modes.split(//).each do |mode|
+        if mode =~ /[+-]/ and (!action or mode != action)
+          result += mode
+          action = mode
+          next
+        end
+        result += mode if mode =~ /[^+-]/
+      end
+      result.sub!(/[+-]\z/, '')
+      return result
+    end
+
+    # @param [String] before The "before" mode string.
+    # @param [String] after The "after" mode string.
+    # @return [String] A modestring representing the difference between the
+    #   two mode strings.
+    def diff_modes(before, after)
+      before_modes = before.split(//)
+      after_modes = after.split(//)
+      removed = before_modes - after_modes
+      added = after_modes - before_modes
+      result = removed.map { |m| '-' + m }.join
+      result << added.map { |m| '+' + m }.join
+      return condense_modes(result)
+    end
+
+    module_function :parse_modes, :parse_channel_modes, :condense_modes, :diff_modes
+  end
+end

data/lib/ircsupport/numerics.rb

@@ -0,0 +1,242 @@
+module IRCSupport
+  module Numerics
+    # @private
+    @@numeric_to_name_map  = {
+      '001' => 'RPL_WELCOME',           # RFC2812
+      '002' => 'RPL_YOURHOST',          # RFC2812
+      '003' => 'RPL_CREATED',           # RFC2812
+      '004' => 'RPL_MYINFO',            # RFC2812
+      '005' => 'RPL_ISUPPORT',          # draft-brocklesby-irc-isupport-03
+      '008' => 'RPL_SNOMASK',           # Undernet
+      '009' => 'RPL_STATMEMTOT',        # Undernet
+      '010' => 'RPL_STATMEM',           # Undernet
+      '020' => 'RPL_CONNECTING',        # IRCnet
+      '014' => 'RPL_YOURCOOKIE',        # IRCnet
+      '042' => 'RPL_YOURID',            # IRCnet
+      '043' => 'RPL_SAVENICK',          # IRCnet
+      '050' => 'RPL_ATTEMPTINGJUNC',    # aircd
+      '051' => 'RPL_ATTEMPTINGREROUTE', # aircd
+      '200' => 'RPL_TRACELINK',         # RFC1459
+      '201' => 'RPL_TRACECONNECTING',   # RFC1459
+      '202' => 'RPL_TRACEHANDSHAKE',    # RFC1459
+      '203' => 'RPL_TRACEUNKNOWN',      # RFC1459
+      '204' => 'RPL_TRACEOPERATOR',     # RFC1459
+      '205' => 'RPL_TRACEUSER',         # RFC1459
+      '206' => 'RPL_TRACESERVER',       # RFC1459
+      '207' => 'RPL_TRACESERVICE',      # RFC2812
+      '208' => 'RPL_TRACENEWTYPE',      # RFC1459
+      '209' => 'RPL_TRACECLASS',        # RFC2812
+      '210' => 'RPL_STATS',             # aircd
+      '211' => 'RPL_STATSLINKINFO',     # RFC1459
+      '212' => 'RPL_STATSCOMMANDS',     # RFC1459
+      '213' => 'RPL_STATSCLINE',        # RFC1459
+      '214' => 'RPL_STATSNLINE',        # RFC1459
+      '215' => 'RPL_STATSILINE',        # RFC1459
+      '216' => 'RPL_STATSKLINE',        # RFC1459
+      '217' => 'RPL_STATSQLINE',        # RFC1459
+      '218' => 'RPL_STATSYLINE',        # RFC1459
+      '219' => 'RPL_ENDOFSTATS',        # RFC1459
+      '221' => 'RPL_UMODEIS',           # RFC1459
+      '231' => 'RPL_SERVICEINFO',       # RFC1459
+      '233' => 'RPL_SERVICE',           # RFC1459
+      '234' => 'RPL_SERVLIST',          # RFC1459
+      '235' => 'RPL_SERVLISTEND',       # RFC1459
+      '239' => 'RPL_STATSIAUTH',        # IRCnet
+      '241' => 'RPL_STATSLLINE',        # RFC1459
+      '242' => 'RPL_STATSUPTIME',       # RFC1459
+      '243' => 'RPL_STATSOLINE',        # RFC1459
+      '244' => 'RPL_STATSHLINE',        # RFC1459
+      '245' => 'RPL_STATSSLINE',        # Bahamut, IRCnet, Hybrid
+      '250' => 'RPL_STATSCONN',         # ircu, Unreal
+      '251' => 'RPL_LUSERCLIENT',       # RFC1459
+      '252' => 'RPL_LUSEROP',           # RFC1459
+      '253' => 'RPL_LUSERUNKNOWN',      # RFC1459
+      '254' => 'RPL_LUSERCHANNELS',     # RFC1459
+      '255' => 'RPL_LUSERME',           # RFC1459
+      '256' => 'RPL_ADMINME',           # RFC1459
+      '257' => 'RPL_ADMINLOC1',         # RFC1459
+      '258' => 'RPL_ADMINLOC2',         # RFC1459
+      '259' => 'RPL_ADMINEMAIL',        # RFC1459
+      '261' => 'RPL_TRACELOG',          # RFC1459
+      '262' => 'RPL_TRACEEND',          # RFC2812
+      '263' => 'RPL_TRYAGAIN',          # RFC2812
+      '265' => 'RPL_LOCALUSERS',        # aircd, Bahamut, Hybrid
+      '266' => 'RPL_GLOBALUSERS',       # aircd, Bahamut, Hybrid
+      '267' => 'RPL_START_NETSTAT',     # aircd
+      '268' => 'RPL_NETSTAT',           # aircd
+      '269' => 'RPL_END_NETSTAT',       # aircd
+      '270' => 'RPL_PRIVS',             # ircu
+      '271' => 'RPL_SILELIST',          # ircu
+      '272' => 'RPL_ENDOFSILELIST',     # ircu
+      '300' => 'RPL_NONE',              # RFC1459
+      '301' => 'RPL_AWAY',              # RFC1459
+      '302' => 'RPL_USERHOST',          # RFC1459
+      '303' => 'RPL_ISON',              # RFC1459
+      '305' => 'RPL_UNAWAY',            # RFC1459
+      '306' => 'RPL_NOWAWAY',           # RFC1459
+      '307' => 'RPL_WHOISREGNICK',      # Bahamut, Unreal, Plexus
+      '310' => 'RPL_WHOISMODES',        # Plexus
+      '311' => 'RPL_WHOISUSER',         # RFC1459
+      '312' => 'RPL_WHOISSERVER',       # RFC1459
+      '313' => 'RPL_WHOISOPERATOR',     # RFC1459
+      '314' => 'RPL_WHOWASUSER',        # RFC1459
+      '315' => 'RPL_ENDOFWHO',          # RFC1459
+      '317' => 'RPL_WHOISIDLE',         # RFC1459
+      '318' => 'RPL_ENDOFWHOIS',        # RFC1459
+      '319' => 'RPL_WHOISCHANNELS',     # RFC1459
+      '321' => 'RPL_LISTSTART',         # RFC1459
+      '322' => 'RPL_LIST',              # RFC1459
+      '323' => 'RPL_LISTEND',           # RFC1459
+      '324' => 'RPL_CHANNELMODEIS',     # RFC1459
+      '325' => 'RPL_UNIQOPIS',          # RFC2812
+      '328' => 'RPL_CHANNEL_URL',       # Bahamut, AustHex
+      '329' => 'RPL_CREATIONTIME',      # Bahamut
+      '330' => 'RPL_WHOISACCOUNT',      # ircu
+      '331' => 'RPL_NOTOPIC',           # RFC1459
+      '332' => 'RPL_TOPIC',             # RFC1459
+      '333' => 'RPL_TOPICWHOTIME',      # ircu
+      '338' => 'RPL_WHOISACTUALLY',     # Bahamut, ircu
+      '340' => 'RPL_USERIP',            # ircu
+      '341' => 'RPL_INVITING',          # RFC1459
+      '342' => 'RPL_SUMMONING',         # RFC1459
+      '345' => 'RPL_INVITED',           # GameSurge
+      '346' => 'RPL_INVITELIST',        # RFC2812
+      '347' => 'RPL_ENDOFINVITELIST',   # RFC2812
+      '348' => 'RPL_EXCEPTLIST',        # RFC2812
+      '349' => 'RPL_ENDOFEXCEPTLIST',   # RFC2812
+      '351' => 'RPL_VERSION',           # RFC1459
+      '352' => 'RPL_WHOREPLY',          # RFC1459
+      '353' => 'RPL_NAMREPLY',          # RFC1459
+      '354' => 'RPL_WHOSPCRPL',         # ircu
+      '355' => 'RPL_NAMREPLY_',         # QuakeNet
+      '361' => 'RPL_KILLDONE',          # RFC1459
+      '362' => 'RPL_CLOSING',           # RFC1459
+      '363' => 'RPL_CLOSEEND',          # RFC1459
+      '364' => 'RPL_LINKS',             # RFC1459
+      '365' => 'RPL_ENDOFLINKS',        # RFC1459
+      '366' => 'RPL_ENDOFNAMES',        # RFC1459
+      '367' => 'RPL_BANLIST',           # RFC1459
+      '368' => 'RPL_ENDOFBANLIST',      # RFC1459
+      '369' => 'RPL_ENDOFWHOWAS',       # RFC1459
+      '371' => 'RPL_INFO',              # RFC1459
+      '372' => 'RPL_MOTD',              # RFC1459
+      '373' => 'RPL_INFOSTART',         # RFC1459
+      '374' => 'RPL_ENDOFINFO',         # RFC1459
+      '375' => 'RPL_MOTDSTART',         # RFC1459
+      '376' => 'RPL_ENDOFMOTD',         # RFC1459
+      '381' => 'RPL_YOUREOPER',         # RFC1459
+      '382' => 'RPL_REHASHING',         # RFC1459
+      '383' => 'RPL_YOURESERVICE',      # RFC2812
+      '384' => 'RPL_MYPORTIS',          # RFC1459
+      '385' => 'RPL_NOTOPERANYMORE',    # AustHex, Hybrid, Unreal
+      '386' => 'RPL_QLIST',             # Unreal
+      '387' => 'RPL_ENDOFQLIST',        # Unreal
+      '391' => 'RPL_TIME',              # RFC1459
+      '392' => 'RPL_USERSSTART',        # RFC1459
+      '393' => 'RPL_USERS',             # RFC1459
+      '394' => 'RPL_ENDOFUSERS',        # RFC1459
+      '395' => 'RPL_NOUSERS',           # RFC1459
+      '396' => 'RPL_HOSTHIDDEN',        # Undernet
+      '401' => 'ERR_NOSUCHNICK',        # RFC1459
+      '402' => 'ERR_NOSUCHSERVER',      # RFC1459
+      '403' => 'ERR_NOSUCHCHANNEL',     # RFC1459
+      '404' => 'ERR_CANNOTSENDTOCHAN',  # RFC1459
+      '405' => 'ERR_TOOMANYCHANNELS',   # RFC1459
+      '406' => 'ERR_WASNOSUCHNICK',     # RFC1459
+      '407' => 'ERR_TOOMANYTARGETS',    # RFC1459
+      '408' => 'ERR_NOSUCHSERVICE',     # RFC2812
+      '409' => 'ERR_NOORIGIN',          # RFC1459
+      '411' => 'ERR_NORECIPIENT',       # RFC1459
+      '412' => 'ERR_NOTEXTTOSEND',      # RFC1459
+      '413' => 'ERR_NOTOPLEVEL',        # RFC1459
+      '414' => 'ERR_WILDTOPLEVEL',      # RFC1459
+      '415' => 'ERR_BADMASK',           # RFC2812
+      '421' => 'ERR_UNKNOWNCOMMAND',    # RFC1459
+      '422' => 'ERR_NOMOTD',            # RFC1459
+      '423' => 'ERR_NOADMININFO',       # RFC1459
+      '424' => 'ERR_FILEERROR',         # RFC1459
+      '425' => 'ERR_NOOPERMOTD',        # Unreal
+      '429' => 'ERR_TOOMANYAWAY',       # Bahamut
+      '430' => 'ERR_EVENTNICKCHANGE',   # AustHex
+      '431' => 'ERR_NONICKNAMEGIVEN',   # RFC1459
+      '432' => 'ERR_ERRONEUSNICKNAME',  # RFC1459
+      '433' => 'ERR_NICKNAMEINUSE',     # RFC1459
+      '436' => 'ERR_NICKCOLLISION',     # RFC1459
+      '439' => 'ERR_TARGETTOOFAST',     # ircu
+      '440' => 'ERR_SERCVICESDOWN',     # Bahamut, Unreal
+      '441' => 'ERR_USERNOTINCHANNEL',  # RFC1459
+      '442' => 'ERR_NOTONCHANNEL',      # RFC1459
+      '443' => 'ERR_USERONCHANNEL',     # RFC1459
+      '444' => 'ERR_NOLOGIN',           # RFC1459
+      '445' => 'ERR_SUMMONDISABLED',    # RFC1459
+      '446' => 'ERR_USERSDISABLED',     # RFC1459
+      '447' => 'ERR_NONICKCHANGE',      # Unreal
+      '449' => 'ERR_NOTIMPLEMENTED',    # Undernet
+      '451' => 'ERR_NOTREGISTERED',     # RFC1459
+      '455' => 'ERR_HOSTILENAME',       # Unreal
+      '459' => 'ERR_NOHIDING',          # Unreal
+      '460' => 'ERR_NOTFORHALFOPS',     # Unreal
+      '461' => 'ERR_NEEDMOREPARAMS',    # RFC1459
+      '462' => 'ERR_ALREADYREGISTRED',  # RFC1459
+      '463' => 'ERR_NOPERMFORHOST',     # RFC1459
+      '464' => 'ERR_PASSWDMISMATCH',    # RFC1459
+      '465' => 'ERR_YOUREBANNEDCREEP',  # RFC1459
+      '466' => 'ERR_YOUWILLBEBANNED',   # RFC1459
+      '467' => 'ERR_KEYSET',            # RFC1459
+      '469' => 'ERR_LINKSET',           # Unreal
+      '471' => 'ERR_CHANNELISFULL',     # RFC1459
+      '472' => 'ERR_UNKNOWNMODE',       # RFC1459
+      '473' => 'ERR_INVITEONLYCHAN',    # RFC1459
+      '474' => 'ERR_BANNEDFROMCHAN',    # RFC1459
+      '475' => 'ERR_BADCHANNELKEY',     # RFC1459
+      '476' => 'ERR_BADCHANMASK',       # RFC2812
+      '477' => 'ERR_NOCHANMODES',       # RFC2812
+      '478' => 'ERR_BANLISTFULL',       # RFC2812
+      '481' => 'ERR_NOPRIVILEGES',      # RFC1459
+      '482' => 'ERR_CHANOPRIVSNEEDED',  # RFC1459
+      '483' => 'ERR_CANTKILLSERVER',    # RFC1459
+      '484' => 'ERR_RESTRICTED',        # RFC2812
+      '485' => 'ERR_UNIQOPPRIVSNEEDED', # RFC2812
+      '488' => 'ERR_TSLESSCHAN',        # IRCnet
+      '491' => 'ERR_NOOPERHOST',        # RFC1459
+      '492' => 'ERR_NOSERVICEHOST',     # RFC1459
+      '493' => 'ERR_NOFEATURE',         # ircu
+      '494' => 'ERR_BADFEATURE',        # ircu
+      '495' => 'ERR_BADLOGTYPE',        # ircu
+      '496' => 'ERR_BADLOGSYS',         # ircu
+      '497' => 'ERR_BADLOGVALUE',       # ircu
+      '498' => 'ERR_ISOPERLCHAN',       # ircu
+      '501' => 'ERR_UMODEUNKNOWNFLAG',  # RFC1459
+      '502' => 'ERR_USERSDONTMATCH',    # RFC1459
+      '503' => 'ERR_GHOSTEDCLIENT',     # Hybrid
+      '730' => 'RPL_MONONLINE',         # ratbox
+      '731' => 'RPL_MONOFFLINE',        # ratbox
+      '732' => 'RPL_MONLIST',           # ratbox
+      '733' => 'RPL_ENDOFMONLIST',      # ratbox
+      '732' => 'ERR_MONLISTFULL',       # ratbox
+      '900' => 'RPL_SASLLOGIN',         # charybdis, ircd-seven
+      '903' => 'RPL_SASLSUCCESS',       # charybdis, ircd-seven
+      '904' => 'RPL_SASLFAILED',        # charybdis, ircd-seven
+      '905' => 'RPL_SASLERROR',         # charybdis, ircd-seven
+      '906' => 'RPL_SASLABORT',         # charybdis, ircd-seven
+      '907' => 'RPL_SASLREADYAUTH',     # charybdis, ircd-seven
+    }
+
+    # @private
+    @@name_to_numeric_map = @@numeric_to_name_map.invert
+
+    # @param [String] numeric A numeric to look up.
+    # @return [String] The name of the numeric.
+    def numeric_to_name(numeric)
+      return @@numeric_to_name_map[numeric]
+    end
+
+    # @param [String] name A name to look up.
+    # @return [String] The numeric corresponding to the name.
+    def name_to_numeric(name)
+      return @@name_to_numeric_map[name]
+    end
+
+    module_function :numeric_to_name, :name_to_numeric
+  end
+end

data/lib/ircsupport/parser.rb

@@ -0,0 +1,340 @@
+require 'ircsupport/message'
+
+module IRCSupport
+  class Parser
+    # @private
+    @@eol         = '\x00\x0a\x0d'
+    # @private
+    @@space       = / +/
+    # @private
+    @@maybe_space = / */
+    # @private
+    @@non_space   = /[^ ]+/
+    # @private
+    @@numeric     = /[0-9]{3}/
+    # @private
+    @@command     = /[a-zA-Z]+/
+    # @private
+    @@irc_name    = /[^#@@eol :][^#@@eol ]*/
+    # @private
+    @@irc_line    = /
+      \A
+      (?: : (?<prefix> #@@non_space ) #@@space )?
+      (?<command> #@@numeric | #@@command )
+      (?: #@@space (?<args> #@@irc_name (?: #@@space #@@irc_name )* ) )?
+      (?: #@@space : (?<trailing_arg> [^#@@eol]* ) | #@@maybe_space )?
+      \z
+    /x
+    # @private
+    @@low_quote_from = /[\x00\x0a\x0d\x10]/
+    # @private
+    @@low_quote_to = {
+      "\x00" => "\x100",
+      "\x0a" => "\x10n",
+      "\x0d" => "\x10r",
+      "\x10" => "\x10\x10",
+    }
+    # @private
+    @@low_dequote_from = /\x10[0nr\x10]/
+    # @private
+    @@low_dequote_to = {
+      "\x100" => "\x00",
+      "\x10n" => "\x0a",
+      "\x10r" => "\x0d",
+      "\x10\x10" => "\x10",
+    }
+    # @private
+    @@default_isupport = {
+      "PREFIX"    => {"o" => "@", "v" => "+"},
+      "CHANTYPES" => ["#"],
+      "CHANMODES" => {
+        "A" => ["b"],
+        "B" => ["k"],
+        "C" => ["l"],
+        "D" => %w[i m n p s t r]
+      },
+      "MODES"       => 1,
+      "NICKLEN"     => 999,
+      "MAXBANS"     => 999,
+      "TOPICLEN"    => 999,
+      "KICKLEN"     => 999,
+      "CHANNELLEN"  => 999,
+      "CHIDLEN"     => 5,
+      "AWAYLEN"     => 999,
+      "MAXTARGETS"  => 1,
+      "MAXCHANNELS" => 999,
+      "CHANLIMIT"   => {"#" => 999},
+      "STATUSMSG"   => ["@", "+"],
+      "CASEMAPPING" => :rfc1459,
+      "ELIST"       => [],
+      "MONITOR"     => 0,
+    }
+
+    # The isupport configuration of the IRC server.
+    # The configuration will be seeded with sane defaults, and updated in
+    # response to parsed {IRCSupport::Message::Numeric005 `005`} messages.
+    # @return [Hash]
+    attr_reader :isupport
+
+    # A list of currently enabled capabilities.
+    # It will be updated in response to parsed {IRCSupport::Message::CAP::ACK `CAP ACK`} messages.
+    # @return [Array]
+    attr_reader :capabilities
+
+    # @return [IRCSupport::Parser]
+    def initialize
+      @isupport = @@default_isupport
+      @capabilities = []
+    end
+
+    # @param [String] line An IRC protocol line you wish to decompose.
+    # @return [Hash] A decomposed IRC protocol line with 3 keys:
+    #   `command`, the IRC command; `prefix`, the prefix to the
+    #   command, if any; `args`, an array of any arguments to the command
+    def decompose_line(line)
+      if line =~ @@irc_line
+        c = $~
+        elems = {}
+        elems[:prefix] = c[:prefix] if c[:prefix]
+        elems[:command] = c[:command].upcase
+        elems[:args] = []
+        elems[:args].concat c[:args].split(@@space) if c[:args]
+        elems[:args] << c[:trailing_arg] if c[:trailing_arg]
+      else
+        raise ArgumentError, "Line is not IRC protocol: #{line}"
+      end
+
+      return elems
+    end
+
+    # @param [Hash] elems The attributes of the message (as returned
+    #   by {#decompose_line}).
+    # @return [String] An IRC protocol line.
+    def compose_line(elems)
+      line = ''
+      line << ":#{elems[:prefix]} " if elems[:prefix]
+      if !elems[:command]
+        raise ArgumentError, "You must specify a command"
+      end
+      line << elems[:command]
+
+      if elems[:args]
+        elems[:args].each_with_index do |arg, idx|
+          line << ' '
+          if idx != elems[:args].count-1 and arg.match(@@space)
+            raise ArgumentError, "Only the last argument may contain spaces"
+          end
+          if idx == elems[:args].count-1
+            line << ':' if arg.match(@@space)
+          end
+          line << arg
+        end
+      end
+
+      return line
+    end
+
+    # @param [String] line An IRC protocol line.
+    # @return [IRCSupport::Message] A parsed message object.
+    def parse(line)
+      elems = decompose_line(line)
+      elems[:isupport] = @isupport
+      elems[:capabilities] = @capabilities
+
+      if elems[:command] =~ /^(PRIVMSG|NOTICE)$/ && elems[:args][1] =~ /\x01/
+        return handle_ctcp_message(elems)
+      end
+
+      if elems[:command] =~ /^\d{3}$/
+        msg_class = "Numeric"
+      elsif elems[:command] == "MODE"
+        if @isupport['CHANTYPES'].include? elems[:args][0][0]
+          msg_class = "ChannelModeChange"
+        else
+          msg_class = "UserModeChange"
+        end
+      elsif elems[:command] == "NOTICE" && (!elems[:prefix] || elems[:prefix] !~ /!/)
+        msg_class = "ServerNotice"
+      elsif elems[:command] =~ /^(PRIVMSG|NOTICE)$/
+        msg_class = "Message"
+        elems[:is_notice] = true if elems[:command] == "NOTICE"
+        if @isupport['CHANTYPES'].include? elems[:args][0][0]
+          elems[:is_public] = true
+        end
+        if @capabilities.include?('identify-msg')
+          elems[:args][1], elems[:identified] = split_idmsg(elems[:args][1])
+        end
+      elsif elems[:command] == "CAP" && %w{LS LIST ACK}.include?(elems[:args][0])
+        msg_class = "CAP::#{elems[:args][0]}"
+      else
+        msg_class = elems[:command]
+      end
+
+      begin
+        if msg_class == "Numeric"
+          begin
+            msg_const = constantize("IRCSupport::Message::Numeric#{elems[:command]}")
+          rescue
+            msg_const = constantize("IRCSupport::Message::#{msg_class}")
+          end
+        else
+          begin
+            msg_const = constantize("IRCSupport::Message::#{msg_class}")
+          rescue
+            msg_const = constantize("IRCSupport::Message::#{msg_class.capitalize}")
+          end
+        end
+      rescue
+        msg_const = constantize("IRCSupport::Message")
+      end
+
+      message = msg_const.new(elems)
+
+      if message.type == '005'
+        @isupport.merge! message.isupport
+      elsif message.type == 'cap_ack'
+        message.capabilities.each do |capability, options|
+          if options.include?(:disable)
+            @capabilities = @capabilities - [capability]
+          elsif options.include?(:enable)
+            @capabilities = @capabilities + [capability]
+          end
+        end
+      end
+
+      return message
+    end
+
+    # @param [String] type The CTCP type.
+    # @param [String] message The text of the CTCP message.
+    # @return [String] A CTCP-quoted message.
+    def ctcp_quote(type, message)
+      line = low_quote(message)
+      line.gsub!(/\x01/, '\a')
+      return "\x01#{type} #{line}\x01"
+    end
+
+    private
+
+    # from ActiveSupport
+    def constantize(camel_cased_word)
+      names = camel_cased_word.split('::')
+      names.shift if names.empty? || names.first.empty?
+
+      constant = Object
+      names.each do |name|
+        constant = constant.const_defined?(name) ? constant.const_get(name) : constant.const_missing(name)
+      end
+      constant
+    end
+
+    def split_idmsg(line)
+      identified, line = line.split(//, 2)
+      identified = identified == '+' ? true : false
+      return line, identified
+    end
+
+    def handle_ctcp_message(elems)
+      ctcp_type = elems[:command] == 'PRIVMSG' ? 'CTCP' : 'CTCPReply'
+      ctcps, texts = ctcp_dequote(elems[:args][1])
+
+      # We only process the first CTCP, ignoring extra CTCPs and any
+      # non-CTCPs. Those who send anything in addition to that first CTCP
+      # are probably up to no good (e.g. trying to flood a bot by having it
+      # reply to 20 CTCP VERSIONs at a time).
+      ctcp = ctcps.first
+
+      if @capabilities.include?('identify-msg') && ctcp =~ /^.ACTION/
+        ctcp, elems[:identified] = split_idmsg(ctcp)
+      end
+
+      if ctcp !~ /^(\w+)(?: (.*))?/
+        warn "Received malformed CTCP from #{elems[:prefix]}: #{ctcp}"
+        return
+      end
+      ctcp_name, ctcp_args = $~.captures
+
+      if ctcp_name == 'DCC'
+        if ctcp_args !~ /^(\w+) +(.+)/
+          warn "Received malformed DCC request from #{elems[:prefix]}: #{ctcp}"
+          return
+        end
+        dcc_name, dcc_args = $~.captures
+        elems[:args][1] = dcc_args
+        elems[:dcc_type] = dcc_name
+
+        begin
+          message_class = constantize("IRCSupport::Message::DCC::" + dcc_name.capitalize)
+        rescue
+          message_class = constantize("IRCSupport::Message::DCC")
+        end
+
+        return message_class.new(elems)
+      else
+        elems[:args][1] = ctcp_args || ''
+
+        if @isupport['CHANTYPES'].include? elems[:args][0][0]
+          elems[:is_public] = true
+        end
+
+        # treat CTCP ACTIONs as normal messages with a special attribute
+        if ctcp_name == 'ACTION'
+          elems[:is_action] = true
+          return IRCSupport::Message::Message.new(elems)
+        end
+
+        begin
+          message_class = constantize("IRCSupport::Message::#{ctcp_type}_" + ctcp_name.capitalize)
+        rescue
+          message_class = constantize("IRCSupport::Message::#{ctcp_type}")
+        end
+
+        elems[:ctcp_type] = ctcp_name
+        return message_class.new(elems)
+      end
+    end
+
+    def ctcp_dequote(line)
+      line = low_dequote(line)
+
+      # filter misplaced \x01 before processing
+      if line.count("\x01") % 2 != 0
+        line[line.rindex("\x01")] = '\a'
+      end
+
+      return if line !~ /\x01/
+
+      chunks = line.split(/\x01/)
+      chunks.shift if chunks.first.empty?
+
+      chunks.each do |chunk|
+        # Dequote unnecessarily quoted chars, and convert escaped \'s and ^A's.
+        chunk.gsub!(/\\([^\\a])/, "\\1")
+        chunk.gsub!(/\\\\/, "\\")
+        chunk.gsub!(/\\a/, "\x01")
+      end
+
+      ctcp, text = [], []
+
+      # If the line begins with a control-A, the first chunk is a CTCP
+      # line. Otherwise, it starts with text and alternates with CTCP
+      # lines. Really stupid protocol.
+      ctcp << chunks.shift if line =~ /^\x01/
+
+      while not chunks.empty?
+        text << chunks.shift
+        ctcp << chunks.shift if not chunks.empty?
+      end
+
+      return ctcp, text
+    end
+
+    def low_quote(line)
+      return line.sub(@@low_quote_from, @@low_quote_to)
+    end
+
+    def low_dequote(line)
+      return line.sub(@@low_dequote_from, @@low_dequote_to)
+    end
+  end
+end