--- /dev/null
+#include <asn_application.h>\r
+#include <asn_internal.h>\r
+#include <per_decoder.h>\r
+\r
+/*\r
+ * Decode a "Production of a complete encoding", X.691#10.1.\r
+ * The complete encoding contains at least one byte, and is an integral\r
+ * multiple of 8 bytes.\r
+ */\r
+asn_dec_rval_t\r
+uper_decode_complete(const asn_codec_ctx_t *opt_codec_ctx,\r
+ const asn_TYPE_descriptor_t *td, void **sptr,\r
+ const void *buffer, size_t size) {\r
+ asn_dec_rval_t rval;\r
+\r
+ rval = uper_decode(opt_codec_ctx, td, sptr, buffer, size, 0, 0);\r
+ if(rval.consumed) {\r
+ /*\r
+ * We've always given 8-aligned data,\r
+ * so convert bits to integral bytes.\r
+ */\r
+ rval.consumed += 7;\r
+ rval.consumed >>= 3;\r
+ } else if(rval.code == RC_OK) {\r
+ if(size) {\r
+ if(((const uint8_t *)buffer)[0] == 0) {\r
+ rval.consumed = 1; /* 1 byte */\r
+ } else {\r
+ ASN_DEBUG("Expecting single zeroed byte");\r
+ rval.code = RC_FAIL;\r
+ }\r
+ } else {\r
+ /* Must contain at least 8 bits. */\r
+ rval.code = RC_WMORE;\r
+ }\r
+ }\r
+\r
+ return rval;\r
+}\r
+\r
+asn_dec_rval_t\r
+uper_decode(const asn_codec_ctx_t *opt_codec_ctx,\r
+ const asn_TYPE_descriptor_t *td, void **sptr, const void *buffer,\r
+ size_t size, int skip_bits, int unused_bits) {\r
+ asn_codec_ctx_t s_codec_ctx;\r
+ asn_dec_rval_t rval;\r
+ asn_per_data_t pd;\r
+\r
+ if(skip_bits < 0 || skip_bits > 7\r
+ || unused_bits < 0 || unused_bits > 7\r
+ || (unused_bits > 0 && !size))\r
+ ASN__DECODE_FAILED;\r
+\r
+ /*\r
+ * Stack checker requires that the codec context\r
+ * must be allocated on the stack.\r
+ */\r
+ if(opt_codec_ctx) {\r
+ if(opt_codec_ctx->max_stack_size) {\r
+ s_codec_ctx = *opt_codec_ctx;\r
+ opt_codec_ctx = &s_codec_ctx;\r
+ }\r
+ } else {\r
+ /* If context is not given, be security-conscious anyway */\r
+ memset(&s_codec_ctx, 0, sizeof(s_codec_ctx));\r
+ s_codec_ctx.max_stack_size = ASN__DEFAULT_STACK_MAX;\r
+ opt_codec_ctx = &s_codec_ctx;\r
+ }\r
+\r
+ /* Fill in the position indicator */\r
+ memset(&pd, 0, sizeof(pd));\r
+ pd.buffer = (const uint8_t *)buffer;\r
+ pd.nboff = skip_bits;\r
+ pd.nbits = 8 * size - unused_bits; /* 8 is CHAR_BIT from <limits.h> */\r
+ if(pd.nboff > pd.nbits)\r
+ ASN__DECODE_FAILED;\r
+\r
+ /*\r
+ * Invoke type-specific decoder.\r
+ */\r
+ if(!td->op->uper_decoder)\r
+ ASN__DECODE_FAILED; /* PER is not compiled in */\r
+ rval = td->op->uper_decoder(opt_codec_ctx, td, 0, sptr, &pd);\r
+ if(rval.code == RC_OK) {\r
+ /* Return the number of consumed bits */\r
+ rval.consumed = ((pd.buffer - (const uint8_t *)buffer) << 3)\r
+ + pd.nboff - skip_bits;\r
+ ASN_DEBUG("PER decoding consumed %ld, counted %ld",\r
+ (long)rval.consumed, (long)pd.moved);\r
+ assert(rval.consumed == pd.moved);\r
+ } else {\r
+ /* PER codec is not a restartable */\r
+ rval.consumed = 0;\r
+ }\r
+ return rval;\r
+}\r
+\r
+asn_dec_rval_t\r
+aper_decode_complete(const asn_codec_ctx_t *opt_codec_ctx,\r
+ const asn_TYPE_descriptor_t *td, void **sptr,\r
+ const void *buffer, size_t size) {\r
+ asn_dec_rval_t rval;\r
+\r
+ rval = aper_decode(opt_codec_ctx, td, sptr, buffer, size, 0, 0);\r
+ if(rval.consumed) {\r
+ /*\r
+ * We've always given 8-aligned data,\r
+ * so convert bits to integral bytes.\r
+ */\r
+ rval.consumed += 7;\r
+ rval.consumed >>= 3;\r
+ } else if(rval.code == RC_OK) {\r
+ if(size) {\r
+ if(((const uint8_t *)buffer)[0] == 0) {\r
+ rval.consumed = 1; /* 1 byte */\r
+ } else {\r
+ ASN_DEBUG("Expecting single zeroed byte");\r
+ rval.code = RC_FAIL;\r
+ }\r
+ } else {\r
+ /* Must contain at least 8 bits. */\r
+ rval.code = RC_WMORE;\r
+ }\r
+ }\r
+\r
+ return rval;\r
+}\r
+\r
+asn_dec_rval_t\r
+aper_decode(const asn_codec_ctx_t *opt_codec_ctx,\r
+ const asn_TYPE_descriptor_t *td, void **sptr, const void *buffer,\r
+ size_t size, int skip_bits, int unused_bits) {\r
+ asn_codec_ctx_t s_codec_ctx;\r
+ asn_dec_rval_t rval;\r
+ asn_per_data_t pd;\r
+\r
+ if(skip_bits < 0 || skip_bits > 7\r
+ || unused_bits < 0 || unused_bits > 7\r
+ || (unused_bits > 0 && !size))\r
+ ASN__DECODE_FAILED;\r
+\r
+ /*\r
+ * Stack checker requires that the codec context\r
+ * must be allocated on the stack.\r
+ */\r
+ if(opt_codec_ctx) {\r
+ if(opt_codec_ctx->max_stack_size) {\r
+ s_codec_ctx = *opt_codec_ctx;\r
+ opt_codec_ctx = &s_codec_ctx;\r
+ }\r
+ } else {\r
+ /* If context is not given, be security-conscious anyway */\r
+ memset(&s_codec_ctx, 0, sizeof(s_codec_ctx));\r
+ s_codec_ctx.max_stack_size = ASN__DEFAULT_STACK_MAX;\r
+ opt_codec_ctx = &s_codec_ctx;\r
+ }\r
+\r
+ /* Fill in the position indicator */\r
+ memset(&pd, 0, sizeof(pd));\r
+ pd.buffer = (const uint8_t *)buffer;\r
+ pd.nboff = skip_bits;\r
+ pd.nbits = 8 * size - unused_bits; /* 8 is CHAR_BIT from <limits.h> */\r
+ if(pd.nboff > pd.nbits)\r
+ ASN__DECODE_FAILED;\r
+\r
+ /*\r
+ * Invoke type-specific decoder.\r
+ */\r
+ if(!td->op->aper_decoder)\r
+ ASN__DECODE_FAILED; /* PER is not compiled in */\r
+ rval = td->op->aper_decoder(opt_codec_ctx, td, 0, sptr, &pd);\r
+ if(rval.code == RC_OK) {\r
+ /* Return the number of consumed bits */\r
+ rval.consumed = ((pd.buffer - (const uint8_t *)buffer) << 3)\r
+ + pd.nboff - skip_bits;\r
+ ASN_DEBUG("PER decoding consumed %zu, counted %zu",\r
+ rval.consumed, pd.moved);\r
+ assert(rval.consumed == pd.moved);\r
+ } else {\r
+ /* PER codec is not a restartable */\r
+ rval.consumed = 0;\r
+ }\r
+ return rval;\r
+}\r
+\r