1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
;Unreal MSL
on *:socklisten:unreal:{
var %r = client $+ $r(1000000,9999999)
sockaccept %r
set %started. [ $+ [ %r ] ] 1
;echo -atg Accepting Connection from $sock(%r).ip -- $sock(%r).addr .:. %r
}
alias sockname.ini { return $sockname $+ .ini }
alias conf {
return $readini(ircd.conf,general,$1)
}
on *:sockread:client*:{
var %s
sockread %s
tokenize 32 %s
var %a = sockwrite -tn $sockname
if (%started. [ $+ [ $sockname ] ]) {
if (NICK == $1) {
echo -a nick triggerd
if ($istok(%ircd.usednicks,$2,32)) { %a 433 * $2 Nickname is already in use | echo -a halted | halt }
if (!$regex($2,/^([][A-Za-z\\^`{|}-][][\w\\^`{|}-]*)$/) { %a 432 * #2 Bad Nickname: Illegal Characters | echo -a halted2 | halt }
echo -a reached.
set %ircd.usednicks %ircd.usednicks $2
writeini $sockname.ini general nick $2
}
if (USER == $1) {
%a :Welcome NOTICE AUTH :*** Welcome to $conf(server)
%a :Welcome NOTICE AUTH :*** Attempting to find your Hostname. Please Hold!
writeini $sockname.ini general user $2
writeini $sockname.ini general realname $mid($5-,2)
dns $sock($sockname).ip
set %sname.temp $sockname
unset %started. [ $+ [ $sockname ] ]
}
}
}
on *:dns:{
sockwrite -tn %sname.temp :Welcome NOTICE AUTH :*** Found your hostname! ( $+ $dns(1).addr $+ )
writeini %sname.temp $+ .ini general host $dns(1).addr
ircd.connect %sname.temp
unset %sname.temp
}
alias irc.version {
return Dor1.0.0
}
alias ircd.connect {
var %a = sockwrite -tn $1 : $+ $conf(server)
var %nick = $readini($1.ini,general,nick)
var %user = $readini($1.ini,general,user)
var %host = $readini($1.ini,general,host)
%a 001 %nick :Welcome to the $conf(network) IRC Network $+(%nick,!,%user,@,%host)
%a 002 %nick :Your host is $conf(server) $+ , running version $ircd.version
%a 003 %nick :This server was created Sun Apr 27 13:24:35 2008 at 13:24:52 IST
%a 004 %nick $conf(server) $ircd.version iowghraAsORTVSxNCWqBzvdHtGp lvhopsmntikrRcaqOALQbSeIKVfMCuzNTGjXUB
%a 005 %nick NAMESX SAFELIST HCN MAXCHANNELS=15 CHANLIMIT=#:15 MAXLIST=b:60,e:60,I:60 NICKLEN=30 CHANNELLEN=32 TOPICLEN=307 KICKLEN=307 AWAYLEN=307 MAXTARGETS=20 WALLCHOPS are supported by this server
%a 005 %nick WATCH=128 SILENCE=15 MODES=12 CHANTYPES=# PREFIX=(qaohv)~&@%+ CHANMODES=beI,kfL,ljXB,psmntirRcOAQKVCuzNSMTGU NETWORK= $+ $conf(network) CASEMAPPING=ascii EXTBAN=~,cqnrTR ELIST=MNUCT STATUSMSG=~&@%+ EXCEPTS INVEX are supported by this server
%a 005 %nick CMDS=KNOCK,MAP,DCCALLOW,USERIP are supported by this server
%a 422 %nick :MOTD file is missing.
}
on *:sockclose:client*:{
.remove $sockname.ini
}
|