]> git.pond.sub.org Git - empserver/blob - src/lib/as/as_delete.c
Import of Empire 4.2.12
[empserver] / src / lib / as / as_delete.c
1 /*
2  *  A* Search - A search library used in Empire to determine paths between
3  *              objects.
4  *  Copyright (C) 1990-1998 Phil Lapsley
5  *
6  *  This program 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  *  This program 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 #include <stdio.h>
21 #include <stdlib.h>
22 #include "as.h"
23
24 #if !defined(lint) && !defined(SABER)
25 static  char    sccsid[] = "@(#)as_delete.c     1.5     11/13/90";
26 #endif /* not lint */
27
28 static  void    as_free_queue(struct as_queue *queue);
29
30 /*
31  * Free any dynamically allocated data stored in the as_data structure.
32  */
33 void
34 as_reset(struct as_data *adp)
35 {
36
37         as_free_queue(adp->head);
38         adp->head = NULL;
39         as_free_queue(adp->tried);
40         adp->tried = NULL;
41         as_free_queue(adp->subsumed);
42         adp->subsumed = NULL;
43         as_free_hashtab(adp);
44         as_free_path(adp->path);
45         adp->path = NULL;
46 }
47
48 /*
49  * Free a queue (either the main, subsumed, or tried).
50  */
51 static void
52 as_free_queue(struct as_queue *queue)
53 {
54         struct as_queue *qp, *qp2;
55
56         for (qp = queue; qp; qp = qp2) {
57                 free((s_char *)qp->np);
58                 qp2 = qp->next;
59                 free((s_char *)qp);
60         }
61 }
62
63 /*
64  * Free a path.
65  */
66 void
67 as_free_path(struct as_path *pp)
68 {
69         struct as_path  *pp2;
70
71         for (; pp; pp = pp2) {
72                 pp2 = pp->next;
73                 free((s_char *)pp);
74         }
75 }
76
77 /*
78  * Delete the as_data structure (which includes freeing its data).
79  */
80 void
81 as_delete(struct as_data *adp)
82 {
83         as_reset(adp);
84         free((s_char *)adp->neighbor_coords);
85         free((s_char *)adp->neighbor_nodes);
86         free((s_char *)adp->hashtab);
87         free((s_char *)adp);
88 }