webdns/new_service_webdns.php

<?php
/*
PHP por David Ramos García, Open6Hosting <dramos@open6hosting.com>
SQL y expresiones regulares por Pablo Sarria Pérez, Open6Hosting <pablo@sarriaperez.com>

2017, All rights reserved.
*/

/******************************************
* Begin Form configuration
******************************************/
//Solo se puede tener una variable para cargar los distintos formularios
$tform_def_file = "form/new_service_webdns.tform.php";

/******************************************
* End Form configuration
******************************************/

require_once '../../lib/config.inc.php';
require_once '../../lib/app.inc.php';
//require 'pdf_o6h.php';

//* Check permissions for module
$app->auth->check_module_permissions('webdns');

// Check the  module permissions and redirect if not allowed.
/*if(!stristr($_SESSION['s']['user']['modules'],'customdns')) {
    header('Location: ../index.php');
    die;
}*/

// Loading classes, asi es como se carga la api, busco la clase que contiene los métodos que se necesiten y se añade aquí
$app->uses('tpl,tform,tform_actions,remoting,tools_sites,remoting_lib,remoting_dns');
$app->load('tform_actions');


class page_action extends tform_actions {


	function onShowNew() {
		global $app;

		// we will check only users, not admins
		if($_SESSION['s']['user']['typ'] == 'user') {
			if(!$app->tform->checkClientLimit('limit_database_user')) {
				$app->error($app->tform->wordbook["limit_database_user_txt"]);
			}
			if(!$app->tform->checkResellerLimit('limit_database_user')) {
				$app->error('Reseller: '.$app->tform->wordbook["limit_database_user_txt"]);
			}
		}

		parent::onShowNew();
	}

	function onShowEnd() {
		global $app, $conf, $interfaceConf;

		/*
		 * If the names are restricted -> remove the restriction, so that the
		 * data can be edited
		 */

		//* Get the database user prefix
		$app->uses('getconf,tools_sites');
		$global_config = $app->getconf->get_global_config('sites');
		$dbuser_prefix = $app->tools_sites->replacePrefix($global_config['dbuser_prefix'], $this->dataRecord);
		$ftpuser_prefix = $app->tools_sites->replacePrefix($global_config['ftpuser_prefix'], $this->dataRecord);

		if ($_SESSION["s"]["user"]["typ"] != 'admin' && $app->auth->has_clients($_SESSION['s']['user']['userid'])) {
			// Get the limits of the client
			$client_group_id = $app->functions->intval($_SESSION["s"]["user"]["default_group"]);
			$client = $app->db->queryOneRecord("SELECT client.company_name, client.contact_name, client.client_id FROM sys_group, client WHERE sys_group.client_id = client.client_id and sys_group.groupid = ?", $client_group_id);

			// Fill the client select field
			$sql = "SELECT sys_group.groupid, sys_group.name, CONCAT(IF(client.company_name != '', CONCAT(client.company_name, ' :: '), ''), client.contact_name, ' (', client.username, IF(client.customer_no != '', CONCAT(', ', client.customer_no), ''), ')') as contactname FROM sys_group, client WHERE sys_group.client_id = client.client_id AND client.parent_client_id = ? ORDER BY client.company_name, client.contact_name, sys_group.name";
			$records = $app->db->queryAllRecords($sql, $client['client_id']);
			$tmp = $app->db->queryOneRecord("SELECT groupid FROM sys_group WHERE client_id = ?", $client['client_id']);
			$client_select = '<option value="'.$tmp['groupid'].'">'.$client['contact_name'].'</option>';
			//$tmp_data_record = $app->tform->getDataRecord($this->id);
			if(is_array($records)) {
				foreach( $records as $rec) {
					$selected = @(is_array($this->dataRecord) && ($rec["groupid"] == $this->dataRecord['client_group_id'] || $rec["groupid"] == $this->dataRecord['sys_groupid']))?'SELECTED':'';
					$client_select .= "<option value='$rec[groupid]' $selected>$rec[contactname]</option>\r\n";
				}
			}
			$app->tpl->setVar("client_group_id", $client_select);
		} elseif($_SESSION["s"]["user"]["typ"] == 'admin') {
			// Fill the client select field
			$sql = "SELECT sys_group.groupid, sys_group.name, CONCAT(IF(client.company_name != '', CONCAT(client.company_name, ' :: '), ''), client.contact_name, ' (', client.username, IF(client.customer_no != '', CONCAT(', ', client.customer_no), ''), ')') as contactname FROM sys_group, client WHERE sys_group.client_id = client.client_id AND sys_group.client_id > 0 ORDER BY client.company_name, client.contact_name, sys_group.name";
			$clients = $app->db->queryAllRecords($sql);
			$client_select = "<option value='0'></option>";
			//$tmp_data_record = $app->tform->getDataRecord($this->id);
			if(is_array($clients)) {
				foreach( $clients as $client) {
					//$selected = @($client["groupid"] == $tmp_data_record["sys_groupid"])?'SELECTED':'';
					$selected = @(is_array($this->dataRecord) && ($client["groupid"] == $this->dataRecord['client_group_id'] || $client["groupid"] == $this->dataRecord['sys_groupid']))?'SELECTED':'';
					$client_select .= "<option value='$client[groupid]' $selected>$client[contactname]</option>\r\n";
				}
			}
			$app->tpl->setVar("client_group_id", $client_select);
		}


		if ($this->dataRecord['database_user'] != ""){
			/* REMOVE the restriction */
			$app->tpl->setVar("database_user", $app->tools_sites->removePrefix($this->dataRecord['database_user'], $this->dataRecord['database_user_prefix'], $dbuser_prefix));
		}

		if($this->dataRecord['database_user'] == "") {
			$app->tpl->setVar("database_user_prefix", $dbuser_prefix);
		} else {
			$app->tpl->setVar("database_user_prefix", $app->tools_sites->getPrefix($this->dataRecord['database_user_prefix'], $dbuser_prefix, $global_config['dbuser_prefix']));
		}

		if ($this->dataRecord['username'] != ""){
			/* REMOVE the restriction */
			$app->tpl->setVar("username", $app->tools_sites->removePrefix($this->dataRecord['username'], $this->dataRecord['username_prefix'], $ftpuser_prefix));
		}

		if($this->dataRecord['username'] == "") {
			$app->tpl->setVar("username_prefix", $ftpuser_prefix);
		} else {
			$app->tpl->setVar("username_prefix", $app->tools_sites->getPrefix($this->dataRecord['username_prefix'], $ftpuser_prefix, $global_config['ftpuser_prefix']));
		}

		parent::onShowEnd();
	}


	public $valor_prefix;
	public $valor_prefix_ftp;

