🚀 go-pugleaf

Artur Czechowski <arturcz@cyf.gov.pl> wrote:

: Potrzebna mi jest nastepujaca funkcja: jako argument podaję nazwę serwera,
: a funkcja zwraca nazwę kanoniczną tegoż serwera. Sprawdzanie czy serwer
: w ogóle istnieje nie jest potrzebne.

Czy przez nazwę kanoniczną rozumiesz CNAME? Jeżeli tak, to się nie da :-)
Przynajmniej nie w dopuszalnie krótkim czasie. Problem jest mniej więcej taki 
sam, jak z odkowaniam hasła z /etc/passwd :-)

-- 
Piotr Piątkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND

In pl.comp.lang.perl Piotr Piatkowski <kompas@galaxy.uci.agh.edu.pl> wrote:

> Czy przez nazwę kanoniczną rozumiesz CNAME? Jeżeli tak, to się nie da :-)
> Przynajmniej nie w dopuszalnie krótkim czasie. Problem jest mniej więcej taki 
> sam, jak z odkowaniam hasła z /etc/passwd :-)

A jakas gotowa funkcja do zone transferow w perlu?

-- 
Pawel Krawczyk, Krakow, Poland  .  Politechnika Krakowska  .  Fido 2:486/23
http://pipeta.chemia.pk.edu.pl/~kravietz/ PGP fingerprint: F00B602435AC9521

Pawel Krawczyk <kravietz@pipeta.chemia.pk.edu.pl> wrote:
: In pl.comp.lang.perl Piotr Piatkowski <kompas@galaxy.uci.agh.edu.pl> wrote:

: > Czy przez nazwę kanoniczną rozumiesz CNAME? Jeżeli tak, to się nie da :-)
: > Przynajmniej nie w dopuszalnie krótkim czasie. Problem jest mniej więcej taki 
: > sam, jak z odkowaniam hasła z /etc/passwd :-)

: A jakas gotowa funkcja do zone transferow w perlu?

use Net::DNS;

my $res = new Net::DNS::Resolver;

my @zone = $res->axfr( "uci.agh.edu.pl" );

foreach $rr ( @zone ) {
  if( $rr->type eq "CNAME" && $rr->cname eq "galaxy.uci.agh.edu.pl" ) {
    print $rr->name . "\n";
  }
}


$ ./example
mail.uci.agh.edu.pl
gal.uci.agh.edu.pl
news.uci.agh.edu.pl
nic.uci.agh.edu.pl

Tylko że po pierwsze - kto powiedział że CNAME musi być w tej samej 
domenie, a po drugie - to nie uwzględnia CNAME zagnieżdżonych.

W praktyce żeby znaleźć wszystkie CNAME trzeba by sprawdzić cały DNS,
dlatego napisałem że się nie da :-)

P.S. Oczywiście DNS::Net trzeba sobie ściągnąć, 

ftp://ftp.pk.edu.pl/pub/lang/perl/CPAN/modules/by-category/

A oprócz niego potrzebny jest jeszcze IO::Socket (tamże) no i w miarę
nowy perl, np. 5.003_90:
ftp://ftp.pk.edu.pl/pub/lang/perl/CPAN/src/5.0/unsupported/

-- 
Piotr Piątkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND

do takich zabaw w ogóle polecam moduł CPAN
- upraszcza zarządzanie modułami w perlu5, i dba o posiadanie
najnowszych wesji.

-- 
Marcin Klimowski	BOFH	http://www.pk.edu.pl/~marcin/
finger me for my new pgp public key

--LART ANY user to continue

In pl.comp.lang.perl Piotr Piatkowski <kompas@galaxy.uci.agh.edu.pl> wrote:
> Czy przez nazwę kanoniczną rozumiesz CNAME? Jeżeli tak, to się nie da :-)
Nie - chodzi mi o nazwę podstawową - tą, na którą CNAME wskazuje :)

-- 
Artur Czechowski, arturcz@cyf.gov.pl,  Instytut Energii Atomowej, Świerk
http://www.cyf.gov.pl/~arturcz/

Artur Czechowski <arturcz@cyf.gov.pl> wrote:
: In pl.comp.lang.perl Piotr Piatkowski <kompas@galaxy.uci.agh.edu.pl> wrote:
: > Czy przez nazwę kanoniczną rozumiesz CNAME? Jeżeli tak, to się nie da :-)
: Nie - chodzi mi o nazwę podstawową - tą, na którą CNAME wskazuje :)

Aaa... No to chociażby:

my $hostname = ( gethostbyname( "www.agh.edu.pl" ) )[0];
print $hostname

