<?php
//Archivo de Moodle
setlocale(LC_TIME, 'es_MX.UTF-8');
require_once("../../include/nocache.php");
require_once("../../include/constantes.php");
require_once("../../include/bd_pdo.php");
require_once("../../include/util.php");
require_once("../../classes/ValidaSesion.php");
require_once("../classes/ArchivoMaterias.php");
require "../../include/phpSpreadsheet/autoload.php";

use PhpOffice\PhpSpreadsheet\IOFactory;
use PhpOffice\PhpSpreadsheet\Spreadsheet;
use PhpOffice\PhpSpreadsheet\Style\Border;
use PhpOffice\PhpSpreadsheet\Style\Fill;
use PhpOffice\PhpSpreadsheet\Style\Style;
use PhpOffice\PhpSpreadsheet\Shared\Date;


function comparaMaterias(&$materiasArr, $fileArr, $electivas = false ){
    foreach($materiasArr as $index => $materia){
        //$row = $materia["Carrera_id"].",".$materia["PlanEstudio_id"].",".$materia["Grupo_id"].",".$materia["Materia_id"].",".$materia["Submateria_id"].",".$materia["Usuario_id"]."\n";
        if(!$electivas)
            $row = $materia["Grupo_desc"].$materia["Carrera_prefijo"].",".$materia["Materia_id"].",".$materia["Usuario_id"]."\n";
        else
            $row = "Electivas,".$materia["Submateria_id"].",".$materia["Usuario_id"]."\n";

        //echo $row;
        if(!in_array($row, $fileArr)){
            $materiasArr[$index]["modificado"] = 1;

            //echo $index.") No está";
        }else{
            $materiasArr[$index]["modificado"] = 0;
        }
        //echo "<br>";
    }
}


//--- Objeto para validar usuario. El id de usuario lo lee desde sesión
$objSesion = new ValidaSesion($pdo, 84, APSA);
if(!$objSesion->tieneAcceso()){
    header("Location: ".$pag."?error=3");
    exit();
}

unset($objValida);

$filter_modificados = 0;//todos


//Materias
$stmt = $pdo->prepare('Select * from fs_materiasperiodo(:per)');
$stmt->bindParam(":per", $_SESSION["periodo_id"]);
if(!$stmt->execute()){
    $errorDesc = "Ocurrió un error al cargar las áreas académicas";
    $stmt->closeCursor();
}else{
    $materias_rs = $stmt->fetchAll();
    $stmt->closeCursor();
}
//Electivas
$stmt = $pdo->prepare('Select * from fs_electivasperiodo(:per)');
$stmt->bindParam(":per", $_SESSION["periodo_id"]);
if(!$stmt->execute()){
    $errorDesc = "Ocurrió un error al cargar las áreas académicas";
    $stmt->closeCursor();
}else{
    $electivas_rs = $stmt->fetchAll();
    $stmt->closeCursor();
}

if(isset($materias_rs) || isset($electivas_rs)){
    //--- Valida cambios   
    $stmt = $pdo->prepare('Select * from fs_materiasmoodle(:usr, :per)');
    $stmt->bindParam(":usr", $_SESSION["usuario_id"]);
    $stmt->bindParam(":per", $_SESSION["periodo_id"]);
    if(!$stmt->execute()){
        //$t = $stmt->errorInfo();
        $errorDesc = "Ocurrió un error al obtener el archivo de las materias.";
    }else{
        $file_rs = $stmt->fetch();
        $filename = $file_rs["fs_materiasmoodle"];
        $stmt->closeCursor();
        unset($file_rs);

        if($filename != ""){//existe
            $materiasObj = new ArchivoMaterias($_SESSION["usuario_id"], $_SESSION["periodo_id"], $filename );
            $fileContentsArr = $materiasObj->getFile();
            
            if(isset($materias_rs))
                comparaMaterias($materias_rs, $fileContentsArr, false);//agrega modificado y color
            if(isset($electivas_rs))
                comparaMaterias($electivas_rs, $fileContentsArr, true);//agrega modificado y color
        }
    }
    
}//fin hay materias
//--------
//
// Create new Spreadsheet object
$spreadsheet = new Spreadsheet();

