mirror of
https://git.tartarus.org/simon/putty.git
synced 2025-03-22 06:38:37 -05:00

This stores its data in the same format as the existing KCT_TEXT, but it displays differently in puttygen --dump, expecting that the data will be full of horrible control characters, invalid UTF-8, etc. The displayed data is of the form b64("..."), so you get a hint about what the encoding is, and can still paste into Python by defining the identifier 'b64' to be base64.b64decode or equivalent.
65 lines
1.8 KiB
C
65 lines
1.8 KiB
C
#include "ssh.h"
|
|
#include "mpint.h"
|
|
|
|
key_components *key_components_new(void)
|
|
{
|
|
key_components *kc = snew(key_components);
|
|
kc->ncomponents = 0;
|
|
kc->componentsize = 0;
|
|
kc->components = NULL;
|
|
return kc;
|
|
}
|
|
|
|
static void key_components_add_str(key_components *kc, const char *name,
|
|
KeyComponentType type, ptrlen data)
|
|
{
|
|
sgrowarray(kc->components, kc->componentsize, kc->ncomponents);
|
|
size_t n = kc->ncomponents++;
|
|
kc->components[n].name = dupstr(name);
|
|
kc->components[n].type = type;
|
|
kc->components[n].str = strbuf_dup_nm(data);
|
|
}
|
|
|
|
void key_components_add_text(key_components *kc,
|
|
const char *name, const char *value)
|
|
{
|
|
key_components_add_str(kc, name, KCT_TEXT, ptrlen_from_asciz(value));
|
|
}
|
|
|
|
void key_components_add_binary(key_components *kc,
|
|
const char *name, ptrlen value)
|
|
{
|
|
key_components_add_str(kc, name, KCT_BINARY, value);
|
|
}
|
|
|
|
void key_components_add_mp(key_components *kc,
|
|
const char *name, mp_int *value)
|
|
{
|
|
sgrowarray(kc->components, kc->componentsize, kc->ncomponents);
|
|
size_t n = kc->ncomponents++;
|
|
kc->components[n].name = dupstr(name);
|
|
kc->components[n].type = KCT_MPINT;
|
|
kc->components[n].mp = mp_copy(value);
|
|
}
|
|
|
|
void key_components_free(key_components *kc)
|
|
{
|
|
for (size_t i = 0; i < kc->ncomponents; i++) {
|
|
key_component *comp = &kc->components[i];
|
|
sfree(comp->name);
|
|
switch (comp->type) {
|
|
case KCT_MPINT:
|
|
mp_free(comp->mp);
|
|
break;
|
|
case KCT_TEXT:
|
|
case KCT_BINARY:
|
|
strbuf_free(comp->str);
|
|
break;
|
|
default:
|
|
unreachable("bad key component type");
|
|
}
|
|
}
|
|
sfree(kc->components);
|
|
sfree(kc);
|
|
}
|