createUserPDF() implemented. Some little redesign has stille to be done.
This commit is contained in:
duergner
parent
8925b89a61
commit
3662499d99
206
lam/lib/pdf.inc
206
lam/lib/pdf.inc
|
|
@ -1,4 +1,4 @@
|
||||||
<?
|
<?php
|
||||||
/*
|
/*
|
||||||
$Id$
|
$Id$
|
||||||
|
|
||||||
|
|
@ -20,26 +20,200 @@ $Id$
|
||||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||||
|
|
||||||
|
|
||||||
LDAP Account Manager functions used by account.php
|
LDAP Account Manager lamPDF class and some pdf functions
|
||||||
*/
|
*/
|
||||||
|
|
||||||
// Include PDF-Class
|
|
||||||
define('FPDF_FONTPATH', 'font/');
|
define('FPDF_FONTPATH', 'font/');
|
||||||
include_once('fpdf.php');
|
include_once("fpdf.php");
|
||||||
|
|
||||||
function createpdf($accounts) { // Will output a pdf-file with accounts
|
function createUserPDF($accounts) {
|
||||||
$pdf= new FPDF();
|
$pdfFile = new lamPDF();
|
||||||
$pdf->Open();
|
$pdfFile->AliasNbPages();
|
||||||
$pdf->SetAuthor('Tilo Lutz');
|
$pdfFile->Open();
|
||||||
$pdf->SetCreator('pdf.inc, LDAP Accunt Manager');
|
// Write some information into the PDF file
|
||||||
for ( $i=0; $i<sizeof($accounts); $i++ ) { // Loop vor every account
|
$pdfFile->setFont("arial","",12);
|
||||||
$pdf->AddPage();
|
$pdfFile->setTitle("LDAP Account Manager");
|
||||||
$pdf->SetFont('Arial', 'B', 16);
|
$pdfFile->setSubject(_("User information page"));
|
||||||
$pdf->Cell(100,10,_('Hello World!'),0,1,'C');
|
$pdfFile->setAuthor("LDAP Account Manager Devel-Team -Michael Dürgner-");
|
||||||
|
$pdfFile->setCreator("LDAP Account Manager (pdf.inc)");
|
||||||
|
for($i=0;$i<count($accounts);$i++) {
|
||||||
|
$account = $accounts[$i];
|
||||||
|
$pdfFile->addPage();
|
||||||
|
// Print General settings
|
||||||
|
$pdfFile->setFont("arial","B",12);
|
||||||
|
$pdfFile->Write(5,"- " . _("General User Settings") . ":");
|
||||||
|
$pdfFile->Ln(6);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Surname") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->general_surname,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Given name") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->general_givenname,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Username") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->general_username,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Home Directory") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->general_homedir,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Group(s)") . ":",0,0,"R",0);
|
||||||
|
$text = $account->general_group;
|
||||||
|
$groups = $account->general_groupadd;
|
||||||
|
for($j=0;$j<count($groups);$j++) {
|
||||||
|
$text .= ", " . $groups[$j];
|
||||||
}
|
}
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$text,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Login Shell(s)") . ":",0,0,"R",0);
|
||||||
|
$text = "";
|
||||||
|
$shells = $account->general_shell;
|
||||||
|
for($j=0;$j<count($shells);$j++) {
|
||||||
|
if($j == 1) {
|
||||||
|
$text = $shells[$j];
|
||||||
|
}
|
||||||
|
$text .= ", " . $shells[$j];
|
||||||
|
}
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$text,0,1,"L",0);
|
||||||
|
$pdfFile->Ln(9);
|
||||||
|
$pdfFile->setFont("arial","B",12);
|
||||||
|
// print Unix settings
|
||||||
|
$pdfFile->Write(5,"- " . _("Unix User Settings") . ":");
|
||||||
|
$pdfFile->Ln(6);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Unix password") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->unix_password,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Password expire") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->unix_pwdexpire,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Login at host(s)") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->unix_host,0,1,"L",0);
|
||||||
|
$pdfFile->Ln(9);
|
||||||
|
$pdfFile->setFont("arial","B",12);
|
||||||
|
// Print Samba settings
|
||||||
|
$pdfFile->Write(5,"- " . _("Samba User Settings") . ":");
|
||||||
|
$pdfFile->Ln(6);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Use Unix password") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
if($account->smb_useunixpwd == 1) {
|
||||||
|
$text = _("Yes");
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
$text = _("No");
|
||||||
|
}
|
||||||
|
$pdfFile->Cell(50,5,$text,0,1,"L",0);
|
||||||
|
if($account->smb_useunixpwd == 0) {
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Samba password") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->smb_password,0,1,"L",0);
|
||||||
|
}
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Home drive") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->smb_homedrive,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Script path") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->smb_scriptPath,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Profile path") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->smb_profilePath,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Login at workstation(s)") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->smb_smbuserworkstations,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Samba home directory") . "::",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->smb_home,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Samba Domain") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->smb_domain,0,1,"L",0);
|
||||||
|
$pdfFile->Ln(9);
|
||||||
|
$pdfFile->setFont("arial","B",12);
|
||||||
|
// Print Quota settings (no quota outpunt yet)
|
||||||
|
$pdfFile->Write(5,"- " . _("Quota Settings") . ":");
|
||||||
|
$pdfFile->Ln(6);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("User quota(s)") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->quota,0,1,"L",0);
|
||||||
|
$pdfFile->Ln(9);
|
||||||
|
$pdfFile->setFont("arial","B",12);
|
||||||
|
// Print Personal settings
|
||||||
|
$pdfFile->Write(5,"- " . _("Personal User Settings") . ":");
|
||||||
|
$pdfFile->Ln(6);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Title") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->personal_title,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("E-Mail") . "::",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->personal_mail,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Phone") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->personal_telephoneNumber,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Cellular phone") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->personal_mobileTelephoneNumber,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Facsimile") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->personal_facsimileTelephoneNumber,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Street") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->personal_street,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Postal code") . "::",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->personal_postalCode,0,1,"L",0);
|
||||||
|
$pdfFile->setFont("times","",10);
|
||||||
|
$pdfFile->Cell(50,5,_("Postal address") . ":",0,0,"R",0);
|
||||||
|
$pdfFile->setFont("times","B",10);
|
||||||
|
$pdfFile->Cell(50,5,$account->personal_postalAddress,0,1,"L",0);
|
||||||
|
}
|
||||||
|
$pdfFile->Close();
|
||||||
|
$pdfFile->Output();
|
||||||
|
}
|
||||||
|
|
||||||
$pdf->Output(); // Output PDF-File
|
class lamPDF extends FPDF {
|
||||||
|
function header() {
|
||||||
|
// Print page header
|
||||||
|
$this->Image("../graphics/printLogo.jpg",10,10,50,20,"JPG");
|
||||||
|
$this->SetFont("arial","B",22);
|
||||||
|
$this->Cell(170,5,"LDAP Account Manager",0,1,"R",0);
|
||||||
|
$this->Ln(3);
|
||||||
|
$this->SetFont("times","",14);
|
||||||
|
$this->Cell(170,5,"-" . _("User information page") . "-",0,0,"R",0);
|
||||||
|
$this->SetLineWidth(0.8);
|
||||||
|
$this->Line(10,40,200,40);
|
||||||
|
$this->Line(10,42,200,42);
|
||||||
|
$this->SetY(60);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
function footer() {
|
||||||
?>
|
// Print page footer
|
||||||
|
$this->SetLineWidth(0.8);
|
||||||
|
$this->Line(10,280,200,280);
|
||||||
|
$this->Line(10,282,200,282);
|
||||||
|
$this->SetY(285);
|
||||||
|
$this->Cell(0,5,_("This document was automatically created by LDAP Account Manager") . " (lib/pdf.inc)",0,0,"C",0);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue