myDC.ru

Здравствуйте, гость ( Вход | Регистрация )

 
 
Ответить в данную темуНачать новую тему

> Перепутал скрипты, Поток сознания с комментариями

Теги
Нет тегов для показа
GULAM33
сообщение 18.2.2013, 22:11
Сообщение #1


Участник
**

Группа: Пользователи
Сообщений: 41
Регистрация: 9.10.2011
Из: Владимирская обл.
Пользователь №: 9 819
Спасибо сказали: 3 раза




alex82 спасибо за скрипт!
Данный скрипт может отлавливать и по TTH файла(ов).
Когда юзер ищет файл по TTH, и при совпадении корней с запрещенными "масками", так же блокирует юзера.
В код хеша TTH не входят цифры: 0,1,8,9. Так же не входят кирилические буквы - буквы русского алфавита.
Не входят в хеш символы и пробелы между двух соседних букв.
Вывод: Нецелесообразно использовать маски только из латинских букв с включением и без цифр: 2,3,4,5,6 и 7.
Необходим либо пробел в искомом словосочетании, либо символ, либо цифры 0,1,8 и 9.
Кроме того с рускоязычными масками множество исключений, которые придется долго составлять.
Отдельное спасибо за скрипт под RusHub Saymon21!

Может быть как то решить этот не достаток, сделав обход хеш поиска?
Справка: Хеш состоит из 39 букв латинского алфавита с использованием цифр 2,3,4,5,6,7.
Код хеша всегда оканчивается следующими латинскими буквами: A,I,Q,Y.
Примеры: ZLAXUBMRSBKSYAN72Z736CFFXMBXKYNF3TKT5UA, ZM7QDTLTYPW2VS7JUTZFMEUSLWSD7EGDOFM7AVI, ZOLCUNH3YRUJQGFY2VWQJVWYVLWBXZWKYE2YGKQ, ZQQUBNDH5EXY2M7DXGMJ7JPDIZHIAZAJ3XHS5QY.
Go to the top of the page
+Quote Post
alex82
сообщение 18.2.2013, 23:15
Сообщение #2


Местный
*******

Группа: Неактивированные
Сообщений: 908
Регистрация: 26.12.2008
Пользователь №: 1 574
Спасибо сказали: 1406 раз




GULAM33

Скрипт НЕ может отлавливать TTH, поскльку этот тип поиска скриптом игнорируется.
Код
        if from and stype ~= "9" and (CheckString(sstring) or (bBlockOther and tBlock[UID.sNick])) then


Спасибо сказали:
Go to the top of the page
+Quote Post
GULAM33
сообщение 19.2.2013, 0:53
Сообщение #3


Участник
**

Группа: Пользователи
Сообщений: 41
Регистрация: 9.10.2011
Из: Владимирская обл.
Пользователь №: 9 819
Спасибо сказали: 3 раза




alex82 ранняя версия данного скрипта, предоставленная Вами, по крайней мере отлавливала, но так как я понял в данном скрипте имеется ограничение, и это ограничение можно менять по своему. И если это ограничение будет равно 39 или выше, то скрипт сможет отлавливать и по хешу. Или я не так понял?
Go to the top of the page
+Quote Post
Alexey
сообщение 19.2.2013, 2:11
Сообщение #4


7 квадратиков
*******

Группа: Модераторы
Сообщений: 793
Регистрация: 21.1.2009
Пользователь №: 1 895
Спасибо сказали: 301 раз




Цитата(GULAM33 @ 19.2.2013, 0:53) *
alex82 ранняя версия данного скрипта,

Не было никаких ранних версий, версия скрипта пока единственная.

Цитата(GULAM33 @ 19.2.2013, 0:53) *
предоставленная Вами, по крайней мере отлавливала,

Не отлавливала.

Цитата(GULAM33 @ 19.2.2013, 0:53) *
но так как я понял в данном скрипте имеется ограничение, и это ограничение можно менять по своему. И если это ограничение будет равно 39 или выше, то скрипт сможет отлавливать и по хешу. Или я не так понял?

Прочитай пост №17 ещё пару раз.
Go to the top of the page
+Quote Post
GULAM33
сообщение 20.2.2013, 8:26
Сообщение #5


Участник
**

Группа: Пользователи
Сообщений: 41
Регистрация: 9.10.2011
Из: Владимирская обл.
Пользователь №: 9 819
Спасибо сказали: 3 раза




Не путай меня вот код скрипта bad_search:

CODE
sBot = ""
BanTime = 10 -- время бана в минутах
sReason = "Запрещенный поисковой запрос" -- Причина бана

-- Кого нужно проверять (1 - да, 0 - нет) --
CanDo = {
[-1] = 1, -- Незарегестрированный
[0] = 0, -- Мастер
[1] = 0, -- ОП
[2] = 0, -- Вип
[3] = 1, -- Зарегестрированный
}
---------------------------------------------------------------------------------------------
-- ver 1.0 если в таблицу вносятся фразы, то вместо пробела нужно ставить знак $
---------------------------------------------------------------------------------------------
-- Запрещаем
adverTable = {
}
-- Исключения
safeTable = {
}