	function tratarVariablesHTML(){
	//function onBeforeInsert() {
		global $app, $conf, $interfaceConf;

		//* Database username shall not be empty
		//if($this->dataRecord['database_user'] == '') $app->tform->errorMessage .= $app->tform->wordbook["database_user_error_empty"].'<br />';
		
		//* Database password shall not be empty
		//if($this->dataRecord['database_password'] == '') $app->tform->errorMessage .= $app->tform->wordbook["database_password_error_empty"].'<br />';

		//* Get the database name and database user prefix
		$app->uses('getconf,tools_sites');
		$global_config = $app->getconf->get_global_config('sites');
		$dbuser_prefix = $app->tools_sites->replacePrefix($global_config['dbuser_prefix'], $this->dataRecord);
		$ftpuser_prefix = $app->tools_sites->replacePrefix($global_config['ftpuser_prefix'], $this->dataRecord);
		
		$this->dataRecord['username_prefix'] = $ftpuser_prefix;
		$this->dataRecord['database_user_prefix'] = $dbuser_prefix;
		$valor2 = $this->dataRecord['database_user_prefix'] = $dbuser_prefix;

		$this->valor_prefix = $this->dataRecord['database_user_prefix'] = $dbuser_prefix;
		$this->valor_prefix_ftp = $this->dataRecord['username_prefix'] = $ftpuser_prefix;
		//$this->dataRecord['database_user'] = substr($dbuser_prefix . $this->dataRecord['database_user'], 0, 16);
		
		//$valor1 = $this->dataRecord['database_user'];

		if(strlen($dbuser_prefix . $this->dataRecord['database_user']) > 16) 
				$app->tform->errorMessage .= str_replace('{user}', htmlentities($dbuser_prefix . $this->dataRecord['database_user'], ENT_QUOTES, 'UTF-8'), 
				$app->tform->wordbook["database_user_error_len"]).'<br />';


		//echo('Tratando ' . '<br>' . 'Mas ' . $valor2 . '<br>' .
		//	$this->valor_prefix_ftp . '<br>');


		//* Check database user against blacklist
		$dbuser_blacklist = array($conf['db_user'], 'mysql', 'root');
		if(is_array($dbuser_blacklist) && in_array($dbuser_prefix . $this->dataRecord['database_user'], $dbuser_blacklist)) {
			$app->tform->errorMessage .= $app->lng('Database user not allowed.').'<br />';
		}

		/* restrict the names */
		/* crop user names if they are too long -> mysql: user: 16 chars / db: 64 chars */
		if ($app->tform->errorMessage == ''){
			$this->dataRecord['database_user'] = substr($dbuser_prefix . $this->dataRecord['database_user'], 0, 16);
		}
		//echo('Ultima variable ' . '<br>');
		$this->dataRecord['server_id'] = 0; // we need this on all servers

		/* prepare password for MongoDB */
		//$this->dataRecord['database_password_mongo'] = $this->dataRecord['database_user'].":mongo:".$this->dataRecord['database_password'];

		//parent::onBeforeInsert();
	}



	
	public $dominio;
	public $subdominio;
	public $es_subdominio = false;
	public $subdom_error = false;
	public $no_ip = false;

	//Campos para PDF
	public $usuario_db_txt;
	public $nombre_db_txt;
	public $pass_db_txt;
	public $usuario_ftp_txt;
	public $pass_ftp_txt;
	public $nombre_user_ftp;
	public $ip4_pdf;
	

	function generaNombreFTP(){
		global $app, $conf, $interfaceConf;

		//* Database username shall not be empty
		//if($this->dataRecord['database_user'] == '') $app->tform->errorMessage .= $app->tform->wordbook["database_user_error_empty"].'<br />';
		
		//* Database password shall not be empty
		//if($this->dataRecord['database_password'] == '') $app->tform->errorMessage .= $app->tform->wordbook["database_password_error_empty"].'<br />';

		//* Get the database name and database user prefix
		$app->uses('getconf,tools_sites');
		$global_config = $app->getconf->get_global_config('sites');
		$dbuser_prefix = $app->tools_sites->replacePrefix($global_config['dbuser_prefix'], $this->dataRecord);

		$dbuser_prefix_valor = $app->tpl->setVar("database_name", $app->tools_sites->removePrefix($this->dataRecord['database_name'], $this->dataRecord['database_name_prefix'], $dbname_prefix));
		//echo ('El prefix de los cohone ' . $dbuser_prefix);
		$this->dataRecord['database_user_prefix'] = $dbuser_prefix_valor;
		

		//echo ('PreFIX ' . '{user}' . str_replace('{user}', htmlentities($dbuser_prefix . $this->dataRecord['database_user'], ENT_QUOTES, 'UTF-8')));
		if(strlen($dbuser_prefix . $this->dataRecord['database_user']) > 16)
		     $app->tform->errorMessage .= str_replace('{user}', htmlentities($dbuser_prefix . $this->dataRecord['database_user'], ENT_QUOTES, 'UTF-8'),
										     $app->tform->wordbook["database_user_error_len"]).'<br />';

		//* Check database user against blacklist
		$dbuser_blacklist = array($conf['db_user'], 'mysql', 'root');
		if(is_array($dbuser_blacklist) && in_array($dbuser_prefix . $this->dataRecord['database_user'], $dbuser_blacklist)) {
			$app->tform->errorMessage .= $app->lng('Database user not allowed.').'<br />';
		}

		/* restrict the names */
		/* crop user names if they are too long -> mysql: user: 16 chars / db: 64 chars */
		if ($app->tform->errorMessage == ''){
			$this->dataRecord['database_user'] = substr($dbuser_prefix . $this->dataRecord['database_user'], 0, 16);
		}

		$this->dataRecord['server_id'] = 0; // we need this on all servers
		$this->tratarVariablesHTML();

		//echo ('PreFIX Valor ' . $dbuser_prefix_valor);
		//Cadena de caractares para construir las nombre.
		$cadena = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ23456789";
		//$cadSpeciales = "!@#_";
		
		//Obtengo la longitud de las cadenas
		$longitudCadena=strlen($cadena);
		//$longSpeciales = strlen($cadSpeciales);
		 
		//Variable para la nombre
		$nombre = "";
		//Longitud para la nombre
		$longitudNombre=8;
		 
		//Creo la nombre
		for($i=1 ; $i<=$longitudNombre ; $i++){
			//Número aleatorio entre 0 y la longitud de la cadena de caracteres-1
			$pos=rand(0,$longitudCadena-1);
			//Formo la nombre en cada iteraccion del bucle, añadiendo a la cadena $nombre 
			//la letra correspondiente a la posicion $pos en la cadena de caracteres definida.
			$nombre .= substr($cadena,$pos,1);
			
	
		}
		return $nombre;//$this->valor_prefix_ftp;
	}

	function generaPass(){
		//Cadena de caractares para construir las password.
		$cadena = "abcdefghijklmnopqrstuvwxyz!@#_ABCDEFGHIJKLMNOPQRSTUVWXYZ23456789";
		$cadSpeciales = "!@#_";
		
		//Obtengo la longitud de las cadenas
		$longitudCadena=strlen($cadena);
		$longSpeciales = strlen($cadSpeciales);
		 
		//Variable para la password
		$pass = "";
		//Longitud para la password
		$longitudPass=13;
		 
		//Creo la password
		for($i=1 ; $i<=$longitudPass ; $i++){
			//Número aleatorio entre 0 y la longitud de la cadena de caracteres-1
			$pos=rand(0,$longitudCadena-1);
			//Formo la password en cada iteraccion del bucle, añadiendo a la cadena $pass 
			//la letra correspondiente a la posicion $pos en la cadena de caracteres definida.
			$pass .= substr($cadena,$pos,1);
			//Añado algún caracter especial en los últimos cuatro caracteres
			for($i2=13;$i2<=$i; $i2++){
			    $poSpecial=rand(0,$longSpeciales-1);
			    $pass .= substr($cadSpeciales, $poSpecial, 1);
			}
		}
		return $pass;
	}

	function generaNombreBD(){
		global $app, $conf, $interfaceConf;

		//* Database username shall not be empty
		//if($this->dataRecord['database_user'] == '') $app->tform->errorMessage .= $app->tform->wordbook["database_user_error_empty"].'<br />';
		
		//* Database password shall not be empty
		//if($this->dataRecord['database_password'] == '') $app->tform->errorMessage .= $app->tform->wordbook["database_password_error_empty"].'<br />';

		//* Get the database name and database user prefix
		$app->uses('getconf,tools_sites');
		$global_config = $app->getconf->get_global_config('sites');
		$dbuser_prefix = $app->tools_sites->replacePrefix($global_config['dbuser_prefix'], $this->dataRecord);

		$dbuser_prefix_valor = $app->tpl->setVar("database_name", $app->tools_sites->removePrefix($this->dataRecord['database_name'], $this->dataRecord['database_name_prefix'], $dbname_prefix));
		//echo ('El prefix de los cohone ' . $dbuser_prefix);
		$this->dataRecord['database_user_prefix'] = $dbuser_prefix_valor;
		

		//echo ('PreFIX ' . '{user}' . str_replace('{user}', htmlentities($dbuser_prefix . $this->dataRecord['database_user'], ENT_QUOTES, 'UTF-8')));
		if(strlen($dbuser_prefix . $this->dataRecord['database_user']) > 16)
		     $app->tform->errorMessage .= str_replace('{user}', htmlentities($dbuser_prefix . $this->dataRecord['database_user'], ENT_QUOTES, 'UTF-8'),
										     $app->tform->wordbook["database_user_error_len"]).'<br />';

		//* Check database user against blacklist
		$dbuser_blacklist = array($conf['db_user'], 'mysql', 'root');
		if(is_array($dbuser_blacklist) && in_array($dbuser_prefix . $this->dataRecord['database_user'], $dbuser_blacklist)) {
			$app->tform->errorMessage .= $app->lng('Database user not allowed.').'<br />';
		}

		/* restrict the names */
		/* crop user names if they are too long -> mysql: user: 16 chars / db: 64 chars */
		if ($app->tform->errorMessage == ''){
			$this->dataRecord['database_user'] = substr($dbuser_prefix . $this->dataRecord['database_user'], 0, 16);
		}

		$this->dataRecord['server_id'] = 0; // we need this on all servers
		$this->tratarVariablesHTML();

		//echo ('PreFIX Valor ' . $dbuser_prefix_valor);
		//Cadena de caractares para construir las nombre.
		$cadena = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ23456789";
		//$cadSpeciales = "!@#_";
		
		//Obtengo la longitud de las cadenas
		$longitudCadena=strlen($cadena);
		//$longSpeciales = strlen($cadSpeciales);
		 
		//Variable para la nombre
		$nombre = "";
		//Longitud para la nombre
		$longitudNombre=8;
		 
		//Creo la nombre
		for($i=1 ; $i<=$longitudNombre ; $i++){
			//Número aleatorio entre 0 y la longitud de la cadena de caracteres-1
			$pos=rand(0,$longitudCadena-1);
			//Formo la nombre en cada iteraccion del bucle, añadiendo a la cadena $nombre 
			//la letra correspondiente a la posicion $pos en la cadena de caracteres definida.
			$nombre .= substr($cadena,$pos,1);
	
		}
		return $this->valor_prefix . $nombre;
	}

	/*function comprobarPass($claveGenerada){
		//compruebo que el tamaño del string sea válido.
		if (strlen($claveGenerada)<3 || strlen($claveGenerada)>20){
		   echo $claveGenerada . " no es válida0<br>";
		   return false;
		}
	 
		//compruebo que los caracteres sean los permitidos
		$alphachars = "abcdefghijkmnopqrstuvwxyz";
		$upperchars = "ABCDEFGHJKLMNPQRSTUVWXYZ";
		$numchars = "23456789";
		$specialchars = "!@#_";

		//$permitidos = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789-_";
		
		
		if (ereg("^[a-zA-Z0-9\-_]{3,20}$", $claveGenerada)) {
			echo $claveGenerada . " es válido<br>";
		   return true;
		} else {
			echo $claveGenerada . " NO válido<br>";
		   return false;
		}
		
		echo $claveGenerada . " es válido<br>";
		return true;
	 }*/


