Subversion Repositories oidplus

Rev

Rev 277 | Go to most recent revision | Blame | Last modification | View Log | RSS feed

  1. <?php
  2.  
  3. /*
  4.  * OIDplus 2.0
  5.  * Copyright 2019 Daniel Marschall, ViaThinkSoft
  6.  *
  7.  * Licensed under the Apache License, Version 2.0 (the "License");
  8.  * you may not use this file except in compliance with the License.
  9.  * You may obtain a copy of the License at
  10.  *
  11.  *     http://www.apache.org/licenses/LICENSE-2.0
  12.  *
  13.  * Unless required by applicable law or agreed to in writing, software
  14.  * distributed under the License is distributed on an "AS IS" BASIS,
  15.  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  16.  * See the License for the specific language governing permissions and
  17.  * limitations under the License.
  18.  */
  19.  
  20. class OIDplusGs1 extends OIDplusObject {
  21.         private $number;
  22.  
  23.         public function __construct($number) {
  24.                 // TODO: syntax checks
  25.                 $this->number = $number;
  26.         }
  27.  
  28.         public static function parse($node_id) {
  29.                 @list($namespace, $number) = explode(':', $node_id, 2);
  30.                 if ($namespace !== 'gs1') return false;
  31.                 return new self($number);
  32.         }
  33.  
  34.         public static function objectTypeTitle() {
  35.                 return _L('GS1 Based IDs (GLN/GTIN/SSCC/...)');
  36.         }
  37.  
  38.         public static function objectTypeTitleShort() {
  39.                 return _L('GS1');
  40.         }
  41.  
  42.         public static function ns() {
  43.                 return 'gs1';
  44.         }
  45.  
  46.         public static function root() {
  47.                 return 'gs1:';
  48.         }
  49.  
  50.         public function isRoot() {
  51.                 return $this->number == '';
  52.         }
  53.  
  54.         public function nodeId($with_ns=true) {
  55.                 return $with_ns ? 'gs1:'.$this->number : $this->number;
  56.         }
  57.  
  58.         public function addString($str) {
  59.                 if (!preg_match('@^\\d+$@', $str, $m)) {
  60.                         throw new OIDplusException(_L('GS1 value needs to be numeric'));
  61.                 }
  62.  
  63.                 return $this->nodeId() . $str;
  64.         }
  65.  
  66.         public function crudShowId(OIDplusObject $parent) {
  67.                 return $this->chunkedNotation(false);
  68.         }
  69.  
  70.         public function crudInsertPrefix() {
  71.                 return $this->isRoot() ? '' : $this->chunkedNotation(false);
  72.         }
  73.  
  74.         public function jsTreeNodeName(OIDplusObject $parent = null) {
  75.                 if ($parent == null) return $this->objectTypeTitle();
  76.                 return substr($this->nodeId(), strlen($parent->nodeId()));
  77.         }
  78.  
  79.         public function defaultTitle() {
  80.                 return $this->number;
  81.         }
  82.  
  83.         public function isLeafNode() {
  84.                 return !$this->isBaseOnly();
  85.         }
  86.  
  87.         public function getContentPage(&$title, &$content, &$icon) {
  88.                 $icon = file_exists(__DIR__.'/icon_big.png') ? 'plugins/objectTypes/'.basename(__DIR__).'/icon_big.png' : '';
  89.  
  90.                 if ($this->isRoot()) {
  91.                         $title = OIDplusGs1::objectTypeTitle();
  92.  
  93.                         $res = OIDplus::db()->query("select * from ###objects where parent = ?", array(self::root()));
  94.                         if ($res->num_rows() > 0) {
  95.                                 $content  = _L('Please select an item in the tree view at the left to show its contents.');
  96.                         } else {
  97.                                 $content  = _L('Currently, no GS1 based numbers are registered in the system.');
  98.                         }
  99.  
  100.                         if (!$this->isLeafNode()) {
  101.                                 if (OIDplus::authUtils()::isAdminLoggedIn()) {
  102.                                         $content .= '<h2>'._L('Manage root objects').'</h2>';
  103.                                 } else {
  104.                                         $content .= '<h2>'._L('Available objects').'</h2>';
  105.                                 }
  106.                                 $content .= '%%CRUD%%';
  107.                         }
  108.                 } else {
  109.                         $title = $this->getTitle();
  110.  
  111.                         if ($this->isLeafNode()) {
  112.                                 $chunked = $this->chunkedNotation(true);
  113.                                 $checkDigit = $this->checkDigit();
  114.                                 $content = '<h2>'.$chunked.' - <abbr title="'._L('check digit').'">'.$checkDigit.'</abbr></h2>';
  115.                                 $content .= '<p><a target="_blank" href="https://www.ean-search.org/?q='.htmlentities($this->fullNumber()).'">'._L('Lookup at ean-search.org').'</a></p>';
  116.                                 $content .= '<img src="plugins/objectTypes/'.basename(__DIR__).'/barcode.php?number='.urlencode($this->fullNumber()).'">';
  117.                                 $content .= '<h2>'._L('Description').'</h2>%%DESC%%'; // TODO: add more meta information about the object type
  118.                         } else {
  119.                                 $chunked = $this->chunkedNotation(true);
  120.                                 $content = '<h2>'.$chunked.'</h2>';
  121.                                 $content .= '<h2>'._L('Description').'</h2>%%DESC%%'; // TODO: add more meta information about the object type
  122.                                 if ($this->userHasWriteRights()) {
  123.                                         $content .= '<h2>'._L('Create or change subsequent objects').'</h2>';
  124.                                 } else {
  125.                                         $content .= '<h2>'._L('Subsequent objects').'</h2>';
  126.                                 }
  127.                                 $content .= '%%CRUD%%';
  128.                         }
  129.                 }
  130.         }
  131.  
  132.         # ---
  133.  
  134.         public function isBaseOnly() {
  135.                 return strlen($this->number) <= 7;
  136.         }
  137.  
  138.         public function chunkedNotation($withAbbr=true) {
  139.                 $curid = 'gs1:'.$this->number;
  140.  
  141.                 $res = OIDplus::db()->query("select id, title from ###objects where id = ?", array($curid));
  142.                 if ($res->num_rows() == 0) return $this->number();
  143.  
  144.                 $hints = array();
  145.                 $lengths = array(strlen($curid));
  146.                 while (($res = OIDplus::db()->query("select parent, title from ###objects where id = ?", array($curid)))->num_rows() > 0) {
  147.                         $row = $res->fetch_array();
  148.                         $curid = $row['parent'];
  149.                         $hints[] = $row['title'];
  150.                         $lengths[] = strlen($curid);
  151.                 }
  152.  
  153.                 array_shift($lengths);
  154.                 $chunks = array();
  155.  
  156.                 $full = 'gs1:'.$this->number;
  157.                 foreach ($lengths as $len) {
  158.                         $chunks[] = substr($full, $len);
  159.                         $full = substr($full, 0, $len);
  160.                 }
  161.  
  162.                 $hints = array_reverse($hints);
  163.                 $chunks = array_reverse($chunks);
  164.  
  165.                 $full = array();
  166.                 foreach ($chunks as $c) {
  167.                         $full[] = $withAbbr ? '<abbr title="'.htmlentities(array_shift($hints)).'">'.$c.'</abbr>' : $c;
  168.                 }
  169.                 return implode(' ', $full);
  170.         }
  171.  
  172.         public function fullNumber() {
  173.                 return $this->number . $this->checkDigit();
  174.         }
  175.  
  176.         public function checkDigit() {
  177.                 $mul = 3;
  178.                 $sum = 0;
  179.                 for ($i=strlen($this->number)-1; $i>=0; $i--) {
  180.                         $sum += $this->number[$i] * $mul;
  181.                         $mul = $mul == 3 ? 1 : 3;
  182.                 }
  183.                 return 10 - ($sum % 10);
  184.         }
  185.  
  186.         public function one_up() {
  187.                 return  OIDplusObject::parse($this->ns().':'.substr($this->number,0,strlen($this->number)-1));
  188.         }
  189.  
  190.         private static function distance_($a, $b) {
  191.                 $min_len = min(strlen($a), strlen($b));
  192.  
  193.                 for ($i=0; $i<$min_len; $i++) {
  194.                         if ($a[$i] != $b[$i]) return false;
  195.                 }
  196.  
  197.                 return strlen($a) - strlen($b);
  198.         }
  199.  
  200.         public function distance($to) {
  201.                 if (!is_object($to)) $to = OIDplusObject::parse($to);
  202.                 if (!($to instanceof $this)) return false;
  203.  
  204.                 // This is pretty tricky, because the whois service should accept GS1 numbers with and without checksum
  205.                 if ($this->number == $to->number) return 0;
  206.                 if ($this->number.$this->checkDigit() == $to->number) return 0;
  207.                 if ($this->number == $to->number.$to->checkDigit()) return 0;
  208.  
  209.                 $b = $this->number;
  210.                 $a = $to->number;
  211.                 $tmp = self::distance_($a, $b);
  212.                 if ($tmp != false) return $tmp;
  213.  
  214.                 $b = $this->number.$this->checkDigit();
  215.                 $a = $to->number;
  216.                 $tmp = self::distance_($a, $b);
  217.                 if ($tmp != false) return $tmp;
  218.  
  219.                 $b = $this->number;
  220.                 $a = $to->number.$to->checkDigit();
  221.                 $tmp = self::distance_($a, $b);
  222.                 if ($tmp != false) return $tmp;
  223.  
  224.                 return null;
  225.         }
  226. }