function SearchArrival(tUser,sData)
if CanDo[tUser.iProfile] == 0 then
return false
end
local s,e,msg = string.find(sData,"$Search %S+%s%S+?%S+?%S+?%S+?(.*)|")
msg = StringLower(msg)
if checkForAdvertising(msg) then
if checkForSafe(msg) then
return nil
end
Core.SendToOps("<"..sBot.."> *** Запрещенный поиск! Юзер: <"..tUser.sNick.."> с ip "..tUser.sIP.." искал: "..msg)
Core.SendToUser(tUser,"<"..sBot.."> *** Вы были забaнены за запрещенный поисковой запрос, отсылаемый с Вашего клиента!")
BanMan.TempBan(tUser,BanTime,sReason,sBot,true)
end
end

function checkForAdvertising(msg)
for _,v in ipairs(adverTable) do
if string.find(msg, v) then
return true
end
end
return false
end

function checkForSafe(msg)
for _,v in ipairs(safeTable) do
if string.find(msg, v) then
return true
end
end
return false
end

function StringLower(msg)
local res = ""
local Byte, Len = nil, string.len(msg)
msg = string.lower(msg)
for i = 1, Len do
Byte = string.byte(msg, i)
if (Byte >= 192) and (Byte < 224) then
Byte = Byte + 32
end
if (Byte == 168) or (Byte == 184) then Byte = 229 end
res = res..string.char(Byte)
end
return res
end
Go to the top of the page
+Quote Post
Alexey
сообщение 20.2.2013, 19:11
Сообщение #6


7 квадратиков
*******

Группа: Модераторы
Сообщений: 793
Регистрация: 21.1.2009
Пользователь №: 1 895
Спасибо сказали: 301 раз




Приведённый тобой скрипт похож на скрипт из первого поста так-же, как ВАЗ-"классика" на Мерседес. Почему-то никому не приходит в голову называть ВАЗ ранней версией Мерседеса и жаловаться в мерсовский сервис-центр на проблемы с "классикой".
Go to the top of the page
+Quote Post

Ответить в данную темуНачать новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

Collapse

> Похожие темы

  Тема Ответов Автор Просмотров Последнее сообщение
No new Topic has attachmentsСкрипты API 2. Защита хаба. Базы TTH
Скрипты защиты от спама, флуда, рекламы, порно
40 GULAM33 46 592 24.5.2015, 16:55 Посл. сообщение: Артём
No New Posts Новые скрипты для птохи - новые вариации на старые темы
4 baltica 9 169 21.5.2013, 5:26 Посл. сообщение: Ksan
No New Posts Какие скрипты обычно используют при полноценном хаб-сервере?
6 Yamakasi 10 919 7.2.2013, 17:04 Посл. сообщение: Yamakasi
No New Posts скрипты для птохи 0.4.2.0
1 Mishari 6 194 6.7.2012, 13:07 Посл. сообщение: mariner
No new ВАЖНО: Topic has attachmentsЗапросы на скрипты
35 Дениска 46 862 29.5.2012, 9:07 Посл. сообщение: Артём
No new Topic has attachmentsКак включать скрипты в PtokaX 0.4.1.1
21 pleomax 33 672 13.5.2012, 22:44 Посл. сообщение: Slavich
No New Posts СКРИПТЫ
3 alex2014 7 085 26.1.2012, 17:23 Посл. сообщение: Ameet
No New Posts Нужны скрипты
Искал искал но не нашол
1 Ferb 9 678 28.5.2011, 8:38 Посл. сообщение: Артём
No New Posts Незапускаются скрипты в Ptokax
7 Br@yZeR 12 731 3.5.2011, 9:25 Посл. сообщение: Strannik
No New Posts Сколько места нужно на диске чтобы запустить скрипты ?
1 Br@yZeR 6 221 2.5.2011, 18:59 Посл. сообщение: Ksan
No New Posts От: командные скрипты для установки сервиса RusHub
От темы с ID: 4075
0 Midgard 5 531 3.3.2011, 2:00 Посл. сообщение: Midgard
No New Posts От: Запросы на скрипты
От темы с ID: 1843
2 Alexey 6 114 13.2.2011, 21:13 Посл. сообщение: Alexey
No new Topic has attachmentsСкрипты И Совметимость Операционных Систем
Рабочие файлы скриптов в Unix системах
37 mariner 51 479 3.2.2011, 3:16 Посл. сообщение: Ksan
No New Posts Как установить скрипты?=)
Script
9 Lamo 16 052 25.1.2011, 13:52 Посл. сообщение: deposit
No New Posts От: Запросы на скрипты
От темы с ID: 1843
1 Error404 5 587 3.12.2010, 0:55 Посл. сообщение: Saymon21

 



RSS Сейчас: 23.11.2024, 0:09