<?
    import_request_variables("GPC","i");
    
    $anzahl_seite = 8;
    $zeilenzahl = 70;

    if ($iuser == "admin"){$admin=true;}
    else {$admin == false;};
    
    function abbruch(){
        
    };
    
    function font_vor (){
    global $font, $p;
        $font = PDF_findfont($p, "Helvetica-Bold", "host", 0);
        PDF_setfont($p, $font, 8.0);
    };//font_vor
    
    function font_nach (){
    global $font, $p;
        $font = PDF_findfont($p, "Helvetica-Bold", "host", 0);
        PDF_setfont($p, $font, 10.0);
    };//font_nach
    
    //abfrage aufbauen
    $suchenach="";
    $anfrage = "select pcname, benutzer, modell, seriennummer, standort, domain, ";
    $anfrage.= "kostenstelle, anlagennummer, dhcp, tcp1, tcp2, tcp3, tcp4, rvu, ";
    $anfrage.= "flag, betriebssystem, bemerkungen from inventar".$suchenach.";";
    
    //Login auf die Datenbank und ausfuehren der Abfrage
    $link = mysql_connect("localhost", $iuser, $ipasswort)
        or abbruch();
    mysql_select_db("inventar");
    $ergebnis=mysql_query($anfrage);
    
    //Oeffnen eines PDF-Dokumentes in den Speicher
    $p = PDF_new();
    PDF_open_file($p, "");

    PDF_set_info($p, "Creator", "Ulmia Stoffe");
    PDF_set_info($p, "Author", "Ulmia Stoffe");
    PDF_set_info($p, "Title", "Inventarliste");
    
    //Schleife fuer die Ausgabe der Datensaetze
    $datensatznummer = 0;
    while ($datensatz = mysql_fetch_array ($ergebnis)){
        $datensatznummer++;
        
        $stand = $datensatznummer % $anzahl_seite;
        if ($stand == 1){//Anfang der Seite
            //Eine neue Seite im PDF-Dokument beginnen
            PDF_begin_page($p, 595, 842);
            $font = PDF_findfont($p, "Helvetica-Bold", "host", 0);
            PDF_setfont($p, $font, 10.0);
            PDF_set_text_pos($p, 30, 800);
        };//IF
        
        //Ausgabe der Datensaetze
        //1. Zeile
        font_vor ();   
        PDF_show ($p, "PC-Name: ");
        font_nach ();
        PDF_show ($p, $datensatz["pcname"]);
        
        font_vor ();   
        PDF_show ($p, "     Benutzer: ");
        font_nach ();
        PDF_show ($p, $datensatz["benutzer"]);
        
        font_vor ();   
        PDF_show ($p, "     Modell: ");
        font_nach ();
        PDF_show ($p, $datensatz["modell"]);
        
        font_vor ();   
        PDF_show ($p, "     Seriennummer: ");
        font_nach ();
        PDF_show ($p, $datensatz["seriennummer"]);
        
        //2. Zeile
        PDF_continue_text($p, "");
        
        font_vor ();   
        PDF_show ($p, "Standort: ");
        font_nach ();
        PDF_show ($p, $datensatz["standort"]);
        
        font_vor ();   
        PDF_show ($p, "     Domain: ");
        font_nach ();
        PDF_show ($p, $datensatz["domain"]);
        
        font_vor ();   
        PDF_show ($p, "     Kostenstelle: ");
        font_nach ();
        PDF_show ($p, $datensatz["kostenstelle"]);
        
        font_vor ();   
        PDF_show ($p, "     Anlagennummer: ");
        font_nach ();
        PDF_show ($p, $datensatz["anlagennummer"]);
        
        //3. Zeile
        PDF_continue_text($p, "");
        
        //Bestimmen, ob IP oder DHCP
        if ($datensatz["dhcp"] == 1){
            font_nach ();
            PDF_show ($p, "DHCP");
        }
        else{
            font_vor ();   
            PDF_show ($p, "IP: ");
            font_nach ();
            PDF_show ($p, $datensatz["tcp1"].".".$datensatz["tcp2"].".".$datensatz["tcp3"].".".$datensatz["tcp4"]);
        };//IF-ELSE
        
        font_vor ();   
        PDF_show ($p, "     RVu-Nummer: ");
        font_nach ();
        PDF_show ($p, $datensatz["rvu"]);
        
        font_vor ();   
        PDF_show ($p, "     AS-Flag: ");
        font_nach ();
        PDF_show ($p, $datensatz["flag"]);
        
        font_vor ();   
        PDF_show ($p, "     Betriebssystem: ");
        font_nach ();
        PDF_show ($p, $datensatz["betriebssystem"]);
        
        //4. Zeile
        PDF_continue_text($p, "");
        
        font_vor ();   
        PDF_show ($p, "Bemerkungen: ");
        if ($datensatz["bemerkungen"] == ""){
            font_nach ();
            PDF_show ($p, "<<keine Eintraege>>");
        }
        else{
            font_nach ();
            PDF_show ($p, $datensatz["bemerkungen"]);
        };
        
        //5. Zeile
        PDF_continue_text($p, "");
        //software-Zeile
        font_vor ();   
        PDF_show ($p, "Installierte Software: ");
        
        font_nach ();
        
        $anfrage_software = "select software from software where pcname=\"".$datensatz["pcname"]."\";";
        $ergebnis_software = mysql_query ($anfrage_software);
        
        $ausgabe = "";
        while ($software = mysql_fetch_array($ergebnis_software)){
            $soft = $software["software"] . ", ";
            $ausgabe .= $soft;
            $laenge = strlen ($ausgabe);
            if ($laenge > $zeilenzahl){
                PDF_show ($p, $ausgabe);
                $ausgabe = "";
                PDF_continue_text ($p, "                    ");
            };//IF
        };//while
        PDF_show ($p, $ausgabe);
        
        //Abschluss des Datensatzes
        PDF_continue_text($p, "");
        PDF_continue_text($p, "");
        PDF_continue_text($p, "");
        if ($stand == 0){//Ende der Seite
            //pdf_setcolor($pdf, "both", "rgb", 1, 1, 1);
            //pdf_setrgbcolor ($p, 1, 1, 1);
            //pdf_rect ($p, 3, 3, 550, 820);
            //pdf_fill_stroke ($p);
            PDF_end_page($p);
        };//IF
        
    };//while der Ausgabe der Datensaetze
    if (!($stand == 0)){
        PDF_end_page ($p);
    };//If
    mysql_free_result ($ergebnis);
    mysql_close ($link);
    
    //Schliessen des Dokumentes und senden an der Browser
    PDF_close($p);
    
    $buf = PDF_get_buffer($p);
    $len = strlen($buf);

    header("Content-type: application/pdf");
    header("Content-Length: $len");
    header("Content-Disposition: inline; filename=inventarliste.pdf");
    print $buf;
    
    //Loeschen des Dokumenes aus dem Sepeicher
    PDF_delete($p);
?>