function add_domain($domain_name, $parent_name)
{
global $gbl, $login, $ghtml;
$user = str_replace(".", "", $domain_name);
$domain = new Domain(null, null, $domain_name);
$domain->initThisDef();
$domain->password = crypt('admin');
$domain->cpstatus = 'on';
$domain->parent_clname = "client-{$parent_name}";
$domain->username = $user;
$domain->dbpserverlist = array('localhost');
$web = new Web(null, null, $domain_name);
$web->initThisDef();
$web->syncserver = 'localhost';
$web->username = $user;
$web->ttype = 'virtual';
$web->write();
$mmail = new Mmail(null, null, $domain_name);
$mmail->initThisDef();
$mmail->syncserver = 'localhost';
$mmail->write();
$mailaccount = new Mailaccount(null, null, "test@{$domain_name}");
$mailaccount->initThisDef();
$mailaccount->syncserver = 'localhost';
$mailaccount->password = crypt('admin');
$mailaccount->parent_clname = "domain-{$domain_name}";
$mailaccount->cpstatus = 'on';
$mailaccount->write();
$ftpuser = new ftpuser(null, null, "test@{$domain_name}");
$ftpuser->initThisDef();
$ftpuser->password = crypt('admin');
$ftpuser->parent_clname = "domain-{$domain_name}";
$ftpuser->cpstatus = 'on';
$ftpuser->write();
$dns = new Dns(null, null, $domain_name);
$dns->initThisDef();
$dns->syncserver = 'localhost';
$dns->createDefaultTemplate('192.168.1.1', 'dns22.lxcenter.net');
$dns->write();
$unname = $user;
$uuser = new Uuser(null, null, $unname);
$uuser->initThisDef();
$uuser->username = $user;
$uuser->password = crypt('admin');
$uuser->parent_clname = "domain-{$domain_name}";
$uuser->cpstatus = 'on';
$uuser->syncserver = localhost;
$uuser->write();
$uuser->dbaction = 'clean';
//$web->addObject('uuser', $uuser);
$domain->write();
print "Added domain\n";
}
