int cp_sokaka_key(uint8_t *key, unsigned int key_len, char *id1,
int len1, sokaka_t k, char *id2, int len2) {
int first = 0, result = STS_OK;
g1_t p;
g2_t q;
gt_t e;
g1_null(p);
g2_null(q);
gt_null(e);
TRY {
g1_new(p);
g2_new(q);
gt_new(e);
if (len1 == len2) {
if (strncmp(id1, id2, len1) == 0) {
THROW(ERR_NO_VALID);
}
first = (strncmp(id1, id2, len1) < 0 ? 1 : 2);
} else {
if (len1 < len2) {
if (strncmp(id1, id2, len1) == 0) {
first = 1;
} else {
first = (strncmp(id1, id2, len2) < 0 ? 1 : 2);
}
} else {
if (strncmp(id1, id2, len2) == 0) {
first = 2;
} else {
first = (strncmp(id1, id2, len2) < 0 ? 1 : 2);
}
}
}
if (pc_map_is_type1()) {
g2_map(q, (uint8_t *)id2, len2);
pc_map(e, k->s1, q);
} else {
if (first == 1) {
g2_map(q, (uint8_t *)id2, len2);
pc_map(e, k->s1, q);
} else {
g1_map(p, (uint8_t *)id2, len2);
pc_map(e, p, k->s2);
}
}
/* Allocate size for storing the output. */
uint8_t buf[gt_size_bin(e, 0)];
gt_write_bin(buf, sizeof(buf), e, 0);
md_kdf1(key, key_len, buf, sizeof(buf));
}
CATCH_ANY {
result = STS_ERR;
}
FINALLY {
g1_free(p);
g2_free(q);
gt_free(e);
}
return result;
}
void md_mgf1(unsigned char *mask, int mask_len, const unsigned char *in,
int in_len) {
md_kdf1(mask, mask_len, in, in_len);
}
