libasn1fix/asn1fix_derefv.c

   1 #include "asn1fix_internal.h"
   2
   3 /*
   4  * Dereference DefinedValues:
   5  */
   6 int
   7 asn1f_fix_dereference_values(arg_t *arg) {
   8         asn1p_expr_t *expr = arg->expr;
   9         int r_value = 0;
  10
  11         if(expr->value && expr->meta_type == AMT_VALUE) {
  12                 if(asn1f_value_resolve(arg, expr, 0)) {
  13                         /* This function will emit messages */
  14                         r_value = -1;
  15                 }
  16         }
  17
  18         return r_value;
  19 }
  20
  21
  22 /*
  23  * Dereference DEFAULT values
  24  */
  25 int
  26 asn1f_fix_dereference_defaults(arg_t *arg) {
  27         asn1p_expr_t *expr = arg->expr;
  28         int r_value = 0;
  29
  30         if(expr->marker.default_value) {
  31                 arg_t tmparg = *arg;
  32                 asn1p_expr_t tmpexpr = *expr;
  33
  34                 switch(expr->marker.default_value->type) {
  35                 default:
  36                         return r_value;
  37                 case ATV_REFERENCED:
  38                         break;
  39                 }
  40
  41
  42                 if(expr->expr_type == A1TC_CLASSFIELD_FTVFS) {
  43                         asn1p_expr_t *child = TQ_FIRST(&expr->members);
  44                         int ret;
  45                         assert(child);
  46                         assert(child->marker.default_value == 0);
  47                         tmparg.expr = child;
  48                         child->marker.default_value=expr->marker.default_value;
  49                         ret = asn1f_fix_dereference_defaults(&tmparg);
  50                         expr->marker.default_value = child->marker.default_value;
  51                         child->marker.default_value = 0; /* ULB: trying to ensure there isn't another pointer to the same value object */
  52                         if(ret == 0) return 0;  /* Finished */
  53                 }
  54
  55                 tmparg.expr = &tmpexpr;
  56                 tmpexpr.meta_type = AMT_VALUE;
  57                 tmpexpr.marker.default_value = 0;
  58                 tmpexpr.value = expr->marker.default_value;
  59                 if(asn1f_value_resolve(&tmparg, &tmpexpr, 0))
  60                         r_value = -1;
  61                 expr->marker.default_value = tmpexpr.value;
  62         }
  63
  64         return r_value;
  65 }
  66