| /* LibTomCrypt, modular cryptographic library -- Tom St Denis |
| * |
| * LibTomCrypt is a library that provides various cryptographic |
| * algorithms in a highly modular and flexible manner. |
| * |
| * The library is free for all purposes without any express |
| * guarantee it works. |
| * |
| * Tom St Denis, tomstdenis@gmail.com, http://libtomcrypt.com |
| */ |
| #include "tomcrypt.h" |
| |
| /** |
| @file der_sequence_free.c |
| ASN.1 DER, free's a structure allocated by der_decode_sequence_flexi(), Tom St Denis |
| */ |
| |
| #ifdef LTC_DER |
| |
| /** |
| Free memory allocated by der_decode_sequence_flexi() |
| @param in The list to free |
| */ |
| void der_sequence_free(ltc_asn1_list *in) |
| { |
| ltc_asn1_list *l; |
| |
| /* walk to the start of the chain */ |
| while (in->prev != NULL || in->parent != NULL) { |
| if (in->parent != NULL) { |
| in = in->parent; |
| } else { |
| in = in->prev; |
| } |
| } |
| |
| /* now walk the list and free stuff */ |
| while (in != NULL) { |
| /* is there a child? */ |
| if (in->child) { |
| /* disconnect */ |
| in->child->parent = NULL; |
| der_sequence_free(in->child); |
| } |
| |
| switch (in->type) { |
| case LTC_ASN1_SET: |
| case LTC_ASN1_SETOF: |
| case LTC_ASN1_SEQUENCE: break; |
| case LTC_ASN1_INTEGER : if (in->data != NULL) { mp_clear(in->data); } break; |
| default : if (in->data != NULL) { XFREE(in->data); } |
| } |
| |
| /* move to next and free current */ |
| l = in->next; |
| free(in); |
| in = l; |
| } |
| } |
| |
| #endif |
| |
| /* $Source: /cvs/libtom/libtomcrypt/src/pk/asn1/der/sequence/der_sequence_free.c,v $ */ |
| /* $Revision: 1.3 $ */ |
| /* $Date: 2006/03/31 14:15:35 $ */ |