mirror of
https://codeberg.org/streams/streams.git
synced 2024-09-22 01:55:14 +00:00
151 lines
No EOL
4 KiB
PHP
151 lines
No EOL
4 KiB
PHP
<?php
|
|
|
|
namespace Zotlabs\Lib;
|
|
|
|
require_once('library/ASNValue.class.php');
|
|
require_once('library/asn1.php');
|
|
|
|
/**
|
|
* Keyutils
|
|
* Convert RSA keys between various formats
|
|
*/
|
|
|
|
|
|
class Keyutils {
|
|
|
|
static public function DerToPem($Der, $Private=false) {
|
|
// Encode:
|
|
$Der = base64_encode($Der);
|
|
// Split lines:
|
|
$lines = str_split($Der, 65);
|
|
$body = implode("\n", $lines);
|
|
// Get title:
|
|
$title = $Private? 'RSA PRIVATE KEY' : 'PUBLIC KEY';
|
|
// Add wrapping:
|
|
return "-----BEGIN {$title}-----\n" . $body . "\n" . "-----END {$title}-----\n";
|
|
}
|
|
|
|
static public function DerToRsa($Der) {
|
|
// Encode:
|
|
$Der = base64_encode($Der);
|
|
// Split lines:
|
|
$lines = str_split($Der, 64);
|
|
$body = implode("\n", $lines);
|
|
// Get title:
|
|
$title = 'RSA PUBLIC KEY';
|
|
// Add wrapping:
|
|
return "-----BEGIN {$title}-----\n" . $body . "\n" . "-----END {$title}-----\n";
|
|
}
|
|
|
|
|
|
static public function pkcs8_encode($Modulus,$PublicExponent) {
|
|
// Encode key sequence
|
|
$modulus = new \ASNValue(\ASNValue::TAG_INTEGER);
|
|
$modulus->SetIntBuffer($Modulus);
|
|
$publicExponent = new \ASNValue(\ASNValue::TAG_INTEGER);
|
|
$publicExponent->SetIntBuffer($PublicExponent);
|
|
$keySequenceItems = array($modulus, $publicExponent);
|
|
$keySequence = new \ASNValue(\ASNValue::TAG_SEQUENCE);
|
|
$keySequence->SetSequence($keySequenceItems);
|
|
//Encode bit string
|
|
$bitStringValue = $keySequence->Encode();
|
|
$bitStringValue = chr(0x00) . $bitStringValue; //Add unused bits byte
|
|
$bitString = new \ASNValue(\ASNValue::TAG_BITSTRING);
|
|
$bitString->Value = $bitStringValue;
|
|
//Encode body
|
|
$bodyValue = "\x30\x0d\x06\x09\x2a\x86\x48\x86\xf7\x0d\x01\x01\x01\x05\x00" . $bitString->Encode();
|
|
$body = new \ASNValue(\ASNValue::TAG_SEQUENCE);
|
|
$body->Value = $bodyValue;
|
|
//Get DER encoded public key:
|
|
return $body->Encode();
|
|
}
|
|
|
|
|
|
static function pkcs1_encode($Modulus,$PublicExponent) {
|
|
// Encode key sequence
|
|
$modulus = new \ASNValue(\ASNValue::TAG_INTEGER);
|
|
$modulus->SetIntBuffer($Modulus);
|
|
$publicExponent = new \ASNValue(\ASNValue::TAG_INTEGER);
|
|
$publicExponent->SetIntBuffer($PublicExponent);
|
|
$keySequenceItems = array($modulus, $publicExponent);
|
|
$keySequence = new \ASNValue(\ASNValue::TAG_SEQUENCE);
|
|
$keySequence->SetSequence($keySequenceItems);
|
|
// Encode bit string
|
|
return $keySequence->Encode();
|
|
}
|
|
|
|
|
|
// http://stackoverflow.com/questions/27568570/how-to-convert-raw-modulus-exponent-to-rsa-public-key-pem-format
|
|
|
|
static public function metopem($m,$e) {
|
|
$der = self::pkcs8_encode($m,$e);
|
|
return self::DerToPem($der,false);
|
|
}
|
|
|
|
|
|
static public function pubrsatome($key,&$m,&$e) {
|
|
|
|
$lines = explode("\n",$key);
|
|
unset($lines[0]);
|
|
unset($lines[count($lines)]);
|
|
$x = base64_decode(implode('',$lines));
|
|
|
|
$r = \ASN_BASE::parseASNString($x);
|
|
|
|
$m = base64url_decode($r[0]->asnData[0]->asnData);
|
|
$e = base64url_decode($r[0]->asnData[1]->asnData);
|
|
}
|
|
|
|
|
|
static public function rsatopem($key) {
|
|
self::pubrsatome($key,$m,$e);
|
|
return self::metopem($m,$e);
|
|
}
|
|
|
|
static public function pemtorsa($key) {
|
|
self::pemtome($key,$m,$e);
|
|
return self::metorsa($m,$e);
|
|
}
|
|
|
|
static public function pemtome($key,&$m,&$e) {
|
|
$lines = explode("\n",$key);
|
|
unset($lines[0]);
|
|
unset($lines[count($lines)]);
|
|
$x = base64_decode(implode('',$lines));
|
|
|
|
$r = \ASN_BASE::parseASNString($x);
|
|
|
|
$m = base64url_decode($r[0]->asnData[1]->asnData[0]->asnData[0]->asnData);
|
|
$e = base64url_decode($r[0]->asnData[1]->asnData[0]->asnData[1]->asnData);
|
|
}
|
|
|
|
static public function metorsa($m,$e) {
|
|
$der = self::pkcs1_encode($m,$e);
|
|
return self::DerToRsa($der);
|
|
}
|
|
|
|
|
|
|
|
static public function salmon_key($pubkey) {
|
|
self::pemtome($pubkey,$m,$e);
|
|
return 'RSA' . '.' . base64url_encode($m,true) . '.' . base64url_encode($e,true) ;
|
|
}
|
|
|
|
|
|
static public function convert_salmon_key($key) {
|
|
|
|
if(strstr($key,','))
|
|
$rawkey = substr($key,strpos($key,',')+1);
|
|
else
|
|
$rawkey = substr($key,5);
|
|
|
|
$key_info = explode('.',$rawkey);
|
|
|
|
$m = base64url_decode($key_info[1]);
|
|
$e = base64url_decode($key_info[2]);
|
|
|
|
return self::metopem($m,$e);
|
|
|
|
}
|
|
|
|
} |