// Set document properties
$spreadsheet->getProperties()->setCreator('Ingeniería La Salle')
    ->setLastModifiedBy('Ingeniería La Salle')
    ->setTitle('Materias de periodo')
    ->setDescription('Materias activas en el periodo.');

// Rename worksheet
$spreadsheet->getActiveSheet()->setTitle('Materias');

$headerStyle = new Style();
$headerStyle->applyFromArray(
    [
        'fill' => [
            'fillType' => Fill::FILL_SOLID,
            'color' => ['argb' => 'FF001d68'],
        ],
        'borders' => [
            'bottom' => ['borderStyle' => Border::BORDER_THIN],
            'right' => ['borderStyle' => Border::BORDER_MEDIUM],
        ],
        'font' => [
            'bold'  =>  true,
            'color' => ['argb' => 'FFFFFFFF'],
        ]
    ]
);

$modificadaStyle = new Style();
$modificadaStyle->applyFromArray(
    [
        'fill' => [
            'fillType' => Fill::FILL_SOLID,
            'color' => ['argb' => 'fffff1b8'],
        ]
    ]
);


// Add some data
$spreadsheet->setActiveSheetIndex(0)
    ->setCellValue('A1', 'Nombre corto')
    ->setCellValue('B1', 'Materia')
    ->setCellValue('C1', 'Clave profesor')
    ->setCellValue('D1', 'Profesor')
    ->setCellValue('E1', 'Grupo')
    ->setCellValue('F1', 'Semestre');

$spreadsheet->getActiveSheet()->duplicateStyle($headerStyle, 'A1:F1');

$highestRow = count($materias_rs)+1;

$row = 2;
if(isset($materias_rs)){
    foreach($materias_rs as $materia){
        $col = 1;

        if($filter_modificados == 0 || ($filter_modificados == 1 && $materia["modificado"] == 1)){//imprime todos o sólo modificados

            $prof = $materia["Usuario_apellidos"]." ".$materia["Usuario_nombre"];
            if(trim($prof) == "")
                $prof = "- PENDIENTE -";
            
            if($_SESSION["nivel_id"] == 1)
                $grupo_desc = $materia["Grupo_desc"].$materia["Carrera_prefijo"];
            else
                $grupo_desc = $materia["Carrera_prefijo"];

            $claveULSA = sprintf("%06d", $materia["Usuario_claveULSA"]);

            $spreadsheet->setActiveSheetIndex(0)
                ->setCellValueByColumnAndRow($col++, $row, $materia["Grupo_desc"].$materia["Carrera_prefijo"]."-".getIniciales($materia["Materia_desc"])."-".$materia["Ano"].$materia["Semestre"]."-".$materia["Materia_id"])
                ->setCellValueByColumnAndRow($col++, $row, $materia["Materia_desc"])
                ->setCellValueByColumnAndRow($col++, $row, $claveULSA)
                ->setCellValueByColumnAndRow($col++, $row, $prof)
                ->setCellValueByColumnAndRow($col++, $row, $grupo_desc)
                ->setCellValueByColumnAndRow($col++, $row, $materia["Materia_semestre"]);

            if(isset($materia["modificado"]) && $materia["modificado"] == 1){
                $spreadsheet->getActiveSheet()->duplicateStyle($modificadaStyle, 'A'.$row.':F'.$row);
            }
            /*$spreadsheet->getActiveSheet()->getStyle('G'.$row)
                ->getFont()->getColor()->setARGB($colorStatus);*/

            $row++;
        }//fin modificados
    }
}
if(isset($electivas_rs)){
    foreach($electivas_rs as $materia){
        $col = 1;

        if($filter_modificados == 0 || ($filter_modificados == 1 && $materia["modificado"] == 1)){//imprime todos o sólo modificados

            $prof = $materia["Usuario_apellidos"]." ".$materia["Usuario_nombre"];
            if(trim($prof) == "")
                $prof = "- PENDIENTE -";
            $claveULSA = sprintf("%06d", $materia["Usuario_claveULSA"]);

            $spreadsheet->setActiveSheetIndex(0)
                ->setCellValueByColumnAndRow($col++, $row, "ELECTIVA-".getIniciales($materia["Submateria_desc"])."-".$materia["Ano"].$materia["Semestre"]."-".$materia["Submateria_id"]."-".$materia["Usuario_id"])
                ->setCellValueByColumnAndRow($col++, $row, $materia["Submateria_desc"])
                ->setCellValueByColumnAndRow($col++, $row, $claveULSA)
                ->setCellValueByColumnAndRow($col++, $row, $prof)
                ->setCellValueByColumnAndRow($col++, $row, "Electivas");

            if(isset($materia["modificado"]) && $materia["modificado"] == 1){
                $spreadsheet->getActiveSheet()->duplicateStyle($modificadaStyle, 'A'.$row.':E'.$row);
            }
            /*$spreadsheet->getActiveSheet()->getStyle('G'.$row)
                ->getFont()->getColor()->setARGB($colorStatus);*/

            $row++;
        }//fin modificados
    }
}


