117 lines
1.7 KiB
C
117 lines
1.7 KiB
C
|
/*
|
||
|
|
* Functions for dealing with linked lists of goodies
|
||
|
|
*
|
||
|
|
* @(#)list.c 4.12 (Berkeley) 02/05/99
|
||
|
|
*
|
||
|
|
* Rogue: Exploring the Dungeons of Doom
|
||
|
|
* Copyright (C) 1980-1983, 1985, 1999 Michael Toy, Ken Arnold and Glenn Wichman
|
||
|
|
* All rights reserved.
|
||
|
|
*
|
||
|
|
* See the file LICENSE.TXT for full copyright and licensing information.
|
||
|
|
*/
|
||
|
|
|
||
|
|
#include <stdlib.h>
|
||
|
|
#include <curses.h>
|
||
|
|
#include "rogue.h"
|
||
|
|
|
||
|
|
#ifdef MASTER
|
||
|
|
int total = 0; /* total dynamic memory bytes */
|
||
|
|
#endif
|
||
|
|
|
||
|
|
/*
|
||
|
|
* detach:
|
||
|
|
* takes an item out of whatever linked list it might be in
|
||
|
|
*/
|
||
|
|
|
||
|
|
void
|
||
|
|
_detach(THING **list, THING *item)
|
||
|
|
{
|
||
|
|
if (*list == item)
|
||
|
|
*list = next(item);
|
||
|
|
if (prev(item) != NULL)
|
||
|
|
item->l_prev->l_next = next(item);
|
||
|
|
if (next(item) != NULL)
|
||
|
|
item->l_next->l_prev = prev(item);
|
||
|
|
item->l_next = NULL;
|
||
|
|
item->l_prev = NULL;
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
* _attach:
|
||
|
|
* add an item to the head of a list
|
||
|
|
*/
|
||
|
|
|
||
|
|
void
|
||
|
|
_attach(THING **list, THING *item)
|
||
|
|
{
|
||
|
|
if (*list != NULL)
|
||
|
|
{
|
||
|
|
item->l_next = *list;
|
||
|
|
(*list)->l_prev = item;
|
||
|
|
item->l_prev = NULL;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
item->l_next = NULL;
|
||
|
|
item->l_prev = NULL;
|
||
|
|
}
|
||
|
|
*list = item;
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
* _free_list:
|
||
|
|
* Throw the whole blamed thing away
|
||
|
|
*/
|
||
|
|
|
||
|
|
void
|
||
|
|
_free_list(THING **ptr)
|
||
|
|
{
|
||
|
|
THING *item;
|
||
|
|
|
||
|
|
while (*ptr != NULL)
|
||
|
|
{
|
||
|
|
item = *ptr;
|
||
|
|
*ptr = next(item);
|
||
|
|
discard(item);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
* discard:
|
||
|
|
* Free up an item
|
||
|
|
*/
|
||
|
|
|
||
|
|
void
|
||
|
|
discard(THING *item)
|
||
|
|
{
|
||
|
|
#ifdef MASTER
|
||
|
|
total--;
|
||
|
|
#endif
|
||
|
|
free(item);
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
* new_item
|
||
|
|
* Get a new item with a specified size
|
||
|
|
*/
|
||
|
|
THING *
|
||
|
|
new_item(void)
|
||
|
|
{
|
||
|
|
THING *item;
|
||
|
|
|
||
|
|
if ((item = calloc(1, sizeof *item)) == NULL) {
|
||
|
|
#ifdef MASTER
|
||
|
|
msg("ran out of memory after %d items", total);
|
||
|
|
#endif
|
||
|
|
return NULL;
|
||
|
|
}
|
||
|
|
|
||
|
|
#ifdef MASTER
|
||
|
|
total++;
|
||
|
|
#endif
|
||
|
|
|
||
|
|
item->l_next = NULL;
|
||
|
|
item->l_prev = NULL;
|
||
|
|
return item;
|
||
|
|
}
|