From 31e79264a21df1acdbfbb66af40e05073b115a2c Mon Sep 17 00:00:00 2001
From: Pavel Machek <pavel@ucw.cz>
Date: Wed, 1 Mar 2000 14:31:31 +0000
Subject: tmp_attrs fixed.

I do not know if it is right since mj ingores talk once started :-(.
---
 filter/config.Y |  2 +-
 filter/f-util.c |  2 +-
 filter/filter.c | 32 +++++++++++++++++++++-----------
 3 files changed, 23 insertions(+), 13 deletions(-)

diff --git a/filter/config.Y b/filter/config.Y
index ed94b9b..c4633fc 100644
--- a/filter/config.Y
+++ b/filter/config.Y
@@ -424,7 +424,7 @@ cmd:
    }
  | UNSET '(' rtadot dynamic_attr ')' ';' {
      $$ = $4;
-     $$->aux = T_VOID;
+     $$->aux = EAF_TYPE_UNDEF | EAF_INLINE;
      $$->code = P('e','S');
      $$->a1.p = NULL;
    }
diff --git a/filter/f-util.c b/filter/f-util.c
index 2bc7873..6a42b9d 100644
--- a/filter/f-util.c
+++ b/filter/f-util.c
@@ -36,7 +36,7 @@ struct f_inst *
 f_new_dynamic_attr(int code)
 {
   struct f_inst *f = f_new_inst();
-  f->aux = T_INT;
+  f->aux = EAF_TYPE_INT | EAF_INLINE;
   f->a2.i = code;
   return f;
 }
diff --git a/filter/filter.c b/filter/filter.c
index cbbd1b5..f0de20d 100644
--- a/filter/filter.c
+++ b/filter/filter.c
@@ -142,6 +142,7 @@ val_print(struct f_val v)
 
 static struct rte **f_rte, *f_rte_old;
 static struct linpool *f_pool;
+static struct ea_list **f_tmp_attrs;
 
 #define runtime(x) do { \
     log( L_ERR x ); \
@@ -319,7 +320,8 @@ interpret(struct f_inst *what)
   case P('e','a'):	/* Access to extended attributes */
     {
       eattr *e = ea_find( (*f_rte)->attrs->eattrs, what->a2.i );
-      /* FIXME: should I search in tmp_attrs, too, or what ? */
+      if (!e) 
+	e = ea_find( (*f_tmp_attrs), what->a2.i );
       if (!e) {
 	res.type = T_VOID;
 	break;
@@ -345,19 +347,28 @@ interpret(struct f_inst *what)
       l->count = 1;
       l->attrs[0].id = what->a2.i;
       l->attrs[0].flags = 0;
-      switch (what->aux) {
-      case T_INT:
-	l->attrs[0].type = EAF_TYPE_INT | EAF_INLINE;
+      l->attrs[0].type = what->aux;
+      switch (what->aux & EAF_TYPE_MASK) {
+      case EAF_TYPE_INT:
+	if (v1.type != T_INT)
+	  runtime( "Setting int attribute to non-int value" );
 	l->attrs[0].u.data = v1.val.i;
 	break;
-      case T_VOID:
-	l->attrs[0].type = EAF_TYPE_UNDEF | EAF_INLINE;
+      case EAF_TYPE_UNDEF:
+	if (v1.type != T_VOID)
+	  runtime( "Setting void attribute to non-void value" );
 	l->attrs[0].u.data = 0;
 	break;
       }
-      *f_rte = rte_do_cow(*f_rte);
-      l->next = (*f_rte)->attrs->eattrs;
-      (*f_rte)->attrs->eattrs = l;
+
+      if (what->aux & EAF_INLINE) {
+	*f_rte = rte_do_cow(*f_rte);
+	l->next = (*f_rte)->attrs->eattrs;
+	(*f_rte)->attrs->eattrs = l;
+      } else {
+	l->next = (*f_tmp_attrs);
+	(*f_tmp_attrs) = l;
+      }
     }
     break;
 
@@ -494,8 +505,6 @@ i_same(struct f_inst *f1, struct f_inst *f2)
   return i_same(f1->next, f2->next);
 }
 
-/* FIXME: tmp_attrs is unreferenced. That can't be right.
-   Strange. look at eS how dynamic attrs are set. */
 int
 f_run(struct filter *filter, struct rte **rte, struct ea_list **tmp_attrs, struct linpool *tmp_pool)
 {
@@ -503,6 +512,7 @@ f_run(struct filter *filter, struct rte **rte, struct ea_list **tmp_attrs, struc
   struct f_val res;
   debug( "Running filter `%s'...", filter->name );
 
+  f_tmp_attrs = tmp_attrs;
   f_rte = rte;
   f_rte_old = *rte;
   f_pool = tmp_pool;
-- 
cgit v1.2.3