Switching to using phpqrcode for QR code generation, as Google is due to shut down it's QR code generation API.
This commit is contained in:
Tom Slominski
363
public/phpqrcode/qrcanvas.php
Executable file
363
public/phpqrcode/qrcanvas.php
Executable file
@@ -0,0 +1,363 @@
|
||||
<?php
|
||||
/*
|
||||
* PHP QR Code encoder
|
||||
*
|
||||
* CANVAS output
|
||||
*
|
||||
* Based on libqrencode C library distributed under LGPL 2.1
|
||||
* Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi <fukuchi@megaui.net>
|
||||
*
|
||||
* PHP QR Code is distributed under LGPL 3
|
||||
* Copyright (C) 2010-2013 Dominik Dzienia <deltalab at poczta dot fm>
|
||||
*
|
||||
* This library is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU Lesser General Public
|
||||
* License as published by the Free Software Foundation; either
|
||||
* version 3 of the License, or any later version.
|
||||
*
|
||||
* This library is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
* Lesser General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU Lesser General Public
|
||||
* License along with this library; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
|
||||
*/
|
||||
|
||||
/** @addtogroup OutputGroup */
|
||||
/** @{ */
|
||||
|
||||
class QRcanvasOutput extends QRarea {
|
||||
|
||||
public function __construct($source_tab)
|
||||
{
|
||||
parent::__construct($source_tab);
|
||||
}
|
||||
|
||||
//----------------------------------------------------------------------
|
||||
public static function encodeNum($num)
|
||||
{
|
||||
$addTab = array(0=>'', 1=>'z', 2=>'Z', 3=>'+');
|
||||
$map = '0123456789abcdefghijklmnopqrstuvwxyABCDEFGHIJKLMNOPQRSTUVWXY';
|
||||
$mapPos = $num % 60;
|
||||
$mapAdd = (int)($num / 60);
|
||||
|
||||
return $addTab[$mapAdd].$map[$mapPos];
|
||||
}
|
||||
|
||||
//----------------------------------------------------------------------
|
||||
public static function compact_path(&$pathTab)
|
||||
{
|
||||
if (count($pathTab) == 0) {
|
||||
$pathTab = '';
|
||||
} else {
|
||||
$pathTab = count($pathTab).','.join(',', $pathTab);
|
||||
}
|
||||
}
|
||||
|
||||
//----------------------------------------------------------------------
|
||||
public static function compact_points(&$pointsTab)
|
||||
{
|
||||
if (count($pointsTab) == 0) {
|
||||
$pointsTab = '';
|
||||
} else {
|
||||
$compacted = '';
|
||||
foreach ($pointsTab as $point)
|
||||
$compacted .= self::encodeNum($point);
|
||||
$pointsTab = $compacted;
|
||||
}
|
||||
}
|
||||
|
||||
//----------------------------------------------------------------------
|
||||
public static function compactCanvasCommands($ops)
|
||||
{
|
||||
$accumulated = array();
|
||||
|
||||
$accumulated['SR'] = array();
|
||||
$accumulated['WR'] = array();
|
||||
$accumulated['SP'] = array();
|
||||
$accumulated['WP'] = array();
|
||||
$accumulated['SB'] = array();
|
||||
$accumulated['WB'] = array();
|
||||
$accumulated['SO'] = array();
|
||||
|
||||
while (count($ops) > 0) {
|
||||
$color = array_shift($ops);
|
||||
$opcode = array_shift($ops);
|
||||
|
||||
if (($opcode == 'R') || ($opcode == 'P')) {
|
||||
|
||||
do {
|
||||
$num = array_shift($ops);
|
||||
if (is_int($num)) {
|
||||
$accumulated[$color.$opcode][] = $num;
|
||||
} else {
|
||||
array_unshift($ops, $num);
|
||||
}
|
||||
|
||||
} while ((count($ops) > 0)&&(is_int($num)));
|
||||
|
||||
|
||||
} else if ($opcode == 'B') {
|
||||
|
||||
array_shift($ops);
|
||||
|
||||
$px = array_shift($ops);
|
||||
$py = array_shift($ops);
|
||||
|
||||
array_shift($ops);
|
||||
|
||||
$conftab = array();
|
||||
$num = array_shift($ops);
|
||||
|
||||
while ((count($ops) > 0)&&(!($num === 'E'))) {
|
||||
$conftab[] = $num;
|
||||
$num = array_shift($ops);
|
||||
}
|
||||
|
||||
$cc = count($conftab);
|
||||
$deltas = '';
|
||||
|
||||
$lastposx = $px;
|
||||
$lastposy = $py;
|
||||
|
||||
for($pos=0;$pos <$cc; $pos+=2) {
|
||||
|
||||
$dx = $lastposx - $conftab[$pos];
|
||||
$dy = $lastposy - $conftab[$pos+1];
|
||||
|
||||
$lastposx = $conftab[$pos];
|
||||
$lastposy = $conftab[$pos+1];
|
||||
|
||||
if ($dx < 0) {
|
||||
$deltas .= chr(ord('a')-1-$dx);
|
||||
} else if ($dx > 0) {
|
||||
$deltas .= chr(ord('A')-1+$dx);
|
||||
} else {
|
||||
$deltas .= '0';
|
||||
}
|
||||
|
||||
if ($dy < 0) {
|
||||
$deltas .= chr(ord('a')-1-$dy);
|
||||
} else if ($dy > 0) {
|
||||
$deltas .= chr(ord('A')-1+$dy);
|
||||
} else {
|
||||
$deltas .= '0';
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
$deltas = strtr($deltas, array(
|
||||
'00'=>'1',
|
||||
'aa'=>'2',
|
||||
'aA'=>'3',
|
||||
'Aa'=>'4',
|
||||
'AA'=>'5',
|
||||
'aB'=>'6',
|
||||
'Ab'=>'7',
|
||||
'bA'=>'8',
|
||||
'Ba'=>'9'
|
||||
));
|
||||
|
||||
$accumulated[$color.$opcode][] = join(',', array($px, $py, $deltas));
|
||||
} else if ($opcode == 'O') {
|
||||
$px = array_shift($ops);
|
||||
$py = array_shift($ops);
|
||||
|
||||
$accumulated[$color.$opcode][] = join(',', array($px, $py));
|
||||
}
|
||||
}
|
||||
|
||||
self::compact_points($accumulated['SR']);
|
||||
self::compact_points($accumulated['WR']);
|
||||
self::compact_points($accumulated['SP']);
|
||||
self::compact_points($accumulated['WP']);
|
||||
|
||||
self::compact_path($accumulated['SB']);
|
||||
self::compact_path($accumulated['WB']);
|
||||
|
||||
if (count($accumulated['SO']) > 0)
|
||||
$accumulated['SO'] = join(',',$accumulated['SO']);
|
||||
else $accumulated['SO'] = '';
|
||||
|
||||
$mapping = array(
|
||||
'SO'=>'O',
|
||||
'SB'=>'B',
|
||||
'WB'=>'b',
|
||||
'SR'=>'R',
|
||||
'WR'=>'r',
|
||||
'SP'=>'P',
|
||||
'WP'=>'p'
|
||||
);
|
||||
|
||||
$whole = array();
|
||||
|
||||
foreach($mapping as $key=>$symb) {
|
||||
if ($accumulated[$key]!='')
|
||||
$whole[] = $symb.','.$accumulated[$key];
|
||||
}
|
||||
|
||||
return join(',', $whole);
|
||||
}
|
||||
|
||||
|
||||
//----------------------------------------------------------------------
|
||||
public function getCanvasOps()
|
||||
{
|
||||
$ops = array();
|
||||
|
||||
foreach ($this->paths as $path) {
|
||||
switch ($path[0]) {
|
||||
case QR_AREA_PATH:
|
||||
$pNum = 0;
|
||||
|
||||
foreach($path[1] as $pathDetails) {
|
||||
if ($pNum == 0) {
|
||||
$ops[] = 'S';
|
||||
} else if ($pNum > 0) {
|
||||
$ops[] = 'W';
|
||||
}
|
||||
|
||||
$ops[] = 'B';
|
||||
|
||||
$px = array_shift($pathDetails);
|
||||
$py = array_shift($pathDetails);
|
||||
|
||||
$ops[] = 'M';
|
||||
$ops[] = $px;
|
||||
$ops[] = $py;
|
||||
|
||||
$rle_steps = array_shift($pathDetails);
|
||||
|
||||
$lastOp = '';
|
||||
|
||||
while(count($rle_steps) > 0) {
|
||||
|
||||
$delta = 1;
|
||||
|
||||
$operator = array_shift($rle_steps);
|
||||
if (($operator != 'R') && ($operator != 'L') && ($operator != 'T') && ($operator != 'B')) {
|
||||
$delta = (int)$operator;
|
||||
$operator = array_shift($rle_steps);
|
||||
}
|
||||
|
||||
if ($operator == 'R') $px += $delta;
|
||||
if ($operator == 'L') $px -= $delta;
|
||||
if ($operator == 'T') $py -= $delta;
|
||||
if ($operator == 'B') $py += $delta;
|
||||
|
||||
if ($lastOp != 'T')
|
||||
$ops[] = 'T';
|
||||
|
||||
$ops[] = $px;
|
||||
$ops[] = $py;
|
||||
|
||||
$lastOp = 'T';
|
||||
}
|
||||
|
||||
$ops[] = 'E';
|
||||
|
||||
$pNum++;
|
||||
}
|
||||
|
||||
break;
|
||||
case QR_AREA_POINT:
|
||||
|
||||
$symb = array_shift($path);
|
||||
|
||||
$ops[] = 'S';
|
||||
|
||||
$lastOp = '';
|
||||
|
||||
while(count($path) > 0) {
|
||||
$px = array_shift($path);
|
||||
$py = array_shift($path);
|
||||
|
||||
if ($lastOp != 'P')
|
||||
$ops[] = 'P';
|
||||
|
||||
$ops[] = $px;
|
||||
$ops[] = $py;
|
||||
|
||||
$lastOp = 'P';
|
||||
}
|
||||
|
||||
break;
|
||||
|
||||
case QR_AREA_RECT:
|
||||
|
||||
$symb = array_shift($path);
|
||||
|
||||
$ops[] = 'S';
|
||||
|
||||
$lastOp = '';
|
||||
|
||||
while(count($path) > 0) {
|
||||
$px = array_shift($path);
|
||||
$py = array_shift($path);
|
||||
$ex = array_shift($path);
|
||||
$ey = array_shift($path);
|
||||
|
||||
if ($lastOp != 'R')
|
||||
$ops[] = 'R';
|
||||
|
||||
$ops[] = $px;
|
||||
$ops[] = $py;
|
||||
$ops[] = $ex-$px;
|
||||
$ops[] = $ey-$py;
|
||||
|
||||
$lastOp = 'R';
|
||||
}
|
||||
|
||||
break;
|
||||
|
||||
case QR_AREA_LSHAPE:
|
||||
|
||||
$symb = array_shift($path);
|
||||
|
||||
while(count($path) > 0) {
|
||||
$px = array_shift($path);
|
||||
$py = array_shift($path);
|
||||
$mode = (int)array_shift($path);
|
||||
|
||||
$pxd = ($mode % 2)?1:0;
|
||||
$pyd = ($mode > 1)?1:0;
|
||||
|
||||
$ops[] = 'S';
|
||||
$ops[] = 'R';
|
||||
$ops[] = $px;
|
||||
$ops[] = $py;
|
||||
$ops[] = 2;
|
||||
$ops[] = 2;
|
||||
|
||||
$ops[] = 'W';
|
||||
$ops[] = 'P';
|
||||
$ops[] = $px+$pxd;
|
||||
$ops[] = $py+$pyd;
|
||||
}
|
||||
|
||||
break;
|
||||
|
||||
case QR_AREA_TRACKER:
|
||||
|
||||
$symb = array_shift($path);
|
||||
|
||||
$px = array_shift($path);
|
||||
$py = array_shift($path);
|
||||
|
||||
$ops[] = 'S';
|
||||
$ops[] = 'O';
|
||||
$ops[] = $px;
|
||||
$ops[] = $py;
|
||||
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
return self::compactCanvasCommands($ops);
|
||||
}
|
||||
}
|
||||
|
||||
/** @} */
|
||||
|
||||
Reference in New Issue
Block a user