	function crearBaseDatosFtp($remoto){
		global $app, $conf;

		$fields = $app->tform->encode($this->dataRecord, $app->tform->getCurrentTab(), true);

		$app->uses('ini_parser,getconf');
		$server_config_array = $app->getconf->get_global_config();

		//Tomo el valor mínimo de dígitos que tiene que tener la contraseña
		$min_password_length = 10;
		//if(isset($server_config_array['misc']['min_password_length'])) {
			$min_password_length = $app->functions->intval($server_config_array['misc']['min_password_length']);
		//}
		//print "Cantidad de digitos:  " . $min_password_length;
		//print 'La clave ' . $this->generaPass();

		$generated_usernameBBDD = $this->generaNombreBD();//$fields['client_id'].substr(sha1(rand()), 0, 10);//client_prefix.substr(sha1(rand()), 0, 8);
		//print "<pre>"; print_r($generated_usernameBBDD); print "</pre>\n";
		$sitio_id = $app->db->queryOneRecord('SELECT domain_id, domain FROM web_domain WHERE domain = "'.$fields['domain'].'"');
		//print "<pre>"; print_r($camDnsRR); print "</pre>\n";
		$camDnsRR = $app->db->queryOneRecord('SELECT server_id, zone FROM dns_rr WHERE name LIKE "'.$this->dominio.'%"');
		//print "<pre>"; print_r($fields['client_id']); print "</pre>\n";

		$clavePass = $this->generaPass();
		//*Recupero todos los prefix necesarios
		$app->uses('getconf,tools_sites');
		$global_config = $app->getconf->get_global_config('sites');
		//$dbuser_prefix = $app->tools_sites->replacePrefix($global_config['dbuser_prefix'], $this->dataRecord);
		//$dbname_prefix = $app->tools_sites->replacePrefix($global_config['dbname_prefix'], $this->dataRecord);
		$ftpuser_prefix = $app->tools_sites->replacePrefix($global_config['ftpuser_prefix'], $this->dataRecord);
		

		// añado database user con su prefix
		$db_user_params = array(
			'server_id' => 	$camDnsRR['server_id'],
			'sysgroup_id' => $fields['client_group_id'],
			'sys_userid' => $fields['client_group_id'],
			'database_user' => $generated_usernameBBDD, //$dbuser_prefix3 . $generated_usernameBBDD,
			'database_user_prefix' => $this->valor_prefix,
			'database_password' => $clavePass//substr(sha1($dbuser_prefix . $generated_usernameBBDD), 0, 16)
			//substr(sha1(rand()), 0, 20)
		);

		$this->usuario_db_txt = $db_user_params['database_user'];
		$this->pass_db_txt = $db_user_params['database_password'];

		//print "<pre>"; print_r($db_user_params); print "</pre>\n";
		//print "<br>". $this->usuario_db_txt;
		//print "<br>". $this->pass_db_txt;

		//print "<pre>"; print_r($fields); print "</pre>\n";
		$db_user_id = $remoto->insert_query('../sites/form/database_user.tform.php', $fields['client_group_id'], $db_user_params, 'sites:web_database_user:on_after_insert');
			
		// add database
		$paramsBD = array(
			'server_id' => 	$camDnsRR['server_id'],
			'sysgroup_id' => $fields['client_group_id'],
			'parent_domain_id' => $sitio_id['domain_id'],
			'type' => 'mysql',
			'database_quota' => '-1',
			'database_name' => $generated_usernameBBDD, //$dbuser_prefix3 . $generated_usernameBBDD,//$db_user_params['database_user'],
			'database_name_prefix' => $this->valor_prefix,
			'database_user_id' => $db_user_id,
			'database_charset' => 'utf8',
			'remote_access' => 'n',
			'remote_ips' => '-1',
			'active' => 'y'
		);
		//print "<pre>"; print_r($paramsBD); print "</pre>\n";
		//print "<pre>"; print_r($fields); print "</pre>\n";

		$this->nombre_db_txt = $paramsBD['database_name'];


		$remoto->sites_database_add($fields['client_group_id'], $paramsBD);
		
		// get site data para usarlo en la creación de la cuenta ftp, otra forma de cargar una tupla dandole un id
		//$app->uses('remoting_lib');
		$app->remoting_lib->loadFormDef('../sites/form/web_vhost_domain.tform.php');
		$site_data = $app->remoting_lib->getDataRecord($sitio_id);
		
		$this->nombre_user_ftp = $this->generaNombreFTP();
		// add ftp user
		$ftp_params = array(
			'server_id' => 	$camDnsRR['server_id'],
			'parent_domain_id' => $sitio_id['domain_id'],
			'username' => $this->valor_prefix_ftp . $this->nombre_user_ftp, //$ftpuser_prefix . $generated_username,
			'username_prefix' => $this->valor_prefix_ftp,
			'password' => $clavePass,//substr(sha1(rand()), 0, 10),
			'quota_size' => '-1',
			'dir' => $site_data['0']['document_root'],
			'uid' => $site_data['0']['system_user'],
			'gid' => $site_data['0']['system_group'],
			'sys_groupid' => $site_data['0']['sys_groupid'],
			'quota_files' => '-1',
			'ul_ratio' => '-1',
			'dl_ratio' => '-1',
			'ul_bandwidth' => '-1',
			'dl_bandwidth' => '-1',
			'active' => 'y',
		);
		$this->usuario_ftp_txt = $ftp_params['username'];
		$this->pass_ftp_txt = $ftp_params['password'];
		//print "<pre>"; print_r($ftp_params); print "</pre>\n";
		//print "<pre>"; print_r($site_data); print "</pre>\n";
		//echo('El usuario es ' . $fields['client_group_id']);
		$remoto->insert_query('../sites/form/ftp_user.tform.php', $fields['client_group_id'], $ftp_params);

		echo '<br><div class="alert alert-success"><br>
		Altas de BBDD y FTP, ¡Correctas!<br><br>
		Usuario BBDD: <b>'. $this->usuario_db_txt .'</b><br>Contraseña: <b>' . $this->pass_db_txt . '
		</b><br>Nombre BBDD: <b>' . $this->nombre_db_txt . '</b><br>
		<br>Usuario FTP: <b>'. $this->usuario_ftp_txt .'</b><br>Contraseña: <b>' . $this->pass_ftp_txt . '</b><br><br>
		</div></br>';

		$hoy = date("d-m-Y H:i:s");

		$html_resultado = '<br><br><b>BBDD</b><br>
		Usuario: <b>'. $this->usuario_db_txt .'</b><br>
		Nombre Base de Datos: <b>' . $this->nombre_db_txt .'</b><br>
		Clave: <b>' . $this->pass_db_txt . '</b><br><br>
		<b>FTP</b><br>
		Usuario: <b>'. $this->usuario_ftp_txt .'</b><br>
		Clave: <b>' . $this->pass_ftp_txt . '</b><br><br>
		
		<b> </b><br>
		Nuevo dominio: <b>'. $fields['domain'].'</b><br><br>
		Documento generado: <b>' . $hoy . '</b><br><br>';


		$eldom = $fields['domain'];
		echo '<form method="post" id="formulario" action="webdns/pdf_o6h.php" target="_blank">';
		echo '<input id="pdf_power" name="pdf_power" type="hidden" value="'.$html_resultado.'">';
		echo '<input id="nombre_bd" name="nombre_bd" type="hidden" value="'.$this->nombre_db_txt.'">';
		echo '<input id="usuario_bd" name="usuario_bd" type="hidden" value="'.$this->usuario_db_txt.'">';
		echo '<input id="pass_bd" name="pass_bd" type="hidden" value="'.$this->pass_db_txt.'">';
		echo '<input id="usuario_ftp" name="usuario_ftp" type="hidden" value="'.$this->usuario_ftp_txt.'">';
		echo '<input id="pass_ftp" name="pass_ftp" type="hidden" value="'.$this->pass_ftp_txt.'">';
		echo '<input id="ip4" name="ip4" type="hidden" value="'.$this->ip4_pdf.'">';
		echo '<input id="dominio_nuevo" name="dominio_nuevo" type="hidden" value="'.$eldom.'">';
		echo '<input type="submit" class="btn btn-default formbutton-success" value="Descargar PDF">';
		echo '</form>';

		echo '<div id="resp"></div>';
		
	}

	//Expresiones regulares para comprobar si es subdominio
	function comprobarSubDominios($subdom) {
		global $app, $conf;

		$patronSubDominos = "/(.*?)\.(.*)$/";
		$patronWWW = "/^w{3}/";
		//$patronPunto = '/(\.)/';
		/*$patronP1 = '/(^\.)/';
		$patronP2 = '/(\.$)/';
		$patronP3 = '/(\.\.+)/';
		$patronP4 = '/(\.[[:alpha:]]*)$/';*/

		//Se comprueba que no tenga 3 w "www" al principio del nombre del dominio o subdomino
		$encontradoWWW = preg_match($patronWWW, $subdom, $coincidencias);
		if($encontradoWWW){
			$app->tform->errorMessage = $app->tform->wordbook['error_dominio_www'];
			return;
		}

		//Si el dominio tiene mas de dos puntos, es incorrecto
		if (substr_count($subdom,".") > 2) {

			$app->tform->errorMessage = $app->tform->wordbook['error_dominio_mas_puntos'];
			return;

		} else if(substr_count($subdom,".") == 2){
			$this->encontrado = preg_match($patronSubDominos, $subdom, $coincidencias);
			//print "<pre>"; print_r($coincidencias); print "</pre>\n";
			
			$this->subdominio = $coincidencias[1];
			$this->dominio = $coincidencias[2];

			//print "Subdomino: " . $this->subdomino . "</p>\n Dominio: " . $this->domino;
			$this->es_subdominio = true;
		} 
		//print "<pre>El dominio es: " . $this->dominio;
		return $this->es_subdominio;
	}

