<?php
//===================================================================================================================
//============================================LIBRERIAS Y VARIABLES==================================================
//===================================================================================================================
session_start();
//conexion-----------------------------------------------------------------------------------------------------------
require_once '../conexion/conexion.php';
$bd = new connexion();
$bd->query("SET NAMES 'utf8'");
//VARIABLES----------------------------------------------------------------------------------------------------------
//Creo la clave
$clave = get_id_unico();
//Creo la Entrada
$entrada = get_id_unico();
//nombre del documento
$nombre = $_POST['name'];
$nombre = trim($nombre);
//este es el archivo temporal
$imagen_temporal  = "../recursos/file-upload/server/php/files/".$nombre;
//Tamaño	
$tamano = filesize($imagen_temporal);
//este es el tipo de archivo
$ext = get_extension($nombre);
//Valido el tipo de Clasificacion
$clasificar = $_POST['clasf'];
//ambito
$ambito = "PUB";
//Origen
$origen = "AWA";
//padre del directorio destino publico
$dir_raiz = "AWA INBOX";
//usuario
$user = $_SESSION["user"];
//ordenador
$ordenador = $_SESSION['host'];
//contacto
$contacto = $_SESSION["contacto"];
//BUSCO EN PARAMETROS EL DIRECTORIO PADRE DONDE SE ALMACENARAN EL DOCUMENTO (INBOX)---------------------------------
$padre = padreINBOX($user);
//EVALUO SI POSEE EL REGISTRO DEL CARPETA INBOX DEL USUAIRO EN LA DE PARAMETROS
if ($padre == '') {
	//Debo Crear el registro----------------------------------------------------------------
	crearCarpInboxUsuario($bd, $user, $contacto);
	//Cargo el valor del PAdre para el registro del documento-------------------------------
	$padre = "US".$contacto.".INBOX";
}
//permisos
$permiso = permisosDir($padre);
//Archivo heredado
$archivo = archivoHeredado($padre);
//$archivo = 0;
//este es el acesso heredado del directorio padre
$acceso_doc = accesoDoc();
//ARMO LA CADENA PARA EL CAMPO UBICACION DEL DOCUMENTO---------------------------------------
//CARGO EL VALOR DE UBICACION DEL NUEVO PADRE
$ubic_padre_doc = ubicacionPadreDoc($bd, $padre);
//ARMO LA NUEVA UBICACION AÑADIENDO EL VALOR DEL PADRE
$ubicacion = $ubic_padre_doc.$padre."/";
//creo una constante para la ubicacion del documento
//$ubicacion = "##PUBLICO##/##USUARIOS##/US".$contacto."/US".$contacto.".INBOX/";
//===================================================================================================================
//============================================ACCIONES===============================================================
//===================================================================================================================
//===================================================================================================================
//VALIDAR EL NOMBRE DEL DOCUMENTO------------------------------------------------------------------------------------
//-------------------------------------------------------------------------------------------------------------------
$exist_doc = docExist($nombre, $padre);
while ( $exist_doc == 1) {
	$a = explode( '.', $nombre );
	$nombre_doc = $a[0];
	$ext_doc = end( $a );
	//Cuento la cantidad existente al momento
	$cant_duplicado = numeroDocsDuplicados($bd, $nombre_doc, $padre);
	//Le sumo uno
	$new_num = $cant_duplicado + 1;
	//Armo el nuevo nombre
	$nombre = $nombre_doc."(".$new_num.").".$ext_doc;
	$exist_doc = docExist($nombre, $padre);
}
//==================================================================================================================
//leer el archivo temporal en binario-------------------------------------------------------------------------------
$fp     = fopen($imagen_temporal, 'r');
$data = fread($fp, filesize($imagen_temporal));
fclose($fp);
//escapar los caracteres--------------------------------------------------------------------------------------------
$data = mysqli_real_escape_string($bd, $data);
//==================================================================================================================
//SCRIP DEL REGISTRO DEL NUEVO DOCUMENTO----------------------------------------------------------------------------
//==================================================================================================================
//valido tamaño maximo permitido por los ficheros-------------------------------------------------------------------
$max_fichero = maxTamanoFichero();
//verificar si existe tabla con espacio disponible-----------------------------------------------------------------
$tabla_sufijo = tablaDestDisp($tamano, $max_fichero);
//=================================================================================================================
//verifico nombre de la tabla o creo una nueva para crear registro del doc y cargo el sufijo-----------------------
if ($tabla_sufijo == "") {
		$sufijo = substr(get_id_unico(),0, 14);
		$tabla_sufijo = "FICHEROS_" . $sufijo;
		$sql = "CREATE TABLE ". $tabla_sufijo . " LIKE FICHEROS_PATRON";
		$base = $bd->query(strtoupper($sql));
}else{
		$sufijo = substr($tabla_sufijo, 9, 14);
}
//=================================================================================================================
//Valido la cantidad de partes y realizao el insert en la Tabla de Ficheros----------------------------------------
//=================================================================================================================
$parte = 1;
if ( $tamano > 16777216 ) {
		$array = str_split($data, 16777216);
		foreach ($array as $key => $value) {
			$fichero_ok = subirContenido($parte, $sufijo, $value, $tamano, strlen($value));
			$parte++;
		}
}else{
		$entrada = get_id_unico();
		$fichero_ok = subirContenido($parte, $sufijo, $data, $tamano, strlen($data));
}
//==================================================================================================================
//Valido la cant de partes a utilizar en la Biblioteca de Elementos-------------------------------------------------
//==================================================================================================================
if ($parte == 1) {
		$partes = $parte;
}else{
		$partes = $parte -1;
}
//==================================================================================================================
//Valido que se realizo el insert y Realizo el registro en la biblioteca de elementos-------------------------------
//==================================================================================================================
if ($fichero_ok){
	//CAPTURO LA CLAVE DEL DOCUMENTO GENERADO
	echo $clave;
	//hago el registro en la biblioteca de elementos
	docBibliotecaElementos();
	//hago el registro en el log
	historialLog();
}else{
	echo $fichero_ok;
}
//===================================================================================================================
//============================================FUNCIONES==============================================================
//===================================================================================================================
//Funcion PARA SUBIR CONTENIDO---------------------------------------------------------------------------------------------------
function crearCarpInboxUsuario($bd, $user, $contacto) {
	$fichero_ok = mysqli_query($bd, "	INSERT INTO PARAMETROS ( CODIGO, USUARIO, ORDENADOR, GRUPO, TIPO, VALOR ) 
										VALUES ( 'CARP_INBOX', '$user', '*', 'USU', 'S', 'US".$contacto.".INBOX'  )");
	return $fichero_ok;
}
//Funcion PARA VERIFICAR LA EXISTENCIA DEL PERMISOS DIRECTORIO ------------------------------------------------------
function padreINBOX($user) {
	global $bd;
	$sql = "	SELECT P.VALOR
				FROM PARAMETROS P
				WHERE P.CODIGO = 'CARP_INBOX' AND P.USUARIO = '$user'";
	$base = $bd->query($sql);
	$row = mysqli_fetch_array($base);
	$acceso = $row['VALOR'];
	return $acceso;
	$base->close();
}
//Funcion PARA VERIFICAR LA EXISTENCIA DEL PERMISOS DIRECTORIO ------------------------------------------------------
function permisosDir($padre) {
	global $bd;
	$sql = "	SELECT ACCESO
				FROM BIBLIOTECA_ELEMENTOS
				WHERE CLAVE = '$padre'";
	$base = $bd->query($sql);
	$row = mysqli_fetch_array($base);
	$acceso = $row['ACCESO'];
	return $acceso;
	$base->close();
}
//Funcion para obtener la clave unica del registro--------------------------------------------------------
function get_id_unico() {
	return date( "YmdHis" ) . sprintf( "%04d", rand( 0, 9999 ) );
}
//Funcion obtener la extension del archivo ---------------------------------------------------------------
function get_extension($nombre) {
	// Convierto la cadena en un arreglo
	$a = explode( '.', $nombre );
	$ext = end( $a );
	$ext = strtoupper( $ext );
	return $ext;
}
//Funcion obtener la extension del archivo ---------------------------------------------------------------
function docExist($nombre, $padre) {
	global $bd, $ambito;
	$sql =  " 	SELECT COUNT(NOMBRE) AS CUANTOS
				FROM BIBLIOTECA_ELEMENTOS
				WHERE NOMBRE = '$nombre' AND PADRE = '$padre' AND PAPELERA = 0 AND AMBITO = '$ambito'";
  	$base = $bd->query($sql);
  	$row = mysqli_fetch_array($base);
  	$doc_exist = $row['CUANTOS'];
  	return $doc_exist;
  	$base->close();
}
//Funcion obtener el tamaño maximo d elos ficheros en GB ---------------------------------------------------------------
function maxTamanoFichero() {
	global $bd;
	$sql =  " 	SELECT VALOR
				FROM PARAMETROS
				WHERE CODIGO = 'TAM_TABLABLOB'
				AND GRUPO = 'PRG'";
  	$base = $bd->query($sql);
  	$row = mysqli_fetch_array($base);
  	$max_fich = $row['VALOR'];
  	return $max_fich;
  	$base->close();
}
//Funcion obtener verificar tabla destino disponible--------------------------------------------------------------
function tablaDestDisp($tamano, $max_fichero) {
	global $bd;
	$sql =  " 	SELECT TABLE_NAME,ROUND(DATA_LENGTH/(1024*1024*1024),1) AS GB
				FROM INFORMATION_SCHEMA.TABLES
				WHERE TABLE_SCHEMA = '".NAME."'
				AND TABLE_NAME LIKE 'FICHEROS_2%%'
				AND (ROUND(DATA_LENGTH/(1024*1024*1024),1) + ROUND($tamano/(1024*1024*1024),1)) < (ROUND($max_fichero,1))
				ORDER BY DATA_LENGTH LIMIT 1";
  	$base = $bd->query($sql);
  	$row = mysqli_fetch_array($base);
  	$tabla_sufijo = $row['TABLE_NAME'];
  	return $tabla_sufijo;
  	$base->close();
}
//Funcion PARA SUBIR CONTENIDO---------------------------------------------------------------------------------------------------
function subirContenido($parte, $sufijo, $data, $tamano, $size) {
	global $bd, $clave, $entrada;
	$fichero_ok = mysqli_query($bd, "INSERT INTO FICHEROS_".$sufijo." 
									(CLAVE, PARTE, VERSION, FICHERO, TAMANO, ENTRADA, COMPRIMIDO, TAMANOREAL, ENCRIPTADO) 
									VALUES 
									('$clave', $parte, 0, '$data', $tamano, '$entrada', 0, $size, 0)");
	return $fichero_ok;
}
//Funcion PARA CREAR EL DOCUMENTO EN LA BIBLIOTECA DE ELEMENTOS--------------------------------------------------------------
function docBibliotecaElementos() {
	global $bd, $clave, $nombre, $ext, $padre, $tamano, $acceso_doc, $user, $entrada, $ordenador, $partes, $sufijo, $ambito, $permiso, $ubicacion, $origen, $archivo;
	mysqli_query($bd, "INSERT INTO BIBLIOTECA_ELEMENTOS 
						(CLAVE, NOMBRE, EXTENSION, PADRE, TIPO, FECHA, TAMANO, AMBITO, ACCESO, CREADOR, ENTRADA, ORDENADOR, MODIFICACION, PARTES, VERMIN, SUFIJO, UBICACION, ORIGEN, ARCHIVO, ORIGEN) 
						VALUES 
						('$clave', '$nombre', '$ext', '$padre', 'D', now(), $tamano, '$ambito', '$permiso', '$user', '$entrada', '$ordenador', now(), $partes, '1.0', '$sufijo', '$ubicacion', '$origen', '$archivo')") ;
}
//Funcion PARA OBTENER LOS PERMISOS DE ACCESO HEREDABLES DEL DIRECTORIO PADRE-----------------------------------------------------------------------------------------
function accesoDoc() {
	global $bd, $padre;
	$sql = "	SELECT ACCESO
				FROM BIBLIOTECA_ELEMENTOS
				WHERE CLAVE = '$padre' AND TIPO = 'C' AND PAPELERA = 0";
	$base = $bd->query($sql);
	@$row = mysqli_fetch_array($base);
	$acceso_doc = $row['ACCESO'];
	return $acceso_doc;
	$base->close();
}
//Funcion PARA CREAR EL REGISTRO EN EL LOG DEL HISTORIAL-------------------------------------------------------------------------
function historialLog() {
	global $bd, $clave, $user, $nombre, $ordenador, $ambito, $acceso_doc, $tamano, $user;
	mysqli_query($bd, "INSERT INTO BIBLIOTECA_HISTORIAL 
						(CLAVE, USUARIO, FECHA, ACCION, DOCUMENTO, CARPETA, ORDENADOR, AMBITO, ACCESO, TIPO, TAMANO, CREADOR, CONTROL, AWA) 
						VALUES 
						('$clave', '$user', now(), '1', '$nombre', '$user', '$ordenador', '$ambito', '$acceso_doc', 'D', $tamano, '$user', 0, 1)") ;
}
//Funcion PARA VERIFICAR LA EXISTENCIA DEL DIRECTORIO RAIZ DE CARGAS AWA EN EL AMBITO PRIVADO-------------------------------------------------------------
function raizAWAcheckPrv($check_dir, $padre_dir, $user) {
	global $bd;
	$sql = "	SELECT CLAVE AS EXISTE
				FROM BIBLIOTECA_ELEMENTOS
				WHERE NOMBRE = '$check_dir' AND TIPO = 'C' AND PAPELERA = 0 AND PADRE = '$padre_dir' AND CREADOR = '$user'";
	$base = $bd->query($sql);
	$row = mysqli_fetch_array($base);
	$direxist = $row['EXISTE'];
	return $direxist;
	$base->close();
}
//Funcion PARA VERIFICAR LA EXISTENCIA DEL DIRECTORIO RAIZ DE CARGAS AWA---------------------------------------------------------------------------------
function raizAWAcheck($check_dir, $padre_dir) {
	global $bd;
	$sql = "	SELECT CLAVE AS EXISTE
				FROM BIBLIOTECA_ELEMENTOS
				WHERE NOMBRE = '$check_dir' AND TIPO = 'C' AND PAPELERA = 0 AND PADRE = '$padre_dir'";
	$base = $bd->query($sql);
	$row = mysqli_fetch_array($base);
	$direxist = $row['EXISTE'];
	return $direxist;
	$base->close();
}
//Funcion PARA CREAR EL  DIRECTORIO RAIZ DE CARGAS AWA---------------------------------------------------------------------------------
function RaizdirAWAcreate($padre_dir, $dir_raiz, $id_clave) {
	global $bd, $user, $ordenador, $ambito;
	mysqli_query($bd, "INSERT INTO BIBLIOTECA_ELEMENTOS 
						(CLAVE, NOMBRE, EXTENSION, PADRE, TIPO, FECHA, TAMANO, AMBITO, ACCESO, CREADOR, ENTRADA, ORDENADOR, MODIFICACION, PARTES, VERMIN, SUFIJO) 
						VALUES 
						('$id_clave', '$dir_raiz', '', '$padre_dir', 'C', now(), 0, '$ambito', '', '$user', '', '$ordenador', now(), 1, '', '')") ;
}
//FUNCION PARA OBTENER EL CAMPO UBICACION DEL PADRE DEL DOCUMENTO-----------------------------------
function ubicacionPadreDoc($bd, $id)
{
	$sql =  " 	SELECT E.UBICACION
				FROM BIBLIOTECA_ELEMENTOS E
				WHERE E.CLAVE = '$id'";
  	$base = $bd->query($sql);
  	$result = mysqli_fetch_array($base);
  	$ubic = $result['UBICACION'];
  	$base->close();
  	return $ubic;
}
function numeroDocsDuplicados($bd, $nombre_doc, $padre_Del_doc){
  $sql =  " SELECT COUNT(E.CLAVE) AS TOTAL
			FROM BIBLIOTECA_ELEMENTOS E
			WHERE E.NOMBRE LIKE '$nombre_doc(%%' AND E.PADRE = '$padre_Del_doc'";
  $base = $bd->query($sql);
  $result = mysqli_fetch_array($base);
  $total = $result['TOTAL'];
  $base->close();
  return $total;
 }
 //Funcion PARA VERIFICAR LA EXISTENCIA DEL PERMISOS DIRECTORIO ------------------------------------------------------
function archivoHeredado($padre) {
	global $bd;
	$sql = "	SELECT E.ARCHIVO
				FROM BIBLIOTECA_ELEMENTOS E
				WHERE E.CLAVE = '$padre'";
	$base = $bd->query($sql);
	$row = mysqli_fetch_array($base);
	$acceso = $row['ARCHIVO'];
	return $acceso;
	$base->close();
}
?>