Full Disclosure mailing list archives
[ElectronicSouls] - Domain Setup Tool
From: es () hush com
Date: Fri, 29 Nov 2002 09:05:30 -0800
-----BEGIN PGP SIGNED MESSAGE----- Dear List, Often you will run into the immensely complex chore of setting up domains on a system. We suggest you use our tool. # cat autodomain.pl #!/usr/bin/perl if ($ARGV[3] eq "hso") { print "Content-type: text/html\n\n"; } print "\n"; print "Automated Domain Setup Tool\n"; print "coded by BuRn-X - [Electronicsouls]\n"; print "Greetz to: ElectronicSouls, tty64, hwa, darknet, dexa, sk, servant, izik, etc..\n"; print "\n"; if ($ARGV[0] eq "") { print "Usage: domainadd <domain>\n"; exit(0); } $gotdom = $ARGV[0]; print "\n\n"; print " [*] Preparing to setup $gotdom\n"; print " [*] Getting IP Addresss to use"; open(fi, "</etc/namedb/freeips"); @currips = <fi>; close(fi); open(fn, ">/etc/namedb/newfreeips"); # make a file called newfreeips with free ip's in /etc/namedb $gotip = $currips[0]; $curr = $gotip; chomp($gotip); foreach (@currips) { if ($_ ne $curr) { print fn $_; } } close(fn); system("mv /etc/namedb/newfreeips /etc/namedb/freeips"); print "\n [*] Using $gotip"; print "\n [*] Making Backups of Configuration Files"; system("cp /etc/namedb/named.conf /etc/namedb/named.conf.before"); # If path is diff please change system("cp /var/apache/conf/httpd.conf /var/apache/conf/httpd.conf.before"); # If path is diff please change print "\n [*] Setting up $gotdom"; print "\n [+] Name Server Configuration"; open(nc, ">>/etc/namedb/named.conf"); open(nz, ">/etc/namedb/db.$gotdom"); print nc "\n"; print nc "zone \"$gotdom\" {\n"; print nc "\ttype master;\n"; print nc "\tfile \"db.$gotdom\"\;\n"; print nc "};\n"; $date = qx(date); $serial = rand(); substr($serial, 0, 4, ""); print nz " \$TTL 600 # nameserver ifo goes below here @ IN SOA $gotdom. hostmaster.mydoamin.com. ( $serial ; Serial 3600 ; Refresh 900 ; Retry 3600000 ; Expire 3600 ) ; Minimum IN NS ns1.mydomain.com. IN A $gotip www IN CNAME $gotdom. ftp IN CNAME $gotdom. ns IN CNAME ns1.mydomain.com. mail IN A 123.456.78.910 ; mymailbox \n"; close(nc); close(nz); print "\n [+] Apache Configuration"; # your apache conf ex. httpd.conf path should be eneter below open(ht, ">>/var/apache/conf/httpd.conf"); print ht "\n"; print ht "#$gotdom -- $date\n"; print ht "<VirtualHost $gotip>\n"; print ht "ServerAdmin\twebmaster\@$gotdom\n"; print ht "ServerName\t$gotdom\n"; print ht "ServerAlias\twww.$gotdom\n"; print ht "DocumentRoot\t/home/www/$gotdom\n"; print ht "ScriptAlias\t/cgi-bin /home/www/$gotdom/cgi-bin\n"; print ht "</VirtualHost>\n"; close(ht); print "\n [+] Adding to domain list"; system("echo $gotdom >> /etc/namedb/hosted.txt"); # file with sites created print "\n [+] Creating Folders"; system("mkdir -p /home/www/$gotdom/cgi-bin"); if ($ARGV[1] eq "abqlocal") { print "\n [+] Creating Link for abqlocal"; system("ln -s /home/www/$gotdom /home/abqlocal/$gotdom"); system("chown -R abqlocal.abqlocal /home/www/$gotdom"); } print "\n [*] Configuration complete"; print "\n [*] Restarting Name Server"; system("killall -9 named >/dev/null 2>&1"); system("/usr/sbin/named -u bind -g bind"); print "\n [*] Restarting Apache Server"; system("killall -9 httpd >/dev/null 2>&1"); system("httpd"); print "\n [*] Done\n\n"; print ">> http://www.$gotdom, is ready togo \;\)\n\n"; # If you have any suggestions on how to make this better, please to let us know! The Electronic Souls Crew [ElectronicSouls] (c) 2002 "M R DUCKS..." -----BEGIN PGP SIGNATURE----- Version: Hush 2.2 (Java) Note: This signature can be verified at https://www.hushtools.com/verify wlMEARECABMFAj3nnmwMHGVzQGh1c2guY29tAAoJEN5nGqhGcjltBtwAoLY9VUrNSUHN tnYn4247VwNPDDRsAJwL5cFvaBjHDuydZUaKHarVOu9fqg== =d84z -----END PGP SIGNATURE----- Concerned about your privacy? Follow this link to get FREE encrypted email: https://www.hushmail.com/?l=2 Big $$$ to be made with the HushMail Affiliate Program: https://www.hushmail.com/about.php?subloc=affiliate&l=427 _______________________________________________ Full-Disclosure - We believe in it. Charter: http://lists.netsys.com/full-disclosure-charter.html
Current thread:
- [ElectronicSouls] - Domain Setup Tool es (Nov 29)