	//Crear subdominio
	function crearSubDominio($remoto, $campoSubDominio){
		//para usar variables globales en las funciones hay que declararlas dentro de la funcion.
		global $app, $conf;

		$fields = $app->tform->encode($this->dataRecord, $app->tform->getCurrentTab(), true);
		
		//print "<pre>"; print_r($campoSubDominio); print "</pre>\n";
		//Compruebo que el subdominio no existe consultando la tabla web_domain.
		$existeSubDominio = $app->db->queryOneRecord('SELECT domain_id, domain FROM web_domain WHERE domain = "'.$campoSubDominio.'"');
		//print '<pre>El Sub existe '. $existeSubDominio['domain'];
		if($existeSubDominio){
		    $this->subdom_error = true;
		    $app->tform->errorMessage = $app->tform->wordbook['error_subdominio_existe'];
		    $this->onError();
		    return;
		}
		//print "<pre>El dominio es: " . $this->dominio;
		//$camDominio = $app->db->queryOneRecord('SELECT domain_id, domain FROM domain WHERE domain = "'.$this->dominio.'"');
		$camDominio = $app->db->queryOneRecord('SELECT origin FROM dns_soa WHERE origin LIKE "'.$this->dominio.'%"');
		$camDnsRR = $app->db->queryOneRecord('SELECT server_id, zone FROM dns_rr WHERE name LIKE "'.$this->dominio.'%"');
		
		//Para los registros tipo A la ip tiene que ser tipo IPv4
		$camServIP = $app->db->queryOneRecord("SELECT ip_address FROM server_ip WHERE server_id = ".$camDnsRR['server_id']." AND ip_type='IPv4'");
		
		//print_r($camDominio);
		//print_r($camDnsRR);

		//Si el dominio NO existe mostramos mensaje de error y salimos de la ejecución
		if(!$camDominio['origin']){
			$this->subdom_error = true;
			$app->tform->errorMessage = $app->tform->wordbook['error_no_existe_dominio_padre'];
			$this->onError();
			//return;
			//print 'No existe el dominio';
			return $this->subdom_error;

		} else {
			//Parametros para la creación de subdominios
			$paramSubDominios = array(
				'server_id' => $camDnsRR['server_id'],
				'zone' => $camDnsRR['zone'],
				'name' => $this->subdominio,
				'type' => 'a',
				'data' => $camServIP['ip_address'],
				//'aux' => '0',
				'ttl' => '3600',
				'active' => 'y',
				//comento el campo stamp, ya que introducia solo ceros en la bbdd
				//'stamp' => time(),
				'serial' => '1',
			);

			// client group id
			$res = $app->db->queryOneRecord("SELECT groupid FROM sys_group WHERE client_id = ".$app->functions->intval($fields['client_group_id']));
			$client_group_id = $app->functions->intval($this->dataRecord["client_group_id"]);//$res['groupid'];
			echo ('El client group id ' . $client_group_id . " <br>");
			echo ('El el res ' . $res['groupid'] . " ");
			//print "<pre>"; print_r($paramSubDominios); print "</pre>\n";
			//Inserto en bbdd usando la clase remoto que se la he pasado en parámetros de la función
			//$resultado = $remoto->insert_query('../dns/form/dns_a.tform.php', $fields['client_id'], $paramSubDominios);
			$resultado = $remoto->insert_query('form/dns_a_webdns.tform.php', $fields['client_group_id'], $paramSubDominios);
			echo '<br><div class="alert alert-success"><br>
				 Se ha dado de alta Web y Subdominio, <b>'.$this->subdominio.'</b>, ¡Correctamente!
			<br><br></div></br>';
	
			//$this->onShow();
		}
	}

	function crearSitioWebSubdominio($remoto){
		global $app, $conf;
		
		$fields = $app->tform->encode($this->dataRecord, $app->tform->getCurrentTab(), true);

		//Captura del servidor id
		if($this->id > 0) {
			$server_id = $this->dataRecord["server_id"];
		} else {
			// Get the first server ID
			$tmp = $app->db->queryOneRecord("SELECT server_id FROM server WHERE web_server = 1 ORDER BY server_name LIMIT 0,1");
			$server_id = $tmp['server_id'];
			//$this->elServidor = $server_id;
		}

		$dns_ip_servidor_ipv6 = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE client_id = ".$fields['client_group_id']."  AND ip_type='IPv6'");
		
		//Comprobamos que el resultado para el cliente seleccionado no esta vacío,
		//si lo esta tomamos los datos del cliente id 0
		if(!$dns_ip_servidor_ipv6){
			$dns_ip_servidor = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE client_id = 1 AND ip_type='IPv4'");
			$dns_ip_servidor_ipv6 = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE client_id = 1 AND ip_type='IPv6'");
			/*echo '<br><br>Valor de la consulta '.$dns_ip_servidor_ipv6[ip_address].' ';
			echo '<br><br>Valor de la consulta '.$dns_ip_servidor[ip_address].' ';*/
		}

		$dns_servidor = $app->db->queryOneRecord("SELECT client_id, default_dnsserver, default_webserver FROM client WHERE client_id = ".$app->functions->intval($fields['client_group_id']));
		$clienteID = $dns_servidor['client_id'];

		$res = $app->db->queryOneRecord("SELECT groupid FROM sys_group WHERE client_id = ".$app->functions->intval($fields['client_group_id']));
		$client_group_id = $res['groupid'];
		
		//Captura del servidor id
		/*if($this->id > 0) {
			$server_id = $this->dataRecord["server_id"];
		} else {
			// Get the first server ID
			$tmp = $app->db->queryOneRecord("SELECT server_id FROM server WHERE web_server = 1 ORDER BY server_name LIMIT 0,1");
			$server_id = $tmp['server_id'];
			//$this->elServidor = $server_id;
		}*/

		//echo ('El server es: ' . $dns_servidor['default_webserver']);
		// add site
		$paramsite = array(
			'type' => 'vhost',
			'domain' => $fields['domain'], //$this->subdominio,
			'server_id' => $server_id,//$dns_servidor['default_webserver'],
			'ip_address' => '*', //$dns_ip_servidor['ip_address'], 
			'ipv6_address' => $dns_ip_servidor_ipv6['ip_address'],
			'traffic_quota' => '-1', 
			'hd_quota' => '0',
			'cgi' => 'y', 
			'ssi' => 'y', 
			'suexec' => 'y', 
			'ruby' => 'n',
			'python' => 'n',
			'perl' => 'n',
			'errordocs' => '1',
			'subdomain' => '',
			'php' => 'php-fpm',
			'fastcgi_php_version' => '',
			'seo_redirect' => '',
			'rewrite_to_https' => 'n',
			'allow_override' => 'All',
			'http_port' => 80,
			'https_port' => 443,
			'apache_directives' => '',
			'nginx_directives' => '',
			'php_fpm_use_socket' => 'y',
			'pm' => 'ondemand',
			'pm_max_children' => 10,
			'pm_start_servers' => 1,
			'pm_min_spare_servers' => 1,
			'pm_max_spare_servers' => 5,
			'pm_process_idle_timeout' => 10,
			'pm_max_requests' => 0,
			'custom_php_ini' => '', 
			'active' => 'y',
			'document_root' => '-',
			'system_user' => '-',
			'system_group' => '-',
			'log_retention' => 30,
			'client_group_id' => $client_group_id,
		);

		//$app->uses('remoting_lib');
		//$formulario = $app->remoting_lib->loadFormDef('../sites/form/web_vhost_domain.tform.php');
		//$formulario = $app->tform->loadFormDef('../sites/form/web_vhost_domain.tform.php');

		//print 'Valores: ' . $dns_ip_servidor_ipv6;
		//print "<pre> Parametros:"; print_r($paramsite); print "</pre>\n";

		/*print '<pre> cliente id ' . $fields['client_id'];
		print "<pre>";print_r($fields);print "</pre>\n" . $fields['client_id'];*/
		//print "<pre>Formulario ";print_r($formulario);print "</pre>\n";
		
		//print '<pre>DNS IPV6 ' . $dns_ip_servidor_ipv6['ip_address'];

		//$tform_def_file2 = "../sites/form/web_vhost_domain.tform.php";
		//$app->tform->loadFormDef($tform_def_file2);
		//El último parámetro es para lanzar un evento que llama a la función on_after_insert que prepara los campos document_root, system_user y system_group
		$site_id = $remoto->insert_query('../sites/form/web_vhost_domain.tform.php', $fields['client_group_id'], $paramsite, 'sites:web_vhost_domain:on_after_insert');

		//print '<pre>ID sitio web del subdominio --> ' . $site_id;
	}

