Overview
| Comment: | Added additional NICK syntax support |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
658b5cfcc1e64d232a464dd1d82bb63a |
| User & Date: | rkeene on 2016-09-15 03:13:28.113 |
| Other Links: | manifest | tags |
Context
|
2016-09-15
| ||
| 03:18 | Better implementation of NICK cleaning check-in: ea4794eca7 user: rkeene tags: trunk | |
| 03:13 | Added additional NICK syntax support check-in: 658b5cfcc1 user: rkeene tags: trunk | |
|
2016-09-13
| ||
| 20:35 | A few changes to tclircd more usable check-in: f0e00464c6 user: rkeene tags: trunk | |
Changes
Modified ircd.tcl
from [1144d83de8]
to [9fa24bb136].
| ︙ | ︙ | |||
102 103 104 105 106 107 108 109 110 111 112 113 114 115 |
return
}
if {$line eq {}} return
set line [string trim $line]
debug "([clientState $fd]:$fd) [clientNick $fd] -> '$line'"
if {[clientState $fd] eq {UNREGISTERED}} {
if {[regexp -nocase {NICK +([^ ]+)$} $line -> nick]} {
if {[nickToFd $nick] ne {}} {
rawMsg $fd "433 * $nick :Nickname is already in use."
return
}
clientNick $fd $nick
nickToFd $nick $fd
if {[clientUser $fd] ne {}} {
| > > > | 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 |
return
}
if {$line eq {}} return
set line [string trim $line]
debug "([clientState $fd]:$fd) [clientNick $fd] -> '$line'"
if {[clientState $fd] eq {UNREGISTERED}} {
if {[regexp -nocase {NICK +([^ ]+)$} $line -> nick]} {
if {[string index $nick 0] eq ":"} {
set nick [string range $nick 1 end]
}
if {[nickToFd $nick] ne {}} {
rawMsg $fd "433 * $nick :Nickname is already in use."
return
}
clientNick $fd $nick
nickToFd $nick $fd
if {[clientUser $fd] ne {}} {
|
| ︙ | ︙ |