Initial version of asn1c

[com/asn1c.git] / libasn1fix / asn1fix_derefv.c

diff --git a/libasn1fix/asn1fix_derefv.c b/libasn1fix/asn1fix_derefv.c
new file mode 100644 (file)
index 0000000..3942d16
--- /dev/null
+++ b/libasn1fix/asn1fix_derefv.c
@@ -0,0 +1,66 @@
+#include "asn1fix_internal.h"
+
+/*
+ * Dereference DefinedValues:
+ */
+int
+asn1f_fix_dereference_values(arg_t *arg) {
+       asn1p_expr_t *expr = arg->expr;
+       int r_value = 0;
+
+       if(expr->value && expr->meta_type == AMT_VALUE) {
+               if(asn1f_value_resolve(arg, expr, 0)) {
+                       /* This function will emit messages */
+                       r_value = -1;
+               }
+       }
+
+       return r_value;
+}
+
+
+/*
+ * Dereference DEFAULT values
+ */
+int
+asn1f_fix_dereference_defaults(arg_t *arg) {
+       asn1p_expr_t *expr = arg->expr;
+       int r_value = 0;
+
+       if(expr->marker.default_value) {
+               arg_t tmparg = *arg;
+               asn1p_expr_t tmpexpr = *expr;
+
+               switch(expr->marker.default_value->type) {
+               default:
+                       return r_value;
+               case ATV_REFERENCED:
+                       break;
+               }
+
+
+               if(expr->expr_type == A1TC_CLASSFIELD_FTVFS) {
+                       asn1p_expr_t *child = TQ_FIRST(&expr->members);
+                       int ret;
+                       assert(child);
+                       assert(child->marker.default_value == 0);
+                       tmparg.expr = child;
+                       child->marker.default_value=expr->marker.default_value;
+                       ret = asn1f_fix_dereference_defaults(&tmparg);
+                       expr->marker.default_value = child->marker.default_value;
+                       child->marker.default_value = 0; /* ULB: trying to ensure there isn't another pointer to the same value object */
+                       if(ret == 0) return 0;  /* Finished */
+               }
+
+               tmparg.expr = &tmpexpr;
+               tmpexpr.meta_type = AMT_VALUE;
+               tmpexpr.marker.default_value = 0;
+               tmpexpr.value = expr->marker.default_value;
+               if(asn1f_value_resolve(&tmparg, &tmpexpr, 0))
+                       r_value = -1;
+               expr->marker.default_value = tmpexpr.value;
+       }
+
+       return r_value;
+}
+