added more stuff
[gnupg.git] / g10 / kbnode.c
1 /* kbnode.c -  keyblock node utility functions
2  *      Copyright (c) 1997 by Werner Koch (dd9jn)
3  *
4  * This file is part of G10.
5  *
6  * G10 is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * G10 is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19  */
20
21 #include <config.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <assert.h>
26 #include "util.h"
27 #include "memory.h"
28 #include "packet.h"
29 #include "keydb.h"
30
31
32
33 KBNODE
34 new_kbnode( PACKET *pkt )
35 {
36     KBNODE n = m_alloc( sizeof *n );
37     n->next = NULL;
38     n->pkt = pkt;
39     n->child = NULL;
40     n->flag = 0;
41     n->private_flag=0; /* kludge to delete a node */
42     return n;
43 }
44
45
46 void
47 release_kbnode( KBNODE n )
48 {
49     KBNODE n2;
50
51     while( n ) {
52         n2 = n->next;
53         release_kbnode( n->child );
54         free_packet( n->pkt );
55         m_free( n );
56         n = n2;
57     }
58 }
59
60
61 /****************
62  * Delete NODE from ROOT, ROOT must exist!
63  * Note does only work with walk_kbtree!!
64  */
65 void
66 delete_kbnode( KBNODE root, KBNODE node )
67 {
68     node->private_flag |= 1;
69 }
70
71 /****************
72  * Append NODE to ROOT, ROOT must exist!
73  */
74 void
75 add_kbnode( KBNODE root, KBNODE node )
76 {
77     KBNODE n1;
78
79     for(n1=root; n1->next; n1 = n1->next)
80         ;
81     n1->next = node;
82 }
83
84 /****************
85  * Append NODE to ROOT as child of ROOT
86  */
87 void
88 add_kbnode_as_child( KBNODE root, KBNODE node )
89 {
90     KBNODE n1;
91
92     if( !(n1=root->child) )
93         root->child = node;
94     else {
95         for( ; n1->next; n1 = n1->next)
96             ;
97         n1->next = node;
98     }
99 }
100
101 /****************
102  * Return the parent node of KBNODE from the tree with ROOT
103  */
104 KBNODE
105 find_kbparent( KBNODE root, KBNODE node )
106 {
107     KBNODE n, n2;
108
109     for( ; root; root = root->child) {
110         for( n = root; n; n = n->next) {
111             for( n2 = n->child; n2; n2 = n2->next ) {
112                 if( n2 == node )
113                     return n;
114             }
115         }
116     }
117     return NULL;
118 }
119
120
121 /****************
122  * Walk through a tree of kbnodes. This functions returns
123  * the next kbnode for each call; before using the function the first
124  * time, the caller must set CONTEXT to NULL (This has simply the effect
125  * to start with ROOT).
126  */
127 KBNODE
128 walk_kbtree( KBNODE root, KBNODE *context )
129 {
130     return walk_kbtree2( root, context, 0 );
131 }
132
133 KBNODE
134 walk_kbtree2( KBNODE root, KBNODE *context, int all )
135 {
136     KBNODE n;
137
138     do {
139         if( !*context ) {
140             *context = root;
141             return root;
142         }
143
144         n = *context;
145         if( n->child ) {
146             n = n->child;
147             *context = n;
148         }
149         else if( n->next ) {
150             n = n->next;
151             *context = n;
152         }
153         else if( (n = find_kbparent( root, n )) ) {
154             n = n->next;
155             *context = n;
156         }
157     } while( !all && n && (n->private_flag & 1) );
158
159     return n;
160 }
161
162 void
163 clear_kbnode_flags( KBNODE n )
164 {
165     for( ; n; n = n->next ) {
166         clear_kbnode_flags( n->child );
167         n->flag = 0;
168     }
169 }
170