|
Packit |
0b5880 |
/*
|
|
Packit |
0b5880 |
* Check: a unit test framework for C
|
|
Packit |
0b5880 |
* Copyright (C) 2001, 2002 Arien Malec
|
|
Packit |
0b5880 |
*
|
|
Packit |
0b5880 |
* This library is free software; you can redistribute it and/or
|
|
Packit |
0b5880 |
* modify it under the terms of the GNU Lesser General Public
|
|
Packit |
0b5880 |
* License as published by the Free Software Foundation; either
|
|
Packit |
0b5880 |
* version 2.1 of the License, or (at your option) any later version.
|
|
Packit |
0b5880 |
*
|
|
Packit |
0b5880 |
* This library is distributed in the hope that it will be useful,
|
|
Packit |
0b5880 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
Packit |
0b5880 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Packit |
0b5880 |
* Lesser General Public License for more details.
|
|
Packit |
0b5880 |
*
|
|
Packit |
0b5880 |
* You should have received a copy of the GNU Lesser General Public
|
|
Packit |
0b5880 |
* License along with this library; if not, write to the
|
|
Packit |
0b5880 |
* Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
|
|
Packit |
0b5880 |
* MA 02110-1301, USA.
|
|
Packit |
0b5880 |
*/
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
#include "../lib/libcompat.h"
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
#include <stdlib.h>
|
|
Packit |
0b5880 |
#include <string.h>
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
#include "check_list.h"
|
|
Packit |
0b5880 |
#include "check_error.h"
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
enum
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
LINIT = 1,
|
|
Packit |
0b5880 |
LGROW = 2
|
|
Packit |
0b5880 |
};
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
struct List
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
unsigned int n_elts;
|
|
Packit |
0b5880 |
unsigned int max_elts;
|
|
Packit |
0b5880 |
int current; /* pointer to the current node */
|
|
Packit |
0b5880 |
int last; /* pointer to the node before END */
|
|
Packit |
0b5880 |
void **data;
|
|
Packit |
0b5880 |
};
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
static void maybe_grow(List * lp)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
if(lp->n_elts >= lp->max_elts)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
lp->max_elts *= LGROW;
|
|
Packit |
0b5880 |
lp->data = (void **)erealloc(lp->data, lp->max_elts * sizeof(lp->data[0]));
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
List *check_list_create(void)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
List *lp;
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
lp = (List *)emalloc(sizeof(List));
|
|
Packit |
0b5880 |
lp->n_elts = 0;
|
|
Packit |
0b5880 |
lp->max_elts = LINIT;
|
|
Packit |
0b5880 |
lp->data = (void **)emalloc(sizeof(lp->data[0]) * LINIT);
|
|
Packit |
0b5880 |
lp->current = lp->last = -1;
|
|
Packit |
0b5880 |
return lp;
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
void check_list_add_front(List * lp, void *val)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
if(lp == NULL)
|
|
Packit |
0b5880 |
return;
|
|
Packit |
0b5880 |
maybe_grow(lp);
|
|
Packit |
0b5880 |
memmove(lp->data + 1, lp->data, lp->n_elts * sizeof lp->data[0]);
|
|
Packit |
0b5880 |
lp->last++;
|
|
Packit |
0b5880 |
lp->n_elts++;
|
|
Packit |
0b5880 |
lp->current = 0;
|
|
Packit |
0b5880 |
lp->data[lp->current] = val;
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
void check_list_add_end(List * lp, void *val)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
if(lp == NULL)
|
|
Packit |
0b5880 |
return;
|
|
Packit |
0b5880 |
maybe_grow(lp);
|
|
Packit |
0b5880 |
lp->last++;
|
|
Packit |
0b5880 |
lp->n_elts++;
|
|
Packit |
0b5880 |
lp->current = lp->last;
|
|
Packit |
0b5880 |
lp->data[lp->current] = val;
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
int check_list_at_end(List * lp)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
if(lp->current == -1)
|
|
Packit |
0b5880 |
return 1;
|
|
Packit |
0b5880 |
return (lp->current > lp->last);
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
void check_list_front(List * lp)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
if(lp->current == -1)
|
|
Packit |
0b5880 |
return;
|
|
Packit |
0b5880 |
lp->current = 0;
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
void check_list_free(List * lp)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
if(lp == NULL)
|
|
Packit |
0b5880 |
return;
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
free(lp->data);
|
|
Packit |
0b5880 |
free(lp);
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
void *check_list_val(List * lp)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
if(lp == NULL)
|
|
Packit |
0b5880 |
return NULL;
|
|
Packit |
0b5880 |
if(lp->current == -1 || lp->current > lp->last)
|
|
Packit |
0b5880 |
return NULL;
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
return lp->data[lp->current];
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
void check_list_advance(List * lp)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
if(lp == NULL)
|
|
Packit |
0b5880 |
return;
|
|
Packit |
0b5880 |
if(check_list_at_end(lp))
|
|
Packit |
0b5880 |
return;
|
|
Packit |
0b5880 |
lp->current++;
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
void check_list_apply(List * lp, void (*fp) (void *))
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
if(lp == NULL || fp == NULL)
|
|
Packit |
0b5880 |
return;
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
for(check_list_front(lp); !check_list_at_end(lp); check_list_advance(lp))
|
|
Packit |
0b5880 |
fp(check_list_val(lp));
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
int check_list_contains(List * lp, void *val)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
for(check_list_front(lp); !check_list_at_end(lp); check_list_advance(lp))
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
if(check_list_val(lp) == val)
|
|
Packit |
0b5880 |
{
|
|
Packit |
0b5880 |
return 1;
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
}
|
|
Packit |
0b5880 |
|
|
Packit |
0b5880 |
return 0;
|
|
Packit |
0b5880 |
}
|