Форум: "Сети";
Текущий архив: 2003.10.16;
Скачать: [xml.tar.bz2];
Вниз
DNS запрос Найти похожие ветки
← →
Аноним (2003-08-20 22:25) [0]Ребята! Подскажите где можна найти инфу как посылать DNS-запросы по протоколу UDP. А самое главное как их формировать? Мне самому надо определять IP отправителя, UDP-порт и ID ответа. Подскажите где искать. Перерыл кучк документации по WinSock - ничего нужного.
← →
aralekin (2003-08-20 22:40) [1]Можно попробовать стандартным компонентом TUdpSocket .... я на подобие делал.... но вот только в локалке....
← →
Rouse_ (2003-08-20 23:43) [2]> надо определять IP отправителя, UDP-порт
Это означает что пакет уже принят? Ну раз так, то порт Вам уже известен.
Что значит IP отправителя? Вам известен URL отправителя?
Поконкретней пожалуйста
Желаю успехов
← →
Verg (2003-08-21 07:18) [3]Уже опять :)
http://www.ararat.cz/synapse/
Там прям такой класс есть TDNSSend
все в исходниках!
И даже для особо одаренных:
function GetMailServers(const DNSHost, Domain: string;
const Servers: TStrings): Boolean;
var
DNS: TDNSSend;
t: TStringList;
n, m, x: Integer;
begin
Result := False;
Servers.Clear;
t := TStringList.Create;
DNS := TDNSSend.Create;
try
DNS.DNSHost := DNSHost;
if DNS.DNSQuery(Domain, QType_MX, t) then
begin
{ normalize preference number to 5 digits }
for n := 0 to t.Count - 1 do
begin
x := Pos(",", t[n]);
if x > 0 then
for m := 1 to 6 - x do
t[n] := "0" + t[n];
end;
{ sort server list }
t.Sorted := True;
{ result is sorted list without preference numbers }
for n := 0 to t.Count - 1 do
begin
x := Pos(",", t[n]);
Servers.Add(Copy(t[n], x + 1, Length(t[n]) - x));
end;
Result := True;
end;
finally
DNS.Free;
t.Free;
end;
end;
← →
Аноним (2003-08-21 08:42) [4]>Это означает что пакет уже принят? Ну раз так, то порт Вам уже >известен.
>Что значит IP отправителя? Вам известен URL отправителя?
Пакет еще не принят, его нужно отправить. А Ip - подделать.
← →
Голова (2003-08-21 09:37) [5]кул хацкеры млин...
← →
Аноним (2003-08-21 13:31) [6]>кул хацкеры млин...
Я админ вообще то.......
← →
Аноним (2003-08-21 22:17) [7]А на голом АПИ без компонентов можна?
← →
Rouse_ (2003-08-22 00:55) [8]Как я понял Вам нужно вывести вместо страницы запрашиваемой пользователем свою (или свой ответ)? (Это с оговоркой что Вы Админ).
Тогда зачем подделывать IP?
А на голом API
WSAStartup..
Socket...
Bind...
и т.д. Все есть в хелпах и FAQ
Желаю успехов
← →
Verg (2003-08-22 04:55) [9]
> А на голом АПИ без компонентов можна?
Эт-то уже напоминает "на голом компе без ОС можна?"
Люди думали, старались, отлаживали, вылавливали глюки, добивались "кросс-платформы".... дают исходники классов (не компонентов, это для тех у кого слово "компонента" вызывает аллергию) - нате, типа, пользуйтесь, не верите - проверьте сами...
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2003.10.16;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.013 c
