Блокать вебсайты..

← →
istok (2007-09-11 17:49) [0]

У кого-нить есть опыт блокинга вебсайтов как минимум в браузерах и как максимум из любых программ?

С этой проблемой долго возимся, что только не перепробовали и везде свои косяки..(lsp, ndis driver, winsock hooks..)

Сейчас будем рады решению, которое хотя бы в популярных браузерах заблокает указанные urls...

Надо чтоб работало для win2k/xp/vista

вариант взаимодействия с ie через ole маловероятен, т.к. наш процесс висит под system (не коннектится не под юзером).

Может, кто-то делал такое например в parental control программе и может продать соответствующие наработки..

← →
Сергей М. © (2007-09-12 08:47) [1]

> istok (11.09.07 17:49)

Все это делается на хосте-шлюзе, а не на клиентских хостах.

← →
ient (2007-09-12 10:05) [2]

защита от дурака
к примеру как мы "блокали" аську на скорую руку на служебных машинах...
system32\drivers\etc\hosts
+
213.180.204.8 login.icq.com

правда в висте с этим файликом могут возникнуть проблемы, насколько помниться.

← →
istok (2007-09-12 19:48) [3]

> Все это делается на хосте-шлюзе, а не на клиентских хостах.

Я понимаю, но мне надо локально это делать.

← →
Сергей М. © (2007-09-13 08:24) [4]

> мне надо локально это делать

Тогда перехватывай весь траффик средствами WinPCap, анализируй TCP-потоки и формируй/возвращай при необходимости свои ответы на запросы браузера.

← →
istok (2007-09-13 19:06) [5]

у вас есть опыт работы с WinPCap ?

я не нашел на сайте ответа на пару вопросов:
-устанавливается\сносится он без ребута или как..
-ставится тихо или с варнингами винды..

и вообще там всё на си...

может, найдется кто-то, кто за $200-500 сделает обёртку этого дела под delphi для блокинга урлов в виде такого класса:

TOnWebRequestEvent = procedure (Sender: TObject; AUrl: string; var ABlock: Boolean) of object; //if ABlock: =true then URL is being blocked (e.g. tcp packet is not resended to destination host) TOnMessage = procedure (Sender: TObject; AMessage: string) of object; TWebBlocker = class(TPersistent) public property Active: Boolean; //if true, OnWebRequestEvent will occur if user tries to access any URL ("GET..." command) on any port (because e.g. ISA client and other proxies work via another ports) procedure Install; //installs driver procedure Uninnstall; //uninstalls driver property IsInstalled: Boolean; //read-only, shows if the driver is already installed property OnWebRequestEvent: TOnWebRequestEvent read FOnWebRequestEvent write FOnWebRequestEvent; property OnMessage: TOnMessage read FOnMessage write FOnMessage; //e.g. just for error messages. end;

как там оно будет работать, мне всё равно, лишь бы стабильно, без ребутов, мессаг и косяков (win2k/xp/vista).

← →
tesseract_pocket (2007-09-13 21:04) [6]

squid+dansgurdian рулит. блокирует всё. даже новые сайты .

← →
istok (2007-09-13 21:13) [7]

> squid+dansgurdian

а это вообще что такое ?

← →
Palladin © (2007-09-13 21:13) [8]

проги

← →
istok (2007-09-13 21:30) [9]

да, но я ищу решение под delphi, а не готовую программу:)

← →
Сергей М. © (2007-09-14 08:42) [10]

> ищу решение под delphi, а не готовую программу

Зачем тебе решение именно под delphi, если ты готов платить ?

За эти деньги можно приобрести готовую вполне функциональную прогу и не заморачиваться на чем она была написана.

> там всё на си

Где "там"-то ?

← →
istok (2007-09-14 13:40) [11]

> За эти деньги можно приобрести готовую вполне функциональную
> прогу и не заморачиваться на чем она была написана.

Мне не программа нужна, а реализация одного из десятков компонентов (в широком смысле) другой системы, сделанной на Delphi.

> Где "там"-то ?

скачал с сайта WinPCap доки, примеры и т.п. всё на си, делфевых примеров в сетке пока не нарыл. юзание длл по докам, без delphi обёртки - это я вряд ли осилю. за это собственно и готов платить.

любые составные части решения могут быть на чём угодно сделаны, но управляющий класс - в delphi, как я описал его выше...

Бьюсь с этим вопросом уже второй месяц, на РАКе толком ничего не предложили такого, что удовлетворяло б всем моим требованиям (быстрая установка и стабильность в winXP\Vista).

LSP решение было близко к всем требованиям, пока наши тесты не выявили пару проблем в висте с нестабильностью её работы (еле с мясом удалили).

Может, просто надо биды до пары штук поднять.. не знаю..))

про $200-500 не пустые слова. если кто-то сможет дать нормальную демку (ну напр, блокающую yahoo.com) решения - готовы сотрудничать.

← →
Сергей М. © (2007-09-14 14:05) [12]

> делфевых примеров в сетке пока не нарыл

Лопатой-то тоже надо уметь пользоваться)

Ровно минута ушла у меня на поиски сабжа:

http://forum.vingrad.ru/forum/topic-70701.html

← →
istok (2007-09-14 14:13) [13]

болшое спасибо за линк, будем посмотреть.

← →
Сергей М. © (2007-09-14 14:17) [14]

> болшое спасибо

Спасибо на WM-кошелек не намажешь))

← →
istok (2007-09-14 14:52) [15]

>Спасибо на WM-кошелек не намажешь))

смотрю эту штуковину, пока не ясно множество вопросов: как фильтровать траф, как тихо ставтиь\сносить драйвер и т.п.

я сейчас потрачу день на изучение, а потом как всегда выявится, что какая-нить штуковина не работает))

может, если вы в этом шарите, сделаете что нам надо и мы намажем не только спасибо?

вы может потратите-то всего пару часов...

помогите, пожалуйста, если вы можете помочь.

стучите мне в асю (я в инвизибле): 121314880

спасибо.

← →
Mozart © (2007-09-14 16:37) [16]

стучите мне в асю ( я в инвизибле ):

Уже подозрительно, не находите :) ?

> Mozart (14.09.2007 16:37:16) [16]

Стучите ко мне, я в визибле, только включается раз в год или полгода, что тоже подозрительно.

Признаться, никогда не понимал инвизибла. ИМХО.

> потрачу день на изучение, а потом как всегда выявится, что
> какая-нить штуковина не работает

А ты куда-то спешишь ?)

> стучите мне в асю

С каких пор хлеб стал за брюхом ходить ?)

← →
istok (2007-09-14 19:19) [22]

> А ты куда-то спешишь ?)

Да, спешу. Но дело не столько в спешке, сколько в качестве результата.
Качество, которое сделает знающий человек за день, мы будем делать месяц и скорее всего не достигнем его.

> Уже подозрительно, не находите :) ?

))

я этот форум лет 6 читаю и он много чем мне помог.

вы хотите чтоб я писал на здесь официальное предложение от компании или что?

> Стучите ко мне, я в визибле, только включается раз в год
> или полгода, что тоже подозрительно.

Вы личность известная в этих кругах. Помнится, ресурсы с вашего сайта мне помогали..

Зачем только передёргивать, не понимаю.

Если на этом форуме нельзя сделать предложение в частном порядке, то так и скажите и укажите на правила форуме.

И к чему подозрения, если деньги тратить заказчику, а не программисту.
А если речь о потраченном времени исполнителя, то почему я не могу дать аванс и т.п....

Вобщем, я конечно в курсах что тут любят пинать, пинайте,
мне главное проблему решить.

Если я не оттуда зашел - укажите откуда зайти, буду признателен.

> Признаться, никогда не понимал инвизибла. ИМХО.

Не хочу нарушать тему треда и объяснять зачем нужен инвизибл.
Если интересно - создайте другой тред и я вам отвечу.

PS:
если смущает аноним, я сто лет назад регался на форуме, но не помню пароли.. попробую вспомнить...

← →
Makhanev Alexander (2007-09-14 19:24) [23]

> С каких пор хлеб стал за брюхом ходить ?)

То есть вам это неинтересно, так?

Или давайте свою аську, чтоб брюхо за хлебом пошло))

За линк спасибо.
Насчет "на хлеб не намажешь" - во сколько вы оцениваете этот линк?

Блокать вебсайты.. Найти похожие ветки