module Network.Irc.Messages.Internal.Types
(
Regex
, CommandResponseCode (..)
, ErrorReplyCode (..)
, ReservedReplyCode (..)
, ReservedErrorCode (..)
)
where
import Text.Regex.Applicative (RE)
type Regex = RE Char
data CommandResponseCode
= ReplyWelcome
| ReplyYourHost
| ReplyCreated
| ReplyMyInfo
| ReplyBounce
| ReplyUserHost
| ReplyIsOn
| ReplyAway
| ReplyUnAway
| ReplyNoAway
| ReplyWhoIsUser
| ReplyWhoIsServer
| ReplyWhoIsOperator
| ReplyWhoIsIdle
| ReplyEndOfWhoIs
| ReplyWhoIsChannels
| ReplyWhoWasUser
| ReplyEndOfWhoWas
| ReplyListStart
| ReplyList
| ReplyListEnd
| ReplyUniqueOpIs
| ReplyChannelModeIs
| ReplyNoTopic
| ReplyTopic
| ReplyInviting
| ReplySummoning
| ReplyInviteList
| ReplyEndOfInviteList
| ReplyExceptList
| ReplyEndOfExceptList
| ReplyVersion
| ReplyWhoReply
| ReplyEndOfWho
| ReplyNameReply
| ReplyEndOfNames
| ReplyLinks
| ReplyEndOfLinks
| ReplyBanList
| ReplyEndOfBanList
| ReplyInfo
| ReplyEndOfInfo
| ReplyMotdStart
| ReplyMessageOfTheDay
| ReplyEndOfMessageOfTheDay
| ReplyYoureOper
| ReplyRehashing
| ReplyYoureService
| ReplyTime
| ReplyUsersStart
| ReplyUsers
| ReplyEndOfUsers
| ReplyNoUsers
| ReplyTraceLink
| ReplyTraceConnecting
| ReplyTraceHandshake
| ReplyTraceUnknown
| ReplyTraceOperator
| ReplyTraceUser
| ReplyTraceServer
| ReplyTraceService
| ReplyTraceNewType
| ReplyTraceClass
| ReplyTraceReconnect
| ReplyTraceLog
| ReplyTraceEnd
| ReplyStatsLinkInfo
| ReplyStatsCommands
| ReplyEndOfStats
| ReplyStatsUptime
| ReplyStatsOLine
| ReplyUModeIs
| ReplyServList
| ReplyServListEnd
| ReplyLuserClient
| ReplyLuserOp
| ReplyLuserUnknown
| ReplyLuserChannels
| ReplyLuserMe
| ReplyAdminMe
| ReplyAdminLocation1
| ReplyAdminLocation2
| ReplyAdminEmail
| ReplyTryAgain
| ReplyFreenodeISupport
deriving (Eq, Show)
data ErrorReplyCode
= ErrorNoSuchNick
| ErrorNoSuchServer
| ErrorNoSuchChannel
| ErrorCannotSendToChannel
| ErrorTooManyChannels
| ErrorWasNoSuchNick
| ErrorTooManyTargets
| ErrorNoSuchService
| ErrorNoOrigin
| ErrorNoRecipient
| ErrorNoTextToSend
| ErrorNoTopLevel
| ErrorWildTopLevel
| ErrorBadMask
| ErrorUnknownCommand
| ErrorNoMessageOfTheDay
| ErrorNoAdminInfo
| ErrorFileError
| ErrorNoNicknameGiven
| ErrorErroneousNickname
| ErrorNicknameInUse
| ErrorNickCollision
| ErrorUnavailableResource
| ErrorUserNotInChannel
| ErrorNotOnChannel
| ErrorUserOnChannel
| ErrorNoLogin
| ErrorSummonDisabled
| ErrorUsersDisabled
| ErrorNotRegistered
| ErrorNeedMoreParams
| ErrorAlreadyRegistered
| ErrorNoPermissionForHost
| ErrorPasswordMismatch
| ErrorYoureBannedCreep
| ErrorYouWillBeBanned
| ErrorKeySet
| ErrorChannelIsFull
| ErrorUnknownMode
| ErrorInviteOnlyChannel
| ErrorBannedFromChannel
| ErrorBadChannelKey
| ErrorBadChannelMask
| ErrorNoChannelModes
| ErrorBanListFull
| ErrorNoPrivileges
| ErrorChannelOpPrivilegesNeeded
| ErrorCantKillServer
| ErrorRestricted
| ErrorUniqueOpPrivilegesNeeded
| ErrorNoOperHost
| ErrorUModeUnknownFlag
| ErrorUsersDontMatch
deriving (Eq, Show)
data ReservedReplyCode
= ReservedReplyServiceInfo
| ReservedReplyEndOfServices
| ReservedReplyService
| ReservedReplyNone
| ReservedReplyWhoIsChannelOp
| ReservedReplyKillDone
| ReservedReplyClosing
| ReservedReplyCloseEnd
| ReservedReplyInfoStart
| ReservedReplyMyPortIs
| ReservedReplyStatsCLine
| ReservedReplyStatsNLine
| ReservedReplyStatsILine
| ReservedReplyStatsKLine
| ReservedReplyStatsQLine
| ReservedReplyStatsYLine
| ReservedReplyStatsVLine
| ReservedReplyStatsLLine
| ReservedReplyStatsHLine
| ReservedReplyStatsSLine
| ReservedReplyStatsPing
| ReservedReplyStatsBLine
| ReservedReplyStatsDLine
deriving (Eq, Show)
data ReservedErrorCode
= ReservedErrorNoServiceHost
deriving (Eq, Show)