	function tieneIPs(){
	    global $app, $conf;
	    //$fields = $app->tform->encode($this->dataRecord, $app->tform->getCurrentTab(), true);

		//Llamada a la tabla server_ip para recuperar la ip4 e ip6
		$dns_ip_servidor = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE ip_type='IPv4'");
		$dns_ip_servidor_ipv6 = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE ip_type='IPv6'");

		$la_ip4 = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE ip_type='IPv4'");
		$this->ip4_pdf = $la_ip4['ip_address'];
		/*print "<pre>IP4 ";print_r($dns_ip_servidor);print "</pre>\n";
	    print "<pre>IP6 ";print_r($dns_ip_servidor_ipv6);print "</pre>\n";*/

	    if(!$dns_ip_servidor['ip_address'] || !$dns_ip_servidor_ipv6['ip_address']){
			$app->tform->errorMessage = $app->tform->wordbook['error_no_ip'];
			$this->onError();
			return true;
	    }
	    return false;
	}

	//Comprueba que no exista el dominio y que no tenga sitio web, puede tener sitio web y no tener dns.
	function existeDominio($campos){
		global $app, $conf;

		if($app->db->queryOneRecord('SELECT * FROM dns_soa WHERE origin LIKE "'.$campos['domain'].'%"')) {
			$app->tform->errorMessage = $app->tform->wordbook['domain_error_unique'];
		}
		
		if($app->db->queryOneRecord('SELECT domain_id, domain FROM web_domain WHERE domain = "'.$campos['domain'].'"')) {
			$app->tform->errorMessage = $app->tform->wordbook['error_sitio_web_existe'];
		}

		if($app->tform->errorMessage)
		{
			$this->onError();
			return true;
		}
	}
	//Creación del las dns y sitio web para un dominio.
	function crearDnsSitioWeb($remoto){
		global $app, $conf;
		//Carga de los campos del formulario.
		$fields = $app->tform->encode($this->dataRecord, $app->tform->getCurrentTab(), true);

		//echo ('El server id antes IF ' . $this->id . " <br>");
		//Captura del server_id. IMPORTANTE. COMPROBAR ESTO CON ADMIN.
		if($this->id > 0) {
			$server_id = $this->dataRecord["server_id"];
			//echo ('El server id EN IF ' . $server_id . " <br>");
		} else {
			// Get the first server ID
			$tmp = $app->db->queryOneRecord("SELECT server_id FROM server WHERE web_server = 1 ORDER BY server_name LIMIT 0,1");
			$server_id = $tmp['server_id'];
			//$this->elServidor = $server_id;
		}
		//echo ('El server id ' . $server_id . " <br>");

		//Este if lo he tomado de onAfterInsert del web_domain
		/*if($_SESSION["s"]["user"]["typ"] == 'admin' && isset($this->dataRecord["client_group_id"])) {
			$client_group_id = $app->functions->intval($this->dataRecord["client_group_id"]);
			$app->db->query("UPDATE web_domain SET sys_groupid = ?, sys_perm_group = 'ru' WHERE domain_id = ?", $client_group_id, $this->id);
		}*/

		//IMPORTANTE.
		//Con la selección del cliente o admin en la vista.
		//Tomamos el grupo del cliente o admin, se toma este valor y se captura el client_id y groupid de la tabla
		//sys_group que esta asociada al desplegable de la vista, es en esta tabla donde también esta
		//el client_id de admin. En la tabla client no esta el client_id de admin.
		if($fields['client_group_id']==0) {
			//En la tabla sys_user el userid 1 es admin. No esta en sys_group.
			$cliente_id_seleccionado = 1;
			//En la tabla dns_soa y dns_rr se guarda el valor 0 en sys_groupid cuando es admin.
			$cliente_groupid = 0;
		}else{
		    $cliente_id_seleccionadoCaptura = $app->db->queryOneRecord('SELECT client_id, groupid FROM sys_group WHERE groupid ="'. $fields['client_group_id'] . '"');
			$cliente_id_seleccionado = $cliente_id_seleccionadoCaptura['client_id'];
			$cliente_groupid = $cliente_id_seleccionadoCaptura['groupid'];
		}
		//IMPORTANTE.
		//Antes se recupero el campo groupid de la tabla sys_group y ahora con este dato tomamos el campo userid
		//de la tabla sys_user que son los mismos y guardar una relación entre las dos tablas sin usar
		//una clave foránea (chapó). Estos datos no estan en la tabla client para admin estan en la tabla sys_user. Les't Go.
		if($cliente_groupid == 0){
			$sysUsuarioId = $cliente_id_seleccionado;
			$sysGrupoId = $cliente_groupid;
		}else{
			$sysUsersCaptura = $app->db->queryOneRecord('SELECT sys_userid, sys_groupid FROM sys_user WHERE userid ="'. $cliente_groupid . '"');
			$sysUsuarioId = $sysUsersCaptura['sys_userid'];
			$sysGrupoId = $sysUsersCaptura['sys_groupid'];
		}
		echo ('Lo seleccionado ' . $fields['client_group_id'] . " <br>");
		echo ('Tabla sys_group --> client id ' . $cliente_id_seleccionado . " <br>");
		echo ('Tabla sys_group --> groupid ' . $cliente_groupid . " <br>");

		echo ('Tabla sys_user --> userid ' . $sysUsuarioId . " <br>");
		echo ('Tabla sys_user --> sys_groupid ' . $sysGrupoId . " <br>");
		
		
		//Carga del formulario dns_soa para guardar en base de datos.
		$tform_def_file = "../dns/form/dns_soa.tform.php";
		$app->tform->loadFormDef($tform_def_file);
			
		//Carga y seleccion de dns_template, si no esta creado se informa de que tiene que crearse.
		$template_record = $app->db->queryOneRecord("SELECT * FROM dns_template WHERE visible = 'Y' AND name = 'webdns'"); /*'open6hosting'");*/
		
		//Llamada a la tabla server_ip para recuperar la ip4 e ip6
		//$dns_ip_servidor = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE client_id = ".$app->functions->intval($fields['client_id']. " AND ip_type='IPv4'"));
//PROVISIONAL. IMPORTANTE. ¿ES CORRECTA ESTA CAPTURA?
$dns_ip_servidor = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE client_id = 1 AND ip_type='IPv4'");
		//$dns_ip_servidor_ipv6 = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE client_id = ".$fields['client_id']."  AND ip_type='IPv6'");
//PROVISIONAL.
$dns_ip_servidor_ipv6 = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE client_id = 1 AND ip_type='IPv6'");

		//$dns_ip_servidor_ipv6 = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE client_id = ".$fields['client_id']."  AND ip_type='IPv6'");
		
		//Comprobamos que el resultado para el cliente seleccionado no esta vacío,
		//si lo esta tomamos los datos del cliente id 0.
		if(!$dns_ip_servidor_ipv6){
			$dns_ip_servidor = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE client_id = 0 AND ip_type='IPv4'");
			$dns_ip_servidor_ipv6 = $app->db->queryOneRecord("SELECT ip_type, ip_address FROM server_ip WHERE client_id = 0 AND ip_type='IPv6'");
			/*echo '<br><br>Valor de la consulta '.$dns_ip_servidor_ipv6[ip_address].' ';
			echo '<br><br>Valor de la consulta '.$dns_ip_servidor[ip_address].' ';*/
		}


		$tpl_content = $template_record['template'];
		// Reemplazo la variable que nos encontramos en base de datos por el valor que se ha introducido en el formulario
		$tpl_content = str_replace('{DOMAIN}', $fields['domain'], $tpl_content);
		
		//Carga de los datos en las variables de las ips.
		$tpl_content = str_replace('{IP}', $dns_ip_servidor['ip_address'], $tpl_content);
		$tpl_content = str_replace('{IPV6}', $dns_ip_servidor_ipv6['ip_address'], $tpl_content);
		/*$tpl_content = str_replace('{NS1}', '.open6servers.com', $tpl_content);
		$tpl_content = str_replace('{NS2}', '.open6servers.com', $tpl_content);	*/
			
		$enable_dnssec = 'N';//(($_POST['dns_dnssec'] == 'Y') ? 'Y' : 'N');
		
		// Parse the template
		$tpl_rows = explode("\n", $tpl_content);
		$section = '';
		$vars = array();
		$vars['xfer']='';
		$dns_rr = array();
		foreach($tpl_rows as $row) {
			$row = trim($row);
			if(substr($row, 0, 1) == '[') {
				if($row == '[ZONE]') {
					$section = 'zone';
				} elseif($row == '[DNS_RECORDS]') {
					$section = 'dns_records';
				} else {
					die('Unknown section type');
				}
			} else {
				if($row != '') {
					// Handle zone section
					if($section == 'zone') {
						$parts = explode('=', $row);
						$key = trim($parts[0]);
						$val = trim($parts[1]);
						if($key != '') $vars[$key] = $val;
					}
					// Handle DNS Record rows
					if($section == 'dns_records') {
						$parts = explode('|', $row);
						$dns_rr[] = array(
							'name' => $parts[1],
							'type' => $parts[0],
							'data' => $parts[2],
							'aux'  => $parts[3],
							'ttl'  => $parts[4]
						);					
					}
				}
			}
		} // end foreach
		
		//Recuperamos los distintos servidores del cliente o admin. Uso la tabla client donde no esta admin, por esto
		//grabo a fuego el servidor 1 que hasta el momento parece depender de la instalación de ispconfig y simpre
		//será así ¿?.
		if($fields['client_group_id']==0) {
			//$servidores = $app->db->queryOneRecord("SELECT client_id, default_dnsserver, default_webserver FROM client WHERE client_id = ". $cliente_id_seleccionado);			
			$dns_servidor = 1; //$servidores['default_dnsserver'];
			$web_servidor = 1; //$servidores['default_webserver'];
		}else{
			$servidores = $app->db->queryOneRecord("SELECT client_id, default_dnsserver, default_webserver FROM client WHERE client_id = ". $cliente_id_seleccionado);			
			$dns_servidor = $servidores['default_dnsserver'];
			$web_servidor = $servidores['default_webserver'];
		}
		
		echo ('El servidor dns es ' . $dns_servidor. " y el servidor web es " . $web_servidor);
		
		// Insert the soa record
		$sys_userid = $cliente_id_seleccionado;//$fields['client_group_id']; //$_SESSION['s']['user']['userid'];
		$origin = $vars['origin'];
		$ns = $vars['ns'];
		$mbox = str_replace('@', '.', $vars['mbox']);
		$refresh = $vars['refresh'];
		$retry = $vars['retry'];
		$expire = $vars['expire'];
		$minimum = $vars['minimum'];
		$ttl = $vars['ttl'];
		$xfer = $vars['xfer'];
		$also_notify = $vars['also_notify'];
		$update_acl = $vars['update_acl'];
		$serial = $app->validate_dns->increase_serial(0);

		$insert_data = array(
			"sys_userid" => $sysUsuarioId,//$fields['client_group_id'],//$sys_userid,
			"sys_groupid" => $cliente_groupid,//$client_group_id,
			"sys_perm_user" => 'riud',
			"sys_perm_group" => 'riud',
			"sys_perm_other" => '',
			"server_id" => $dns_servidor, //$server_id,//$dns_servidor['default_dnsserver'],
			"origin" => $origin,
			"ns" => $ns,
			"mbox" => $mbox,
			"serial" => $serial,
			"refresh" => $refresh,
			"retry" => $retry,
			"expire" => $expire,
			"minimum" => $minimum,
			"ttl" => $ttl,
			"active" => 'Y',
			"xfer" => $xfer,
			"also_notify" => $also_notify,
			"update_acl" => $update_acl,
			"dnssec_wanted" => $enable_dnssec
		);
		$dns_soa_id = $app->db->datalogInsert('dns_soa', $insert_data, 'id');

		// Insert the dns_rr records
		if(is_array($dns_rr) && $dns_soa_id > 0) {
			foreach($dns_rr as $rr) {
				$insert_data = array(
					"sys_userid" => $sysUsuarioId, //$fields['client_group_id'],//$sys_userid,
					"sys_groupid" => $cliente_groupid, //$client_group_id,
					"sys_perm_user" => 'riud',
					"sys_perm_group" => 'riud',
					"sys_perm_other" => '',
					"server_id" => $dns_servidor, //$server_id,//$dns_servidor['default_dnsserver'],
					"zone" => $dns_soa_id,
					"name" => $rr['name'],
					"type" => $rr['type'],
					"data" => $rr['data'],
					"aux" => $rr['aux'],
					"ttl" => $rr['ttl'],
					"active" => 'Y'
				);
				$dns_rr_id = $app->db->datalogInsert('dns_rr', $insert_data, 'id');
			}
		}
		//sites_web_domain_add
		$tform_def_file = "../sites/form/web_vhost_domain.tform.php";
		$app->tform->loadFormDef($tform_def_file);
	
		//print_r($fields);
		//echo('La sesión user id ' . $_SESSION['s']['user']['userid']);
		// add site
		$paramsite = array(
			'type' => 'vhost',
			'domain' => $fields['domain'],
			'server_id' => $web_servidor, //$server_id,//$dns_servidor['default_webserver'],
			'sys_userid' => $sysUsuarioId, //$fields['client_group_id'],//$sys_userid,
			'sys_groupid' => $cliente_groupid,
			'ip_address' => '*', //$dns_ip_servidor['ip_address'], 
			'ipv6_address' => $dns_ip_servidor_ipv6['ip_address'],
			'traffic_quota' => '-1', 
			'hd_quota' => '0',
			'cgi' => 'y', 
			'ssi' => 'y', 
			'suexec' => 'y', 
			'ruby' => 'n', 
			'python' => 'n',
			'perl' => 'n',
			'errordocs' => '1',
			'subdomain' => 'www',
			'php' => 'php-fpm',
			'fastcgi_php_version' => '',
			'seo_redirect' => '',
			'rewrite_to_https' => 'n',
			'allow_override' => 'All',
			'http_port' => 80,
			'https_port' => 443,
			'apache_directives' => '',
			'nginx_directives' => '',
			'php_fpm_use_socket' => 'y',
			'pm' => 'ondemand',
			'pm_max_children' => 10,
			'pm_start_servers' => 1,
			'pm_min_spare_servers' => 1,
			'pm_max_spare_servers' => 5,
			'pm_process_idle_timeout' => 10,
			'pm_max_requests' => 0,
			'custom_php_ini' => '', 
			'active' => 'y',
			'document_root' => '-',
			'system_user' => '-',
			'system_group' => '-',
			'log_retention' => 30,
			'client_group_id' => $cliente_groupid, //$client_group_id,
		);

		//print 'Valores: ' . $dns_ip_servidor_ipv6 . " " . $formulario . " Parametros: " ;
		//print "<pre>"; print_r($paramsite); print "</pre>\n";

		/*print '<pre> cliente id ' . $fields['client_id'];
		print "<pre>";print_r($fields);print "</pre>\n";*/
		//print "<pre>Formulario ";print_r($formulario);print "</pre>\n";
		
		//$this->crearBaseDatosFtp($remote);
		//print 'DNS IPV6 ' . $dns_ip_servidor_ipv6['ip_address'];

		//El último parámetro es para lanzar un evento que llama a la función on_after_insert que prepara los campos document_root, system_user y system_group
		//$site_id = $remoto->insert_query('../sites/form/web_vhost_domain.tform.php', $fields['client_group_id'], $paramsite, 'sites:web_vhost_domain:on_after_insert');
		$site_id = $remoto->insert_query('../sites/form/web_vhost_domain.tform.php', $cliente_id_seleccionado, /*$fields['client_group_id'],*/ $paramsite, 'sites:web_vhost_domain:on_after_insert');
		//print 'Sitio id '. $site_id;
	}