//$spreadsheet->getActiveSheet()->getStyle('A1:H1')->getFont()->setBold(true);
$spreadsheet->getActiveSheet()->setAutoFilter($spreadsheet->getActiveSheet()->calculateWorksheetDimension());

//Auto ajustar anchos
$spreadsheet->getActiveSheet()->getColumnDimension('A')->setAutoSize(true);
$spreadsheet->getActiveSheet()->getColumnDimension('B')->setAutoSize(true);
$spreadsheet->getActiveSheet()->getColumnDimension('C')->setAutoSize(true);
$spreadsheet->getActiveSheet()->getColumnDimension('D')->setAutoSize(true);
$spreadsheet->getActiveSheet()->getColumnDimension('E')->setAutoSize(true);
$spreadsheet->getActiveSheet()->getColumnDimension('F')->setAutoSize(true);

// Set active sheet index to the first sheet, so Excel opens this as the first sheet
$spreadsheet->setActiveSheetIndex(0);


//--- Actualiza archivo
if(!isset($filename) || $filename== "" ){//crea archivo
    $materiasObj = new ArchivoMaterias($_SESSION["usuario_id"], $_SESSION["periodo_id"], $filename );
    $filename = $materiasObj->getFileName();//Si existe no cambia, si no, se asigna
    //Actualiza archivo
    $stmt = $pdo->prepare('Select * from fi_materiasmoodle(:usr, :per, :name)');
    $stmt->bindParam(":usr", $_SESSION["usuario_id"]);
    $stmt->bindParam(":per", $_SESSION["periodo_id"]);
    $stmt->bindParam(":name", $filename);

    if(!$stmt->execute()){
        $pdo->rollBack();
        //$t = $stmt->errorInfo();
        $return["error"] .= "Ocurrió un error al insertar el archivo de las materias.";
        $return["json"] = json_encode($return);
        echo json_encode($return);
    }
    $stmt->closeCursor();   
}
$materiasObj->cleanFile();

if(isset($materias_rs)){
    foreach($materias_rs as $materia){
        $row = $materia["Grupo_desc"].$materia["Carrera_prefijo"].",".$materia["Materia_id"].",".$materia["Usuario_id"];
        $materiasObj->appendFile($row);
    }
    $materiasObj->appendFile("");
}
$materiasObj->appendFile($row);
if(isset($electivas_rs)){
    foreach($electivas_rs as $materia){
        $row = "Electivas,".$materia["Submateria_id"].",".$materia["Usuario_id"];
        $materiasObj->appendFile($row);
    }
}


// Redirect output to a client’s web browser (Xlsx)
header('Content-Type: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet');
header('Content-Disposition: attachment;filename="materiasMoodle_'.date("y-m-d").'.xlsx"');
header('Cache-Control: max-age=0');
// If you're serving to IE 9, then the following may be needed
header('Cache-Control: max-age=1');

// If you're serving to IE over SSL, then the following may be needed
header('Expires: Mon, 26 Jul 1997 05:00:00 GMT'); // Date in the past
header('Last-Modified: ' . gmdate('D, d M Y H:i:s') . ' GMT'); // always modified
header('Cache-Control: cache, must-revalidate'); // HTTP/1.1
header('Pragma: public'); // HTTP/1.0

$writer = IOFactory::createWriter($spreadsheet, 'Xlsx');
$writer->save('php://output');
exit;