aboutsummaryrefslogtreecommitdiffstats
path: root/libasn1fix/asn1fix_dereft.c
blob: 8f570f6445ca2bd0930f2476919ae28012c0bb8b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
#include "asn1fix_internal.h"

int
asn1f_fix_dereference_types(arg_t *arg) {
	asn1p_expr_t *expr = arg->expr;
	asn1p_expr_t *type_expr;
	int r_value = 0;

	if(expr->expr_type != A1TC_REFERENCE
	|| expr->meta_type != AMT_TYPEREF) {
		//assert(expr->reference == 0);
		return 0;	/* Just ignore it */
	}

	DEBUG("(\"%s\":%x ::= \"%s\") for line %d",
		expr->Identifier, expr->expr_type,
		asn1f_printable_value(expr->value),
		expr->_lineno);

	assert(TQ_FIRST(&(expr->members)) == 0);
	assert(expr->reference);

	/*
	 * Follow the reference.
	 */
	type_expr = asn1f_find_terminal_type(arg, expr);
	if(type_expr == NULL) {
		const char *type_name;
		asn1p_expr_t *idexpr;

		if(errno == EEXIST) {
			/* Ignore missing type
			 * if known to be defined externally:
			 * -fknown-extern-type=<name>
			 */
			return 0;
		}

		type_name = asn1f_printable_reference(expr->reference);
		/* Avoid NULL in case of unnamed T ::= SEQUENCE OF ... */
		for(idexpr = expr; !idexpr->Identifier && idexpr->parent_expr;
			idexpr = idexpr->parent_expr);
		FATAL("Unknown type \"%s\" referenced by \"%s\" at line %d",
			type_name, idexpr->Identifier, expr->_lineno);
		return -1;
	}

	return r_value;
}