<?php
// Pulizia di cartelle e file
if (is_dir($docroot."/lib/jscripts")) {
	deltree($docroot."/lib/jscripts");
}
if (is_dir($docroot."/lib/html2pdf")) {
	deltree($docroot."/lib/html2pdf");
}
if (is_dir($docroot."/widgets")) {
	deltree($docroot."/widgets");
}
if (is_dir($docroot."/share")) {
	deltree($docroot."/share");
}

if (file_exists($docroot."/lib/class.pop3.php")) {
	@unlink($docroot."/lib/class.pop3.php");
}
if (file_exists($docroot."/lib/class.smtp.php")) {
	@unlink($docroot."/lib/class.smtp.php");
}
if (file_exists($docroot."/lib/PHPMailerAutoload.php")) {
	@unlink($docroot."/lib/PHPMailerAutoload.php");
}
if (file_exists($docroot."/permissions.php")) {
	@unlink($docroot."/permissions.php");
}

if (file_exists($docroot."/addgroup.php")) {
	@unlink($docroot."/addgroup.php");
}
if (file_exists($docroot."/adduser.php")) {
	@unlink($docroot."/adduser.php");
}
if (file_exists($docroot."/change_pwd.php")) {
	@unlink($docroot."/change_pwd.php");
}
if (file_exists($docroot."/README")) {
	@unlink($docroot."/README");
}

$htmls = glob($docroot."/modules/*/*.html");
foreach($htmls as $h){
    if(strpos($h, 'custom') === false) unlink($h);
}

//Eliminazione file vecchi
@deltree($docroot."/modules/preventivi/js/");


/**
  * Verifico se serve creare un conto per eventuali nuovi clienti o fornitori
  */
$rs = $dbo->fetchArray("SELECT idanagrafica, ragione_sociale, (SELECT GROUP_CONCAT(an_tipianagrafiche.descrizione) FROM an_tipianagrafiche INNER JOIN an_tipianagrafiche_anagrafiche ON an_tipianagrafiche.idtipoanagrafica=an_tipianagrafiche_anagrafiche.idtipoanagrafica WHERE idanagrafica=an_anagrafiche.idanagrafica) AS idtipianagrafica FROM an_anagrafiche WHERE idconto_cliente=0 OR idconto_fornitore=0");

for( $i=0; $i<sizeof($rs); $i++ ){
	if( in_array('Cliente', explode(',', $rs[$i]['idtipianagrafica'])) ){
		//Calcolo il codice conto più alto
		$rs2 = $dbo->fetchArray("SELECT MAX( CAST(numero AS UNSIGNED) ) AS max_numero, idpianodeiconti2 FROM co_pianodeiconti3 WHERE numero=CAST(numero AS UNSIGNED) AND idpianodeiconti2=(SELECT id FROM co_pianodeiconti2 WHERE descrizione='Crediti clienti e crediti diversi')");
		$numero = str_pad( $rs2[0]['max_numero']+1, 6, "0", STR_PAD_LEFT );
		$idpianodeiconti2 = $rs2[0]['idpianodeiconti2'];

		//Creo il nuovo conto
		$dbo->query( "INSERT INTO co_pianodeiconti3( numero, descrizione, idpianodeiconti2, can_delete, can_edit ) VALUES( \"".$numero."\", \"".$rs[$i]['ragione_sociale']."\", \"".$idpianodeiconti2."\", 1, 1 )" );
		$idconto = $dbo->last_inserted_id();

		//Collego questo conto al cliente
		$dbo->query("UPDATE an_anagrafiche SET idconto_cliente=\"".$idconto."\" WHERE idanagrafica=\"".$rs[$i]['idanagrafica']."\"");
	}

	if( in_array('Fornitore', explode(',', $rs[$i]['idtipianagrafica'])) ){
		//Calcolo il codice conto più alto
		$rs2 = $dbo->fetchArray("SELECT MAX( CAST(numero AS UNSIGNED) ) AS max_numero, idpianodeiconti2 FROM co_pianodeiconti3 WHERE numero=CAST(numero AS UNSIGNED) AND idpianodeiconti2=(SELECT id FROM co_pianodeiconti2 WHERE descrizione='Debiti fornitori e debiti diversi')");
		$numero = str_pad( $rs2[0]['max_numero']+1, 6, "0", STR_PAD_LEFT );
		$idpianodeiconti2 = $rs2[0]['idpianodeiconti2'];

		//Creo il nuovo conto
		$dbo->query( "INSERT INTO co_pianodeiconti3( numero, descrizione, idpianodeiconti2, can_delete, can_edit ) VALUES( \"".$numero."\", \"".$rs[$i]['ragione_sociale']."\", \"".$idpianodeiconti2."\", 1, 1 )" );
		$idconto = $dbo->last_inserted_id();

		//Collego questo conto al cliente
		$dbo->query("UPDATE an_anagrafiche SET idconto_fornitore=\"".$idconto."\" WHERE idanagrafica=\"".$rs[$i]['idanagrafica']."\"");
	}
}


