| Index: mozilla/security/nss/lib/util/secasn1e.c
|
| ===================================================================
|
| --- mozilla/security/nss/lib/util/secasn1e.c (revision 191424)
|
| +++ mozilla/security/nss/lib/util/secasn1e.c (working copy)
|
| @@ -1,1615 +0,0 @@
|
| -/* This Source Code Form is subject to the terms of the Mozilla Public
|
| - * License, v. 2.0. If a copy of the MPL was not distributed with this
|
| - * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
|
| -
|
| -/*
|
| - * Support for ENcoding ASN.1 data based on BER/DER (Basic/Distinguished
|
| - * Encoding Rules).
|
| - *
|
| - * $Id: secasn1e.c,v 1.23 2012/04/25 14:50:16 gerv%gerv.net Exp $
|
| - */
|
| -
|
| -#include "secasn1.h"
|
| -
|
| -typedef enum {
|
| - beforeHeader,
|
| - duringContents,
|
| - duringGroup,
|
| - duringSequence,
|
| - afterContents,
|
| - afterImplicit,
|
| - afterInline,
|
| - afterPointer,
|
| - afterChoice,
|
| - notInUse
|
| -} sec_asn1e_parse_place;
|
| -
|
| -typedef enum {
|
| - allDone,
|
| - encodeError,
|
| - keepGoing,
|
| - needBytes
|
| -} sec_asn1e_parse_status;
|
| -
|
| -typedef enum {
|
| - hdr_normal = 0, /* encode header normally */
|
| - hdr_any = 1, /* header already encoded in content */
|
| - hdr_decoder = 2, /* template only used by decoder. skip it. */
|
| - hdr_optional = 3, /* optional component, to be omitted */
|
| - hdr_placeholder = 4 /* place holder for from_buf content */
|
| -} sec_asn1e_hdr_encoding;
|
| -
|
| -typedef struct sec_asn1e_state_struct {
|
| - SEC_ASN1EncoderContext *top;
|
| - const SEC_ASN1Template *theTemplate;
|
| - void *src;
|
| -
|
| - struct sec_asn1e_state_struct *parent; /* aka prev */
|
| - struct sec_asn1e_state_struct *child; /* aka next */
|
| -
|
| - sec_asn1e_parse_place place; /* where we are in encoding process */
|
| -
|
| - /*
|
| - * XXX explain the next fields as clearly as possible...
|
| - */
|
| - unsigned char tag_modifiers;
|
| - unsigned char tag_number;
|
| - unsigned long underlying_kind;
|
| -
|
| - int depth;
|
| -
|
| - PRBool isExplicit, /* we are handling an isExplicit header */
|
| - indefinite, /* need end-of-contents */
|
| - is_string, /* encoding a simple string or an ANY */
|
| - may_stream, /* when streaming, do indefinite encoding */
|
| - optional, /* omit field if it has no contents */
|
| - disallowStreaming; /* disallow streaming in all sub-templates */
|
| -} sec_asn1e_state;
|
| -
|
| -/*
|
| - * An "outsider" will have an opaque pointer to this, created by calling
|
| - * SEC_ASN1EncoderStart(). It will be passed back in to all subsequent
|
| - * calls to SEC_ASN1EncoderUpdate() and related routines, and when done
|
| - * it is passed to SEC_ASN1EncoderFinish().
|
| - */
|
| -struct sec_EncoderContext_struct {
|
| - PRArenaPool *our_pool; /* for our internal allocs */
|
| -
|
| - sec_asn1e_state *current;
|
| - sec_asn1e_parse_status status;
|
| -
|
| - PRBool streaming;
|
| - PRBool from_buf;
|
| -
|
| - SEC_ASN1NotifyProc notify_proc; /* call before/after handling field */
|
| - void *notify_arg; /* argument to notify_proc */
|
| - PRBool during_notify; /* true during call to notify_proc */
|
| -
|
| - SEC_ASN1WriteProc output_proc; /* pass encoded bytes to this */
|
| - void *output_arg; /* argument to that function */
|
| -};
|
| -
|
| -
|
| -static sec_asn1e_state *
|
| -sec_asn1e_push_state (SEC_ASN1EncoderContext *cx,
|
| - const SEC_ASN1Template *theTemplate,
|
| - const void *src, PRBool new_depth)
|
| -{
|
| - sec_asn1e_state *state, *new_state;
|
| -
|
| - state = cx->current;
|
| -
|
| - new_state = (sec_asn1e_state*)PORT_ArenaZAlloc (cx->our_pool,
|
| - sizeof(*new_state));
|
| - if (new_state == NULL) {
|
| - cx->status = encodeError;
|
| - return NULL;
|
| - }
|
| -
|
| - new_state->top = cx;
|
| - new_state->parent = state;
|
| - new_state->theTemplate = theTemplate;
|
| - new_state->place = notInUse;
|
| - if (src != NULL)
|
| - new_state->src = (char *)src + theTemplate->offset;
|
| -
|
| - if (state != NULL) {
|
| - new_state->depth = state->depth;
|
| - if (new_depth)
|
| - new_state->depth++;
|
| - state->child = new_state;
|
| - }
|
| -
|
| - cx->current = new_state;
|
| - return new_state;
|
| -}
|
| -
|
| -
|
| -static void
|
| -sec_asn1e_scrub_state (sec_asn1e_state *state)
|
| -{
|
| - /*
|
| - * Some default "scrubbing".
|
| - * XXX right set of initializations?
|
| - */
|
| - state->place = beforeHeader;
|
| - state->indefinite = PR_FALSE;
|
| -}
|
| -
|
| -
|
| -static void
|
| -sec_asn1e_notify_before (SEC_ASN1EncoderContext *cx, void *src, int depth)
|
| -{
|
| - if (cx->notify_proc == NULL)
|
| - return;
|
| -
|
| - cx->during_notify = PR_TRUE;
|
| - (* cx->notify_proc) (cx->notify_arg, PR_TRUE, src, depth);
|
| - cx->during_notify = PR_FALSE;
|
| -}
|
| -
|
| -
|
| -static void
|
| -sec_asn1e_notify_after (SEC_ASN1EncoderContext *cx, void *src, int depth)
|
| -{
|
| - if (cx->notify_proc == NULL)
|
| - return;
|
| -
|
| - cx->during_notify = PR_TRUE;
|
| - (* cx->notify_proc) (cx->notify_arg, PR_FALSE, src, depth);
|
| - cx->during_notify = PR_FALSE;
|
| -}
|
| -
|
| -
|
| -static sec_asn1e_state *
|
| -sec_asn1e_init_state_based_on_template (sec_asn1e_state *state)
|
| -{
|
| - PRBool isExplicit, is_string, may_stream, optional, universal;
|
| - PRBool disallowStreaming;
|
| - unsigned char tag_modifiers;
|
| - unsigned long encode_kind, under_kind;
|
| - unsigned long tag_number;
|
| - PRBool isInline = PR_FALSE;
|
| -
|
| -
|
| - encode_kind = state->theTemplate->kind;
|
| -
|
| - universal = ((encode_kind & SEC_ASN1_CLASS_MASK) == SEC_ASN1_UNIVERSAL)
|
| - ? PR_TRUE : PR_FALSE;
|
| -
|
| - isExplicit = (encode_kind & SEC_ASN1_EXPLICIT) ? PR_TRUE : PR_FALSE;
|
| - encode_kind &= ~SEC_ASN1_EXPLICIT;
|
| -
|
| - optional = (encode_kind & SEC_ASN1_OPTIONAL) ? PR_TRUE : PR_FALSE;
|
| - encode_kind &= ~SEC_ASN1_OPTIONAL;
|
| -
|
| - PORT_Assert (!(isExplicit && universal)); /* bad templates */
|
| -
|
| - may_stream = (encode_kind & SEC_ASN1_MAY_STREAM) ? PR_TRUE : PR_FALSE;
|
| - encode_kind &= ~SEC_ASN1_MAY_STREAM;
|
| -
|
| - disallowStreaming = (encode_kind & SEC_ASN1_NO_STREAM) ? PR_TRUE : PR_FALSE;
|
| - encode_kind &= ~SEC_ASN1_NO_STREAM;
|
| -
|
| - /* Just clear this to get it out of the way; we do not need it here */
|
| - encode_kind &= ~SEC_ASN1_DYNAMIC;
|
| -
|
| - if( encode_kind & SEC_ASN1_CHOICE ) {
|
| - under_kind = SEC_ASN1_CHOICE;
|
| - } else if ((encode_kind & (SEC_ASN1_POINTER | SEC_ASN1_INLINE)) ||
|
| - (!universal && !isExplicit)) {
|
| - const SEC_ASN1Template *subt;
|
| - void *src = NULL;
|
| -
|
| - PORT_Assert ((encode_kind & (SEC_ASN1_ANY | SEC_ASN1_SKIP)) == 0);
|
| -
|
| - sec_asn1e_scrub_state (state);
|
| -
|
| - if (encode_kind & SEC_ASN1_POINTER) {
|
| - src = *(void **)state->src;
|
| - state->place = afterPointer;
|
| -
|
| - if (src == NULL) {
|
| - /*
|
| - * If this is optional, but NULL, then the field does
|
| - * not need to be encoded. In this case we are done;
|
| - * we do not want to push a subtemplate.
|
| - */
|
| - if (optional)
|
| - return state;
|
| -
|
| - /*
|
| - * XXX this is an error; need to figure out
|
| - * how to handle this
|
| - */
|
| - }
|
| - } else {
|
| - src = state->src;
|
| - if (encode_kind & SEC_ASN1_INLINE) {
|
| - /* check that there are no extraneous bits */
|
| - /* PORT_Assert (encode_kind == SEC_ASN1_INLINE && !optional); */
|
| - state->place = afterInline;
|
| - isInline = PR_TRUE;
|
| - } else {
|
| - /*
|
| - * Save the tag modifiers and tag number here before moving
|
| - * on to the next state in case this is a member of a
|
| - * SEQUENCE OF
|
| - */
|
| - state->tag_modifiers = (unsigned char)
|
| - (encode_kind & (SEC_ASN1_TAG_MASK & ~SEC_ASN1_TAGNUM_MASK));
|
| - state->tag_number = (unsigned char)
|
| - (encode_kind & SEC_ASN1_TAGNUM_MASK);
|
| -
|
| - state->place = afterImplicit;
|
| - state->optional = optional;
|
| - }
|
| - }
|
| -
|
| - subt = SEC_ASN1GetSubtemplate (state->theTemplate, state->src, PR_TRUE);
|
| - if (isInline && optional) {
|
| - /* we only handle a very limited set of optional inline cases at
|
| - this time */
|
| - if (PR_FALSE != SEC_ASN1IsTemplateSimple(subt)) {
|
| - /* we now know that the target is a SECItem*, so we can check
|
| - if the source contains one */
|
| - SECItem* target = (SECItem*)state->src;
|
| - if (!target || !target->data || !target->len) {
|
| - /* no valid data to encode subtemplate */
|
| - return state;
|
| - }
|
| - } else {
|
| - PORT_Assert(0); /* complex templates are not handled as
|
| - inline optional */
|
| - }
|
| - }
|
| - state = sec_asn1e_push_state (state->top, subt, src, PR_FALSE);
|
| - if (state == NULL)
|
| - return state;
|
| -
|
| - if (universal) {
|
| - /*
|
| - * This is a POINTER or INLINE; just init based on that
|
| - * and we are done.
|
| - */
|
| - return sec_asn1e_init_state_based_on_template (state);
|
| - }
|
| -
|
| - /*
|
| - * This is an implicit, non-universal (meaning, application-private
|
| - * or context-specific) field. This results in a "magic" tag but
|
| - * encoding based on the underlying type. We pushed a new state
|
| - * that is based on the subtemplate (the underlying type), but
|
| - * now we will sort of alias it to give it some of our properties
|
| - * (tag, optional status, etc.).
|
| - *
|
| - * NB: ALL the following flags in the subtemplate are disallowed
|
| - * and/or ignored: EXPLICIT, OPTIONAL, INNER, INLINE, POINTER.
|
| - */
|
| -
|
| - under_kind = state->theTemplate->kind;
|
| - if ((under_kind & SEC_ASN1_MAY_STREAM) && !disallowStreaming) {
|
| - may_stream = PR_TRUE;
|
| - }
|
| - under_kind &= ~(SEC_ASN1_MAY_STREAM | SEC_ASN1_DYNAMIC);
|
| - } else {
|
| - under_kind = encode_kind;
|
| - }
|
| -
|
| - /*
|
| - * Sanity check that there are no unwanted bits marked in under_kind.
|
| - * These bits were either removed above (after we recorded them) or
|
| - * they simply should not be found (signalling a bad/broken template).
|
| - * XXX is this the right set of bits to test here? (i.e. need to add
|
| - * or remove any?)
|
| - */
|
| -#define UNEXPECTED_FLAGS \
|
| - (SEC_ASN1_EXPLICIT | SEC_ASN1_OPTIONAL | SEC_ASN1_SKIP | SEC_ASN1_INNER | \
|
| - SEC_ASN1_DYNAMIC | SEC_ASN1_MAY_STREAM | SEC_ASN1_INLINE | SEC_ASN1_POINTER)
|
| -
|
| - PORT_Assert ((under_kind & UNEXPECTED_FLAGS) == 0);
|
| - under_kind &= ~UNEXPECTED_FLAGS;
|
| -#undef UNEXPECTED_FLAGS
|
| -
|
| - if (encode_kind & SEC_ASN1_ANY) {
|
| - PORT_Assert (encode_kind == under_kind);
|
| - tag_modifiers = 0;
|
| - tag_number = 0;
|
| - is_string = PR_TRUE;
|
| - } else {
|
| - tag_modifiers = (unsigned char)
|
| - (encode_kind & (SEC_ASN1_TAG_MASK & ~SEC_ASN1_TAGNUM_MASK));
|
| - /*
|
| - * XXX This assumes only single-octet identifiers. To handle
|
| - * the HIGH TAG form we would need to do some more work, especially
|
| - * in how to specify them in the template, because right now we
|
| - * do not provide a way to specify more *tag* bits in encode_kind.
|
| - */
|
| - tag_number = encode_kind & SEC_ASN1_TAGNUM_MASK;
|
| -
|
| - is_string = PR_FALSE;
|
| - switch (under_kind & SEC_ASN1_TAGNUM_MASK) {
|
| - case SEC_ASN1_SET:
|
| - /*
|
| - * XXX A plain old SET (as opposed to a SET OF) is not implemented.
|
| - * If it ever is, remove this assert...
|
| - */
|
| - PORT_Assert ((under_kind & SEC_ASN1_GROUP) != 0);
|
| - /* fallthru */
|
| - case SEC_ASN1_SEQUENCE:
|
| - tag_modifiers |= SEC_ASN1_CONSTRUCTED;
|
| - break;
|
| - case SEC_ASN1_BIT_STRING:
|
| - case SEC_ASN1_BMP_STRING:
|
| - case SEC_ASN1_GENERALIZED_TIME:
|
| - case SEC_ASN1_IA5_STRING:
|
| - case SEC_ASN1_OCTET_STRING:
|
| - case SEC_ASN1_PRINTABLE_STRING:
|
| - case SEC_ASN1_T61_STRING:
|
| - case SEC_ASN1_UNIVERSAL_STRING:
|
| - case SEC_ASN1_UTC_TIME:
|
| - case SEC_ASN1_UTF8_STRING:
|
| - case SEC_ASN1_VISIBLE_STRING:
|
| - /*
|
| - * We do not yet know if we will be constructing the string,
|
| - * so we have to wait to do this final tag modification.
|
| - */
|
| - is_string = PR_TRUE;
|
| - break;
|
| - }
|
| - }
|
| -
|
| - state->tag_modifiers = tag_modifiers;
|
| - state->tag_number = (unsigned char)tag_number;
|
| - state->underlying_kind = under_kind;
|
| - state->isExplicit = isExplicit;
|
| - state->may_stream = may_stream;
|
| - state->is_string = is_string;
|
| - state->optional = optional;
|
| - state->disallowStreaming = disallowStreaming;
|
| -
|
| - sec_asn1e_scrub_state (state);
|
| -
|
| - return state;
|
| -}
|
| -
|
| -
|
| -static void
|
| -sec_asn1e_write_part (sec_asn1e_state *state,
|
| - const char *buf, unsigned long len,
|
| - SEC_ASN1EncodingPart part)
|
| -{
|
| - SEC_ASN1EncoderContext *cx;
|
| -
|
| - cx = state->top;
|
| - (* cx->output_proc) (cx->output_arg, buf, len, state->depth, part);
|
| -}
|
| -
|
| -
|
| -/*
|
| - * XXX This assumes only single-octet identifiers. To handle
|
| - * the HIGH TAG form we would need to modify this interface and
|
| - * teach it to properly encode the special form.
|
| - */
|
| -static void
|
| -sec_asn1e_write_identifier_bytes (sec_asn1e_state *state, unsigned char value)
|
| -{
|
| - char byte;
|
| -
|
| - byte = (char) value;
|
| - sec_asn1e_write_part (state, &byte, 1, SEC_ASN1_Identifier);
|
| -}
|
| -
|
| -int
|
| -SEC_ASN1EncodeLength(unsigned char *buf,int value) {
|
| - int lenlen;
|
| -
|
| - lenlen = SEC_ASN1LengthLength (value);
|
| - if (lenlen == 1) {
|
| - buf[0] = value;
|
| - } else {
|
| - int i;
|
| -
|
| - i = lenlen - 1;
|
| - buf[0] = 0x80 | i;
|
| - while (i) {
|
| - buf[i--] = value;
|
| - value >>= 8;
|
| - }
|
| - PORT_Assert (value == 0);
|
| - }
|
| - return lenlen;
|
| -}
|
| -
|
| -static void
|
| -sec_asn1e_write_length_bytes (sec_asn1e_state *state, unsigned long value,
|
| - PRBool indefinite)
|
| -{
|
| - int lenlen;
|
| - unsigned char buf[sizeof(unsigned long) + 1];
|
| -
|
| - if (indefinite) {
|
| - PORT_Assert (value == 0);
|
| - buf[0] = 0x80;
|
| - lenlen = 1;
|
| - } else {
|
| - lenlen = SEC_ASN1EncodeLength(buf,value);
|
| - }
|
| -
|
| - sec_asn1e_write_part (state, (char *) buf, lenlen, SEC_ASN1_Length);
|
| -}
|
| -
|
| -
|
| -static void
|
| -sec_asn1e_write_contents_bytes (sec_asn1e_state *state,
|
| - const char *buf, unsigned long len)
|
| -{
|
| - sec_asn1e_write_part (state, buf, len, SEC_ASN1_Contents);
|
| -}
|
| -
|
| -
|
| -static void
|
| -sec_asn1e_write_end_of_contents_bytes (sec_asn1e_state *state)
|
| -{
|
| - const char eoc[2] = {0, 0};
|
| -
|
| - sec_asn1e_write_part (state, eoc, 2, SEC_ASN1_EndOfContents);
|
| -}
|
| -
|
| -static int
|
| -sec_asn1e_which_choice
|
| -(
|
| - void *src,
|
| - const SEC_ASN1Template *theTemplate
|
| -)
|
| -{
|
| - int rv;
|
| - unsigned int which = *(unsigned int *)src;
|
| -
|
| - for( rv = 1, theTemplate++; theTemplate->kind != 0; rv++, theTemplate++ ) {
|
| - if( which == theTemplate->size ) {
|
| - return rv;
|
| - }
|
| - }
|
| -
|
| - return 0;
|
| -}
|
| -
|
| -static unsigned long
|
| -sec_asn1e_contents_length (const SEC_ASN1Template *theTemplate, void *src,
|
| - PRBool disallowStreaming, PRBool insideIndefinite,
|
| - sec_asn1e_hdr_encoding *pHdrException)
|
| -{
|
| - unsigned long encode_kind, underlying_kind;
|
| - PRBool isExplicit, optional, universal, may_stream;
|
| - unsigned long len;
|
| -
|
| - /*
|
| - * This function currently calculates the length in all cases
|
| - * except the following: when writing out the contents of a
|
| - * template that belongs to a state where it was a sub-template
|
| - * with the SEC_ASN1_MAY_STREAM bit set and it's parent had the
|
| - * optional bit set. The information that the parent is optional
|
| - * and that we should return the length of 0 when that length is
|
| - * present since that means the optional field is no longer present.
|
| - * So we add the disallowStreaming flag which is passed in when
|
| - * writing the contents, but for all recursive calls to
|
| - * sec_asn1e_contents_length, we pass PR_FALSE, because this
|
| - * function correctly calculates the length for children templates
|
| - * from that point on. Confused yet? At least you didn't have
|
| - * to figure it out. ;) -javi
|
| - */
|
| - encode_kind = theTemplate->kind;
|
| -
|
| - universal = ((encode_kind & SEC_ASN1_CLASS_MASK) == SEC_ASN1_UNIVERSAL)
|
| - ? PR_TRUE : PR_FALSE;
|
| -
|
| - isExplicit = (encode_kind & SEC_ASN1_EXPLICIT) ? PR_TRUE : PR_FALSE;
|
| - encode_kind &= ~SEC_ASN1_EXPLICIT;
|
| -
|
| - optional = (encode_kind & SEC_ASN1_OPTIONAL) ? PR_TRUE : PR_FALSE;
|
| - encode_kind &= ~SEC_ASN1_OPTIONAL;
|
| -
|
| - PORT_Assert (!(isExplicit && universal)); /* bad templates */
|
| -
|
| - may_stream = (encode_kind & SEC_ASN1_MAY_STREAM) ? PR_TRUE : PR_FALSE;
|
| - encode_kind &= ~SEC_ASN1_MAY_STREAM;
|
| -
|
| - /* Just clear this to get it out of the way; we do not need it here */
|
| - encode_kind &= ~SEC_ASN1_DYNAMIC;
|
| -
|
| - if (encode_kind & SEC_ASN1_NO_STREAM) {
|
| - disallowStreaming = PR_TRUE;
|
| - }
|
| - encode_kind &= ~SEC_ASN1_NO_STREAM;
|
| -
|
| - if (encode_kind & SEC_ASN1_CHOICE) {
|
| - void *src2;
|
| - int indx = sec_asn1e_which_choice(src, theTemplate);
|
| - if (0 == indx) {
|
| - /* XXX set an error? "choice not found" */
|
| - /* state->top->status = encodeError; */
|
| - return 0;
|
| - }
|
| -
|
| - src2 = (void *)
|
| - ((char *)src - theTemplate->offset + theTemplate[indx].offset);
|
| -
|
| - return sec_asn1e_contents_length(&theTemplate[indx], src2,
|
| - disallowStreaming, insideIndefinite,
|
| - pHdrException);
|
| - }
|
| -
|
| - if ((encode_kind & (SEC_ASN1_POINTER | SEC_ASN1_INLINE)) || !universal) {
|
| - /* XXX any bits we want to disallow (PORT_Assert against) here? */
|
| - theTemplate = SEC_ASN1GetSubtemplate (theTemplate, src, PR_TRUE);
|
| - if (encode_kind & SEC_ASN1_POINTER) {
|
| - src = *(void **)src;
|
| - if (src == NULL) {
|
| - *pHdrException = optional ? hdr_optional : hdr_normal;
|
| - return 0;
|
| - }
|
| - } else if (encode_kind & SEC_ASN1_INLINE) {
|
| - /* check that there are no extraneous bits */
|
| - if (optional) {
|
| - if (PR_FALSE != SEC_ASN1IsTemplateSimple(theTemplate)) {
|
| - /* we now know that the target is a SECItem*, so we can check
|
| - if the source contains one */
|
| - SECItem* target = (SECItem*)src;
|
| - if (!target || !target->data || !target->len) {
|
| - /* no valid data to encode subtemplate */
|
| - *pHdrException = hdr_optional;
|
| - return 0;
|
| - }
|
| - } else {
|
| - PORT_Assert(0); /* complex templates not handled as inline
|
| - optional */
|
| - }
|
| - }
|
| - }
|
| -
|
| - src = (char *)src + theTemplate->offset;
|
| -
|
| - /* recurse to find the length of the subtemplate */
|
| - len = sec_asn1e_contents_length (theTemplate, src, disallowStreaming,
|
| - insideIndefinite, pHdrException);
|
| - if (len == 0 && optional) {
|
| - *pHdrException = hdr_optional;
|
| - } else if (isExplicit) {
|
| - if (*pHdrException == hdr_any) {
|
| - /* *we* do not want to add in a header,
|
| - ** but our caller still does.
|
| - */
|
| - *pHdrException = hdr_normal;
|
| - } else if (*pHdrException == hdr_normal) {
|
| - /* if the inner content exists, our length is
|
| - * len(identifier) + len(length) + len(innercontent)
|
| - * XXX we currently assume len(identifier) == 1;
|
| - * to support a high-tag-number this would need to be smarter.
|
| - */
|
| - len += 1 + SEC_ASN1LengthLength (len);
|
| - }
|
| - }
|
| - return len;
|
| - }
|
| - underlying_kind = encode_kind;
|
| -
|
| - /* This is only used in decoding; it plays no part in encoding. */
|
| - if (underlying_kind & SEC_ASN1_SAVE) {
|
| - /* check that there are no extraneous bits */
|
| - PORT_Assert (underlying_kind == SEC_ASN1_SAVE);
|
| - *pHdrException = hdr_decoder;
|
| - return 0;
|
| - }
|
| -
|
| -#define UNEXPECTED_FLAGS \
|
| - (SEC_ASN1_EXPLICIT | SEC_ASN1_OPTIONAL | SEC_ASN1_INLINE | SEC_ASN1_POINTER |\
|
| - SEC_ASN1_DYNAMIC | SEC_ASN1_MAY_STREAM | SEC_ASN1_SAVE | SEC_ASN1_SKIP)
|
| -
|
| - /* Having any of these bits is not expected here... */
|
| - PORT_Assert ((underlying_kind & UNEXPECTED_FLAGS) == 0);
|
| - underlying_kind &= ~UNEXPECTED_FLAGS;
|
| -#undef UNEXPECTED_FLAGS
|
| -
|
| - if (underlying_kind & SEC_ASN1_CHOICE) {
|
| - void *src2;
|
| - int indx = sec_asn1e_which_choice(src, theTemplate);
|
| - if (0 == indx) {
|
| - /* XXX set an error? "choice not found" */
|
| - /* state->top->status = encodeError; */
|
| - return 0;
|
| - }
|
| -
|
| - src2 = (void *)
|
| - ((char *)src - theTemplate->offset + theTemplate[indx].offset);
|
| - len = sec_asn1e_contents_length(&theTemplate[indx], src2,
|
| - disallowStreaming, insideIndefinite,
|
| - pHdrException);
|
| - } else {
|
| - switch (underlying_kind) {
|
| - case SEC_ASN1_SEQUENCE_OF:
|
| - case SEC_ASN1_SET_OF:
|
| - {
|
| - const SEC_ASN1Template *tmpt;
|
| - void *sub_src;
|
| - unsigned long sub_len;
|
| - void **group;
|
| -
|
| - len = 0;
|
| -
|
| - group = *(void ***)src;
|
| - if (group == NULL)
|
| - break;
|
| -
|
| - tmpt = SEC_ASN1GetSubtemplate (theTemplate, src, PR_TRUE);
|
| -
|
| - for (; *group != NULL; group++) {
|
| - sub_src = (char *)(*group) + tmpt->offset;
|
| - sub_len = sec_asn1e_contents_length (tmpt, sub_src,
|
| - disallowStreaming,
|
| - insideIndefinite,
|
| - pHdrException);
|
| - len += sub_len;
|
| - /*
|
| - * XXX The 1 below is the presumed length of the identifier;
|
| - * to support a high-tag-number this would need to be smarter.
|
| - */
|
| - if (*pHdrException == hdr_normal)
|
| - len += 1 + SEC_ASN1LengthLength (sub_len);
|
| - }
|
| - }
|
| - break;
|
| -
|
| - case SEC_ASN1_SEQUENCE:
|
| - case SEC_ASN1_SET:
|
| - {
|
| - const SEC_ASN1Template *tmpt;
|
| - void *sub_src;
|
| - unsigned long sub_len;
|
| -
|
| - len = 0;
|
| - for (tmpt = theTemplate + 1; tmpt->kind; tmpt++) {
|
| - sub_src = (char *)src + tmpt->offset;
|
| - sub_len = sec_asn1e_contents_length (tmpt, sub_src,
|
| - disallowStreaming,
|
| - insideIndefinite,
|
| - pHdrException);
|
| - len += sub_len;
|
| - /*
|
| - * XXX The 1 below is the presumed length of the identifier;
|
| - * to support a high-tag-number this would need to be smarter.
|
| - */
|
| - if (*pHdrException == hdr_normal)
|
| - len += 1 + SEC_ASN1LengthLength (sub_len);
|
| - }
|
| - }
|
| - break;
|
| -
|
| - case SEC_ASN1_BIT_STRING:
|
| - /* convert bit length to byte */
|
| - len = (((SECItem *)src)->len + 7) >> 3;
|
| - /* bit string contents involve an extra octet */
|
| - if (len)
|
| - len++;
|
| - break;
|
| -
|
| - case SEC_ASN1_INTEGER:
|
| - /* ASN.1 INTEGERs are signed.
|
| - * If the source is an unsigned integer, the encoder will need
|
| - * to handle the conversion here.
|
| - */
|
| - {
|
| - unsigned char *buf = ((SECItem *)src)->data;
|
| - SECItemType integerType = ((SECItem *)src)->type;
|
| - len = ((SECItem *)src)->len;
|
| - while (len > 0) {
|
| - if (*buf != 0) {
|
| - if (*buf & 0x80 && integerType == siUnsignedInteger) {
|
| - len++; /* leading zero needed to make number signed */
|
| - }
|
| - break; /* reached beginning of number */
|
| - }
|
| - if (len == 1) {
|
| - break; /* the number 0 */
|
| - }
|
| - if (buf[1] & 0x80) {
|
| - break; /* leading zero already present */
|
| - }
|
| - /* extraneous leading zero, keep going */
|
| - buf++;
|
| - len--;
|
| - }
|
| - }
|
| - break;
|
| -
|
| - default:
|
| - len = ((SECItem *)src)->len;
|
| - break;
|
| - } /* end switch */
|
| -
|
| -#ifndef WHAT_PROBLEM_DOES_THIS_SOLVE
|
| - /* if we're streaming, we may have a secitem w/len 0 as placeholder */
|
| - if (!len && insideIndefinite && may_stream && !disallowStreaming) {
|
| - len = 1;
|
| - }
|
| -#endif
|
| - } /* end else */
|
| -
|
| - if (len == 0 && optional)
|
| - *pHdrException = hdr_optional;
|
| - else if (underlying_kind == SEC_ASN1_ANY)
|
| - *pHdrException = hdr_any;
|
| - else
|
| - *pHdrException = hdr_normal;
|
| -
|
| - return len;
|
| -}
|
| -
|
| -
|
| -static void
|
| -sec_asn1e_write_header (sec_asn1e_state *state)
|
| -{
|
| - unsigned long contents_length;
|
| - unsigned char tag_number, tag_modifiers;
|
| - sec_asn1e_hdr_encoding hdrException = hdr_normal;
|
| - PRBool indefinite = PR_FALSE;
|
| -
|
| - PORT_Assert (state->place == beforeHeader);
|
| -
|
| - tag_number = state->tag_number;
|
| - tag_modifiers = state->tag_modifiers;
|
| -
|
| - if (state->underlying_kind == SEC_ASN1_ANY) {
|
| - state->place = duringContents;
|
| - return;
|
| - }
|
| -
|
| - if (state->underlying_kind & SEC_ASN1_CHOICE) {
|
| - int indx = sec_asn1e_which_choice(state->src, state->theTemplate);
|
| - if( 0 == indx ) {
|
| - /* XXX set an error? "choice not found" */
|
| - state->top->status = encodeError;
|
| - return;
|
| - }
|
| - state->place = afterChoice;
|
| - state = sec_asn1e_push_state(state->top, &state->theTemplate[indx],
|
| - (char *)state->src - state->theTemplate->offset,
|
| - PR_TRUE);
|
| - if (state) {
|
| - /*
|
| - * Do the "before" field notification.
|
| - */
|
| - sec_asn1e_notify_before (state->top, state->src, state->depth);
|
| - state = sec_asn1e_init_state_based_on_template (state);
|
| - }
|
| - return;
|
| - }
|
| -
|
| - /* The !isString test below is apparently intended to ensure that all
|
| - ** constructed types receive indefinite length encoding.
|
| - */
|
| - indefinite = (PRBool)
|
| - (state->top->streaming && state->may_stream &&
|
| - (state->top->from_buf || !state->is_string));
|
| -
|
| - /*
|
| - * If we are doing a definite-length encoding, first we have to
|
| - * walk the data structure to calculate the entire contents length.
|
| - * If we are doing an indefinite-length encoding, we still need to
|
| - * know if the contents is:
|
| - * optional and to be omitted, or
|
| - * an ANY (header is pre-encoded), or
|
| - * a SAVE or some other kind of template used only by the decoder.
|
| - * So, we call this function either way.
|
| - */
|
| - contents_length = sec_asn1e_contents_length (state->theTemplate,
|
| - state->src,
|
| - state->disallowStreaming,
|
| - indefinite,
|
| - &hdrException);
|
| - /*
|
| - * We might be told explicitly not to put out a header.
|
| - * But it can also be the case, via a pushed subtemplate, that
|
| - * sec_asn1e_contents_length could not know that this field is
|
| - * really optional. So check for that explicitly, too.
|
| - */
|
| - if (hdrException != hdr_normal ||
|
| - (contents_length == 0 && state->optional)) {
|
| - state->place = afterContents;
|
| - if (state->top->streaming &&
|
| - state->may_stream &&
|
| - state->top->from_buf) {
|
| - /* we did not find an optional indefinite string, so we
|
| - * don't encode it. However, if TakeFromBuf is on, we stop
|
| - * here anyway to give our caller a chance to intercept at the
|
| - * same point where we would stop if the field were present.
|
| - */
|
| - state->top->status = needBytes;
|
| - }
|
| - return;
|
| - }
|
| -
|
| - if (indefinite) {
|
| - /*
|
| - * We need to put out an indefinite-length encoding.
|
| - * The only universal types that can be constructed are SETs,
|
| - * SEQUENCEs, and strings; so check that it is one of those,
|
| - * or that it is not universal (e.g. context-specific).
|
| - */
|
| - state->indefinite = PR_TRUE;
|
| - PORT_Assert ((tag_number == SEC_ASN1_SET)
|
| - || (tag_number == SEC_ASN1_SEQUENCE)
|
| - || ((tag_modifiers & SEC_ASN1_CLASS_MASK) != 0)
|
| - || state->is_string);
|
| - tag_modifiers |= SEC_ASN1_CONSTRUCTED;
|
| - contents_length = 0;
|
| - }
|
| -
|
| - sec_asn1e_write_identifier_bytes (state,
|
| - (unsigned char)(tag_number | tag_modifiers));
|
| - sec_asn1e_write_length_bytes (state, contents_length, state->indefinite);
|
| -
|
| - if (contents_length == 0 && !state->indefinite) {
|
| - /*
|
| - * If no real contents to encode, then we are done with this field.
|
| - */
|
| - state->place = afterContents;
|
| - return;
|
| - }
|
| -
|
| - /*
|
| - * An EXPLICIT is nothing but an outer header, which we have already
|
| - * written. Now we need to do the inner header and contents.
|
| - */
|
| - if (state->isExplicit) {
|
| - const SEC_ASN1Template *subt =
|
| - SEC_ASN1GetSubtemplate(state->theTemplate, state->src, PR_TRUE);
|
| - state->place = afterContents;
|
| - state = sec_asn1e_push_state (state->top, subt, state->src, PR_TRUE);
|
| - if (state != NULL)
|
| - state = sec_asn1e_init_state_based_on_template (state);
|
| - return;
|
| - }
|
| -
|
| - switch (state->underlying_kind) {
|
| - case SEC_ASN1_SET_OF:
|
| - case SEC_ASN1_SEQUENCE_OF:
|
| - /*
|
| - * We need to push a child to handle each member.
|
| - */
|
| - {
|
| - void **group;
|
| - const SEC_ASN1Template *subt;
|
| -
|
| - group = *(void ***)state->src;
|
| - if (group == NULL || *group == NULL) {
|
| - /*
|
| - * Group is empty; we are done.
|
| - */
|
| - state->place = afterContents;
|
| - return;
|
| - }
|
| - state->place = duringGroup;
|
| - subt = SEC_ASN1GetSubtemplate (state->theTemplate, state->src,
|
| - PR_TRUE);
|
| - state = sec_asn1e_push_state (state->top, subt, *group, PR_TRUE);
|
| - if (state != NULL)
|
| - state = sec_asn1e_init_state_based_on_template (state);
|
| - }
|
| - break;
|
| -
|
| - case SEC_ASN1_SEQUENCE:
|
| - case SEC_ASN1_SET:
|
| - /*
|
| - * We need to push a child to handle the individual fields.
|
| - */
|
| - state->place = duringSequence;
|
| - state = sec_asn1e_push_state (state->top, state->theTemplate + 1,
|
| - state->src, PR_TRUE);
|
| - if (state != NULL) {
|
| - /*
|
| - * Do the "before" field notification.
|
| - */
|
| - sec_asn1e_notify_before (state->top, state->src, state->depth);
|
| - state = sec_asn1e_init_state_based_on_template (state);
|
| - }
|
| - break;
|
| -
|
| - default:
|
| - /*
|
| - * I think we do not need to do anything else.
|
| - * XXX Correct?
|
| - */
|
| - state->place = duringContents;
|
| - break;
|
| - }
|
| -}
|
| -
|
| -
|
| -static void
|
| -sec_asn1e_write_contents_from_buf (sec_asn1e_state *state,
|
| - const char *buf, unsigned long len)
|
| -{
|
| - PORT_Assert (state->place == duringContents);
|
| - PORT_Assert (state->top->from_buf);
|
| - PORT_Assert (state->may_stream && !state->disallowStreaming);
|
| -
|
| - /*
|
| - * Probably they just turned on "take from buf", but have not
|
| - * yet given us any bytes. If there is nothing in the buffer
|
| - * then we have nothing to do but return and wait.
|
| - */
|
| - if (buf == NULL || len == 0) {
|
| - state->top->status = needBytes;
|
| - return;
|
| - }
|
| - /*
|
| - * We are streaming, reading from a passed-in buffer.
|
| - * This means we are encoding a simple string or an ANY.
|
| - * For the former, we need to put out a substring, with its
|
| - * own identifier and length. For an ANY, we just write it
|
| - * out as is (our caller is required to ensure that it
|
| - * is a properly encoded entity).
|
| - */
|
| - PORT_Assert (state->is_string); /* includes ANY */
|
| - if (state->underlying_kind != SEC_ASN1_ANY) {
|
| - unsigned char identifier;
|
| -
|
| - /*
|
| - * Create the identifier based on underlying_kind. We cannot
|
| - * use tag_number and tag_modifiers because this can be an
|
| - * implicitly encoded field. In that case, the underlying
|
| - * substrings *are* encoded with their real tag.
|
| - */
|
| - identifier = (unsigned char)
|
| - (state->underlying_kind & SEC_ASN1_TAG_MASK);
|
| - /*
|
| - * The underlying kind should just be a simple string; there
|
| - * should be no bits like CONTEXT_SPECIFIC or CONSTRUCTED set.
|
| - */
|
| - PORT_Assert ((identifier & SEC_ASN1_TAGNUM_MASK) == identifier);
|
| - /*
|
| - * Write out the tag and length for the substring.
|
| - */
|
| - sec_asn1e_write_identifier_bytes (state, identifier);
|
| - if (state->underlying_kind == SEC_ASN1_BIT_STRING) {
|
| - char byte;
|
| - /*
|
| - * Assume we have a length in bytes but we need to output
|
| - * a proper bit string. This interface only works for bit
|
| - * strings that are full multiples of 8. If support for
|
| - * real, variable length bit strings is needed then the
|
| - * caller will have to know to pass in a bit length instead
|
| - * of a byte length and then this code will have to
|
| - * perform the encoding necessary (length written is length
|
| - * in bytes plus 1, and the first octet of string is the
|
| - * number of bits remaining between the end of the bit
|
| - * string and the next byte boundary).
|
| - */
|
| - sec_asn1e_write_length_bytes (state, len + 1, PR_FALSE);
|
| - byte = 0;
|
| - sec_asn1e_write_contents_bytes (state, &byte, 1);
|
| - } else {
|
| - sec_asn1e_write_length_bytes (state, len, PR_FALSE);
|
| - }
|
| - }
|
| - sec_asn1e_write_contents_bytes (state, buf, len);
|
| - state->top->status = needBytes;
|
| -}
|
| -
|
| -static void
|
| -sec_asn1e_write_contents (sec_asn1e_state *state)
|
| -{
|
| - unsigned long len = 0;
|
| -
|
| - PORT_Assert (state->place == duringContents);
|
| -
|
| - switch (state->underlying_kind) {
|
| - case SEC_ASN1_SET:
|
| - case SEC_ASN1_SEQUENCE:
|
| - PORT_Assert (0);
|
| - break;
|
| -
|
| - case SEC_ASN1_BIT_STRING:
|
| - {
|
| - SECItem *item;
|
| - char rem;
|
| -
|
| - item = (SECItem *)state->src;
|
| - len = (item->len + 7) >> 3;
|
| - rem = (unsigned char)((len << 3) - item->len); /* remaining bits */
|
| - sec_asn1e_write_contents_bytes (state, &rem, 1);
|
| - sec_asn1e_write_contents_bytes (state, (char *) item->data, len);
|
| - }
|
| - break;
|
| -
|
| - case SEC_ASN1_BMP_STRING:
|
| - /* The number of bytes must be divisable by 2 */
|
| - if ((((SECItem *)state->src)->len) % 2) {
|
| - SEC_ASN1EncoderContext *cx;
|
| -
|
| - cx = state->top;
|
| - cx->status = encodeError;
|
| - break;
|
| - }
|
| - /* otherwise, fall through to write the content */
|
| - goto process_string;
|
| -
|
| - case SEC_ASN1_UNIVERSAL_STRING:
|
| - /* The number of bytes must be divisable by 4 */
|
| - if ((((SECItem *)state->src)->len) % 4) {
|
| - SEC_ASN1EncoderContext *cx;
|
| -
|
| - cx = state->top;
|
| - cx->status = encodeError;
|
| - break;
|
| - }
|
| - /* otherwise, fall through to write the content */
|
| - goto process_string;
|
| -
|
| - case SEC_ASN1_INTEGER:
|
| - /* ASN.1 INTEGERs are signed. If the source is an unsigned
|
| - * integer, the encoder will need to handle the conversion here.
|
| - */
|
| - {
|
| - unsigned int blen;
|
| - unsigned char *buf;
|
| - SECItemType integerType;
|
| - blen = ((SECItem *)state->src)->len;
|
| - buf = ((SECItem *)state->src)->data;
|
| - integerType = ((SECItem *)state->src)->type;
|
| - while (blen > 0) {
|
| - if (*buf & 0x80 && integerType == siUnsignedInteger) {
|
| - char zero = 0; /* write a leading 0 */
|
| - sec_asn1e_write_contents_bytes(state, &zero, 1);
|
| - /* and then the remaining buffer */
|
| - sec_asn1e_write_contents_bytes(state,
|
| - (char *)buf, blen);
|
| - break;
|
| - }
|
| - /* Check three possibilities:
|
| - * 1. No leading zeros, msb of MSB is not 1;
|
| - * 2. The number is zero itself;
|
| - * 3. Encoding a signed integer with a leading zero,
|
| - * keep the zero so that the number is positive.
|
| - */
|
| - if (*buf != 0 ||
|
| - blen == 1 ||
|
| - (buf[1] & 0x80 && integerType != siUnsignedInteger) )
|
| - {
|
| - sec_asn1e_write_contents_bytes(state,
|
| - (char *)buf, blen);
|
| - break;
|
| - }
|
| - /* byte is 0, continue */
|
| - buf++;
|
| - blen--;
|
| - }
|
| - }
|
| - /* done with this content */
|
| - break;
|
| -
|
| -process_string:
|
| - default:
|
| - {
|
| - SECItem *item;
|
| -
|
| - item = (SECItem *)state->src;
|
| - sec_asn1e_write_contents_bytes (state, (char *) item->data,
|
| - item->len);
|
| - }
|
| - break;
|
| - }
|
| - state->place = afterContents;
|
| -}
|
| -
|
| -/*
|
| - * We are doing a SET OF or SEQUENCE OF, and have just finished an item.
|
| - */
|
| -static void
|
| -sec_asn1e_next_in_group (sec_asn1e_state *state)
|
| -{
|
| - sec_asn1e_state *child;
|
| - void **group;
|
| - void *member;
|
| -
|
| - PORT_Assert (state->place == duringGroup);
|
| - PORT_Assert (state->child != NULL);
|
| -
|
| - child = state->child;
|
| -
|
| - group = *(void ***)state->src;
|
| -
|
| - /*
|
| - * Find placement of current item.
|
| - */
|
| - member = (char *)(state->child->src) - child->theTemplate->offset;
|
| - while (*group != member)
|
| - group++;
|
| -
|
| - /*
|
| - * Move forward to next item.
|
| - */
|
| - group++;
|
| - if (*group == NULL) {
|
| - /*
|
| - * That was our last one; we are done now.
|
| - */
|
| - child->place = notInUse;
|
| - state->place = afterContents;
|
| - return;
|
| - }
|
| - child->src = (char *)(*group) + child->theTemplate->offset;
|
| -
|
| - /*
|
| - * Re-"push" child.
|
| - */
|
| - sec_asn1e_scrub_state (child);
|
| - state->top->current = child;
|
| -}
|
| -
|
| -
|
| -/*
|
| - * We are moving along through a sequence; move forward by one,
|
| - * (detecting end-of-sequence when it happens).
|
| - */
|
| -static void
|
| -sec_asn1e_next_in_sequence (sec_asn1e_state *state)
|
| -{
|
| - sec_asn1e_state *child;
|
| -
|
| - PORT_Assert (state->place == duringSequence);
|
| - PORT_Assert (state->child != NULL);
|
| -
|
| - child = state->child;
|
| -
|
| - /*
|
| - * Do the "after" field notification.
|
| - */
|
| - sec_asn1e_notify_after (state->top, child->src, child->depth);
|
| -
|
| - /*
|
| - * Move forward.
|
| - */
|
| - child->theTemplate++;
|
| - if (child->theTemplate->kind == 0) {
|
| - /*
|
| - * We are done with this sequence.
|
| - */
|
| - child->place = notInUse;
|
| - state->place = afterContents;
|
| - return;
|
| - }
|
| -
|
| - /*
|
| - * Reset state and push.
|
| - */
|
| -
|
| - child->src = (char *)state->src + child->theTemplate->offset;
|
| -
|
| - /*
|
| - * Do the "before" field notification.
|
| - */
|
| - sec_asn1e_notify_before (state->top, child->src, child->depth);
|
| -
|
| - state->top->current = child;
|
| - (void) sec_asn1e_init_state_based_on_template (child);
|
| -}
|
| -
|
| -
|
| -static void
|
| -sec_asn1e_after_contents (sec_asn1e_state *state)
|
| -{
|
| - PORT_Assert (state->place == afterContents);
|
| -
|
| - if (state->indefinite)
|
| - sec_asn1e_write_end_of_contents_bytes (state);
|
| -
|
| - /*
|
| - * Just make my parent be the current state. It will then clean
|
| - * up after me and free me (or reuse me).
|
| - */
|
| - state->top->current = state->parent;
|
| -}
|
| -
|
| -
|
| -/*
|
| - * This function is called whether or not we are streaming; if we
|
| - * *are* streaming, our caller can also instruct us to take bytes
|
| - * from the passed-in buffer (at buf, for length len, which is likely
|
| - * bytes but could even mean bits if the current field is a bit string).
|
| - * If we have been so instructed, we will gobble up bytes from there
|
| - * (rather than from our src structure) and output them, and then
|
| - * we will just return, expecting to be called again -- either with
|
| - * more bytes or after our caller has instructed us that we are done
|
| - * (for now) with the buffer.
|
| - */
|
| -SECStatus
|
| -SEC_ASN1EncoderUpdate (SEC_ASN1EncoderContext *cx,
|
| - const char *buf, unsigned long len)
|
| -{
|
| - sec_asn1e_state *state;
|
| -
|
| - if (cx->status == needBytes) {
|
| - cx->status = keepGoing;
|
| - }
|
| -
|
| - while (cx->status == keepGoing) {
|
| - state = cx->current;
|
| - switch (state->place) {
|
| - case beforeHeader:
|
| - sec_asn1e_write_header (state);
|
| - break;
|
| - case duringContents:
|
| - if (cx->from_buf)
|
| - sec_asn1e_write_contents_from_buf (state, buf, len);
|
| - else
|
| - sec_asn1e_write_contents (state);
|
| - break;
|
| - case duringGroup:
|
| - sec_asn1e_next_in_group (state);
|
| - break;
|
| - case duringSequence:
|
| - sec_asn1e_next_in_sequence (state);
|
| - break;
|
| - case afterContents:
|
| - sec_asn1e_after_contents (state);
|
| - break;
|
| - case afterImplicit:
|
| - case afterInline:
|
| - case afterPointer:
|
| - case afterChoice:
|
| - /*
|
| - * These states are more documentation than anything.
|
| - * They just need to force a pop.
|
| - */
|
| - PORT_Assert (!state->indefinite);
|
| - state->place = afterContents;
|
| - break;
|
| - case notInUse:
|
| - default:
|
| - /* This is not an error, but rather a plain old BUG! */
|
| - PORT_Assert (0);
|
| - cx->status = encodeError;
|
| - break;
|
| - }
|
| -
|
| - if (cx->status == encodeError)
|
| - break;
|
| -
|
| - /* It might have changed, so we have to update our local copy. */
|
| - state = cx->current;
|
| -
|
| - /* If it is NULL, we have popped all the way to the top. */
|
| - if (state == NULL) {
|
| - cx->status = allDone;
|
| - break;
|
| - }
|
| - }
|
| -
|
| - if (cx->status == encodeError) {
|
| - return SECFailure;
|
| - }
|
| -
|
| - return SECSuccess;
|
| -}
|
| -
|
| -
|
| -void
|
| -SEC_ASN1EncoderFinish (SEC_ASN1EncoderContext *cx)
|
| -{
|
| - /*
|
| - * XXX anything else that needs to be finished?
|
| - */
|
| -
|
| - PORT_FreeArena (cx->our_pool, PR_FALSE);
|
| -}
|
| -
|
| -
|
| -SEC_ASN1EncoderContext *
|
| -SEC_ASN1EncoderStart (const void *src, const SEC_ASN1Template *theTemplate,
|
| - SEC_ASN1WriteProc output_proc, void *output_arg)
|
| -{
|
| - PRArenaPool *our_pool;
|
| - SEC_ASN1EncoderContext *cx;
|
| -
|
| - our_pool = PORT_NewArena (SEC_ASN1_DEFAULT_ARENA_SIZE);
|
| - if (our_pool == NULL)
|
| - return NULL;
|
| -
|
| - cx = (SEC_ASN1EncoderContext*)PORT_ArenaZAlloc (our_pool, sizeof(*cx));
|
| - if (cx == NULL) {
|
| - PORT_FreeArena (our_pool, PR_FALSE);
|
| - return NULL;
|
| - }
|
| -
|
| - cx->our_pool = our_pool;
|
| - cx->output_proc = output_proc;
|
| - cx->output_arg = output_arg;
|
| -
|
| - cx->status = keepGoing;
|
| -
|
| - if (sec_asn1e_push_state(cx, theTemplate, src, PR_FALSE) == NULL
|
| - || sec_asn1e_init_state_based_on_template (cx->current) == NULL) {
|
| - /*
|
| - * Trouble initializing (probably due to failed allocations)
|
| - * requires that we just give up.
|
| - */
|
| - PORT_FreeArena (our_pool, PR_FALSE);
|
| - return NULL;
|
| - }
|
| -
|
| - return cx;
|
| -}
|
| -
|
| -
|
| -/*
|
| - * XXX Do we need a FilterProc, too?
|
| - */
|
| -
|
| -
|
| -void
|
| -SEC_ASN1EncoderSetNotifyProc (SEC_ASN1EncoderContext *cx,
|
| - SEC_ASN1NotifyProc fn, void *arg)
|
| -{
|
| - cx->notify_proc = fn;
|
| - cx->notify_arg = arg;
|
| -}
|
| -
|
| -
|
| -void
|
| -SEC_ASN1EncoderClearNotifyProc (SEC_ASN1EncoderContext *cx)
|
| -{
|
| - cx->notify_proc = NULL;
|
| - cx->notify_arg = NULL; /* not necessary; just being clean */
|
| -}
|
| -
|
| -void
|
| -SEC_ASN1EncoderAbort(SEC_ASN1EncoderContext *cx, int error)
|
| -{
|
| - PORT_Assert(cx);
|
| - PORT_SetError(error);
|
| - cx->status = encodeError;
|
| -}
|
| -
|
| -void
|
| -SEC_ASN1EncoderSetStreaming (SEC_ASN1EncoderContext *cx)
|
| -{
|
| - /* XXX is there a way to check that we are "between" fields here? */
|
| -
|
| - cx->streaming = PR_TRUE;
|
| -}
|
| -
|
| -
|
| -void
|
| -SEC_ASN1EncoderClearStreaming (SEC_ASN1EncoderContext *cx)
|
| -{
|
| - /* XXX is there a way to check that we are "between" fields here? */
|
| -
|
| - cx->streaming = PR_FALSE;
|
| -}
|
| -
|
| -
|
| -void
|
| -SEC_ASN1EncoderSetTakeFromBuf (SEC_ASN1EncoderContext *cx)
|
| -{
|
| - /*
|
| - * XXX is there a way to check that we are "between" fields here? this
|
| - * needs to include a check for being in between groups of items in
|
| - * a SET_OF or SEQUENCE_OF.
|
| - */
|
| - PORT_Assert (cx->streaming);
|
| -
|
| - cx->from_buf = PR_TRUE;
|
| -}
|
| -
|
| -
|
| -void
|
| -SEC_ASN1EncoderClearTakeFromBuf (SEC_ASN1EncoderContext *cx)
|
| -{
|
| - /* we should actually be taking from buf *now* */
|
| - PORT_Assert (cx->from_buf);
|
| - if (! cx->from_buf) /* if not, just do nothing */
|
| - return;
|
| -
|
| - cx->from_buf = PR_FALSE;
|
| -
|
| - if (cx->status == needBytes) {
|
| - cx->status = keepGoing;
|
| - cx->current->place = afterContents;
|
| - }
|
| -}
|
| -
|
| -
|
| -SECStatus
|
| -SEC_ASN1Encode (const void *src, const SEC_ASN1Template *theTemplate,
|
| - SEC_ASN1WriteProc output_proc, void *output_arg)
|
| -{
|
| - SEC_ASN1EncoderContext *ecx;
|
| - SECStatus rv;
|
| -
|
| - ecx = SEC_ASN1EncoderStart (src, theTemplate, output_proc, output_arg);
|
| - if (ecx == NULL)
|
| - return SECFailure;
|
| -
|
| - rv = SEC_ASN1EncoderUpdate (ecx, NULL, 0);
|
| -
|
| - SEC_ASN1EncoderFinish (ecx);
|
| - return rv;
|
| -}
|
| -
|
| -
|
| -/*
|
| - * XXX depth and data_kind are unused; is there a PC way to silence warnings?
|
| - * (I mean "politically correct", not anything to do with intel/win platform)
|
| - */
|
| -static void
|
| -sec_asn1e_encode_item_count (void *arg, const char *buf, unsigned long len,
|
| - int depth, SEC_ASN1EncodingPart data_kind)
|
| -{
|
| - unsigned long *count;
|
| -
|
| - count = (unsigned long*)arg;
|
| - PORT_Assert (count != NULL);
|
| -
|
| - *count += len;
|
| -}
|
| -
|
| -
|
| -/* XXX depth and data_kind are unused; is there a PC way to silence warnings? */
|
| -static void
|
| -sec_asn1e_encode_item_store (void *arg, const char *buf, unsigned long len,
|
| - int depth, SEC_ASN1EncodingPart data_kind)
|
| -{
|
| - SECItem *dest;
|
| -
|
| - dest = (SECItem*)arg;
|
| - PORT_Assert (dest != NULL);
|
| -
|
| - PORT_Memcpy (dest->data + dest->len, buf, len);
|
| - dest->len += len;
|
| -}
|
| -
|
| -
|
| -/*
|
| - * Allocate an entire SECItem, or just the data part of it, to hold
|
| - * "len" bytes of stuff. Allocate from the given pool, if specified,
|
| - * otherwise just do a vanilla PORT_Alloc.
|
| - *
|
| - * XXX This seems like a reasonable general-purpose function (for SECITEM_)?
|
| - */
|
| -static SECItem *
|
| -sec_asn1e_allocate_item (PRArenaPool *poolp, SECItem *dest, unsigned long len)
|
| -{
|
| - if (poolp != NULL) {
|
| - void *release;
|
| -
|
| - release = PORT_ArenaMark (poolp);
|
| - if (dest == NULL)
|
| - dest = (SECItem*)PORT_ArenaAlloc (poolp, sizeof(SECItem));
|
| - if (dest != NULL) {
|
| - dest->data = (unsigned char*)PORT_ArenaAlloc (poolp, len);
|
| - if (dest->data == NULL) {
|
| - dest = NULL;
|
| - }
|
| - }
|
| - if (dest == NULL) {
|
| - /* one or both allocations failed; release everything */
|
| - PORT_ArenaRelease (poolp, release);
|
| - } else {
|
| - /* everything okay; unmark the arena */
|
| - PORT_ArenaUnmark (poolp, release);
|
| - }
|
| - } else {
|
| - SECItem *indest;
|
| -
|
| - indest = dest;
|
| - if (dest == NULL)
|
| - dest = (SECItem*)PORT_Alloc (sizeof(SECItem));
|
| - if (dest != NULL) {
|
| - dest->type = siBuffer;
|
| - dest->data = (unsigned char*)PORT_Alloc (len);
|
| - if (dest->data == NULL) {
|
| - if (indest == NULL)
|
| - PORT_Free (dest);
|
| - dest = NULL;
|
| - }
|
| - }
|
| - }
|
| -
|
| - return dest;
|
| -}
|
| -
|
| -
|
| -SECItem *
|
| -SEC_ASN1EncodeItem (PRArenaPool *poolp, SECItem *dest, const void *src,
|
| - const SEC_ASN1Template *theTemplate)
|
| -{
|
| - unsigned long encoding_length;
|
| - SECStatus rv;
|
| -
|
| - PORT_Assert (dest == NULL || dest->data == NULL);
|
| -
|
| - encoding_length = 0;
|
| - rv = SEC_ASN1Encode (src, theTemplate,
|
| - sec_asn1e_encode_item_count, &encoding_length);
|
| - if (rv != SECSuccess)
|
| - return NULL;
|
| -
|
| - dest = sec_asn1e_allocate_item (poolp, dest, encoding_length);
|
| - if (dest == NULL)
|
| - return NULL;
|
| -
|
| - /* XXX necessary? This really just checks for a bug in the allocate fn */
|
| - PORT_Assert (dest->data != NULL);
|
| - if (dest->data == NULL)
|
| - return NULL;
|
| -
|
| - dest->len = 0;
|
| - (void) SEC_ASN1Encode (src, theTemplate, sec_asn1e_encode_item_store, dest);
|
| -
|
| - PORT_Assert (encoding_length == dest->len);
|
| - return dest;
|
| -}
|
| -
|
| -
|
| -static SECItem *
|
| -sec_asn1e_integer(PRArenaPool *poolp, SECItem *dest, unsigned long value,
|
| - PRBool is_unsigned)
|
| -{
|
| - unsigned long copy;
|
| - unsigned char sign;
|
| - int len = 0;
|
| -
|
| - /*
|
| - * Determine the length of the encoded value (minimum of 1).
|
| - */
|
| - copy = value;
|
| - do {
|
| - len++;
|
| - sign = (unsigned char)(copy & 0x80);
|
| - copy >>= 8;
|
| - } while (copy);
|
| -
|
| - /*
|
| - * If 'value' is non-negative, and the high bit of the last
|
| - * byte we counted was set, we need to add one to the length so
|
| - * we put a high-order zero byte in the encoding.
|
| - */
|
| - if (sign && (is_unsigned || (long)value >= 0))
|
| - len++;
|
| -
|
| - /*
|
| - * Allocate the item (if necessary) and the data pointer within.
|
| - */
|
| - dest = sec_asn1e_allocate_item (poolp, dest, len);
|
| - if (dest == NULL)
|
| - return NULL;
|
| -
|
| - /*
|
| - * Store the value, byte by byte, in the item.
|
| - */
|
| - dest->len = len;
|
| - while (len) {
|
| - dest->data[--len] = (unsigned char)value;
|
| - value >>= 8;
|
| - }
|
| - PORT_Assert (value == 0);
|
| -
|
| - return dest;
|
| -}
|
| -
|
| -
|
| -SECItem *
|
| -SEC_ASN1EncodeInteger(PRArenaPool *poolp, SECItem *dest, long value)
|
| -{
|
| - return sec_asn1e_integer (poolp, dest, (unsigned long) value, PR_FALSE);
|
| -}
|
| -
|
| -
|
| -SECItem *
|
| -SEC_ASN1EncodeUnsignedInteger(PRArenaPool *poolp,
|
| - SECItem *dest, unsigned long value)
|
| -{
|
| - return sec_asn1e_integer (poolp, dest, value, PR_TRUE);
|
| -}
|
|
|