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
51
52
53
54
55
56
57
58
59
60
61
62
|
/*
** Written by David Gerdes US Army Construction Engineering Research Lab
** April 1992
** Copyright 1992 USA-CERL All rights reserved.
**
*/
#include <stdlib.h>
#include "linkm.h"
static int link_chunk_size = 100;
static int link_exit_flag = 0;
void link_set_chunk_size (int size)
{
link_chunk_size = size;
}
void link_exit_on_error (int flag)
{
link_exit_flag = flag;
}
struct link_head *link_init (int size)
{
struct link_head *Head;
if (NULL == (Head = (struct link_head *) malloc (sizeof (struct link_head))))
return NULL;
if (NULL == (Head->ptr_array = (VOID_T **) malloc (sizeof (VOID_T *) * PTR_CNT)))
{
free (Head);
return NULL;
}
Head->max_ptr = 0;
Head->Unused = NULL;
Head->alloced = PTR_CNT;
Head->unit_size = size < sizeof (VOID_T *) ? sizeof (VOID_T *) : size;
Head->chunk_size = link_chunk_size;
Head->exit_flag = link_exit_flag;
return Head;
}
void link_cleanup (struct link_head *Head)
{
register int i;
if (Head == NULL)
return;
if (Head->ptr_array)
{
for (i = 0 ; i < Head->max_ptr ; i++)
if (Head->ptr_array[i] != NULL)
free (Head->ptr_array[i]);
free (Head->ptr_array);
free (Head);
}
}
|