//Sposto tutti i movimenti delle fatture dal riepilogativo (clienti o fornitori) al relativo conto di ogni anagrafica
$rs = $dbo->fetchArray("SELECT co_movimenti.id, co_documenti.idanagrafica, dir FROM (co_movimenti INNER JOIN co_documenti ON co_movimenti.iddocumento=co_documenti.id) INNER JOIN co_tipidocumento ON co_documenti.idtipodocumento WHERE NOT iddocumento=0");

for( $i=0; $i<sizeof($rs); $i++ ){
	if( $rs[$i]['dir'] == 'entrata' ){
		$query = "UPDATE co_movimenti SET idconto=(SELECT idconto_cliente FROM an_anagrafiche WHERE idanagrafica=\"".$rs[$i]['idanagrafica']."\") WHERE id=\"".$rs[$i]['id']."\" AND idconto=(SELECT id FROM co_pianodeiconti3 WHERE descrizione='Riepilogativo clienti')";
	}

	else{
		$query = "UPDATE co_movimenti SET idconto=(SELECT idconto_fornitore FROM an_anagrafiche WHERE idanagrafica=\"".$rs[$i]['idanagrafica']."\") WHERE id=\"".$rs[$i]['id']."\" AND idconto=(SELECT id FROM co_pianodeiconti3 WHERE descrizione='Riepilogativo fornitori')";
	}

	$dbo->query( $query );
}


//Aggiungo il flag "Attiva aggiornamenti" se manca (nella migrazione della 2.0 non c'è)
$rs = $dbo->fetchArray("SELECT idimpostazione FROM zz_impostazioni WHERE nome='Attiva aggiornamenti'");

if( sizeof($rs) == 0 ){
	$dbo->query("INSERT INTO `zz_impostazioni` (`nome`, `valore`, `tipo`, `editable`, `sezione`) VALUES ( 'Attiva aggiornamenti', '1', 'boolean', '0', 'Generali')");
}


//Spostamento ore di lavoro e diritto di chiamata dei preventivi nella tabella
$idiva = get_var("Iva predefinita");

$rs = $dbo->fetchArray( "SELECT percentuale, indetraibile FROM co_iva WHERE id=\"".$idiva."\"" );
$percentuale = $rs[0]['percentuale'];
$indetraibile = $rs[0]['indetraibile'];


$rs = $dbo->fetchArray("SELECT * FROM co_preventivi WHERE ore_lavoro > 0 OR costo_diritto_chiamata > 0");

for( $i=0; $i<sizeof($rs); $i++ ){
	//Ore lavoro
	if( $rs[$i]['ore_lavoro'] > 0 ){
		$imponibile = $rs[$i]['costo_orario']*$rs[$i]['ore_lavoro'];

		$iva = $imponibile / 100 * $percentuale;
		$iva_indetraibile = $imponibile / 100 * $indetraibile;

		$dbo->query("INSERT INTO co_righe_preventivi( idpreventivo, idiva, iva, iva_indetraibile, descrizione, subtotale, sconto, um, qta ) VALUES( \"".$rs[$i]['id']."\", \"".$idiva."\", \"".$iva."\", \"".$iva_indetraibile."\", \"Ore lavoro\", \"".$imponibile."\", \"0.00\", \"ore\", \"".$rs[$i]['ore_lavoro']."\" )");
	}

	//Ore diritto chiamata
	if( $rs[$i]['costo_diritto_chiamata'] > 0 ){
		$imponibile = $rs[$i]['costo_diritto_chiamata'];

		$iva = $imponibile / 100 * $percentuale;
		$iva_indetraibile = $imponibile / 100 * $indetraibile;

		$dbo->query("INSERT INTO co_righe_preventivi( idpreventivo, idiva, iva, iva_indetraibile, descrizione, subtotale, sconto, um, qta ) VALUES( \"".$rs[$i]['id']."\", \"".$idiva."\", \"".$iva."\", \"".$iva_indetraibile."\", \"Diritto chiamata\", \"".$imponibile."\", \"0.00\", \"\", \"".$rs[$i]['costo_diritto_chiamata']."\" )");
	}
}

/*
	Spostamento agente di riferimento su nuova tabella an_anagrafiche_agenti
*/
$rs = $dbo->fetchArray("SELECT idanagrafica, idagente FROM an_anagrafiche WHERE NOT idagente=0");

for( $i=0; $i<sizeof($rs); $i++ ){
	$dbo->query("INSERT INTO an_anagrafiche_agenti( idanagrafica, idagente ) VALUES( \"".$rs[$i]['idanagrafica']."\", \"".$rs[$i]['idagente']."\" )");
}
?>