1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
<?php
namespace EasyRdf\Literal;
/**
* EasyRdf
*
* LICENSE
*
* Copyright (c) 2009-2014 Nicholas J Humfrey. All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright notice,
* this list of conditions and the following disclaimer in the documentation
* and/or other materials provided with the distribution.
* 3. The name of the author 'Nicholas J Humfrey" may be used to endorse or
* promote products derived from this software without specific prior
* written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
* LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*
* @package EasyRdf
* @copyright Copyright (c) 2009-2014 Nicholas J Humfrey
* @license https://www.opensource.org/licenses/bsd-license.php
*/
use EasyRdf\Literal;
/**
* Class that represents an RDF Literal of datatype xsd:decimal
*
* @package EasyRdf
* @link http://www.w3.org/TR/xmlschema-2/#decimal
* @copyright Copyright (c) 2009-2014 Nicholas J Humfrey
* @license https://www.opensource.org/licenses/bsd-license.php
*/
class Decimal extends Literal
{
/**
* written according to http://www.w3.org/TR/xmlschema-2/#decimal
*/
const DECIMAL_REGEX = '^([+\-]?)(((\d+)?\.(\d+))|((\d+)\.?))$';
/** Constructor for creating a new decimal literal
*
* @param double|int|string $value The value of the literal
* @param string $lang Should be null (literals with a datatype can't have a language)
* @param string $datatype Optional datatype (default 'xsd:decimal')
*
* @throws \UnexpectedValueException
*/
public function __construct($value, $lang = null, $datatype = null)
{
if (is_string($value)) {
self::validate($value);
} elseif (is_double($value) or is_int($value)) {
$locale_data = localeconv();
$value = str_replace($locale_data['decimal_point'], '.', strval($value));
} else {
throw new \UnexpectedValueException('EasyRdf\Literal\Decimal expects int/float/string as value');
}
$value = self::canonicalise($value);
parent::__construct($value, null, $datatype);
}
/** Return the value of the literal cast to a PHP string
*
* @return string
*/
public function getValue()
{
return strval($this->value);
}
/**
* @param string $value
*
* @throws \UnexpectedValueException
*/
public static function validate($value)
{
if (!mb_ereg_match(self::DECIMAL_REGEX, $value)) {
throw new \UnexpectedValueException("'{$value}' doesn't look like a valid decimal");
}
}
/**
* Converts valid xsd:decimal literal to Canonical representation
* see http://www.w3.org/TR/xmlschema-2/#decimal
*
* @param string $value Valid xsd:decimal literal
*
* @return string
*/
public static function canonicalise($value)
{
$pieces = array();
mb_ereg(self::DECIMAL_REGEX, $value, $pieces);
$sign = $pieces[1] === '-' ? '-' : ''; // '+' is not allowed
$integer = ltrim(($pieces[4] !== false) ? $pieces[4] : $pieces[7], '0');
$fractional = rtrim($pieces[5], '0');
if (empty($integer)) {
$integer = '0';
}
if (empty($fractional)) {
$fractional = '0';
}
return "{$sign}{$integer}.{$fractional}";
}
}
|
