Caudalie/Git-Center
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
master
Git-Center/File/ASN1.php

1370 lines
55 KiB
PHP
Raw Permalink Normal View History

Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
<?php
/**
* Pure-PHP ASN.1 Parser
*
* PHP versions 4 and 5
*
* ASN.1 provides the semantics for data encoded using various schemes. The most commonly
* utilized scheme is DER or the "Distinguished Encoding Rules". PEM's are base64 encoded
* DER blobs.
*
* File_ASN1 decodes and encodes DER formatted messages and places them in a semantic context.
*
* Uses the 1988 ASN.1 syntax.
*
* LICENSE: Permission is hereby granted, free of charge, to any person obtaining a copy
* of this software and associated documentation files (the "Software"), to deal
* in the Software without restriction, including without limitation the rights
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
* copies of the Software, and to permit persons to whom the Software is
* furnished to do so, subject to the following conditions:
Update PHPseclib
2014-10-27 10:55:27 +00:00
*
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* The above copyright notice and this permission notice shall be included in
* all copies or substantial portions of the Software.
Update PHPseclib
2014-10-27 10:55:27 +00:00
*
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
* THE SOFTWARE.
*
Update PHPseclib
2014-10-27 10:55:27 +00:00
* @category File
* @package File_ASN1
* @author Jim Wigginton <terrafrost@php.net>
Update phpseclib
2015-08-13 13:21:19 +00:00
* @copyright 2012 Jim Wigginton
Update PHPseclib
2014-10-27 10:55:27 +00:00
* @license http://www.opensource.org/licenses/mit-license.html MIT License
* @link http://phpseclib.sourceforge.net
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
*/
/**#@+
* Tag Classes
*
* @access private
* @link http://www.itu.int/ITU-T/studygroups/com17/languages/X.690-0207.pdf#page=12
*/
define('FILE_ASN1_CLASS_UNIVERSAL', 0);
define('FILE_ASN1_CLASS_APPLICATION', 1);
define('FILE_ASN1_CLASS_CONTEXT_SPECIFIC', 2);
define('FILE_ASN1_CLASS_PRIVATE', 3);
/**#@-*/
/**#@+
* Tag Classes
*
* @access private
* @link http://www.obj-sys.com/asn1tutorial/node124.html
*/
Update PHPseclib
2014-10-27 10:55:27 +00:00
define('FILE_ASN1_TYPE_BOOLEAN', 1);
define('FILE_ASN1_TYPE_INTEGER', 2);
define('FILE_ASN1_TYPE_BIT_STRING', 3);
define('FILE_ASN1_TYPE_OCTET_STRING', 4);
define('FILE_ASN1_TYPE_NULL', 5);
define('FILE_ASN1_TYPE_OBJECT_IDENTIFIER', 6);
//define('FILE_ASN1_TYPE_OBJECT_DESCRIPTOR', 7);
//define('FILE_ASN1_TYPE_INSTANCE_OF', 8); // EXTERNAL
define('FILE_ASN1_TYPE_REAL', 9);
define('FILE_ASN1_TYPE_ENUMERATED', 10);
//define('FILE_ASN1_TYPE_EMBEDDED', 11);
define('FILE_ASN1_TYPE_UTF8_STRING', 12);
//define('FILE_ASN1_TYPE_RELATIVE_OID', 13);
define('FILE_ASN1_TYPE_SEQUENCE', 16); // SEQUENCE OF
define('FILE_ASN1_TYPE_SET', 17); // SET OF
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
/**#@-*/
/**#@+
* More Tag Classes
*
* @access private
* @link http://www.obj-sys.com/asn1tutorial/node10.html
*/
Update PHPseclib
2014-10-27 10:55:27 +00:00
define('FILE_ASN1_TYPE_NUMERIC_STRING', 18);
define('FILE_ASN1_TYPE_PRINTABLE_STRING', 19);
define('FILE_ASN1_TYPE_TELETEX_STRING', 20); // T61String
define('FILE_ASN1_TYPE_VIDEOTEX_STRING', 21);
define('FILE_ASN1_TYPE_IA5_STRING', 22);
define('FILE_ASN1_TYPE_UTC_TIME', 23);
define('FILE_ASN1_TYPE_GENERALIZED_TIME', 24);
define('FILE_ASN1_TYPE_GRAPHIC_STRING', 25);
define('FILE_ASN1_TYPE_VISIBLE_STRING', 26); // ISO646String
define('FILE_ASN1_TYPE_GENERAL_STRING', 27);
define('FILE_ASN1_TYPE_UNIVERSAL_STRING', 28);
//define('FILE_ASN1_TYPE_CHARACTER_STRING', 29);
define('FILE_ASN1_TYPE_BMP_STRING', 30);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
/**#@-*/
/**#@+
* Tag Aliases
*
* These tags are kinda place holders for other tags.
*
* @access private
*/
define('FILE_ASN1_TYPE_CHOICE', -1);
define('FILE_ASN1_TYPE_ANY', -2);
/**#@-*/
/**
* ASN.1 Element
*
* Bypass normal encoding rules in File_ASN1::encodeDER()
*
Update PHPseclib
2014-10-27 10:55:27 +00:00
* @package File_ASN1
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @author Jim Wigginton <terrafrost@php.net>
* @access public
*/
Update PHPseclib
2014-10-27 10:55:27 +00:00
class File_ASN1_Element
{
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
/**
* Raw element value
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @var string
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access private
*/
var $element;
/**
* Constructor
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param string $encoded
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @return File_ASN1_Element
* @access public
*/
function File_ASN1_Element($encoded)
{
$this->element = $encoded;
}
}
/**
* Pure-PHP ASN.1 Parser
*
Update PHPseclib
2014-10-27 10:55:27 +00:00
* @package File_ASN1
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @author Jim Wigginton <terrafrost@php.net>
* @access public
*/
Update PHPseclib
2014-10-27 10:55:27 +00:00
class File_ASN1
{
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
/**
* ASN.1 object identifier
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @var array
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access private
* @link http://en.wikipedia.org/wiki/Object_identifier
*/
var $oids = array();
/**
* Default date format
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @var string
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access private
* @link http://php.net/class.datetime
*/
Update PHPseclib
2014-10-27 10:55:27 +00:00
var $format = 'D, d M Y H:i:s O';
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
/**
* Default date format
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @var array
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access private
Update phpseclib
2016-01-22 15:24:35 +00:00
* @see self::setTimeFormat()
* @see self::asn1map()
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @link http://php.net/class.datetime
*/
var $encoded;
/**
* Filters
*
* If the mapping type is FILE_ASN1_TYPE_ANY what do we actually encode it as?
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @var array
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access private
Update phpseclib
2016-01-22 15:24:35 +00:00
* @see self::_encode_der()
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
*/
var $filters;
/**
* Type mapping table for the ANY type.
*
* Structured or unknown types are mapped to a FILE_ASN1_Element.
* Unambiguous types get the direct mapping (int/real/bool).
* Others are mapped as a choice, with an extra indexing level.
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @var array
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access public
*/
var $ANYmap = array(
FILE_ASN1_TYPE_BOOLEAN => true,
FILE_ASN1_TYPE_INTEGER => true,
FILE_ASN1_TYPE_BIT_STRING => 'bitString',
FILE_ASN1_TYPE_OCTET_STRING => 'octetString',
FILE_ASN1_TYPE_NULL => 'null',
FILE_ASN1_TYPE_OBJECT_IDENTIFIER => 'objectIdentifier',
FILE_ASN1_TYPE_REAL => true,
FILE_ASN1_TYPE_ENUMERATED => 'enumerated',
FILE_ASN1_TYPE_UTF8_STRING => 'utf8String',
FILE_ASN1_TYPE_NUMERIC_STRING => 'numericString',
FILE_ASN1_TYPE_PRINTABLE_STRING => 'printableString',
FILE_ASN1_TYPE_TELETEX_STRING => 'teletexString',
FILE_ASN1_TYPE_VIDEOTEX_STRING => 'videotexString',
FILE_ASN1_TYPE_IA5_STRING => 'ia5String',
FILE_ASN1_TYPE_UTC_TIME => 'utcTime',
FILE_ASN1_TYPE_GENERALIZED_TIME => 'generalTime',
FILE_ASN1_TYPE_GRAPHIC_STRING => 'graphicString',
FILE_ASN1_TYPE_VISIBLE_STRING => 'visibleString',
FILE_ASN1_TYPE_GENERAL_STRING => 'generalString',
FILE_ASN1_TYPE_UNIVERSAL_STRING => 'universalString',
//FILE_ASN1_TYPE_CHARACTER_STRING => 'characterString',
FILE_ASN1_TYPE_BMP_STRING => 'bmpString'
);
/**
* String type to character size mapping table.
*
* Non-convertable types are absent from this table.
* size == 0 indicates variable length encoding.
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @var array
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access public
*/
var $stringTypeSize = array(
FILE_ASN1_TYPE_UTF8_STRING => 0,
FILE_ASN1_TYPE_BMP_STRING => 2,
FILE_ASN1_TYPE_UNIVERSAL_STRING => 4,
FILE_ASN1_TYPE_PRINTABLE_STRING => 1,
FILE_ASN1_TYPE_TELETEX_STRING => 1,
FILE_ASN1_TYPE_IA5_STRING => 1,
FILE_ASN1_TYPE_VISIBLE_STRING => 1,
);
/**
* Default Constructor.
*
* @access public
*/
function File_ASN1()
{
static $static_init = null;
if (!$static_init) {
$static_init = true;
if (!class_exists('Math_BigInteger')) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
include_once 'Math/BigInteger.php';
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
}
}
/**
* Parse BER-encoding
*
* Serves a similar purpose to openssl's asn1parse
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param string $encoded
* @return array
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access public
*/
function decodeBER($encoded)
{
if (is_object($encoded) && strtolower(get_class($encoded)) == 'file_asn1_element') {
$encoded = $encoded->element;
}
$this->encoded = $encoded;
Update PHPseclib
2014-10-27 10:55:27 +00:00
// encapsulate in an array for BC with the old decodeBER
return array($this->_decode_ber($encoded));
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
/**
* Parse BER-encoding (Helper function)
*
* Sometimes we want to get the BER encoding of a particular tag. $start lets us do that without having to reencode.
* $encoded is passed by reference for the recursive calls done for FILE_ASN1_TYPE_BIT_STRING and
* FILE_ASN1_TYPE_OCTET_STRING. In those cases, the indefinite length is used.
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param string $encoded
* @param int $start
* @return array
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access private
*/
Update PHPseclib
2014-10-27 10:55:27 +00:00
function _decode_ber($encoded, $start = 0)
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
{
Update PHPseclib
2014-10-27 10:55:27 +00:00
$current = array('start' => $start);
$type = ord($this->_string_shift($encoded));
$start++;
$constructed = ($type >> 5) & 1;
$tag = $type & 0x1F;
if ($tag == 0x1F) {
$tag = 0;
// process septets (since the eighth bit is ignored, it's not an octet)
do {
$loop = ord($encoded[0]) >> 7;
$tag <<= 7;
$tag |= ord($this->_string_shift($encoded)) & 0x7F;
$start++;
Update phpseclib
2015-08-13 13:21:19 +00:00
} while ($loop);
Update PHPseclib
2014-10-27 10:55:27 +00:00
}
// Length, as discussed in paragraph 8.1.3 of X.690-0207.pdf#page=13
$length = ord($this->_string_shift($encoded));
$start++;
Update phpseclib
2015-08-13 13:21:19 +00:00
if ($length == 0x80) { // indefinite length
Update PHPseclib
2014-10-27 10:55:27 +00:00
// "[A sender shall] use the indefinite form (see 8.1.3.6) if the encoding is constructed and is not all
// immediately available." -- paragraph 8.1.3.2.c
$length = strlen($encoded);
Update phpseclib
2015-08-13 13:21:19 +00:00
} elseif ($length & 0x80) { // definite length, long form
Update PHPseclib
2014-10-27 10:55:27 +00:00
// technically, the long form of the length can be represented by up to 126 octets (bytes), but we'll only
// support it up to four.
$length&= 0x7F;
$temp = $this->_string_shift($encoded, $length);
// tags of indefinte length don't really have a header length; this length includes the tag
$current+= array('headerlength' => $length + 2);
$start+= $length;
extract(unpack('Nlength', substr(str_pad($temp, 4, chr(0), STR_PAD_LEFT), -4)));
} else {
$current+= array('headerlength' => 2);
}
Update phpseclib
2015-08-13 13:21:19 +00:00
if ($length > strlen($encoded)) {
return false;
}
Update PHPseclib
2014-10-27 10:55:27 +00:00
$content = $this->_string_shift($encoded, $length);
// at this point $length can be overwritten. it's only accurate for definite length things as is
/* Class is UNIVERSAL, APPLICATION, PRIVATE, or CONTEXT-SPECIFIC. The UNIVERSAL class is restricted to the ASN.1
built-in types. It defines an application-independent data type that must be distinguishable from all other
data types. The other three classes are user defined. The APPLICATION class distinguishes data types that
have a wide, scattered use within a particular presentation context. PRIVATE distinguishes data types within
a particular organization or country. CONTEXT-SPECIFIC distinguishes members of a sequence or set, the
alternatives of a CHOICE, or universally tagged set members. Only the class number appears in braces for this
data type; the term CONTEXT-SPECIFIC does not appear.
-- http://www.obj-sys.com/asn1tutorial/node12.html */
$class = ($type >> 6) & 3;
switch ($class) {
case FILE_ASN1_CLASS_APPLICATION:
case FILE_ASN1_CLASS_PRIVATE:
case FILE_ASN1_CLASS_CONTEXT_SPECIFIC:
Update phpseclib
2015-08-13 13:21:19 +00:00
if (!$constructed) {
return array(
'type' => $class,
'constant' => $tag,
'content' => $content,
'length' => $length + $start - $current['start']
);
Update PHPseclib
2014-10-27 10:55:27 +00:00
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
Update phpseclib
2015-08-13 13:21:19 +00:00
$newcontent = array();
$remainingLength = $length;
while ($remainingLength > 0) {
$temp = $this->_decode_ber($content, $start);
$length = $temp['length'];
// end-of-content octets - see paragraph 8.1.5
if (substr($content, $length, 2) == "\0\0") {
$length+= 2;
$start+= $length;
$newcontent[] = $temp;
break;
}
$start+= $length;
$remainingLength-= $length;
$newcontent[] = $temp;
$this->_string_shift($content, $length);
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
Update PHPseclib
2014-10-27 10:55:27 +00:00
return array(
'type' => $class,
'constant' => $tag,
// the array encapsulation is for BC with the old format
Update phpseclib
2015-08-13 13:21:19 +00:00
'content' => $newcontent,
Update PHPseclib
2014-10-27 10:55:27 +00:00
// the only time when $content['headerlength'] isn't defined is when the length is indefinite.
// the absence of $content['headerlength'] is how we know if something is indefinite or not.
// technically, it could be defined to be 2 and then another indicator could be used but whatever.
'length' => $start - $current['start']
) + $current;
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
Update PHPseclib
2014-10-27 10:55:27 +00:00
$current+= array('type' => $tag);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
Update PHPseclib
2014-10-27 10:55:27 +00:00
// decode UNIVERSAL tags
switch ($tag) {
case FILE_ASN1_TYPE_BOOLEAN:
// "The contents octets shall consist of a single octet." -- paragraph 8.2.1
//if (strlen($content) != 1) {
// return false;
//}
$current['content'] = (bool) ord($content[0]);
break;
case FILE_ASN1_TYPE_INTEGER:
case FILE_ASN1_TYPE_ENUMERATED:
$current['content'] = new Math_BigInteger($content, -256);
break;
case FILE_ASN1_TYPE_REAL: // not currently supported
return false;
case FILE_ASN1_TYPE_BIT_STRING:
// The initial octet shall encode, as an unsigned binary integer with bit 1 as the least significant bit,
// the number of unused bits in the final subsequent octet. The number shall be in the range zero to
// seven.
if (!$constructed) {
$current['content'] = $content;
} else {
$temp = $this->_decode_ber($content, $start);
$length-= strlen($content);
$last = count($temp) - 1;
for ($i = 0; $i < $last; $i++) {
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
// all subtags should be bit strings
Update PHPseclib
2014-10-27 10:55:27 +00:00
//if ($temp[$i]['type'] != FILE_ASN1_TYPE_BIT_STRING) {
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
// return false;
//}
Update PHPseclib
2014-10-27 10:55:27 +00:00
$current['content'].= substr($temp[$i]['content'], 1);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
Update PHPseclib
2014-10-27 10:55:27 +00:00
// all subtags should be bit strings
//if ($temp[$last]['type'] != FILE_ASN1_TYPE_BIT_STRING) {
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
// return false;
//}
Update PHPseclib
2014-10-27 10:55:27 +00:00
$current['content'] = $temp[$last]['content'][0] . $current['content'] . substr($temp[$i]['content'], 1);
}
break;
case FILE_ASN1_TYPE_OCTET_STRING:
if (!$constructed) {
$current['content'] = $content;
} else {
$current['content'] = '';
$length = 0;
while (substr($content, 0, 2) != "\0\0") {
$temp = $this->_decode_ber($content, $length + $start);
$this->_string_shift($content, $temp['length']);
// all subtags should be octet strings
//if ($temp['type'] != FILE_ASN1_TYPE_OCTET_STRING) {
// return false;
//}
$current['content'].= $temp['content'];
$length+= $temp['length'];
}
if (substr($content, 0, 2) == "\0\0") {
$length+= 2; // +2 for the EOC
}
}
break;
case FILE_ASN1_TYPE_NULL:
// "The contents octets shall not contain any octets." -- paragraph 8.8.2
//if (strlen($content)) {
// return false;
//}
break;
case FILE_ASN1_TYPE_SEQUENCE:
case FILE_ASN1_TYPE_SET:
$offset = 0;
$current['content'] = array();
while (strlen($content)) {
// if indefinite length construction was used and we have an end-of-content string next
// see paragraphs 8.1.1.3, 8.1.3.2, 8.1.3.6, 8.1.5, and (for an example) 8.6.4.2
if (!isset($current['headerlength']) && substr($content, 0, 2) == "\0\0") {
$length = $offset + 2; // +2 for the EOC
break 2;
}
$temp = $this->_decode_ber($content, $start + $offset);
$this->_string_shift($content, $temp['length']);
$current['content'][] = $temp;
$offset+= $temp['length'];
}
break;
case FILE_ASN1_TYPE_OBJECT_IDENTIFIER:
$temp = ord($this->_string_shift($content));
$current['content'] = sprintf('%d.%d', floor($temp / 40), $temp % 40);
$valuen = 0;
// process septets
while (strlen($content)) {
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
$temp = ord($this->_string_shift($content));
Update PHPseclib
2014-10-27 10:55:27 +00:00
$valuen <<= 7;
$valuen |= $temp & 0x7F;
if (~$temp & 0x80) {
$current['content'].= ".$valuen";
$valuen = 0;
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
Update PHPseclib
2014-10-27 10:55:27 +00:00
}
// the eighth bit of the last byte should not be 1
//if ($temp >> 7) {
// return false;
//}
break;
/* Each character string type shall be encoded as if it had been declared:
[UNIVERSAL x] IMPLICIT OCTET STRING
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
Update PHPseclib
2014-10-27 10:55:27 +00:00
-- X.690-0207.pdf#page=23 (paragraph 8.21.3)
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
Update PHPseclib
2014-10-27 10:55:27 +00:00
Per that, we're not going to do any validation. If there are any illegal characters in the string,
we don't really care */
case FILE_ASN1_TYPE_NUMERIC_STRING:
// 0,1,2,3,4,5,6,7,8,9, and space
case FILE_ASN1_TYPE_PRINTABLE_STRING:
// Upper and lower case letters, digits, space, apostrophe, left/right parenthesis, plus sign, comma,
// hyphen, full stop, solidus, colon, equal sign, question mark
case FILE_ASN1_TYPE_TELETEX_STRING:
// The Teletex character set in CCITT's T61, space, and delete
// see http://en.wikipedia.org/wiki/Teletex#Character_sets
case FILE_ASN1_TYPE_VIDEOTEX_STRING:
// The Videotex character set in CCITT's T.100 and T.101, space, and delete
case FILE_ASN1_TYPE_VISIBLE_STRING:
// Printing character sets of international ASCII, and space
case FILE_ASN1_TYPE_IA5_STRING:
// International Alphabet 5 (International ASCII)
case FILE_ASN1_TYPE_GRAPHIC_STRING:
// All registered G sets, and space
case FILE_ASN1_TYPE_GENERAL_STRING:
// All registered C and G sets, space and delete
case FILE_ASN1_TYPE_UTF8_STRING:
// ????
case FILE_ASN1_TYPE_BMP_STRING:
$current['content'] = $content;
break;
case FILE_ASN1_TYPE_UTC_TIME:
case FILE_ASN1_TYPE_GENERALIZED_TIME:
$current['content'] = $this->_decodeTime($content, $tag);
default:
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
Update PHPseclib
2014-10-27 10:55:27 +00:00
$start+= $length;
// ie. length is the length of the full TLV encoding - it's not just the length of the value
return $current + array('length' => $start - $current['start']);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
/**
Update PHPseclib
2014-10-27 10:55:27 +00:00
* ASN.1 Map
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
*
* Provides an ASN.1 semantic mapping ($mapping) from a parsed BER-encoding to a human readable format.
*
Update PHPseclib
2014-10-27 10:55:27 +00:00
* "Special" mappings may be applied on a per tag-name basis via $special.
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param array $decoded
* @param array $mapping
* @param array $special
* @return array
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access public
*/
Update PHPseclib
2014-10-27 10:55:27 +00:00
function asn1map($decoded, $mapping, $special = array())
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
{
Update PHPseclib
2014-10-27 10:55:27 +00:00
if (isset($mapping['explicit']) && is_array($decoded['content'])) {
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
$decoded = $decoded['content'][0];
}
switch (true) {
case $mapping['type'] == FILE_ASN1_TYPE_ANY:
$intype = $decoded['type'];
if (isset($decoded['constant']) || !isset($this->ANYmap[$intype]) || ($this->encoded[$decoded['start']] & 0x20)) {
return new File_ASN1_Element(substr($this->encoded, $decoded['start'], $decoded['length']));
}
$inmap = $this->ANYmap[$intype];
if (is_string($inmap)) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
return array($inmap => $this->asn1map($decoded, array('type' => $intype) + $mapping, $special));
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
break;
case $mapping['type'] == FILE_ASN1_TYPE_CHOICE:
foreach ($mapping['children'] as $key => $option) {
switch (true) {
case isset($option['constant']) && $option['constant'] == $decoded['constant']:
case !isset($option['constant']) && $option['type'] == $decoded['type']:
Update PHPseclib
2014-10-27 10:55:27 +00:00
$value = $this->asn1map($decoded, $option, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
break;
case !isset($option['constant']) && $option['type'] == FILE_ASN1_TYPE_CHOICE:
Update PHPseclib
2014-10-27 10:55:27 +00:00
$v = $this->asn1map($decoded, $option, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
if (isset($v)) {
$value = $v;
}
}
if (isset($value)) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
if (isset($special[$key])) {
$value = call_user_func($special[$key], $value);
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
return array($key => $value);
}
}
Update PHPseclib
2014-10-27 10:55:27 +00:00
return null;
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
case isset($mapping['implicit']):
case isset($mapping['explicit']):
case $decoded['type'] == $mapping['type']:
break;
default:
Update PHPseclib
2014-10-27 10:55:27 +00:00
// if $decoded['type'] and $mapping['type'] are both strings, but different types of strings,
// let it through
switch (true) {
case $decoded['type'] < 18: // FILE_ASN1_TYPE_NUMERIC_STRING == 18
case $decoded['type'] > 30: // FILE_ASN1_TYPE_BMP_STRING == 30
case $mapping['type'] < 18:
case $mapping['type'] > 30:
return null;
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
if (isset($mapping['implicit'])) {
$decoded['type'] = $mapping['type'];
}
switch ($decoded['type']) {
case FILE_ASN1_TYPE_SEQUENCE:
$map = array();
// ignore the min and max
if (isset($mapping['min']) && isset($mapping['max'])) {
$child = $mapping['children'];
foreach ($decoded['content'] as $content) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
if (($map[] = $this->asn1map($content, $child, $special)) === null) {
return null;
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
}
return $map;
}
$n = count($decoded['content']);
$i = 0;
foreach ($mapping['children'] as $key => $child) {
$maymatch = $i < $n; // Match only existing input.
if ($maymatch) {
$temp = $decoded['content'][$i];
if ($child['type'] != FILE_ASN1_TYPE_CHOICE) {
// Get the mapping and input class & constant.
$childClass = $tempClass = FILE_ASN1_CLASS_UNIVERSAL;
Update PHPseclib
2014-10-27 10:55:27 +00:00
$constant = null;
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
if (isset($temp['constant'])) {
$tempClass = isset($temp['class']) ? $temp['class'] : FILE_ASN1_CLASS_CONTEXT_SPECIFIC;
}
if (isset($child['class'])) {
$childClass = $child['class'];
$constant = $child['cast'];
Update PHPseclib
2014-10-27 10:55:27 +00:00
} elseif (isset($child['constant'])) {
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
$childClass = FILE_ASN1_CLASS_CONTEXT_SPECIFIC;
$constant = $child['constant'];
}
if (isset($constant) && isset($temp['constant'])) {
// Can only match if constants and class match.
$maymatch = $constant == $temp['constant'] && $childClass == $tempClass;
} else {
// Can only match if no constant expected and type matches or is generic.
$maymatch = !isset($child['constant']) && array_search($child['type'], array($temp['type'], FILE_ASN1_TYPE_ANY, FILE_ASN1_TYPE_CHOICE)) !== false;
}
}
}
if ($maymatch) {
// Attempt submapping.
Update PHPseclib
2014-10-27 10:55:27 +00:00
$candidate = $this->asn1map($temp, $child, $special);
$maymatch = $candidate !== null;
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
if ($maymatch) {
// Got the match: use it.
Update PHPseclib
2014-10-27 10:55:27 +00:00
if (isset($special[$key])) {
$candidate = call_user_func($special[$key], $candidate);
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
$map[$key] = $candidate;
$i++;
} elseif (isset($child['default'])) {
$map[$key] = $child['default']; // Use default.
} elseif (!isset($child['optional'])) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
return null; // Syntax error.
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
}
// Fail mapping if all input items have not been consumed.
Update phpseclib
2016-01-22 15:24:35 +00:00
return $i < $n ? null: $map;
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
// the main diff between sets and sequences is the encapsulation of the foreach in another for loop
case FILE_ASN1_TYPE_SET:
$map = array();
// ignore the min and max
if (isset($mapping['min']) && isset($mapping['max'])) {
$child = $mapping['children'];
foreach ($decoded['content'] as $content) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
if (($map[] = $this->asn1map($content, $child, $special)) === null) {
return null;
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
}
return $map;
}
for ($i = 0; $i < count($decoded['content']); $i++) {
$temp = $decoded['content'][$i];
$tempClass = FILE_ASN1_CLASS_UNIVERSAL;
if (isset($temp['constant'])) {
$tempClass = isset($temp['class']) ? $temp['class'] : FILE_ASN1_CLASS_CONTEXT_SPECIFIC;
}
foreach ($mapping['children'] as $key => $child) {
if (isset($map[$key])) {
continue;
}
$maymatch = true;
if ($child['type'] != FILE_ASN1_TYPE_CHOICE) {
$childClass = FILE_ASN1_CLASS_UNIVERSAL;
Update PHPseclib
2014-10-27 10:55:27 +00:00
$constant = null;
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
if (isset($child['class'])) {
$childClass = $child['class'];
$constant = $child['cast'];
Update PHPseclib
2014-10-27 10:55:27 +00:00
} elseif (isset($child['constant'])) {
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
$childClass = FILE_ASN1_CLASS_CONTEXT_SPECIFIC;
$constant = $child['constant'];
}
if (isset($constant) && isset($temp['constant'])) {
// Can only match if constants and class match.
$maymatch = $constant == $temp['constant'] && $childClass == $tempClass;
} else {
// Can only match if no constant expected and type matches or is generic.
$maymatch = !isset($child['constant']) && array_search($child['type'], array($temp['type'], FILE_ASN1_TYPE_ANY, FILE_ASN1_TYPE_CHOICE)) !== false;
}
}
if ($maymatch) {
// Attempt submapping.
Update PHPseclib
2014-10-27 10:55:27 +00:00
$candidate = $this->asn1map($temp, $child, $special);
$maymatch = $candidate !== null;
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
if (!$maymatch) {
break;
}
// Got the match: use it.
Update PHPseclib
2014-10-27 10:55:27 +00:00
if (isset($special[$key])) {
$candidate = call_user_func($special[$key], $candidate);
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
$map[$key] = $candidate;
break;
}
}
foreach ($mapping['children'] as $key => $child) {
if (!isset($map[$key])) {
if (isset($child['default'])) {
$map[$key] = $child['default'];
} elseif (!isset($child['optional'])) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
return null;
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
}
}
return $map;
case FILE_ASN1_TYPE_OBJECT_IDENTIFIER:
return isset($this->oids[$decoded['content']]) ? $this->oids[$decoded['content']] : $decoded['content'];
case FILE_ASN1_TYPE_UTC_TIME:
case FILE_ASN1_TYPE_GENERALIZED_TIME:
if (isset($mapping['implicit'])) {
$decoded['content'] = $this->_decodeTime($decoded['content'], $decoded['type']);
}
return @date($this->format, $decoded['content']);
case FILE_ASN1_TYPE_BIT_STRING:
if (isset($mapping['mapping'])) {
$offset = ord($decoded['content'][0]);
$size = (strlen($decoded['content']) - 1) * 8 - $offset;
/*
From X.680-0207.pdf#page=46 (21.7):
"When a "NamedBitList" is used in defining a bitstring type ASN.1 encoding rules are free to add (or remove)
arbitrarily any trailing 0 bits to (or from) values that are being encoded or decoded. Application designers should
therefore ensure that different semantics are not associated with such values which differ only in the number of trailing
0 bits."
*/
$bits = count($mapping['mapping']) == $size ? array() : array_fill(0, count($mapping['mapping']) - $size, false);
for ($i = strlen($decoded['content']) - 1; $i > 0; $i--) {
$current = ord($decoded['content'][$i]);
for ($j = $offset; $j < 8; $j++) {
$bits[] = (bool) ($current & (1 << $j));
}
$offset = 0;
}
$values = array();
$map = array_reverse($mapping['mapping']);
foreach ($map as $i => $value) {
if ($bits[$i]) {
$values[] = $value;
}
}
return $values;
}
case FILE_ASN1_TYPE_OCTET_STRING:
return base64_encode($decoded['content']);
case FILE_ASN1_TYPE_NULL:
return '';
case FILE_ASN1_TYPE_BOOLEAN:
return $decoded['content'];
case FILE_ASN1_TYPE_NUMERIC_STRING:
case FILE_ASN1_TYPE_PRINTABLE_STRING:
case FILE_ASN1_TYPE_TELETEX_STRING:
case FILE_ASN1_TYPE_VIDEOTEX_STRING:
case FILE_ASN1_TYPE_IA5_STRING:
case FILE_ASN1_TYPE_GRAPHIC_STRING:
case FILE_ASN1_TYPE_VISIBLE_STRING:
case FILE_ASN1_TYPE_GENERAL_STRING:
case FILE_ASN1_TYPE_UNIVERSAL_STRING:
case FILE_ASN1_TYPE_UTF8_STRING:
case FILE_ASN1_TYPE_BMP_STRING:
return $decoded['content'];
case FILE_ASN1_TYPE_INTEGER:
case FILE_ASN1_TYPE_ENUMERATED:
$temp = $decoded['content'];
if (isset($mapping['implicit'])) {
$temp = new Math_BigInteger($decoded['content'], -256);
}
if (isset($mapping['mapping'])) {
$temp = (int) $temp->toString();
return isset($mapping['mapping'][$temp]) ?
$mapping['mapping'][$temp] :
false;
}
return $temp;
}
}
/**
* ASN.1 Encode
*
* DER-encodes an ASN.1 semantic mapping ($mapping). Some libraries would probably call this function
* an ASN.1 compiler.
*
Update PHPseclib
2014-10-27 10:55:27 +00:00
* "Special" mappings can be applied via $special.
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param string $source
* @param string $mapping
* @param int $idx
* @return string
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access public
*/
Update PHPseclib
2014-10-27 10:55:27 +00:00
function encodeDER($source, $mapping, $special = array())
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
{
$this->location = array();
Update PHPseclib
2014-10-27 10:55:27 +00:00
return $this->_encode_der($source, $mapping, null, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
/**
* ASN.1 Encode (Helper function)
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param string $source
* @param string $mapping
* @param int $idx
* @return string
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access private
*/
Update PHPseclib
2014-10-27 10:55:27 +00:00
function _encode_der($source, $mapping, $idx = null, $special = array())
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
{
if (is_object($source) && strtolower(get_class($source)) == 'file_asn1_element') {
return $source->element;
}
// do not encode (implicitly optional) fields with value set to default
if (isset($mapping['default']) && $source === $mapping['default']) {
return '';
}
if (isset($idx)) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
if (isset($special[$idx])) {
$source = call_user_func($special[$idx], $source);
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
$this->location[] = $idx;
}
$tag = $mapping['type'];
switch ($tag) {
case FILE_ASN1_TYPE_SET: // Children order is not important, thus process in sequence.
case FILE_ASN1_TYPE_SEQUENCE:
$tag|= 0x20; // set the constructed bit
$value = '';
// ignore the min and max
if (isset($mapping['min']) && isset($mapping['max'])) {
$child = $mapping['children'];
foreach ($source as $content) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
$temp = $this->_encode_der($content, $child, null, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
if ($temp === false) {
return false;
}
$value.= $temp;
}
break;
}
foreach ($mapping['children'] as $key => $child) {
Update phpseclib
2015-08-13 13:21:19 +00:00
if (!array_key_exists($key, $source)) {
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
if (!isset($child['optional'])) {
return false;
}
continue;
}
Update PHPseclib
2014-10-27 10:55:27 +00:00
$temp = $this->_encode_der($source[$key], $child, $key, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
if ($temp === false) {
return false;
}
// An empty child encoding means it has been optimized out.
// Else we should have at least one tag byte.
if ($temp === '') {
continue;
}
// if isset($child['constant']) is true then isset($child['optional']) should be true as well
if (isset($child['constant'])) {
/*
From X.680-0207.pdf#page=58 (30.6):
"The tagging construction specifies explicit tagging if any of the following holds:
...
c) the "Tag Type" alternative is used and the value of "TagDefault" for the module is IMPLICIT TAGS or
AUTOMATIC TAGS, but the type defined by "Type" is an untagged choice type, an untagged open type, or
an untagged "DummyReference" (see ITU-T Rec. X.683 | ISO/IEC 8824-4, 8.3)."
*/
if (isset($child['explicit']) || $child['type'] == FILE_ASN1_TYPE_CHOICE) {
$subtag = chr((FILE_ASN1_CLASS_CONTEXT_SPECIFIC << 6) | 0x20 | $child['constant']);
$temp = $subtag . $this->_encodeLength(strlen($temp)) . $temp;
} else {
$subtag = chr((FILE_ASN1_CLASS_CONTEXT_SPECIFIC << 6) | (ord($temp[0]) & 0x20) | $child['constant']);
$temp = $subtag . substr($temp, 1);
}
}
$value.= $temp;
}
break;
case FILE_ASN1_TYPE_CHOICE:
$temp = false;
foreach ($mapping['children'] as $key => $child) {
if (!isset($source[$key])) {
continue;
}
Update PHPseclib
2014-10-27 10:55:27 +00:00
$temp = $this->_encode_der($source[$key], $child, $key, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
if ($temp === false) {
return false;
}
// An empty child encoding means it has been optimized out.
// Else we should have at least one tag byte.
if ($temp === '') {
continue;
}
$tag = ord($temp[0]);
// if isset($child['constant']) is true then isset($child['optional']) should be true as well
if (isset($child['constant'])) {
if (isset($child['explicit']) || $child['type'] == FILE_ASN1_TYPE_CHOICE) {
$subtag = chr((FILE_ASN1_CLASS_CONTEXT_SPECIFIC << 6) | 0x20 | $child['constant']);
$temp = $subtag . $this->_encodeLength(strlen($temp)) . $temp;
} else {
$subtag = chr((FILE_ASN1_CLASS_CONTEXT_SPECIFIC << 6) | (ord($temp[0]) & 0x20) | $child['constant']);
$temp = $subtag . substr($temp, 1);
}
}
}
if (isset($idx)) {
array_pop($this->location);
}
if ($temp && isset($mapping['cast'])) {
$temp[0] = chr(($mapping['class'] << 6) | ($tag & 0x20) | $mapping['cast']);
}
return $temp;
case FILE_ASN1_TYPE_INTEGER:
case FILE_ASN1_TYPE_ENUMERATED:
if (!isset($mapping['mapping'])) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
if (is_numeric($source)) {
$source = new Math_BigInteger($source);
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
$value = $source->toBytes(true);
} else {
$value = array_search($source, $mapping['mapping']);
if ($value === false) {
return false;
}
$value = new Math_BigInteger($value);
$value = $value->toBytes(true);
Update PHPseclib
2014-10-27 10:55:27 +00:00
}
if (!strlen($value)) {
$value = chr(0);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
break;
case FILE_ASN1_TYPE_UTC_TIME:
case FILE_ASN1_TYPE_GENERALIZED_TIME:
$format = $mapping['type'] == FILE_ASN1_TYPE_UTC_TIME ? 'y' : 'Y';
$format.= 'mdHis';
$value = @gmdate($format, strtotime($source)) . 'Z';
break;
case FILE_ASN1_TYPE_BIT_STRING:
if (isset($mapping['mapping'])) {
$bits = array_fill(0, count($mapping['mapping']), 0);
$size = 0;
for ($i = 0; $i < count($mapping['mapping']); $i++) {
if (in_array($mapping['mapping'][$i], $source)) {
$bits[$i] = 1;
$size = $i;
}
}
Update PHPseclib
2014-10-27 10:55:27 +00:00
if (isset($mapping['min']) && $mapping['min'] >= 1 && $size < $mapping['min']) {
$size = $mapping['min'] - 1;
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
$offset = 8 - (($size + 1) & 7);
$offset = $offset !== 8 ? $offset : 0;
$value = chr($offset);
for ($i = $size + 1; $i < count($mapping['mapping']); $i++) {
unset($bits[$i]);
}
$bits = implode('', array_pad($bits, $size + $offset + 1, 0));
$bytes = explode(' ', rtrim(chunk_split($bits, 8, ' ')));
foreach ($bytes as $byte) {
$value.= chr(bindec($byte));
}
break;
}
case FILE_ASN1_TYPE_OCTET_STRING:
/* The initial octet shall encode, as an unsigned binary integer with bit 1 as the least significant bit,
the number of unused bits in the final subsequent octet. The number shall be in the range zero to seven.
-- http://www.itu.int/ITU-T/studygroups/com17/languages/X.690-0207.pdf#page=16 */
$value = base64_decode($source);
break;
case FILE_ASN1_TYPE_OBJECT_IDENTIFIER:
$oid = preg_match('#(?:\d+\.)+#', $source) ? $source : array_search($source, $this->oids);
if ($oid === false) {
user_error('Invalid OID');
return false;
}
$value = '';
$parts = explode('.', $oid);
$value = chr(40 * $parts[0] + $parts[1]);
for ($i = 2; $i < count($parts); $i++) {
$temp = '';
if (!$parts[$i]) {
$temp = "\0";
} else {
while ($parts[$i]) {
$temp = chr(0x80 | ($parts[$i] & 0x7F)) . $temp;
$parts[$i] >>= 7;
}
$temp[strlen($temp) - 1] = $temp[strlen($temp) - 1] & chr(0x7F);
}
$value.= $temp;
}
break;
case FILE_ASN1_TYPE_ANY:
$loc = $this->location;
if (isset($idx)) {
array_pop($this->location);
}
switch (true) {
case !isset($source):
Update PHPseclib
2014-10-27 10:55:27 +00:00
return $this->_encode_der(null, array('type' => FILE_ASN1_TYPE_NULL) + $mapping, null, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
case is_int($source):
case is_object($source) && strtolower(get_class($source)) == 'math_biginteger':
Update PHPseclib
2014-10-27 10:55:27 +00:00
return $this->_encode_der($source, array('type' => FILE_ASN1_TYPE_INTEGER) + $mapping, null, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
case is_float($source):
Update PHPseclib
2014-10-27 10:55:27 +00:00
return $this->_encode_der($source, array('type' => FILE_ASN1_TYPE_REAL) + $mapping, null, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
case is_bool($source):
Update PHPseclib
2014-10-27 10:55:27 +00:00
return $this->_encode_der($source, array('type' => FILE_ASN1_TYPE_BOOLEAN) + $mapping, null, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
case is_array($source) && count($source) == 1:
$typename = implode('', array_keys($source));
$outtype = array_search($typename, $this->ANYmap, true);
if ($outtype !== false) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
return $this->_encode_der($source[$typename], array('type' => $outtype) + $mapping, null, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
Update phpseclib
2015-08-13 13:21:19 +00:00
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
$filters = $this->filters;
foreach ($loc as $part) {
if (!isset($filters[$part])) {
$filters = false;
break;
}
$filters = $filters[$part];
}
if ($filters === false) {
user_error('No filters defined for ' . implode('/', $loc));
return false;
}
Update PHPseclib
2014-10-27 10:55:27 +00:00
return $this->_encode_der($source, $filters + $mapping, null, $special);
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
case FILE_ASN1_TYPE_NULL:
$value = '';
break;
case FILE_ASN1_TYPE_NUMERIC_STRING:
case FILE_ASN1_TYPE_TELETEX_STRING:
case FILE_ASN1_TYPE_PRINTABLE_STRING:
case FILE_ASN1_TYPE_UNIVERSAL_STRING:
case FILE_ASN1_TYPE_UTF8_STRING:
case FILE_ASN1_TYPE_BMP_STRING:
case FILE_ASN1_TYPE_IA5_STRING:
case FILE_ASN1_TYPE_VISIBLE_STRING:
case FILE_ASN1_TYPE_VIDEOTEX_STRING:
case FILE_ASN1_TYPE_GRAPHIC_STRING:
case FILE_ASN1_TYPE_GENERAL_STRING:
$value = $source;
break;
case FILE_ASN1_TYPE_BOOLEAN:
$value = $source ? "\xFF" : "\x00";
break;
default:
user_error('Mapping provides no type definition for ' . implode('/', $this->location));
return false;
}
if (isset($idx)) {
array_pop($this->location);
}
if (isset($mapping['cast'])) {
Update PHPseclib
2014-10-27 10:55:27 +00:00
if (isset($mapping['explicit']) || $mapping['type'] == FILE_ASN1_TYPE_CHOICE) {
$value = chr($tag) . $this->_encodeLength(strlen($value)) . $value;
$tag = ($mapping['class'] << 6) | 0x20 | $mapping['cast'];
} else {
$tag = ($mapping['class'] << 6) | (ord($temp[0]) & 0x20) | $mapping['cast'];
}
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
}
return chr($tag) . $this->_encodeLength(strlen($value)) . $value;
}
/**
* DER-encode the length
*
* DER supports lengths up to (2**8)**127, however, we'll only support lengths up to (2**8)**4. See
* {@link http://itu.int/ITU-T/studygroups/com17/languages/X.690-0207.pdf#p=13 X.690 paragraph 8.1.3} for more information.
*
* @access private
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param int $length
* @return string
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
*/
function _encodeLength($length)
{
if ($length <= 0x7F) {
return chr($length);
}
$temp = ltrim(pack('N', $length), chr(0));
return pack('Ca*', 0x80 | strlen($temp), $temp);
}
/**
* BER-decode the time
*
* Called by _decode_ber() and in the case of implicit tags asn1map().
*
* @access private
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param string $content
* @param int $tag
* @return string
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
*/
function _decodeTime($content, $tag)
{
/* UTCTime:
http://tools.ietf.org/html/rfc5280#section-4.1.2.5.1
http://www.obj-sys.com/asn1tutorial/node15.html
GeneralizedTime:
http://tools.ietf.org/html/rfc5280#section-4.1.2.5.2
http://www.obj-sys.com/asn1tutorial/node14.html */
$pattern = $tag == FILE_ASN1_TYPE_UTC_TIME ?
'#(..)(..)(..)(..)(..)(..)(.*)#' :
'#(....)(..)(..)(..)(..)(..).*([Z+-].*)$#';
preg_match($pattern, $content, $matches);
list(, $year, $month, $day, $hour, $minute, $second, $timezone) = $matches;
if ($tag == FILE_ASN1_TYPE_UTC_TIME) {
$year = $year >= 50 ? "19$year" : "20$year";
}
if ($timezone == 'Z') {
$mktime = 'gmmktime';
$timezone = 0;
} elseif (preg_match('#([+-])(\d\d)(\d\d)#', $timezone, $matches)) {
$mktime = 'gmmktime';
$timezone = 60 * $matches[3] + 3600 * $matches[2];
if ($matches[1] == '-') {
$timezone = -$timezone;
}
} else {
$mktime = 'mktime';
$timezone = 0;
}
return @$mktime($hour, $minute, $second, $month, $day, $year) + $timezone;
}
/**
* Set the time format
*
* Sets the time / date format for asn1map().
*
* @access public
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param string $format
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
*/
function setTimeFormat($format)
{
$this->format = $format;
}
/**
* Load OIDs
*
* Load the relevant OIDs for a particular ASN.1 semantic mapping.
*
* @access public
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param array $oids
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
*/
function loadOIDs($oids)
{
$this->oids = $oids;
}
/**
* Load filters
*
* See File_X509, etc, for an example.
*
* @access public
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param array $filters
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
*/
function loadFilters($filters)
{
$this->filters = $filters;
}
/**
* String Shift
*
* Inspired by array_shift
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param string $string
* @param int $index
* @return string
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access private
*/
function _string_shift(&$string, $index = 1)
{
$substr = substr($string, 0, $index);
$string = substr($string, $index);
return $substr;
}
/**
* String type conversion
*
* This is a lazy conversion, dealing only with character size.
* No real conversion table is used.
*
Update phpseclib
2016-01-22 15:24:35 +00:00
* @param string $in
* @param int $from
* @param int $to
* @return string
Ajout de la lib SSH
2013-10-02 12:28:09 +00:00
* @access public
*/
function convert($in, $from = FILE_ASN1_TYPE_UTF8_STRING, $to = FILE_ASN1_TYPE_UTF8_STRING)
{
if (!isset($this->stringTypeSize[$from]) || !isset($this->stringTypeSize[$to])) {
return false;
}
$insize = $this->stringTypeSize[$from];
$outsize = $this->stringTypeSize[$to];
$inlength = strlen($in);
$out = '';
for ($i = 0; $i < $inlength;) {
if ($inlength - $i < $insize) {
return false;
}
// Get an input character as a 32-bit value.
$c = ord($in[$i++]);
switch (true) {
case $insize == 4:
$c = ($c << 8) | ord($in[$i++]);
$c = ($c << 8) | ord($in[$i++]);
case $insize == 2:
$c = ($c << 8) | ord($in[$i++]);
case $insize == 1:
break;
case ($c & 0x80) == 0x00:
break;
case ($c & 0x40) == 0x00:
return false;
default:
$bit = 6;
do {
if ($bit > 25 || $i >= $inlength || (ord($in[$i]) & 0xC0) != 0x80) {
return false;
}
$c = ($c << 6) | (ord($in[$i++]) & 0x3F);
$bit += 5;
$mask = 1 << $bit;
} while ($c & $bit);
$c &= $mask - 1;
break;
}
// Convert and append the character to output string.
$v = '';
switch (true) {
case $outsize == 4:
$v .= chr($c & 0xFF);
$c >>= 8;
$v .= chr($c & 0xFF);
$c >>= 8;
case $outsize == 2:
$v .= chr($c & 0xFF);
$c >>= 8;
case $outsize == 1:
$v .= chr($c & 0xFF);
$c >>= 8;
if ($c) {
return false;
}
break;
case ($c & 0x80000000) != 0:
return false;
case $c >= 0x04000000:
$v .= chr(0x80 | ($c & 0x3F));
$c = ($c >> 6) | 0x04000000;
case $c >= 0x00200000:
$v .= chr(0x80 | ($c & 0x3F));
$c = ($c >> 6) | 0x00200000;
case $c >= 0x00010000:
$v .= chr(0x80 | ($c & 0x3F));
$c = ($c >> 6) | 0x00010000;
case $c >= 0x00000800:
$v .= chr(0x80 | ($c & 0x3F));
$c = ($c >> 6) | 0x00000800;
case $c >= 0x00000080:
$v .= chr(0x80 | ($c & 0x3F));
$c = ($c >> 6) | 0x000000C0;
default:
$v .= chr($c);
break;
}
$out .= strrev($v);
}
return $out;
}
}
Reference in New Issue Copy Permalink