-- 
Piotr Piątkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND

Piotr Piatkowski <kompas@galaxy.uci.agh.edu.pl> wrote:
: Artur Czechowski <arturcz@cyf.gov.pl> wrote:

: : Potrzebna mi jest nastepujaca funkcja: jako argument podaję nazwę serwera,
: : a funkcja zwraca nazwę kanoniczną tegoż serwera. Sprawdzanie czy serwer
: : w ogóle istnieje nie jest potrzebne.

: Czy przez nazwę kanoniczną rozumiesz CNAME? Jeżeli tak, to się nie da :-)

Ależ drogi Watsonie, da się...   RFC882 rzecze wyraźnie:

   Aliases and canonical names
 
      In existing systems, hosts and other resources often have several
      names that identify the same resource...
...
      Most of these systems have a notion that one of the equivalent set
      of names is the canonical name and all others are aliases.
 
Czyli nazwę kanoniczną uzyskuje się pytając do skutku, aż zamiast rekordu
CNAME otrzymamy rekord A.  Chyba że nie ma takiego hosta i poszukiwania
się skończą na jakimś MX lub czymś innym...

:-)

-- 
 _________
(_   _' __) Tomasz R. Surmacz *--* Work:(071)320-2636 tsurmacz@ict.pwr.wroc.pl
  |  (__  \ http://www.ict.pwr.wroc.pl/~tsurmacz/ *----* Home: ts@wroc.apk.net
  |__(____/ For PGP key finger tsurmacz@asic.ict.pwr.wroc.pl *---* irc: TomekS

Tomasz R. Surmacz <tsurmacz@ict.pwr.wroc.pl> wrote:

: : : Potrzebna mi jest nastepujaca funkcja: jako argument podaję nazwę serwera,
: : : a funkcja zwraca nazwę kanoniczną tegoż serwera. Sprawdzanie czy serwer
: : : w ogóle istnieje nie jest potrzebne.

: : Czy przez nazwę kanoniczną rozumiesz CNAME? Jeżeli tak, to się nie da :-)

: Ależ drogi Watsonie, da się...   RFC882 rzecze wyraźnie:
[...]
: Czyli nazwę kanoniczną uzyskuje się pytając do skutku, aż zamiast rekordu
: CNAME otrzymamy rekord A.  Chyba że nie ma takiego hosta i poszukiwania
: się skończą na jakimś MX lub czymś innym...

Eee... Jakbyś przeczytał ten wątek do końca to byś zobaczył że ja 
zrozumiałem że Czesiu na podstawie nazwy hosta chce otrzymać 
wszystkie jego aliasy. A to jest problem mniej więcej taki jak 
"Czy mogę dostać listę adresów w Internecie?".

-- 
Piotr Piątkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND

Piotr Piatkowski <kompas@galaxy.uci.agh.edu.pl> wrote:
: Tomasz R. Surmacz <tsurmacz@ict.pwr.wroc.pl> wrote:
: Eee... Jakbyś przeczytał ten wątek do końca to byś zobaczył że ja 
: zrozumiałem że Czesiu na podstawie nazwy hosta chce otrzymać 
: wszystkie jego aliasy. A to jest problem mniej więcej taki jak 
: "Czy mogę dostać listę adresów w Internecie?".

Oooo!  Wreszcie się znalazł człowiek, który ma tę listę!!!

<aol>
To ja też ją chcę!
</aol>

-- 
 _________
(_   _' __) Tomasz R. Surmacz *--* Work:(071)320-2636 tsurmacz@ict.pwr.wroc.pl
  |  (__  \ http://www.ict.pwr.wroc.pl/~tsurmacz/ *----* Home: ts@wroc.apk.net
  |__(____/ For PGP key finger tsurmacz@asic.ict.pwr.wroc.pl *---* irc: TomekS

Tomasz R. Surmacz <tsurmacz@spamfilter.ict.pwr.wroc.pl> wrote:
: : "Czy mogę dostać listę adresów w Internecie?".

: Oooo!  Wreszcie się znalazł człowiek, który ma tę listę!!!
: To ja też ją chcę!

host -L 999 -l .

(w rzeczy samej, nie wiedzieć czemu :-) serwery są niechętne i nie chcą 
udzielać takich informacji:

. AXFR record query refused by C.ROOT-SERVERS.NET
. AXFR record query refused by D.ROOT-SERVERS.NET
. AXFR record query refused by E.ROOT-SERVERS.NET

warto by to napiętnować na pl.pręgierz :-) ).

-- 
Piotr Piątkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND