прокси

← →
Levko (2007-02-01 16:38) [40]

Я кстати думал об этом. Как это реализовывают:
1) Перехват футкций Winsock. Так делают FreeCap, SockCap.
Достоинства: Простота.
Недостатки: Внедрение влечёт за собой выделение памяти для изменённых DLL. Также очень часто этого ооочень не любят некоторые проги (запакованные ASProtect). Ну про ругательства антивирей и фаерволов я не говорю. Да и тормоза. Запускать программы надо через главное окно "проксификатора" что тоже не очень удобно.
2) Написание своего LSP (Layer service provider) и NSP (Name service provider). Так делает Proxifier.
Достоинства: Не патчит программы. Запускать программы надо как обычно, а не через главное окно "проксификатора". Работет довольно быстро.
Недостатки: Давольно сложно писать этот драйвер. Для установки LSP нужны права админа. Не работает со службами. (Windows Update например).

Пока юзаю Proxifier. Но есть мысли разобраться и написать "проксификатор". Главное время найти :( Чтоб доки про это почитать...

← →
хаха (2007-06-11 17:30) [41]

TIEEvents = class(TComponent, IUnknown, IDispatch) private // Private declarations FConnected: Boolean; FCookie: Integer; FCP: IConnectionPoint; FSinkIID: TGuid; FSource: IWebBrowser2; FStatusTextChange: TIEStatusTextChangeEvent; FProgressChange: TIEProgressChangeEvent; FCommandStateChange: TIECommandStateChangeEvent; FDownloadBegin: TIEDownloadBeginEvent; FDownloadComplete: TIEDownloadCompleteEvent; FTitleChange: TIETitleChangeEvent; FPropertyChange: TIEPropertyChangeEvent; FBeforeNavigate2: TIEBeforeNavigate2Event; FNewWindow2: TIENewWindow2Event; FNavigateComplete2: TIENavigateComplete2Event; FDocumentComplete: TIEDocumentCompleteEvent; FOnQuit: TIEOnQuitEvent; FOnVisible: TIEOnVisibleEvent; FOnToolBar: TIEOnToolBarEvent; FOnMenuBar: TIEOnMenuBarEvent; FOnStatusBar: TIEOnStatusBarEvent; FOnFullScreen: TIEOnFullScreenEvent; FOnTheaterMode: TIEOnTheaterModeEvent; protected // Protected declaratios for IUnknown function QueryInterface(const IID: TGUID; out Obj): HResult; override; function _AddRef: Integer; stdcall; function _Release: Integer; stdcall; // Protected declaratios for IDispatch function GetIDsOfNames(const IID: TGUID; Names: Pointer; NameCount, LocaleID: Integer; DispIDs: Pointer): HResult; virtual; stdcall; function GetTypeInfo(Index, LocaleID: Integer; out TypeInfo): HResult; virtual; stdcall; function GetTypeInfoCount(out Count: Integer): HResult; virtual; stdcall; function Invoke(DispID: Integer; const IID: TGUID; LocaleID: Integer; Flags: Word; var Params; VarResult, ExcepInfo, ArgErr: Pointer): HResult; virtual; stdcall; // Protected declarations procedure DoStatusTextChange(const Text: WideString); safecall; procedure DoProgressChange(Progress: Integer; ProgressMax: Integer); safecall; procedure DoCommandStateChange(Command: Integer; Enable: WordBool); safecall; procedure DoDownloadBegin; safecall; procedure DoDownloadComplete; safecall; procedure DoTitleChange(const Text: WideString); safecall; procedure DoPropertyChange(const szProperty: WideString); safecall; procedure DoBeforeNavigate2(const pDisp: IDispatch; var URL: OleVariant; var Flags: OleVariant; var TargetFrameName: OleVariant; var PostData: OleVariant; var Headers: OleVariant; var Cancel: WordBool); safecall; procedure DoNewWindow2(var ppDisp: IDispatch; var Cancel: WordBool); safecall; procedure DoNavigateComplete2(const pDisp: IDispatch; var URL: OleVariant); safecall; procedure DoDocumentComplete(const pDisp: IDispatch; var URL: OleVariant); safecall; procedure DoOnQuit; safecall; procedure DoOnVisible(Visible: WordBool); safecall; procedure DoOnToolBar(ToolBar: WordBool); safecall; procedure DoOnMenuBar(MenuBar: WordBool); safecall; procedure DoOnStatusBar(StatusBar: WordBool); safecall; procedure DoOnFullScreen(FullScreen: WordBool); safecall; procedure DoOnTheaterMode(TheaterMode: WordBool); safecall; public // Public declarations constructor Create(AOwner: TComponent); override; destructor Destroy; override; procedure ConnectTo(Source: IWebBrowser2); procedure Disconnect; property SinkIID: TGuid read FSinkIID; property Source: IWebBrowser2 read FSource; published // Published declarations property WebObj: IWebBrowser2 read FSource; property Connected: Boolean read FConnected; property StatusTextChange: TIEStatusTextChangeEvent read FStatusTextChange write FStatusTextChange; property ProgressChange: TIEProgressChangeEvent read FProgressChange write FProgressChange; property CommandStateChange: TIECommandStateChangeEvent read FCommandStateChange write FCommandStateChange; property DownloadBegin: TIEDownloadBeginEvent read FDownloadBegin write FDownloadBegin; property DownloadComplete: TIEDownloadCompleteEvent read FDownloadComplete write FDownloadComplete; property TitleChange: TIETitleChangeEvent read FTitleChange write FTitleChange; property PropertyChange: TIEPropertyChangeEvent read FPropertyChange write FPropertyChange; property BeforeNavigate2: TIEBeforeNavigate2Event read FBeforeNavigate2 write FBeforeNavigate2; property NewWindow2: TIENewWindow2Event read FNewWindow2 write FNewWindow2; property NavigateComplete2: TIENavigateComplete2Event read FNavigateComplete2 write FNavigateComplete2; property DocumentComplete: TIEDocumentCompleteEvent read FDocumentComplete write FDocumentComplete; property OnQuit: TIEOnQuitEvent read FOnQuit write FOnQuit; property OnVisible: TIEOnVisibleEvent read FOnVisible write FOnVisible; property OnToolBar: TIEOnToolBarEvent read FOnToolBar write FOnToolBar; property OnMenuBar: TIEOnMenuBarEvent read FOnMenuBar write FOnMenuBar; property OnStatusBar: TIEOnStatusBarEvent read FOnStatusBar write FOnStatusBar; property OnFullScreen: TIEOnFullScreenEvent read FOnFullScreen write FOnFullScreen; property OnTheaterMode: TIEOnTheaterModeEvent read FOnTheaterMode write FOnTheaterMode; end;

прокси Найти похожие ветки