<?php

include_once __DIR__.'/../../core.php';

use Modules\Fatture\Fattura;
use Util\Zip;

switch (post('op')) {
    case 'export-bulk':
        $dir = DOCROOT.'/files/export_fatture/';
        directory($dir.'tmp/');

        $dir = slashes($dir);
        $zip = slashes($dir.'fatture_'.time().'.zip');

        // Rimozione dei contenuti precedenti
        $files = glob($dir.'/*.zip');
        foreach ($files as $file) {
            delete($file);
        }

        // Selezione delle fatture da stampare
        $fatture = $dbo->fetchArray('SELECT co_documenti.id, numero_esterno, data, ragione_sociale, co_tipidocumento.descrizione FROM co_documenti INNER JOIN an_anagrafiche ON co_documenti.idanagrafica=an_anagrafiche.idanagrafica INNER JOIN co_tipidocumento ON co_documenti.idtipodocumento=co_tipidocumento.id WHERE co_documenti.id IN('.implode(',', $id_records).')');

        if (!empty($fatture)) {
            foreach ($fatture as $r) {
                $numero = !empty($r['numero_esterno']) ? $r['numero_esterno'] : $r['numero'];
                $numero = str_replace(['/', '\\'], '-', $numero);

                // Gestione della stampa
                $rapportino_nome = sanitizeFilename($numero.' '.$r['data'].' '.$r['ragione_sociale'].'.pdf');
                $filename = slashes($dir.'tmp/'.$rapportino_nome);

                $print = Prints::getModulePredefinedPrint($id_module);

                Prints::render($print['id'], $r['id'], $filename);
            }

            // Creazione zip
            if (extension_loaded('zip')) {
                Zip::create($dir.'tmp/', $zip);

                // Invio al browser dello zip
                download($zip);

                // Rimozione dei contenuti
                delete($dir.'tmp/');
            }
        }

        break;

    case 'delete-bulk':
        if (App::debug()) {
            foreach ($id_records as $id) {
                $dbo->query('DELETE  FROM co_documenti  WHERE id = '.prepare($id).Modules::getAdditionalsQuery($id_module));
                $dbo->query('DELETE FROM co_righe_documenti WHERE iddocumento='.prepare($id).Modules::getAdditionalsQuery($id_module));
                $dbo->query('DELETE FROM co_scadenziario WHERE iddocumento='.prepare($id).Modules::getAdditionalsQuery($id_module));
                $dbo->query('DELETE FROM mg_movimenti WHERE iddocumento='.prepare($id).Modules::getAdditionalsQuery($id_module));
            }

            flash()->info(tr('Fatture eliminate!'));
        } else {
            flash()->warning(tr('Procedura in fase di sviluppo. Nessuna modifica apportata.'));
        }
        break;

    case 'export-xml-bulk':
        $dir = DOCROOT.'/files/export_fatture/';
        directory($dir.'tmp/');

        $dir = slashes($dir);
        $zip = slashes($dir.'fatture_'.time().'.zip');

        // Rimozione dei contenuti precedenti
        $files = glob($dir.'/*.zip');
        foreach ($files as $file) {
            delete($file);
        }

        // Selezione delle fatture da stampare
        $fatture = $dbo->fetchArray('SELECT co_documenti.id, numero_esterno, data, ragione_sociale, co_tipidocumento.descrizione, co_tipidocumento.dir FROM co_documenti INNER JOIN an_anagrafiche ON co_documenti.idanagrafica=an_anagrafiche.idanagrafica INNER JOIN co_tipidocumento ON co_documenti.idtipodocumento=co_tipidocumento.id INNER JOIN co_statidocumento ON co_documenti.idstatodocumento=co_statidocumento.id WHERE co_documenti.id IN('.implode(',', $id_records).') AND co_statidocumento.descrizione="Emessa"');

        $failed = [];
        if (!empty($fatture)) {
            foreach ($fatture as $r) {
                $fattura = Fattura::find($r['id']);
                $include = true;

                try {
                    if ($r['dir'] == 'entrata') {
                        $fe = new \Plugins\ExportFE\FatturaElettronica($fattura->id);
                        $include = $fe->isGenerated();
                    } else {
                        $include = $fattura->isFE();
                    }
                } catch (UnexpectedValueException $e) {
                    $include = false;
                }

                if (!$include) {
                    $failed[] = $fattura->numero_esterno;
                } else {
                    if ($r['dir'] == 'entrata') {
                        $src = $fe->getFilename();
                        $dst = $src;
                    } else {
                        $src = basename($fattura->uploads()->where('name', 'Fattura Elettronica')->first()->filepath);
                        $dst = basename($fattura->uploads()->where('name', 'Fattura Elettronica')->first()->original);
                    }

                    $file = slashes($module->upload_directory.'/'.$src);
                    $dest = slashes($dir.'/tmp/'.$dst);

                    $result = copy($file, $dest);
                    if ($result) {
                        operationLog('export-xml-bulk', ['id_record' => $r['id']]);
                    } else {
                        $failed[] = $fattura->numero_esterno;
                    }
                }
            }

            // Creazione zip
            if (extension_loaded('zip')) {
                Zip::create($dir.'tmp/', $zip);

                // Invio al browser il file zip
                download($zip);

                // Rimozione dei contenuti
                delete($dir.'tmp/');
            }

            if (!empty($failed)) {
                flash()->warning(tr('Le fatture elettroniche _LIST_ non sono state incluse poichè non ancora generate', [
                    '_LIST_' => implode(', ', $failed),
                ]));
            }
        }
        break;

    case 'registra-contabile':
        //Generazione della descrizione del movimento
        $rs_fatture = $dbo->fetchArray("SELECT *, co_documenti.id AS id, co_documenti.data AS data_doc FROM co_documenti INNER JOIN co_tipidocumento ON co_documenti.idtipodocumento=co_tipidocumento.id WHERE co_documenti.id IN(".implode(',', $id_records).")");

        //calcolo della descrizione
        $descrizione_movimento = 'Pag. fatture num. ';

        for($i=0;$i<sizeof($rs_fatture);$i++){
            if($rs_fatture[$i]['numero_esterno']!=''){
                $descrizione_movimento .= $rs_fatture[$i]['numero_esterno']." ";
            }else{
                $descrizione_movimento .= $rs_fatture[$i]['numero']." ";
            }
        }

        $idmastrino = get_new_idmastrino();

        for($i=0;$i<sizeof($rs_fatture);$i++){
            //Inserimento righe cliente

            if($rs_fatture[$i]['dir']=='entrata'){
                $dir='entrata';
            }else{
                $dir='uscita';
            }

            $field = 'idconto_'.($dir == 'entrata' ? 'vendite' : 'acquisti');
            $idconto_aziendale = $dbo->fetchArray('SELECT '.$field.' FROM co_pagamenti WHERE id = (SELECT idpagamento FROM co_documenti WHERE id='.prepare($rs_fatture[$i]['id']).') GROUP BY descrizione')[0][$field];
    
            // Lettura conto di default
            $idconto_aziendale = !empty($idconto_aziendale) ? $idconto_aziendale : setting('Conto aziendale predefinito');

            $query = 'SELECT SUM(ABS(da_pagare-pagato)) AS rata FROM co_scadenziario WHERE iddocumento='.prepare($rs_fatture[$i]['id'])." GROUP BY iddocumento";
            $rs = $dbo->fetchArray($query);
            $totale_pagato = $rs[0]['rata'];

            $importo_conto_aziendale = $totale_pagato;

            // conto crediti clienti
            if ($dir == 'entrata') {
                // Se è la prima nota di una fattura leggo il conto del cliente
                if ($rs_fatture[$i]['id'] != '') {
                    $query = 'SELECT idconto_cliente FROM an_anagrafiche INNER JOIN co_documenti ON an_anagrafiche.idanagrafica=co_documenti.idanagrafica WHERE co_documenti.id='.prepare($rs_fatture[$i]['id']);
                    $rs = $dbo->fetchArray($query);
                    $idconto_controparte = $rs[0]['idconto_cliente'];
                } else {
                    $query = "SELECT id FROM co_pianodeiconti3 WHERE descrizione='Riepilogativo clienti'";
                    $rs = $dbo->fetchArray($query);
                    $idconto_controparte = $rs[0]['id'];
                }
            }
            // conto debiti fornitori
            else {
                // Se è la prima nota di una fattura leggo il conto del fornitore
                if ($rs_fatture[$i]['id'] != '') {
                    $query = 'SELECT idconto_fornitore FROM an_anagrafiche INNER JOIN co_documenti ON an_anagrafiche.idanagrafica=co_documenti.idanagrafica WHERE co_documenti.id='.prepare($rs_fatture[$i]['id']);
                    $rs = $dbo->fetchArray($query);
                    $idconto_controparte = $rs[0]['idconto_fornitore'];
                } else {
                    $query = "SELECT id FROM co_pianodeiconti3 WHERE descrizione='Riepilogativo fornitori'";
                    $rs = $dbo->fetchArray($query);
                    $idconto_controparte = $rs[0]['id'];
                }
            }

            // Lettura causale movimento (documento e ragione sociale)
            $importo_conto_controparte = $importo_conto_aziendale;            

            if ($dir == 'entrata') {
                $dbo->query("INSERT INTO co_movimenti(idmastrino, data, data_documento, iddocumento, idanagrafica, descrizione, idconto, totale, primanota) VALUES(".prepare($idmastrino).", NOW(), ".prepare($rs_fatture[$i]['data_doc']).", ".prepare($rs_fatture[$i]['id']).", ".prepare($rs_fatture[$i]['idanagrafica']).", ".prepare($descrizione_movimento).", ".prepare($idconto_controparte).", ".prepare(-$importo_conto_controparte).", 1)");
                $dbo->query("INSERT INTO co_movimenti(idmastrino, data, data_documento, iddocumento, idanagrafica, descrizione, idconto, totale, primanota) VALUES(".prepare($idmastrino).", NOW(), ".prepare($rs_fatture[$i]['data_doc']).", ".prepare($rs_fatture[$i]['id']).", ".prepare($rs_fatture[$i]['idanagrafica']).", ".prepare($descrizione_movimento).", ".prepare($idconto_aziendale).", ".prepare($importo_conto_aziendale).", 1)");
                
            } else {
                $dbo->query("INSERT INTO co_movimenti(idmastrino, data, data_documento, iddocumento, idanagrafica, descrizione, idconto, totale, primanota) VALUES(".prepare($idmastrino).", NOW(), ".prepare($rs_fatture[$i]['data_doc']).", ".prepare($rs_fatture[$i]['id']).", ".prepare($rs_fatture[$i]['idanagrafica']).", ".prepare($descrizione_movimento).", ".prepare($idconto_controparte).", ".prepare($importo_conto_controparte).", 1)");
                $dbo->query("INSERT INTO co_movimenti(idmastrino, data, data_documento, iddocumento, idanagrafica, descrizione, idconto, totale, primanota) VALUES(".prepare($idmastrino).", NOW(), ".prepare($rs_fatture[$i]['data_doc']).", ".prepare($rs_fatture[$i]['id']).", ".prepare($rs_fatture[$i]['idanagrafica']).", ".prepare($descrizione_movimento).", ".prepare($idconto_aziendale).", ".prepare(-$importo_conto_aziendale).", 1)");
            }

            aggiorna_scadenziario($rs_fatture[$i]['id'], abs($totale_pagato), date('d/m/Y'));

            // Verifico se la fattura è stata pagata tutta, così imposto lo stato a "Pagato"
            $query = 'SELECT SUM(pagato) AS tot_pagato, SUM(da_pagare) AS tot_da_pagare FROM co_scadenziario GROUP BY iddocumento HAVING iddocumento='.prepare($rs_fatture[$i]['id']);
            $rs = $dbo->fetchArray($query);

            // Aggiorno lo stato della fattura
            if (abs($rs[0]['tot_pagato']) == abs($rs[0]['tot_da_pagare'])) {
                $dbo->query("UPDATE co_documenti SET idstatodocumento=(SELECT id FROM co_statidocumento WHERE descrizione='Pagato') WHERE id=".prepare($rs_fatture[$i]['id']));
            } elseif (abs($rs[0]['tot_pagato']) != abs($rs[0]['tot_da_pagare']) && abs($rs[0]['tot_pagato']) != '0') {
                $dbo->query("UPDATE co_documenti SET idstatodocumento=(SELECT id FROM co_statidocumento WHERE descrizione='Parzialmente pagato') WHERE id=".prepare($rs_fatture[$i]['id']));
            } else {
                $dbo->query("UPDATE co_documenti SET idstatodocumento=(SELECT id FROM co_statidocumento WHERE descrizione='Emessa') WHERE id=".prepare($rs_fatture[$i]['id']));
            }

            // Aggiorno lo stato dei preventivi collegati alla fattura se ce ne sono
            $query2 = 'SELECT idpreventivo FROM co_righe_documenti WHERE iddocumento='.prepare($rs_fatture[$i]['id']).' AND NOT idpreventivo=0 AND idpreventivo IS NOT NULL';
            $rs2 = $dbo->fetchArray($query2);

            for ($j = 0; $j < sizeof($rs2); ++$j) {
                $dbo->query("UPDATE co_preventivi SET idstato=(SELECT id FROM co_statipreventivi WHERE descrizione='Pagato') WHERE id=".prepare($rs2[$j]['idpreventivo']));
            }

            // Aggiorno lo stato dei contratti collegati alla fattura se ce ne sono
            $query2 = 'SELECT idcontratto FROM co_righe_documenti WHERE iddocumento='.prepare($rs_fatture[$i]['id']).' AND NOT idcontratto=0 AND idcontratto IS NOT NULL';
            $rs2 = $dbo->fetchArray($query2);
            for ($j = 0; $j < sizeof($rs2); ++$j) {
                $dbo->query("UPDATE co_contratti SET idstato=(SELECT id FROM co_staticontratti WHERE descrizione='Pagato') WHERE id=".prepare($rs2[$j]['idcontratto']));
            }

            // Aggiorno lo stato degli interventi collegati alla fattura se ce ne sono
            $query2 = 'SELECT idintervento FROM co_righe_documenti WHERE iddocumento='.prepare($rs_fatture[$i]['id']).' AND idintervento IS NOT NULL';
            $rs2 = $dbo->fetchArray($query2);

            for ($j = 0; $j < sizeof($rs2); ++$j) {
                $dbo->query("UPDATE in_interventi SET idstatointervento=(SELECT idstatointervento FROM in_statiintervento WHERE descrizione='Fatturato') WHERE id_preventivo=".prepare($rs2[$j]['idpreventivo']));
            }
        }

        $database->commitTransaction();
        header('location:'.$rootdir.'/editor.php?id_module='.Modules::get('Prima nota')['id'].'&id_record='.$idmastrino);
        exit;

        break;
}

$bulk = [
    'delete-bulk' => tr('Elimina selezionati'),
];

$bulk['registra-contabile'] = [
    'text' => tr('Registra contabile pagamento'),
    'data' => [
        'msg' => tr('Vuoi aggiungere un movimento contabile per le fatture selezionate? (le fatture dovranno essere in stato emessa altrimenti non verranno elaborate)'),
        'button' => tr('Procedi'),
        'class' => 'btn btn-lg btn-warning',
        'blank' => true,
    ],
];

if ($module->name == 'Fatture di vendita') {
    $bulk['export-bulk'] = [
        'text' => tr('Esporta stampe'),
        'data' => [
            'msg' => tr('Vuoi davvero esportare tutte le stampe in un archivio?'),
            'button' => tr('Procedi'),
            'class' => 'btn btn-lg btn-warning',
            'blank' => true,
        ],
    ];
}

$bulk['export-xml-bulk'] = [
    'text' => tr('Esporta XML'),
    'data' => [
        'msg' => tr('Vuoi davvero esportare tutte le fatture elettroniche in un archivio?'),
        'button' => tr('Procedi'),
        'class' => 'btn btn-lg btn-warning',
        'blank' => true,
    ],
];

return $bulk;