<?php

require('./fpdf/pdf_lib/fpdf.php');
define('FPDF_FONTPATH','./fpdf/pdf_lib/');
require( "./prihlaseni_k_db.php" ); // prihlaseni k databazi

$pdf = new FPDF();
$pdf->AddPage();
$pdf->SetLineWidth(0.5);
$pdf->SetDrawCOlor(0,0,0);
$text_search = "";

$chyba = "";
if ( isset($_GET['id']))
{
    $vysledek =  mysql_query( "SELECT * FROM dokumentace_projekty WHERE id = ".$_GET['id'] );
    $zaznam = mysql_fetch_array( $vysledek );
    $pdf->SetTitle("Projekt - ".$zaznam['nazev']);
    $text_search .= "Projekt - ".$zaznam['nazev']."\n";

	$pdf->Image('./UK_logo.jpg', 150, 10, 50, 15.9 );
    $pdf->AddFont('arial','','arial.php');
    $pdf->AddFont('arial','B','arialb.php');
    $pdf->AddFont('arial','I','ariali.php');
    $pdf->AddFont('arial','BI','arialbi.php');
    $pdf->SetFont('arial','',18);
    $pdf->Text(10,15,'Vysoké učení technické v Brně');
    $text_search .= "Vysoké učení technické v Brně\n";

    $pdf->Text(10,25,'Fakulta strojního inženýrství');
    $text_search .= "Fakulta strojního inženýrství\n";
    $pdf->Line(10, 30, 200, 30);

		$velikost_pisma = 30;
		$pdf->SetFont('arial','B',$velikost_pisma);
		while( $pdf->GetStringWidth($zaznam['nazev']) > (200))
		{
				$velikost_pisma--;
				$pdf->SetFont('arial','B',$velikost_pisma);
		};
    $pdf->Cell(0,75,$zaznam['nazev'], 0, 0, 'C');
    $text_search .= $zaznam['nazev']."\n";

    if (file_exists( "../ukweb_dokumenty/projekty/".$zaznam['id']."/1.jpg")) {
        $rozmery = getimagesize( "../ukweb_dokumenty/projekty/".$zaznam['id']."/1.jpg" );
        $vyska = 100;
        $sirka = $vyska*$rozmery[0]/$rozmery[1];
        if ( $sirka > 200 ) {
            $sirka = 200;
            $vyska = $sirka*$rozmery[1]/$rozmery[0];
        }

		    $pdf->Image("../ukweb_dokumenty/projekty/".$zaznam['id']."/1.jpg", (210-$sirka)/2, 65, $sirka, $vyska );
    }

    $pdf->Line(10, 180, 200, 180);

    if ($zaznam['typ'] == iconv("Windows-1250", "UTF-8", "R - software")) {
        $text_popis = 'Popis funkce:';
        $text_parametry = 'Popis algoritmu';
        $text_realizace = 'Technické a programové požadavky';
        $text_pouziti = 'Popis použití';
        $text_umisteni = 'Licenční podmínky';
        $text_foto1 = 'Dokumentace grafického uživatelského rozhranní';
        $text_foto2 = 'Vývojové schéma';
        $odsazeni = 43;
    } else {
        $text_popis = 'Technický popis:';
        $text_parametry = 'Základní technické parametry';
        $text_realizace = 'Způsob realizace';
        $text_pouziti = 'Výsledky zkoušek, použití';
        $text_umisteni = 'Umístění';
        $text_foto1 = 'Fotografická dokumentace';
        $text_foto2 = 'Funkční schéma';
        $odsazeni = 51;
    };

    $pdf->SetFont('arial','B',12);
    $pdf->Text( 10, 190, 'Apollo ID:');
    $pdf->Text( 10, 197, 'Datum:');
    $pdf->Text( 10, 204, 'Typ projektu:');
    $pdf->Text( 10, 211, 'Autoři:');

    $pdf->SetFont('arial','',12);
    $pdf->Text( $odsazeni, 190, $zaznam['id_apolo']);
    $pdf->Text( $odsazeni, 197, (substr($zaznam['projekt_datum'],8,2)+0).".".(substr($zaznam['projekt_datum'],5,2)+0).".".substr($zaznam['projekt_datum'],0,4));
    $pdf->Text( $odsazeni, 204, $zaznam['typ']);
    $pdf->SetXY( $odsazeni-1, 207 );
    $pdf->MultiCell( 202-$odsazeni, 6, $zaznam['autori']);
    $pdf->Ln(5);
    $text_search .= "Apollo ID: ".$zaznam['id_apolo']."\n";
    $text_search .= "Datum: ".(substr($zaznam['projekt_datum'],8,2)+0).".".(substr($zaznam['projekt_datum'],5,2)+0).".".substr($zaznam['projekt_datum'],0,4)."\n";
    $text_search .= "Typ projektu: ".$zaznam['typ']."\n";
    $text_search .= "Autoři: ".$zaznam['autori']."\n";
//    $pdf->Text( $odsazeni, 197, $zaznam['autori']);

    $pdf->SetX(9);
    $pdf->SetLeftMargin(9);

    $pdf->SetFont('arial','B',12);
    $pdf->Cell( 0, 0, $text_popis );
    $pdf->Ln(4);
    $pdf->SetFont('arial','',12);
    $pdf->MultiCell( 0, 6, ereg_replace("\n"," ",$zaznam['projekt_popis']));
    $text_search .= $text_popis.": ".$zaznam['projekt_popis']."\n";

    //druha strana
    $pdf->AddPage();
    if (file_exists( "../ukweb_dokumenty/projekty/".$zaznam['id']."/4.jpg")) {
        $velikost_pisma = 10;
        $vyska_radku = 4;
        $vyska_obrazku = 50;
    } else {
        $velikost_pisma = 12;
        $vyska_radku = 5;
        $vyska_obrazku = 70;
    }


    $pdf->SetY(15);
    $pdf->SetFont( 'arial', 'B', $velikost_pisma );
    $pdf->Cell( 0, 0, $text_parametry );
    $pdf->Ln(2);
    $pdf->SetFont( 'arial', '', $velikost_pisma );
    $pdf->MultiCell( 0, $vyska_radku, $zaznam['projekt_parametry'] );
    $pdf->Ln(5);
    $text_search .= $text_parametry.": ".$zaznam['projekt_parametry']."\n";

    $pdf->SetFont( 'arial', 'B', $velikost_pisma );
    $pdf->Cell( 0, 0, $text_realizace );
    $pdf->Ln(2);
    $pdf->SetFont( 'arial', '', $velikost_pisma );
    $pdf->MultiCell( 0, $vyska_radku, $zaznam['projekt_realizace'] );
    $pdf->Ln(5);
    $text_search .= $text_realizace.": ".$zaznam['projekt_realizace']."\n";

    $pdf->SetFont( 'arial', 'B', $velikost_pisma );
    $pdf->Cell( 0, 0, $text_pouziti );
    $pdf->Ln(2);
    $pdf->SetFont( 'arial', '', $velikost_pisma);
    $pdf->MultiCell( 0, $vyska_radku, $zaznam['projekt_pouziti'] );
    $pdf->Ln(5);
    $text_search .= $text_pouziti.": ".$zaznam['projekt_pouziti']."\n";

    $pdf->SetFont( 'arial', 'B', $velikost_pisma );
    $pdf->Cell( 0, 0, 'Vazba na projekt' );
    $pdf->Ln(2);
    $pdf->SetFont( 'arial', '', $velikost_pisma);
    $pdf->MultiCell( 0, $vyska_radku, $zaznam['projekt_vazba'] );
    $pdf->Ln(5);
    $text_search .= "Vazba na projekt: ".$zaznam['projekt_vazba']."\n";

    $pdf->SetFont( 'arial', 'B', $velikost_pisma );
    $pdf->Cell( 0, 0, $text_umisteni );
    $pdf->Ln(2);
    $pdf->SetFont( 'arial', '', $velikost_pisma);
    $pdf->MultiCell( 0, $vyska_radku, $zaznam['projekt_umisteni'] );
    $pdf->Ln(5);
    $text_search .= $text_umisteni.": ".$zaznam['projekt_umisteni']."\n";

    $pdf->SetFont( 'arial', 'B', $velikost_pisma );
    $pdf->Cell( 0, 0, 'Kontaktní osoba' );
    $pdf->Ln(2);
    $pdf->SetFont( 'arial', '', $velikost_pisma);
    $pdf->MultiCell( 0, $vyska_radku, $zaznam['projekt_kontakt'] );
    $pdf->Ln(5);
    $text_search .= "Kontaktní osoba: ".$zaznam['projekt_kontakt']."\n";
//    $pdf->Cell( 0, 0, $pdf->GetY() );

    if (file_exists( "../ukweb_dokumenty/projekty/".$zaznam['id']."/2.jpg") || file_exists( "../ukweb_dokumenty/projekty/".$zaznam['id']."/3.jpg")) {
        $pdf->SetFont( 'arial', 'B', $velikost_pisma );
        $pdf->Cell( 0, 0, $text_foto1 );
        $pdf->Ln(4);

        $vyska =  $vyska_obrazku;
        $sirka = 0;
        if ( file_exists( "../ukweb_dokumenty/projekty/".$zaznam['id']."/2.jpg") ) {
            $rozmery1 = getimagesize( "../ukweb_dokumenty/projekty/".$zaznam['id']."/2.jpg" );
            $sirka = $vyska*$rozmery1[0]/$rozmery1[1];
        }

        if ( file_exists( "../ukweb_dokumenty/projekty/".$zaznam['id']."/3.jpg") ) {
            $rozmery2 = getimagesize( "../ukweb_dokumenty/projekty/".$zaznam['id']."/3.jpg" );
            $sirka += $vyska*$rozmery2[0]/$rozmery2[1];
        }

        if ( $sirka > 180 ) {
            $vyska = 180*$vyska/$sirka;
            $sirka = 180;
        }

        //pokud existuji oba obrazky
        $pos_x = (200-$sirka)/2;
        if (file_exists( "../ukweb_dokumenty/projekty/".$zaznam['id']."/2.jpg") && file_exists( "../ukweb_dokumenty/projekty/".$zaznam['id']."/3.jpg")) {
		        $pdf->Image("../ukweb_dokumenty/projekty/".$zaznam['id']."/2.jpg", $pos_x, $pdf->GetY(), $vyska*$rozmery1[0]/$rozmery1[1], $vyska );
		        $pdf->Image("../ukweb_dokumenty/projekty/".$zaznam['id']."/3.jpg", $pos_x + 10 + $vyska*$rozmery1[0]/$rozmery1[1], $pdf->GetY(), $vyska*$rozmery2[0]/$rozmery2[1], $vyska );
        } elseif (file_exists( "../ukweb_dokumenty/projekty/".$zaznam['id']."/2.jpg")) {
		        $pdf->Image("../ukweb_dokumenty/projekty/".$zaznam['id']."/2.jpg", $pos_x, $pdf->GetY(), $sirka, $vyska );
        } else {
		        $pdf->Image("../ukweb_dokumenty/projekty/".$zaznam['id']."/3.jpg", $pos_x, $pdf->GetY(), $sirka, $vyska );
        }

        $pdf->SetY( $pdf->GetY() + $vyska + 5);
    }

    if (file_exists( "../ukweb_dokumenty/projekty/".$zaznam['id']."/4.jpg")) {
        $pdf->SetFont( 'arial', 'B', $velikost_pisma );
        $pdf->Cell( 0, 0, $text_foto2 );
        $pdf->Ln(4);

        $rozmery = getimagesize( "../ukweb_dokumenty/projekty/".$zaznam['id']."/4.jpg" );
        $vyska =  $vyska_obrazku;
        $sirka = $vyska*$rozmery[0]/$rozmery[1];
        if ( $sirka > 200 ) {
            $sirka = 200;
            $vyska = $sirka*$rozmery[1]/$rozmery[0];
        }

		    $pdf->Image("../ukweb_dokumenty/projekty/".$zaznam['id']."/4.jpg", (210-$sirka)/2, $pdf->GetY(), $sirka, $vyska );
        $pdf->SetY( $pdf->GetY() + $vyska + 10 );
    }
    
    if ($zaznam['typ'] == iconv("Windows-1250", "UTF-8", "R - software") && file_exists( "../ukweb_dokumenty/projekty/".$zaznam['id']."/software.zip")) {
        $pdf->SetFont( 'arial', 'B', $velikost_pisma );
        $pdf->Cell( 0, 0, 'Adresa ke stažení software' );
        $pdf->Ln(2);
        $pdf->SetFont( 'arial', '', $velikost_pisma);
        $pdf->MultiCell( 0, $vyska_radku, "http://dokumenty.uk.fme.vutbr.cz/projekty/".$zaznam['id']."/software.zip" );
        $pdf->Ln(5);
        $text_search .= "Adresa ke stažení software: http://dokumenty.uk.fme.vutbr.cz/projekty/".$zaznam['id']."/software.zip\n";
    }

    $pdf->Ln(2);
    $pdf->SetFont( 'arial', '', 10);
    $pdf->MultiCell( 0, 5, "Prohlašuji, že popsaný výsledek naplňuje definici uvedenou v Příloze č. 2 Metodiky hodnocení výsledků výzkumu, experimentálního vývoje a inovací pro rok ".substr($zaznam['projekt_datum'],0,4).", a že jsem si vědom důsledků plynoucích z porušení § 14 zákona č. 130/2002 Sb. (ve znění platném od 1. července 2009). Prohlašuji rovněž, že na požádání předložím technickou dokumentaci výsledku." );
    $pdf->Ln(20);
    $text_search .= "Prohlašuji, že popsaný výsledek naplňuje definici uvedenou v Příloze č. 2 Metodiky hodnocení výsledků výzkumu, experimentálního vývoje a inovací pro rok ".substr($zaznam['projekt_datum'],0,4).", a že jsem si vědom důsledků plynoucích z porušení § 14 zákona č. 130/2002 Sb. (ve znění platném od 1. července 2009). Prohlašuji rovněž, že na požádání předložím technickou dokumentaci výsledku.\n";

    $pdf->SetLineWidth(0.25);
    $pdf->Line(120, $pdf->GetY(), 200, $pdf->GetY());
    $pdf->SetFont( 'arial', '', 10);
    $pdf->SetLeftMargin(120);
    $pdf->Cell( 80, 7, $zaznam['uzivatel_celejmeno'], 0, 0, 'C' );
    $text_search .= $zaznam['uzivatel_celejmeno']."\n";

    //Pro ulozeni zaznamu do digitalni knihovny
    $vysledek = mysql_query( "SELECT * FROM dl_stored_files WHERE dl_document_id = ".$zaznam['id_dl'] );
    if (isset($zaznam['id_dl']) && mysql_num_rows($vysledek) > 0) {
       $zaznam_file = mysql_fetch_array( $vysledek );
       mysql_query( "UPDATE dl_stored_files SET text = '".$text_search."' WHERE id = '".$zaznam_file['id']."'" );
       $file_id = $zaznam_file['id'];

    } else {
       mysql_query( "INSERT INTO dl_stored_files
                     (dl_document_id, file_description, file_type, text) VALUES
                     ('".$zaznam['id_dl']."', 'Popis funkčního vzorku v PDF', 'application/pdf', '".$text_search."')" );
       $file_id = mysql_insert_id();
    }


}
else {
		$chyba = "";
		$pdf->Text( $x+5, $y+10, "Chybně zadané ID Projektu!" );
};

$pdf->Output();
$pdf->Output("../ukweb_knihovna/stored_files/".$file_id.".file", "F");

?>