birçok arkadaşımızın forumda online oldukları süre icerisinde sordukları soruların %30'unu oluşturan bir konu ( away mesajları )
bildiğiniz üzere güvenlik botlarını aşabilmek için birçok inviter acılımı mevcut'tur bunların yanı sıra trojanlarda da mevcut olan away mesajlarını nasıl engeleriz diye soranlara bir cevap hazırladım bu cevap alt'taki kod'dur
çalışma mantığına gelince kanala girişlerde her user'in mesajlarını kontrol eder. Mesajları regex ile kontrol eder www , com , net vs vs vs bunların ulaşabilecek en son hallerine kadar yasaklanmıştır. kullanıcı modları icerisinde (+o=IRCOP) flag'ı mevcut ise ceza-i işlemlerinde gline kullanır , eğer ki kişi kanalda operator ise kickban uygular.
Kod:
alias _? { var %¦:- $address($1,5) | var %£.¨ $active | mode %£.¨ +b %¦:- }
on *:join:#: { whois $nick }
raw *:*: {
var %? $3- , %¦ $numeric,%. o , %� $usermode , %:nx $2
if %¦ == 301 {
if ($regex(%?,/.*?([hH]{1,5}W*[tT]{1,5}W*[tT]{1,5}W*[pP]{1,5}W*[:.]{1,5}W*[/]{1,5}W*[/]{1,5})/)) {
if %. isincs %� {
gline %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(http://) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
else {
if $me isop $%£.¨ {
_? %:nx | kick %£.¨ %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(http://) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
}
}
if ($regex(%?,/.*?((vv|v|V|VV|[wW]){1,5}W*(vv|v|V|VV|[wW]){1,5}W*(vv|v|V|VV|[wW]){1,5}W*[.]{1,5})/)) {
if %. isincs %� {
gline %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(www.) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
else {
if $me isop %£.¨ {
_? %:nx | kick %£.¨ %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(www.) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
}
}
if ($regex(%?,/.*?([.:]{1,20}W*[cC]{1,5}W*[oO]{1,5}W*[mM]{1,5})/)) {
if %. isincs %� {
gline %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(.com) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
else {
if $me isop %£.¨ {
_? %:nx | kick %£.¨ %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(.com) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
}
}
if ($regex(%?,/.*?([.:]{1,5}W*[nN]{1,5}W*(é|�|[eE]){1,5}W*[tT]{1,5})/)) {
if %. isincs %� {
gline %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(.net) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
else {
if $me isop %£.¨ {
_? %:nx | kick %£.¨ %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(.net) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
}
}
if ($regex(%?,/.*?([.:]{1,20}W*(0|[oO]){1,20}W*[rR]{1,20}W*[gG]{1,20})/)) {
if %. isincs %� {
gline %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a 3 Prefix(.org) <- %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
else {
if $me isop %£.¨ {
_? %:nx | kick %£.¨ %:nx meşgul(away) sebebiniz uygunsuzdur. | echo -a - %:nx Kullanıcısı , %? mesajı ile korumanıza takıldı
}
}
}
halt
}
}