WinSock, UDP, широковещание; delphi (pascal)

[svchaos]

Доброго времени суток всем!

Правда ли, что широковещание возможно лишь на компе, включенном в сеть? По крайней мере, на моем домашнем компе широковещающие программки не работают, в то время, как в сети университета все в порядке. Если это действительно так, то подскажите, пожалуйста, как такое можно обойти. Желательно, человеческим языком - мне еще далеко до профессионала.

program UdpSend;

{$APPTYPE CONSOLE}

uses
  SysUtils,
  Winsock;

var WSAData:TWSAData;
    val, adrlen, erc: integer;
    s: TSocket;
    buf: string;
    whoTo: TSockAddr;
begin
  WSAStartUp($0202,WSAData);
  s:=Socket(AF_Inet,Sock_DGRAM,0);
  val:=1;
  SetSockOpt(s,SOL_Socket,SO_Broadcast,pchar(@val),SizeOf(integer));
  WhoTo.sin_family:=PF_Inet;
  WhoTo.sin_port:=HToNS(11111);
  WhoTo.sin_addr.S_addr:=InAddr_Broadcast;
  FillChar(WhoTo.sin_zero,SizeOf(WhoTo.sin_zero),0);
  buf:='Kakaya-to stroka';
  adrlen:=SizeOf(TSockAddr);
  erc:=SendTo(s,buf[1],length(buf),0,WhoTo,adrlen);
  writeln('Sent symbols ',erc);
  writeln(WSAGetLastError);
  writeln('Sent: '+buf);
  readln;
  closeSocket(s);
  WSACleanUp;
end.

program UdpRecv;

{$APPTYPE CONSOLE}

uses
  SysUtils,
  Winsock;

var WSAData:TWSAData;
    adrlen,erc:integer;
    s:TSocket;
    buf:string;
    who,adr2:TSockAddr;
begin
  WSAStartUp($0202,WSAData);
  s:=Socket(AF_Inet,Sock_DGRAM,0);
  who.sin_family:=PF_Inet;
  who.sin_port:=HToNS(11111);
  who.sin_addr.S_addr:= INADDR_ANY;
  FillChar(who.sin_zero,SizeOf(who.sin_zero),0);
  erc:=bind(s,who,sizeOf(who));
  writeln('error ',erc);
  setlength(buf,1024);
  adrlen:=SizeOf(TSockAddr);
  erc:=recvFrom(s,buf[1],1024,0,adr2,adrlen);
  writeln('Received ',erc);
  writeln(WSAGetLastError);
  SetLength(buf, erc);
  writeln(buf);
  readln;
  closeSocket(s);
end.

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

[Квэнди]

Multicast пакеты, отправленные на бродкаст вашего интерфейса не замыкаются на вашем компьютере, а уйдут в сеть, соответственно они просто не пропускаются вашим провайдером, что совершенно нормально: мало кто из провайдеров пропускает Multicast трафик, так как для него надо отдельно создавать роутинг. В университете же у вас это работает потому что ваша сеть университета настроена на пропускание multicast-а.

[svchaos]

То есть, получается, что на своем одиночном домашнем компе я программу с броадкастом ни запустить, ни, тем более, оттестировать нормально не могу? Или есть какие-то лазейки? Дома все-таки стены помогают.

[Квэнди]

ну теоретически вы можете попробовать послать на бродкаст localhost-а

[svchaos]

Пробовал я на loopback вешать широковещание, да только толку не было.
Мне недавно сказали, что на адресе 127.0.0.1 оно вообще не работает. вы такую информацию подтверждаете?

[Квэнди]

Дело в том что loopback 127.0.0.1 , который вешается на некий виртуальный интерфейс не имеет так какового адреса сети, соответственно multicast-а он неполучит, извините что раньше дезинформировал