modules/carnet/contacts.pdf.inc.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2014 Polytechnique.org                              *
   4  *  http://opensource.polytechnique.org/                                   *
   5  *                                                                         *
   6  *  This program is free software; you can redistribute it and/or modify   *
   7  *  it under the terms of the GNU General Public License as published by   *
   8  *  the Free Software Foundation; either version 2 of the License, or      *
   9  *  (at your option) any later version.                                    *
  10  *                                                                         *
  11  *  This program is distributed in the hope that it will be useful,        *
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
  14  *  GNU General Public License for more details.                           *
  15  *                                                                         *
  16  *  You should have received a copy of the GNU General Public License      *
  17  *  along with this program; if not, write to the Free Software            *
  18  *  Foundation, Inc.,                                                      *
  19  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  20  ***************************************************************************/
  21
  22 define ('FPDF_FONTPATH', dirname(__FILE__).'/fonts/');
  23 require_once '/usr/share/fpdf/fpdf.php';
  24
  25 VarStream::init();
  26
  27 class ContactsPDF extends FPDF
  28 {
  29     public $title  = "Mes contacts sur Polytechnique.org";
  30
  31     private $col = 0;
  32     private $y0;
  33
  34     private $broken = false;
  35     private $error  = false;
  36
  37     private $report = 0;
  38
  39     public function __construct()
  40     {
  41         $this->report = error_reporting(0);
  42         parent::FPDF();
  43         error_reporting($this->report);
  44
  45         $this->AddFont('Vera Sans', '',  'Vera.php');
  46         $this->AddFont('Vera Sans', 'I', 'VeraIt.php');
  47         $this->AddFont('Vera Sans', 'B', 'VeraBd.php');
  48
  49         $this->AddFont('Vera Mono', '',  'VeraMono.php');
  50
  51         $this->SetTitle($this->title);
  52         $this->SetCreator('Site Polytechnique.org');
  53         $this->AddPage();
  54     }
  55
  56     public function Output($name='mescontacts.pdf', $dest='I')
  57     {
  58         Header('Pragma: public');
  59         error_reporting(0);
  60         parent::Output($name, $dest);
  61         error_reporting($this->report);
  62     }
  63
  64     private function Rotate($angle, $x=-1, $y=-1)
  65     {
  66         if ($x==-1) {
  67             $x = $this->x;
  68         }
  69         if ($y==-1) {
  70             $y=$this->y;
  71         }
  72         if (!empty($this->angle)) {
  73             $this->_out('Q');
  74         }
  75         $this->angle = $angle;
  76         if ($angle != 0) {
  77             $angle*=M_PI/180;
  78             $c  = cos($angle);
  79             $s  = sin($angle);
  80             $cx = $x*$this->k;
  81             $cy = ($this->h-$y)*$this->k;
  82             $this->_out(sprintf('q %.5f %.5f %.5f %.5f %.2f %.2f cm 1 0 0 1 %.2f %.2f cm',
  83                                 $c, $s, -$s, $c, $cx, $cy, -$cx, -$cy));
  84         }
  85     }
  86
  87     public function Header()
  88     {
  89
  90         $this->SetFont('Vera Sans', 'B', 20);
  91         $this->SetTextColor(230);
  92         $this->Rotate(45, 55, 190);
  93         $this->Text(55, 190, utf8_decode("informations limitées à un usage"));
  94         $this->Text(40, 210, utf8_decode("strictement personnel et non commercial"));
  95         $this->Rotate(0);
  96
  97         $this->setLeftMargin(5);
  98         $this->setRightMargin(5);
  99         $this->SetFont('Vera Sans', 'B', 16);
 100         $this->SetY(5);
 101         $this->SetTextColor(51, 102, 153);
 102         $this->SetDrawColor(102, 153, 204);
 103         $this->SetLineWidth(0.2);
 104         $this->SetFillColor(245, 248, 252);
 105         $this->Cell(200, 10, $this->title, 1, 1, 'C', 1);
 106         $this->Image(dirname(__FILE__).'/../../htdocs/images/logo.png',
 107                      5, 5, 10, 10, 'png', 'https://www.polytechnique.org/');
 108
 109         $this->Ln(10);
 110         $this->y0 = $this->GetY();
 111         $this->ColSetup(false);
 112     }
 113
 114     public function Footer()
 115     {
 116         $this->setLeftMargin(5);
 117         $this->setRightMargin(5);
 118         $this->SetY(-15);
 119         $this->SetFont('Vera Sans', 'I', 8);
 120         $this->SetTextColor(128);
 121         $this->Cell(0, 10, 'Page '.$this->PageNo(), 0, 0, 'C');
 122         $this->Cell(0, 10, '(en date du '.strftime('%d %B %Y').')', 0, 0, 'R');
 123     }
 124
 125     private function ColSetup($col)
 126     {
 127         $this->col = $col;
 128         $x = 10 + $this->col * 100;
 129         $this->SetLeftMargin($x);
 130         $this->SetRightMargin(120 - $x);
 131         $this->SetX($x);
 132         $this->SetY($this->y0);
 133     }
 134
 135     private function NextCol()
 136     {
 137         $this->ColSetup(1 - $this->col);
 138         if ($this->col == 0) {
 139             $this->AddPage();
 140         }
 141     }
 142
 143     public function AcceptPageBreak()
 144     {
 145         $this->broken = true;
 146     }
 147
 148     private function Space($w=0.1, $h=0.5)
 149     {
 150         $x = $this->getX();
 151         $y = $this->getY();
 152         $this->SetLineWidth($w);
 153         $this->Line($x, $y, $x+90, $y);
 154         $this->Ln($h);
 155     }
 156
 157     private function TableRow($l, $r, $font = 'Sans')
 158     {
 159         $this->SetFont('Vera Sans', 'B', 8);
 160         $y = $this->getY();
 161         $x = $this->getX();
 162         $this->MultiCell(25, 4, $l, '', 1);
 163         $y1 = $this->getY();
 164
 165         $this->SetFont('Vera '.$font, '', 8);
 166         $this->setY($y);
 167         $first = 1;
 168
 169         $this->setX($x+25);
 170         $this->MultiCell(65, 4, $r, '', 1);
 171
 172         $this->setY(max($y1, $this->getY())+0.5);
 173         $this->setX($x);
 174     }
 175
 176     private function Address($a)
 177     {
 178         if (!$a->text) {
 179             return;
 180         }
 181         $l = "adresse\n";
 182         if ($a->hasFlag('current')) {
 183             $l .= 'actuelle';
 184         } elseif ($a->hasFlag('secondary')) {
 185             $l .= 'secondaire';
 186         } else {
 187             $l .= 'principale';
 188         }
 189
 190         $this->TableRow($l, utf8_decode($a->text));
 191
 192         foreach ($a->phones() as $phone) {
 193             $this->TableRow(utf8_decode($phone->displayType()),
 194                             utf8_decode($phone->display), 'Mono');
 195         }
 196     }
 197
 198     private function AddressPro($a)
 199     {
 200         if ($a->company) {
 201             $this->TableRow('Entreprise', utf8_decode($a->company->name));
 202         }
 203         if ($a->address()) {
 204             $this->TableRow('adresse pro', utf8_decode($a->address()->text));
 205         }
 206         foreach ($a->phones() as $phone) {
 207             $this->TableRow(utf8_decode($phone->displayType()),
 208                             utf8_decode($phone->display), 'Mono');
 209         }
 210     }
 211
 212     public function Error($msg)
 213     {
 214         $this->error = true;
 215     }
 216
 217     private function wordwrap($text, $maxwidth = 90) {
 218         $text = trim($text);
 219         if ($text==='') { return 0; }
 220         $space = $this->GetStringWidth(' ');
 221         $lines = explode("\n", $text);
 222         $text = '';
 223         $count = 0;
 224
 225         foreach ($lines as $line) {
 226             $words = preg_split('/ +/', $line);
 227             $width = 0;
 228
 229             foreach ($words as $word) {
 230                 $wordwidth = $this->GetStringWidth($word);
 231                 if ($width + $wordwidth <= $maxwidth) {
 232                     $width += $wordwidth + $space;
 233                     $text .= $word.' ';
 234                 } else {
 235                     $width = $wordwidth + $space;
 236                     $text  = rtrim($text)."\n".$word.' ';
 237                     $count++;
 238                 }
 239             }
 240             $text = rtrim($text)."\n";
 241             $count++;
 242         }
 243         $text = rtrim($text);
 244         return $count;
 245     }
 246
 247     public static function AddContact(ContactsPDF $self, Profile $profile, $wp = true)
 248     {
 249         /* infamous hack :
 250            1- we store the current state.
 251            2- at the end, we find out if we triggered the page break,
 252               -> no ? ok
 253               -> yes ? then we have to create a col, and add the contact again.
 254         */
 255         $old = clone $self;
 256
 257         $self->SetFont('Vera Sans', '', 10);
 258         $self->SetDrawColor(0);
 259         $self->SetFillColor(245, 248, 252);
 260         $self->SetLineWidth(0.4);
 261
 262         $nom = utf8_decode($profile->full_name);
 263         $ok  = false;
 264
 265         if ($wp) {
 266             $photo = $profile->getPhoto(false, true);
 267             if ($photo) {
 268                 list(, $type) = explode('/', $photo->mimeType());
 269                 $type = ($type == 'jpeg') ? 'jpg' : $type;
 270                 if (method_exists($self, '_parse' . $type)) {
 271                     $old2  = clone $self;
 272                     $width = $photo->width() * 20 / $photo->height();
 273                     $_x = $self->getX();
 274                     $_y = $self->getY();
 275                     $self->Cell(0, 20, '', '', 0, '', 1);
 276                     error_reporting(0);
 277                     $self->Image($photo->path(), $_x, $_y, $width, 20, $type);
 278                     error_reporting($self->report);
 279
 280                     if ($self->error) {
 281                         $self = clone $old2;
 282                     } else {
 283                         $self->setX($_x);
 284                         $self->Cell($width, 20, '', "T");
 285                         $h = 20 / $self->wordwrap($nom, 90 - $width);
 286                         $self->MultiCell(0, $h, $nom, 'T', 'C');
 287                         $ok = true;
 288                     }
 289                 }
 290             }
 291         }
 292         if (!$ok) {
 293             $self->MultiCell(0, 6, $nom, "T", 'C', 1);
 294         }
 295
 296         if ($profile->mobile) {
 297             $self->Space();
 298             $self->TableRow('mobile', utf8_decode($profile->mobile), 'Mono');
 299         }
 300
 301         $it = $profile->iterAddresses(Profile::ADDRESS_ALL);
 302         while ($a = $it->next()) {
 303             $self->Space();
 304             $self->Address($a);
 305         }
 306         $it = $profile->getJobs(Profile::JOBS_CURRENT);
 307         foreach ($it as $a) {
 308             $self->Space();
 309             $self->AddressPro($a);
 310         }
 311
 312         $self->Space(0.4, 5);
 313
 314         if ($self->broken) {
 315             $old->NextCol();
 316             $self = ContactsPDF::AddContact($old, $profile, $wp);
 317         }
 318
 319         return $self;
 320     }
 321 }
 322
 323 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 324 ?>