	function onSubmit() {
		global $app, $conf;
		//Carga de campos del formulario.
		$fields = $app->tform->encode($this->dataRecord, $app->tform->getCurrentTab(), true);

		//Creo la clase remote para usar las librerias
		$remote = new remote_actions;
		
		if($this->tieneIPs()){
		    return;
		}
		if($this->existeDominio($fields)){
			return;
		}

		//Esta variable nos llega por jQuery desde el htm para el control de errores en la vista.
		if($_POST['create'] != 1)
		{	
			$app->tform->errorMessage = 'DUMMY';
			$app->tpl->setVar($this->dataRecord);
			$this->onShow();
			return;
		}
		
		if($this->comprobarSubDominios($fields['domain'])){
			
			$this->crearSubDominio($remote, $fields['domain']);
			if(!$this->subdom_error){
				$this->crearSitioWebSubdominio($remote);
				//$this->crearBaseDatosFtp($remote);
			}

		} else {

			$this->crearDnsSitioWeb($remote);
			//$variablePHP = "<script> document.write(test) </script>";
			//Si todo va bien, el resultado de la web y dns
			echo '<br><div class="alert alert-success"><br>
					Altas Web y DNS del dominio <b>'.$fields['domain'].'</b>, ¡Creadas correctamente!
				<br><br></div></br>';

			//IMPORTANTE, es necesario cargar nuestro formulario para poder ejecutar la función que crea
			//la base de datos y el ftp ya que hay datos que tomamos de él antes de ejecutarla.
			$app->tform->loadFormDef('form/new_service_webdns.tform.php');
			//$this->crearBaseDatosFtp($remote);
		}
	}
}


class remote_actions extends remoting {
	public function insert_query($formdef_file, $client_id, $params, $event_identifier = '') {
		return $this->insertQuery($formdef_file, $client_id, $params, $event_identifier);
	}

	public function sites_database_add($client_id, $params){
		global $app, $conf;

		//$app->remoting_lib->loadFormDef('../sites/form/database.tform.php');
		//$app->tform->formDef('../sites/form/database.tform.php');
		$sql = $this->insertQueryPrepare('../sites/form/database.tform.php', $client_id, $params);
	
		if($sql !== false) {
			$app->uses('sites_database_plugin');
			//print_r($sql);
			$this->id = 0;
			$this->dataRecord = $params;
			//$app->uses('sites_database_plugin');
			$app->sites_database_plugin->processDatabaseInsert($this);

			$retval = $this->insertQueryExecute($sql, $params);
			
			// set correct values for backup_interval and backup_copies
			if(isset($params['backup_interval']) || isset($params['backup_copies'])){
				$sql_set = array();
				if(isset($params['backup_interval'])) $sql_set[] = "backup_interval = '".$app->db->quote($params['backup_interval'])."'";
				if(isset($params['backup_copies'])) $sql_set[] = "backup_copies = ".$app->functions->intval($params['backup_copies']);
				//$app->db->query("UPDATE web_database SET ".implode(', ', $sql_set)." WHERE database_id = ".$retval);
				$this->updateQueryExecute("UPDATE web_database SET ".implode(', ', $sql_set)." WHERE database_id = ".$retval, $retval, $params);
			}
			
			return $retval;
		}

		return false;
	}
}

$page = new page_action;
$page->onLoad();


//IMPORTENTE, es necesario estas líneas para que el botón del pdf funcione. Activa el javascript
//echo '<script type="text/javascript">';
//echo 'alert (password(7, false, 1));';
//echo '</script>';


?>

<!--IMPORTENTE, es necesario estas líneas para que el botón del pdf funcione. Activa el javascript -->
<script type="text/javascript">

/*var test = "PARALACLAVE";
function getRandomInt(min, max){
    return Math.floor(Math.random() * (max - min + 1)) + min;
}

var clave = password(7, false, 1);
function password(minLength, special, num_special){
	minLength = minLength || 10;
	if(minLength < 8) minLength = 8;
	var maxLength = minLength + 5;
	var length = getRandomInt(minLength, maxLength);
	
	var alphachars = "abcdefghijkmnopqrstuvwxyz";
	var upperchars = "ABCDEFGHJKLMNPQRSTUVWXYZ";
    var numchars = "23456789";
	var specialchars = "!@#_";
	
	if(num_special == undefined) num_special = 0;
	if(special != undefined && special == true) {
		num_special = Math.floor(Math.random() * (length / 4)) + 1;
	}
	var numericlen = getRandomInt(1, 2);
	var alphalen = length - num_special - numericlen;
	var upperlen = Math.floor(alphalen / 2);
	alphalen = alphalen - upperlen;
	var password = "";
	
	for(i = 0; i < alphalen; i++) {
		password += alphachars.charAt(Math.floor(Math.random() * alphachars.length));
	}
	
	for(i = 0; i < upperlen; i++) {
		password += upperchars.charAt(Math.floor(Math.random() * upperchars.length));
	}
	
	for(i = 0; i < num_special; i++) {
		password += specialchars.charAt(Math.floor(Math.random() * specialchars.length));
	}
	
	for(i = 0; i < numericlen; i++) {
		password += numchars.charAt(Math.floor(Math.random() * numchars.length));
	}
	
	password = password.split('').sort(function() { return 0.5 - Math.random(); }).join('');
	
	return password;
}*/

</script>