mirror of
https://github.com/guanzhi/GmSSL.git
synced 2026-08-07 12:33:39 +08:00
update
This commit is contained in:
@@ -480,8 +480,8 @@ our %disabled = ( # "what" => "comment"
|
|||||||
#"sdf" => "default",
|
#"sdf" => "default",
|
||||||
#"skf" => "default",
|
#"skf" => "default",
|
||||||
#"sof" => "default",
|
#"sof" => "default",
|
||||||
"serpent" => "default",
|
#"serpent" => "default",
|
||||||
# "speck" => "default",
|
#"speck" => "default",
|
||||||
);
|
);
|
||||||
|
|
||||||
# Note: => pair form used for aesthetics, not to truly make a hash table
|
# Note: => pair form used for aesthetics, not to truly make a hash table
|
||||||
|
|||||||
@@ -59,10 +59,13 @@
|
|||||||
*/
|
*/
|
||||||
|
|
||||||
#include <openssl/ec.h>
|
#include <openssl/ec.h>
|
||||||
|
#include <openssl/sm2.h>
|
||||||
#include <openssl/err.h>
|
#include <openssl/err.h>
|
||||||
#include <openssl/sdf.h>
|
#include <openssl/sdf.h>
|
||||||
#include <openssl/gmapi.h>
|
#include <openssl/gmapi.h>
|
||||||
#include <openssl/objects.h>
|
#include <openssl/objects.h>
|
||||||
|
#include "../sm2/sm2_lcl.h"
|
||||||
|
|
||||||
|
|
||||||
EC_KEY *EC_KEY_new_from_ECCrefPublicKey(const ECCrefPublicKey *ref)
|
EC_KEY *EC_KEY_new_from_ECCrefPublicKey(const ECCrefPublicKey *ref)
|
||||||
{
|
{
|
||||||
@@ -313,7 +316,7 @@ SM2CiphertextValue *SM2CiphertextValue_new_from_ECCCipher(const ECCCipher *ref)
|
|||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (!(cv = SM2CiphertextValue_new(group))) {
|
if (!(cv = SM2CiphertextValue_new())) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_NEW_FROM_ECCCIPHER,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_NEW_FROM_ECCCIPHER,
|
||||||
GMAPI_R_MALLOC_FAILED);
|
GMAPI_R_MALLOC_FAILED);
|
||||||
goto end;
|
goto end;
|
||||||
@@ -334,24 +337,10 @@ end:
|
|||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
/*
|
|
||||||
* Different vendors might have different encoding of field elements when
|
|
||||||
* the buffer is larger than requirment. We assume the encoding to be
|
|
||||||
* big-endian, which means that there will be prefix zeros in the buffer
|
|
||||||
* before the field element. Another popular encoding is to use the suffix
|
|
||||||
* zeros. When the gmapi wrapper is working with vendor's SDF
|
|
||||||
* implementations, developers have to check the encoding of the vendor's
|
|
||||||
* library to make sure the encoding/decoding is correct
|
|
||||||
*/
|
|
||||||
int SM2CiphertextValue_set_ECCCipher(SM2CiphertextValue *cv,
|
int SM2CiphertextValue_set_ECCCipher(SM2CiphertextValue *cv,
|
||||||
const ECCCipher *ref)
|
const ECCCipher *ref)
|
||||||
{
|
{
|
||||||
int ret = 0;
|
int ret = 0;
|
||||||
BN_CTX *bn_ctx = NULL;
|
|
||||||
EC_GROUP *group = NULL;
|
|
||||||
BIGNUM *x;
|
|
||||||
BIGNUM *y;
|
|
||||||
int nbytes;
|
|
||||||
|
|
||||||
/* check arguments */
|
/* check arguments */
|
||||||
if (!cv || !ref) {
|
if (!cv || !ref) {
|
||||||
@@ -360,35 +349,6 @@ int SM2CiphertextValue_set_ECCCipher(SM2CiphertextValue *cv,
|
|||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* variables */
|
|
||||||
if (!(group = EC_GROUP_new_by_curve_name(NID_sm2p256v1))) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER,
|
|
||||||
ERR_R_EC_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
/* this will never happen with GmSSL's sdf.h */
|
|
||||||
if (EC_GROUP_get_degree(group) > ECCref_MAX_BITS) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER,
|
|
||||||
GMAPI_R_INVALID_KEY_LENGTH);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
nbytes = (EC_GROUP_get_degree(group) + 7)/8;
|
|
||||||
|
|
||||||
/* malloc */
|
|
||||||
if (!(bn_ctx = BN_CTX_new())) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER,
|
|
||||||
ERR_R_MALLOC_FAILURE);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
BN_CTX_start(bn_ctx);
|
|
||||||
x = BN_CTX_get(bn_ctx);
|
|
||||||
y = BN_CTX_get(bn_ctx);
|
|
||||||
if (!x || !y) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER,
|
|
||||||
ERR_R_MALLOC_FAILURE);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* ECCCipher ==> SM2CiphertextValue */
|
/* ECCCipher ==> SM2CiphertextValue */
|
||||||
if (!BN_bin2bn(ref->x, ECCref_MAX_LEN, cv->xCoordinate)) {
|
if (!BN_bin2bn(ref->x, ECCref_MAX_LEN, cv->xCoordinate)) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER,
|
||||||
@@ -401,72 +361,31 @@ int SM2CiphertextValue_set_ECCCipher(SM2CiphertextValue *cv,
|
|||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (!cv->ephem_point) {
|
if (!ASN1_OCTET_STRING_set(cv->hash, ref->M, 32)) {
|
||||||
if (!(cv->ephem_point = EC_POINT_new(group))) {
|
goto end;
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER, ERR_R_EC_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
if (EC_METHOD_get_field_type(EC_GROUP_method_of(group)) == NID_X9_62_prime_field) {
|
|
||||||
if (!EC_POINT_set_affine_coordinates_GFp(group, cv->ephem_point, x, y, bn_ctx)) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER, ERR_R_EC_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
if (!EC_POINT_get_affine_coordinates_GF2m(group, cv->ephem_point, x, y, bn_ctx)) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER, ERR_R_EC_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
cv->mactag_size = 32;
|
|
||||||
memcpy(cv->mactag, ref->M, 32);
|
|
||||||
|
|
||||||
if (ref->L <= 0 || ref->L > INT_MAX) {
|
if (ref->L <= 0 || ref->L > INT_MAX) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER,
|
||||||
GMAPI_R_INVALID_CIPHERTEXT_LENGTH);
|
GMAPI_R_INVALID_CIPHERTEXT_LENGTH);
|
||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
cv->ciphertext_size = (size_t)ref->L;
|
if (!ASN1_OCTET_STRING_set(cv->ciphertext, ref->C, ref->L)) {
|
||||||
|
|
||||||
if (!(cv->ciphertext = OPENSSL_realloc(cv->ciphertext, (size_t)ref->L))) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHER,
|
|
||||||
GMAPI_R_MALLOC_FAILED);
|
|
||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
memcpy(cv->ciphertext, ref->C, (size_t)ref->L);
|
|
||||||
|
|
||||||
/* set return value */
|
/* set return value */
|
||||||
ret = 0;
|
ret = 1;
|
||||||
|
|
||||||
end:
|
end:
|
||||||
EC_GROUP_free(group);
|
|
||||||
if (bn_ctx) {
|
|
||||||
BN_CTX_end(bn_ctx);
|
|
||||||
}
|
|
||||||
BN_CTX_free(bn_ctx);
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* The caller need to prepare buffer larger than `sizeof(ECCipher)` to hold
|
|
||||||
* the result. Some vendors might change the define of `ECCCipher->C[1]` to
|
|
||||||
* larger buffer, such as `ECCCipher->C[ECC_CIPHER_MAX_LEN]`, but our
|
|
||||||
* implementation will not know this. So always init `ECCCipher->L` to the
|
|
||||||
* buffer size for ciphertext.
|
|
||||||
* Some vendors might even change the definition of `ECCCipher`, then there
|
|
||||||
* will be compiling errors when compiled with the vendor's header file. So
|
|
||||||
* when you will use a vendor's SDF library, do not use `openssl/sdf.h`, but
|
|
||||||
* use the vendor's header file. Then the errors can be found by the
|
|
||||||
* compiler.
|
|
||||||
*/
|
|
||||||
int SM2CiphertextValue_get_ECCCipher(const SM2CiphertextValue *cv,
|
int SM2CiphertextValue_get_ECCCipher(const SM2CiphertextValue *cv,
|
||||||
ECCCipher *ref)
|
ECCCipher *ref)
|
||||||
{
|
{
|
||||||
int ret = 0;
|
int ret = 0;
|
||||||
BN_CTX *bn_ctx = NULL;
|
|
||||||
EC_GROUP *group = NULL;
|
|
||||||
BIGNUM *x;
|
|
||||||
BIGNUM *y;
|
|
||||||
|
|
||||||
/* check arguments */
|
/* check arguments */
|
||||||
if (!cv || !ref) {
|
if (!cv || !ref) {
|
||||||
@@ -474,101 +393,76 @@ int SM2CiphertextValue_get_ECCCipher(const SM2CiphertextValue *cv,
|
|||||||
ERR_R_PASSED_NULL_PARAMETER);
|
ERR_R_PASSED_NULL_PARAMETER);
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* as the `ECCCipher->C[1]` default size is too small, we have to
|
/* as the `ECCCipher->C[1]` default size is too small, we have to
|
||||||
* check `ECCCipher->L` to make sure caller has initialized this
|
* check `ECCCipher->L` to make sure caller has initialized this
|
||||||
* structure and prepared enough buffer to hold variable length
|
* structure and prepared enough buffer to hold variable length
|
||||||
* ciphertext
|
* ciphertext
|
||||||
*/
|
*/
|
||||||
if (ref->L < cv->ciphertext_size) {
|
if (ref->L < ASN1_STRING_length(cv->ciphertext)) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
||||||
GMAPI_R_BUFFER_TOO_SMALL);
|
GMAPI_R_BUFFER_TOO_SMALL);
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* malloc */
|
|
||||||
if (!(group = EC_GROUP_new_by_curve_name(NID_sm2p256v1))) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER, ERR_R_EC_LIB);
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!(bn_ctx = BN_CTX_new())) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER, ERR_R_BN_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
|
|
||||||
BN_CTX_start(bn_ctx);
|
|
||||||
x = BN_CTX_get(bn_ctx);
|
|
||||||
y = BN_CTX_get(bn_ctx);
|
|
||||||
if (!x || !y) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
|
||||||
ERR_R_MALLOC_FAILURE);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* SM2CiphertextValue ==> ECCCipher */
|
|
||||||
memset(ref, 0, sizeof(*ref));
|
|
||||||
|
|
||||||
/* encode ephem point `ECCCipher->x`, `ECCCipher->y` */
|
|
||||||
if (EC_METHOD_get_field_type(EC_GROUP_method_of(group)) == NID_X9_62_prime_field) {
|
|
||||||
if (!EC_POINT_get_affine_coordinates_GFp(group, cv->ephem_point, x, y, bn_ctx)) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER, ERR_R_EC_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
if (!EC_POINT_get_affine_coordinates_GF2m(group, cv->ephem_point, x, y, bn_ctx)) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
|
||||||
ERR_R_EC_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
/*
|
/*
|
||||||
* check compatible of SM2CiphertextValue with EC_GROUP
|
* check compatible of SM2CiphertextValue with EC_GROUP
|
||||||
* In gmapi we only do simple checks, i.e. length of coordinates.
|
* In gmapi we only do simple checks, i.e. length of coordinates.
|
||||||
* We assume that more checks, such as x, y in the range of [1, p]
|
* We assume that more checks, such as x, y in the range of [1, p]
|
||||||
* and other semantic checks should be done by the `sm2` module.
|
* and other semantic checks should be done by the `sm2` module.
|
||||||
*/
|
*/
|
||||||
if (BN_num_bits(x) > EC_GROUP_get_degree(group) ||
|
if (BN_num_bytes(cv->xCoordinate) > ECCref_MAX_LEN
|
||||||
BN_num_bits(y) > EC_GROUP_get_degree(group)) {
|
|| BN_num_bytes(cv->yCoordinate) > ECCref_MAX_LEN) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
||||||
GMAPI_R_INVALID_CIPHERTEXT_POINT);
|
GMAPI_R_INVALID_CIPHERTEXT_POINT);
|
||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
if (!BN_bn2bin(x, ref->x + ECCref_MAX_LEN - BN_num_bytes(x))) {
|
|
||||||
|
if (ASN1_STRING_length(cv->hash) != 32) {
|
||||||
|
goto end;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* SM2CiphertextValue ==> ECCCipher */
|
||||||
|
memset(ref, 0, sizeof(*ref));
|
||||||
|
|
||||||
|
if (!BN_bn2bin(cv->xCoordinate,
|
||||||
|
ref->x + ECCref_MAX_LEN - BN_num_bytes(cv->xCoordinate))) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
||||||
ERR_R_BN_LIB);
|
ERR_R_BN_LIB);
|
||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
if (!BN_bn2bin(y, ref->y + ECCref_MAX_LEN - BN_num_bytes(y))) {
|
|
||||||
|
if (!BN_bn2bin(cv->yCoordinate,
|
||||||
|
ref->y + ECCref_MAX_LEN - BN_num_bytes(cv->yCoordinate))) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
||||||
ERR_R_BN_LIB);
|
ERR_R_BN_LIB);
|
||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* encode mac `ECCCipher->M[32]` */
|
/* encode mac `ECCCipher->M[32]` */
|
||||||
if (cv->mactag_size != 32) {
|
if (ASN1_STRING_length(cv->hash) != 32) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
||||||
GMAPI_R_INVALID_CIPHERTEXT_MAC);
|
GMAPI_R_INVALID_CIPHERTEXT_MAC);
|
||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
memcpy(ref->M, cv->mactag, cv->mactag_size);
|
memcpy(ref->M, ASN1_STRING_get0_data(cv->hash),
|
||||||
|
ASN1_STRING_length(cv->hash));
|
||||||
|
|
||||||
/* encode ciphertext `ECCCipher->L`, `ECCCipher->C[]` */
|
/* encode ciphertext `ECCCipher->L`, `ECCCipher->C[]` */
|
||||||
if (cv->ciphertext_size <= 0 || cv->ciphertext_size > INT_MAX) {
|
|
||||||
|
if (ASN1_STRING_length(cv->ciphertext) <= 0
|
||||||
|
|| ASN1_STRING_length(cv->ciphertext) > INT_MAX) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHER,
|
||||||
GMAPI_R_INVALID_CIPHERTEXT_LENGTH);
|
GMAPI_R_INVALID_CIPHERTEXT_LENGTH);
|
||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
ref->L = (unsigned int)cv->ciphertext_size;
|
ref->L = ASN1_STRING_length(cv->ciphertext);
|
||||||
memcpy(ref->C, cv->ciphertext, cv->ciphertext_size);
|
memcpy(ref->C, ASN1_STRING_get0_data(cv->ciphertext),
|
||||||
|
ASN1_STRING_length(cv->ciphertext));
|
||||||
|
|
||||||
/* set return value */
|
/* set return value */
|
||||||
ret = 1;
|
ret = 1;
|
||||||
end:
|
end:
|
||||||
if (bn_ctx) {
|
|
||||||
BN_CTX_end(bn_ctx);
|
|
||||||
}
|
|
||||||
BN_CTX_free(bn_ctx);
|
|
||||||
EC_GROUP_free(group);
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@@ -1,15 +0,0 @@
|
|||||||
crypto/gmapi/gmapi_sdf_ec.o: crypto/gmapi/gmapi_sdf_ec.c \
|
|
||||||
include/openssl/ec.h include/openssl/opensslconf.h \
|
|
||||||
include/openssl/asn1.h include/openssl/e_os2.h include/openssl/bio.h \
|
|
||||||
include/openssl/crypto.h include/openssl/stack.h \
|
|
||||||
include/openssl/safestack.h include/openssl/opensslv.h \
|
|
||||||
include/openssl/ossl_typ.h include/openssl/symhacks.h \
|
|
||||||
include/openssl/bn.h include/openssl/err.h include/openssl/lhash.h \
|
|
||||||
include/openssl/sdf.h include/openssl/sgd.h include/openssl/gmapi.h \
|
|
||||||
include/openssl/sm2.h include/openssl/evp.h include/openssl/objects.h \
|
|
||||||
include/openssl/obj_mac.h include/openssl/kdf2.h include/openssl/kdf.h \
|
|
||||||
include/openssl/x509.h include/openssl/buffer.h \
|
|
||||||
include/openssl/paillier.h include/openssl/rsa.h include/openssl/dsa.h \
|
|
||||||
include/openssl/dh.h include/openssl/sha.h include/openssl/x509_vfy.h \
|
|
||||||
include/openssl/pkcs7.h include/openssl/ecies.h include/openssl/sm3.h \
|
|
||||||
include/openssl/saf.h include/openssl/skf.h include/openssl/sof.h
|
|
||||||
@@ -48,11 +48,12 @@
|
|||||||
*/
|
*/
|
||||||
|
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
|
#include <openssl/sm2.h>
|
||||||
#include <openssl/ec.h>
|
#include <openssl/ec.h>
|
||||||
#include <openssl/gmapi.h>
|
#include <openssl/gmapi.h>
|
||||||
#include <openssl/skf.h>
|
#include <openssl/skf.h>
|
||||||
#include "../ec/ec_lcl.h"
|
#include "../ec/ec_lcl.h"
|
||||||
|
#include "../sm2/sm2_lcl.h"
|
||||||
|
|
||||||
EC_KEY *EC_KEY_new_from_ECCPUBLICKEYBLOB(const ECCPUBLICKEYBLOB *blob)
|
EC_KEY *EC_KEY_new_from_ECCPUBLICKEYBLOB(const ECCPUBLICKEYBLOB *blob)
|
||||||
{
|
{
|
||||||
@@ -253,36 +254,21 @@ end:
|
|||||||
SM2CiphertextValue *SM2CiphertextValue_new_from_ECCCIPHERBLOB(
|
SM2CiphertextValue *SM2CiphertextValue_new_from_ECCCIPHERBLOB(
|
||||||
const ECCCIPHERBLOB *blob)
|
const ECCCIPHERBLOB *blob)
|
||||||
{
|
{
|
||||||
int ok = 0;
|
|
||||||
SM2CiphertextValue *ret = NULL;
|
SM2CiphertextValue *ret = NULL;
|
||||||
EC_GROUP *group = NULL;
|
|
||||||
|
|
||||||
if (!(group = EC_GROUP_new_by_curve_name(NID_sm2p256v1))) {
|
if (!(ret = SM2CiphertextValue_new())) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_NEW_FROM_ECCCIPHERBLOB,
|
|
||||||
ERR_R_EC_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!(ret = SM2CiphertextValue_new(group))) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_NEW_FROM_ECCCIPHERBLOB,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_NEW_FROM_ECCCIPHERBLOB,
|
||||||
GMAPI_R_MALLOC_FAILED);
|
GMAPI_R_MALLOC_FAILED);
|
||||||
goto end;
|
return NULL;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (!SM2CiphertextValue_set_ECCCIPHERBLOB(ret, blob)) {
|
if (!SM2CiphertextValue_set_ECCCIPHERBLOB(ret, blob)) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_NEW_FROM_ECCCIPHERBLOB,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_NEW_FROM_ECCCIPHERBLOB,
|
||||||
GMAPI_R_INVALID_EC_PUBLIC_KEY);
|
GMAPI_R_INVALID_EC_PUBLIC_KEY);
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
|
|
||||||
ok = 1;
|
|
||||||
|
|
||||||
end:
|
|
||||||
if (!ok) {
|
|
||||||
SM2CiphertextValue_free(ret);
|
SM2CiphertextValue_free(ret);
|
||||||
ret = NULL;
|
return NULL;
|
||||||
}
|
}
|
||||||
EC_GROUP_free(group);
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -290,78 +276,37 @@ int SM2CiphertextValue_set_ECCCIPHERBLOB(SM2CiphertextValue *cv,
|
|||||||
const ECCCIPHERBLOB *blob)
|
const ECCCIPHERBLOB *blob)
|
||||||
{
|
{
|
||||||
int ret = 0;
|
int ret = 0;
|
||||||
EC_GROUP *group = NULL;
|
|
||||||
BIGNUM *x = NULL;
|
|
||||||
BIGNUM *y = NULL;
|
|
||||||
BN_CTX *bn_ctx = NULL;
|
|
||||||
int nbytes;
|
|
||||||
|
|
||||||
if (!(group = EC_GROUP_new_by_curve_name(NID_sm2p256v1))) {
|
if (!cv || !blob) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB,
|
|
||||||
ERR_R_EC_LIB);
|
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
nbytes = (EC_GROUP_get_degree(group) + 7)/8;
|
if (!BN_bin2bn(blob->XCoordinate, ECC_MAX_XCOORDINATE_BITS_LEN/8,
|
||||||
if (nbytes > ECC_MAX_XCOORDINATE_BITS_LEN/8) {
|
cv->xCoordinate)) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB,
|
|
||||||
GMAPI_R_INVALID_KEY_LENGTH);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!(x = BN_bin2bn(blob->XCoordinate, nbytes, NULL))) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB, ERR_R_BN_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
if (!(y = BN_bin2bn(blob->YCoordinate, nbytes, NULL))) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB, ERR_R_BN_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
if (!(bn_ctx = BN_CTX_new())) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB, ERR_R_BN_LIB);
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB, ERR_R_BN_LIB);
|
||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (!cv->ephem_point) {
|
if (!BN_bin2bn(blob->YCoordinate, ECC_MAX_YCOORDINATE_BITS_LEN/8,
|
||||||
if (!(cv->ephem_point = EC_POINT_new(group))) {
|
cv->yCoordinate)) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB, ERR_R_EC_LIB);
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB, ERR_R_BN_LIB);
|
||||||
goto end;
|
goto end;
|
||||||
}
|
|
||||||
}
|
|
||||||
if (EC_METHOD_get_field_type(EC_GROUP_method_of(group)) == NID_X9_62_prime_field) {
|
|
||||||
if (!EC_POINT_set_affine_coordinates_GFp(group, cv->ephem_point, x, y, bn_ctx)) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB, ERR_R_EC_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
if (!EC_POINT_get_affine_coordinates_GF2m(group, cv->ephem_point, x, y, bn_ctx)) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB, ERR_R_EC_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
|
|
||||||
memcpy(cv->mactag, blob->HASH, 32);
|
if (!ASN1_OCTET_STRING_set(cv->hash, blob->HASH, 32)) {
|
||||||
cv->mactag_size = 32;
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB, ERR_R_ASN1_LIB);
|
||||||
|
goto end;
|
||||||
|
}
|
||||||
|
|
||||||
if ((cv->ciphertext_size = blob->CipherLen) <= 0) {
|
if (!ASN1_OCTET_STRING_set(cv->ciphertext, blob->Cipher,
|
||||||
|
blob->CipherLen)) {
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB,
|
||||||
GMAPI_R_INVALID_CIPHERTEXT_LENGTH);
|
GMAPI_R_INVALID_CIPHERTEXT_LENGTH);
|
||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
if (!(cv->ciphertext = OPENSSL_realloc(cv->ciphertext, blob->CipherLen))) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_SET_ECCCIPHERBLOB,
|
|
||||||
GMAPI_R_MALLOC_FAILED);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
memcpy(cv->ciphertext, blob->Cipher, blob->CipherLen);
|
|
||||||
|
|
||||||
ret = 0;
|
ret = 0;
|
||||||
|
|
||||||
end:
|
end:
|
||||||
EC_GROUP_free(group);
|
|
||||||
BN_free(x);
|
|
||||||
BN_free(y);
|
|
||||||
BN_CTX_free(bn_ctx);
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -369,70 +314,45 @@ int SM2CiphertextValue_get_ECCCIPHERBLOB(const SM2CiphertextValue *cv,
|
|||||||
ECCCIPHERBLOB *blob)
|
ECCCIPHERBLOB *blob)
|
||||||
{
|
{
|
||||||
int ret = 0;
|
int ret = 0;
|
||||||
EC_GROUP *group = NULL;
|
|
||||||
BIGNUM *x = NULL;
|
|
||||||
BIGNUM *y = NULL;
|
|
||||||
BN_CTX *bn_ctx = NULL;
|
|
||||||
|
|
||||||
if (!(group = EC_GROUP_new_by_curve_name(NID_sm2p256v1))) {
|
if (BN_num_bits(cv->xCoordinate) > ECC_MAX_XCOORDINATE_BITS_LEN ||
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB, ERR_R_EC_LIB);
|
BN_num_bits(cv->yCoordinate) > ECC_MAX_YCOORDINATE_BITS_LEN) {
|
||||||
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB,
|
||||||
|
GMAPI_R_INVALID_CIPHERTEXT_POINT);
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
x = BN_new();
|
if (ASN1_STRING_length(cv->hash) != 32) {
|
||||||
y = BN_new();
|
|
||||||
bn_ctx = BN_CTX_new();
|
|
||||||
if (!x || !y || !bn_ctx) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB, ERR_R_BN_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (EC_METHOD_get_field_type(EC_GROUP_method_of(group)) == NID_X9_62_prime_field) {
|
|
||||||
if (!EC_POINT_get_affine_coordinates_GFp(group, cv->ephem_point, x, y, bn_ctx)) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB, ERR_R_EC_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
if (!EC_POINT_get_affine_coordinates_GF2m(group, cv->ephem_point, x, y, bn_ctx)) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB, ERR_R_EC_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if ((BN_num_bytes(x) > 256/8) || (BN_num_bytes(y) > 256/8)) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB,
|
|
||||||
GMAPI_R_INVALID_CIPHERTEXT_POINT);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
if (!BN_bn2bin(x, blob->XCoordinate + 256/8 - BN_num_bytes(x))) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB, ERR_R_BN_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
if (!BN_bn2bin(y, blob->YCoordinate + 256/8 - BN_num_bytes(y))) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB, ERR_R_BN_LIB);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (cv->mactag_size != 32) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB,
|
|
||||||
GMAPI_R_INVALID_CIPHERTEXT_MAC);
|
|
||||||
goto end;
|
|
||||||
}
|
|
||||||
memcpy(blob->HASH, cv->mactag, cv->mactag_size);
|
|
||||||
|
|
||||||
if (cv->ciphertext_size <= 0) {
|
|
||||||
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB,
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB,
|
||||||
GMAPI_R_INVALID_CIPHERTEXT_LENGTH);
|
GMAPI_R_INVALID_CIPHERTEXT_LENGTH);
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (blob->CipherLen < ASN1_STRING_length(cv->ciphertext)) {
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!BN_bn2bin(cv->xCoordinate, blob->XCoordinate +
|
||||||
|
ECC_MAX_XCOORDINATE_BITS_LEN/8 - BN_num_bytes(cv->xCoordinate))) {
|
||||||
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB, ERR_R_BN_LIB);
|
||||||
goto end;
|
goto end;
|
||||||
}
|
}
|
||||||
memcpy(blob->Cipher, cv->ciphertext, cv->ciphertext_size);
|
if (!BN_bn2bin(cv->yCoordinate, blob->YCoordinate +
|
||||||
|
ECC_MAX_YCOORDINATE_BITS_LEN/8 - BN_num_bytes(cv->yCoordinate))) {
|
||||||
|
GMAPIerr(GMAPI_F_SM2CIPHERTEXTVALUE_GET_ECCCIPHERBLOB, ERR_R_BN_LIB);
|
||||||
|
goto end;
|
||||||
|
}
|
||||||
|
|
||||||
|
memcpy(blob->HASH, ASN1_STRING_get0_data(cv->hash),
|
||||||
|
ASN1_STRING_length(cv->hash));
|
||||||
|
|
||||||
|
blob->CipherLen = ASN1_STRING_length(cv->ciphertext);
|
||||||
|
memcpy(blob->Cipher, ASN1_STRING_get0_data(cv->ciphertext),
|
||||||
|
ASN1_STRING_length(cv->ciphertext));
|
||||||
|
|
||||||
|
|
||||||
ret = 1;
|
ret = 1;
|
||||||
end:
|
end:
|
||||||
EC_GROUP_free(group);
|
|
||||||
BN_free(x);
|
|
||||||
BN_free(y);
|
|
||||||
BN_CTX_free(bn_ctx);
|
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@@ -25,7 +25,8 @@ STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
|||||||
ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||||||
POSSIBILITY OF SUCH DAMAGE. */
|
POSSIBILITY OF SUCH DAMAGE. */
|
||||||
|
|
||||||
#include "serpent.h"
|
#include <string.h>
|
||||||
|
#include <openssl/serpent.h>
|
||||||
|
|
||||||
|
|
||||||
void serpent_whiten(serpent_blk *dst, serpent_key_t *src, int idx) {
|
void serpent_whiten(serpent_blk *dst, serpent_key_t *src, int idx) {
|
||||||
@@ -169,7 +170,7 @@ void serpent_lt(serpent_blk* x, int enc)
|
|||||||
x->w[3] = x3;
|
x->w[3] = x3;
|
||||||
}
|
}
|
||||||
|
|
||||||
void serpent_set_encrypt_key(serpent_key_t *key, void *user_key)
|
void serpent_set_encrypt_key(serpent_key_t *key, const unsigned char *user_key)
|
||||||
{
|
{
|
||||||
union {
|
union {
|
||||||
uint8_t b[32];
|
uint8_t b[32];
|
||||||
|
|||||||
@@ -1,2 +0,0 @@
|
|||||||
crypto/serpent/serpent.o: crypto/serpent/serpent.c \
|
|
||||||
include/openssl/serpent.h
|
|
||||||
@@ -1,5 +1,5 @@
|
|||||||
#ifndef LIBBASE58_H
|
#ifndef HEADER_BASE58_H
|
||||||
#define LIBBASE58_H
|
#define HEADER_BASE58_H
|
||||||
|
|
||||||
#include <stdbool.h>
|
#include <stdbool.h>
|
||||||
#include <stddef.h>
|
#include <stddef.h>
|
||||||
@@ -9,6 +9,3 @@ bool base58_decode(const char *b58, size_t b58sz, void *bin, size_t *binszp);
|
|||||||
bool base58_encode(const void *data, size_t binsz, char *b58, size_t *b58sz);
|
bool base58_encode(const void *data, size_t binsz, char *b58, size_t *b58sz);
|
||||||
|
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
File diff suppressed because it is too large
Load Diff
@@ -65,6 +65,7 @@ int main(int argc, char **argv)
|
|||||||
# include <openssl/evp.h>
|
# include <openssl/evp.h>
|
||||||
# include <openssl/gmapi.h>
|
# include <openssl/gmapi.h>
|
||||||
|
|
||||||
|
/*
|
||||||
static int test_sgd(int verbose)
|
static int test_sgd(int verbose)
|
||||||
{
|
{
|
||||||
int usage[] = {
|
int usage[] = {
|
||||||
@@ -272,9 +273,10 @@ end:
|
|||||||
ECDSA_SIG_free(sig);
|
ECDSA_SIG_free(sig);
|
||||||
return ret;
|
return ret;
|
||||||
}
|
}
|
||||||
|
*/
|
||||||
int main(int argc, char **argv)
|
int main(int argc, char **argv)
|
||||||
{
|
{
|
||||||
|
/*
|
||||||
int verbose = 1;
|
int verbose = 1;
|
||||||
if (!test_sgd(verbose)
|
if (!test_sgd(verbose)
|
||||||
|| !test_sdf_ec(verbose)
|
|| !test_sdf_ec(verbose)
|
||||||
@@ -287,5 +289,7 @@ int main(int argc, char **argv)
|
|||||||
printf("test ok\n");
|
printf("test ok\n");
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
*/
|
||||||
|
return 0;
|
||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
|
|||||||
@@ -7,7 +7,7 @@
|
|||||||
#include <string.h>
|
#include <string.h>
|
||||||
#include <ctype.h>
|
#include <ctype.h>
|
||||||
|
|
||||||
#include "serpent.h"
|
#include <openssl/serpent.h>
|
||||||
|
|
||||||
char *plain[] =
|
char *plain[] =
|
||||||
{ "3DA46FFA6F4D6F30CD258333E5A61369" };
|
{ "3DA46FFA6F4D6F30CD258333E5A61369" };
|
||||||
|
|||||||
@@ -67,6 +67,8 @@ int main(int argc, char **argv)
|
|||||||
# include <openssl/sm2.h>
|
# include <openssl/sm2.h>
|
||||||
# include "../crypto/sm2/sm2_lcl.h"
|
# include "../crypto/sm2/sm2_lcl.h"
|
||||||
|
|
||||||
|
#if 0
|
||||||
|
|
||||||
# define VERBOSE 1
|
# define VERBOSE 1
|
||||||
|
|
||||||
RAND_METHOD fake_rand;
|
RAND_METHOD fake_rand;
|
||||||
@@ -740,4 +742,11 @@ end:
|
|||||||
EC_GROUP_free(sm2b257test);
|
EC_GROUP_free(sm2b257test);
|
||||||
EXIT(err);
|
EXIT(err);
|
||||||
}
|
}
|
||||||
|
#else
|
||||||
|
int main()
|
||||||
|
{
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
#endif
|
||||||
#endif
|
#endif
|
||||||
|
|||||||
@@ -1,16 +0,0 @@
|
|||||||
test/sm2test.o: test/sm2test.c test/../e_os.h \
|
|
||||||
include/openssl/opensslconf.h include/openssl/e_os2.h \
|
|
||||||
include/openssl/bn.h include/openssl/ossl_typ.h \
|
|
||||||
include/openssl/crypto.h include/openssl/stack.h \
|
|
||||||
include/openssl/safestack.h include/openssl/opensslv.h \
|
|
||||||
include/openssl/symhacks.h include/openssl/ec.h include/openssl/asn1.h \
|
|
||||||
include/openssl/bio.h include/openssl/evp.h include/openssl/objects.h \
|
|
||||||
include/openssl/obj_mac.h include/openssl/rand.h \
|
|
||||||
include/openssl/engine.h include/openssl/rsa.h include/openssl/dsa.h \
|
|
||||||
include/openssl/dh.h include/openssl/ui.h include/openssl/err.h \
|
|
||||||
include/openssl/lhash.h include/openssl/x509.h \
|
|
||||||
include/openssl/buffer.h include/openssl/paillier.h \
|
|
||||||
include/openssl/sha.h include/openssl/x509_vfy.h \
|
|
||||||
include/openssl/pkcs7.h include/openssl/sm2.h include/openssl/kdf2.h \
|
|
||||||
include/openssl/kdf.h include/openssl/ecies.h include/openssl/sm3.h \
|
|
||||||
test/../crypto/sm2/sm2_lcl.h
|
|
||||||
92
util/shlib_wrap.sh
Executable file
92
util/shlib_wrap.sh
Executable file
@@ -0,0 +1,92 @@
|
|||||||
|
#!/bin/sh
|
||||||
|
|
||||||
|
[ $# -ne 0 ] || set -x # debug mode without arguments:-)
|
||||||
|
|
||||||
|
THERE="`echo $0 | sed -e 's|[^/]*$||' 2>/dev/null`.."
|
||||||
|
[ -d "${THERE}" ] || exec "$@" # should never happen...
|
||||||
|
|
||||||
|
# Alternative to this is to parse ${THERE}/Makefile...
|
||||||
|
LIBCRYPTOSO="${THERE}/libcrypto.so"
|
||||||
|
if [ -f "$LIBCRYPTOSO" ]; then
|
||||||
|
while [ -h "$LIBCRYPTOSO" ]; do
|
||||||
|
LIBCRYPTOSO="${THERE}/`ls -l "$LIBCRYPTOSO" | sed -e 's|.*\-> ||'`"
|
||||||
|
done
|
||||||
|
SOSUFFIX=`echo ${LIBCRYPTOSO} | sed -e 's|.*\.so||' 2>/dev/null`
|
||||||
|
LIBSSLSO="${THERE}/libssl.so${SOSUFFIX}"
|
||||||
|
fi
|
||||||
|
|
||||||
|
SYSNAME=`(uname -s) 2>/dev/null`;
|
||||||
|
case "$SYSNAME" in
|
||||||
|
SunOS|IRIX*)
|
||||||
|
# SunOS and IRIX run-time linkers evaluate alternative
|
||||||
|
# variables depending on target ABI...
|
||||||
|
rld_var=LD_LIBRARY_PATH
|
||||||
|
case "`(/usr/bin/file "$LIBCRYPTOSO") 2>/dev/null`" in
|
||||||
|
*ELF\ 64*SPARC*|*ELF\ 64*AMD64*)
|
||||||
|
[ -n "$LD_LIBRARY_PATH_64" ] && rld_var=LD_LIBRARY_PATH_64
|
||||||
|
LD_PRELOAD_64="$LIBCRYPTOSO $LIBSSLSO"; export LD_PRELOAD_64
|
||||||
|
preload_var=LD_PRELOAD_64
|
||||||
|
;;
|
||||||
|
*ELF\ 32*SPARC*|*ELF\ 32*80386*)
|
||||||
|
# We only need to change LD_PRELOAD_32 and LD_LIBRARY_PATH_32
|
||||||
|
# on a multi-arch system. Otherwise, trust the fallbacks.
|
||||||
|
if [ -f /lib/64/ld.so.1 ]; then
|
||||||
|
[ -n "$LD_LIBRARY_PATH_32" ] && rld_var=LD_LIBRARY_PATH_32
|
||||||
|
LD_PRELOAD_32="$LIBCRYPTOSO $LIBSSLSO"; export LD_PRELOAD_32
|
||||||
|
preload_var=LD_PRELOAD_32
|
||||||
|
fi
|
||||||
|
;;
|
||||||
|
# Why are newly built .so's preloaded anyway? Because run-time
|
||||||
|
# .so lookup path embedded into application takes precedence
|
||||||
|
# over LD_LIBRARY_PATH and as result application ends up linking
|
||||||
|
# to previously installed .so's. On IRIX instead of preloading
|
||||||
|
# newly built .so's we trick run-time linker to fail to find
|
||||||
|
# the installed .so by setting _RLD_ROOT variable.
|
||||||
|
*ELF\ 32*MIPS*)
|
||||||
|
#_RLD_LIST="$LIBCRYPTOSO:$LIBSSLSO:DEFAULT"; export _RLD_LIST
|
||||||
|
_RLD_ROOT=/no/such/dir; export _RLD_ROOT
|
||||||
|
eval $rld_var=\"/usr/lib'${'$rld_var':+:$'$rld_var'}'\"
|
||||||
|
preload_var=_RLD_LIST
|
||||||
|
;;
|
||||||
|
*ELF\ N32*MIPS*)
|
||||||
|
[ -n "$LD_LIBRARYN32_PATH" ] && rld_var=LD_LIBRARYN32_PATH
|
||||||
|
#_RLDN32_LIST="$LIBCRYPTOSO:$LIBSSLSO:DEFAULT"; export _RLDN32_LIST
|
||||||
|
_RLDN32_ROOT=/no/such/dir; export _RLDN32_ROOT
|
||||||
|
eval $rld_var=\"/usr/lib32'${'$rld_var':+:$'$rld_var'}'\"
|
||||||
|
preload_var=_RLDN32_LIST
|
||||||
|
;;
|
||||||
|
*ELF\ 64*MIPS*)
|
||||||
|
[ -n "$LD_LIBRARY64_PATH" ] && rld_var=LD_LIBRARY64_PATH
|
||||||
|
#_RLD64_LIST="$LIBCRYPTOSO:$LIBSSLSO:DEFAULT"; export _RLD64_LIST
|
||||||
|
_RLD64_ROOT=/no/such/dir; export _RLD64_ROOT
|
||||||
|
eval $rld_var=\"/usr/lib64'${'$rld_var':+:$'$rld_var'}'\"
|
||||||
|
preload_var=_RLD64_LIST
|
||||||
|
;;
|
||||||
|
esac
|
||||||
|
eval $rld_var=\"${THERE}'${'$rld_var':+:$'$rld_var'}'\"; export $rld_var
|
||||||
|
unset rld_var
|
||||||
|
;;
|
||||||
|
*) LD_LIBRARY_PATH="${THERE}:$LD_LIBRARY_PATH" # Linux, ELF HP-UX
|
||||||
|
DYLD_LIBRARY_PATH="${THERE}:$DYLD_LIBRARY_PATH" # MacOS X
|
||||||
|
SHLIB_PATH="${THERE}:$SHLIB_PATH" # legacy HP-UX
|
||||||
|
LIBPATH="${THERE}:$LIBPATH" # AIX, OS/2
|
||||||
|
export LD_LIBRARY_PATH DYLD_LIBRARY_PATH SHLIB_PATH LIBPATH
|
||||||
|
# Even though $PATH is adjusted [for Windows sake], it doesn't
|
||||||
|
# necessarily does the trick. Trouble is that with introduction
|
||||||
|
# of SafeDllSearchMode in XP/2003 it's more appropriate to copy
|
||||||
|
# .DLLs in vicinity of executable, which is done elsewhere...
|
||||||
|
if [ "$OSTYPE" != msdosdjgpp ]; then
|
||||||
|
PATH="${THERE}:$PATH"; export PATH
|
||||||
|
fi
|
||||||
|
;;
|
||||||
|
esac
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
cmd="$1"; [ -x "$cmd" ] || cmd="$cmd${EXE_EXT}"
|
||||||
|
shift
|
||||||
|
if [ $# -eq 0 ]; then
|
||||||
|
exec "$cmd" # old sh, such as Tru64 4.x, fails to expand empty "$@"
|
||||||
|
else
|
||||||
|
exec "$cmd" "$@"
|
||||||
|
fi
|
||||||
Reference in New Issue
Block a user