From: es at hush.com (es@...h.com)
Subject: [ElectronicSouls] - Domain Setup Tool

-----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

Powered by blists - more mailing lists