forked from Imagelibrary/rtems
c1cdaa0ce8
<valette@crf.canon.fr> to add a port of the GoAhead web server (httpd) to the RTEMS build tree. They have successfully used this BSP on i386/pc386 and PowerPC/mcp750. Mark and Joel spoke with Nick Berliner <nickb@goahead.com> on 26 Oct 1999 about this port and got verbal approval to include it in RTEMS distributions.
75 lines
1.6 KiB
C
75 lines
1.6 KiB
C
/*
|
|
* value.c -- Generic type (holds all types)
|
|
*
|
|
* Copyright (c) Go Ahead Software, Inc., 1995-1999
|
|
*
|
|
* See the file "license.txt" for usage and redistribution license requirements
|
|
*/
|
|
|
|
/******************************** Description *********************************/
|
|
|
|
/*
|
|
* This module provides a generic type that can hold all possible types.
|
|
* It is designed to provide maximum effeciency.
|
|
*/
|
|
|
|
/********************************* Includes ***********************************/
|
|
|
|
#include "uemf.h"
|
|
|
|
/*********************************** Locals ***********************************/
|
|
|
|
|
|
/*********************************** Code *************************************/
|
|
/*
|
|
* Initialize a integer value.
|
|
*/
|
|
|
|
value_t valueInteger(long value)
|
|
{
|
|
value_t v = VALUE_VALID;
|
|
|
|
v.value.integer = value;
|
|
return v;
|
|
}
|
|
|
|
/******************************************************************************/
|
|
/*
|
|
* Initialize a string value. Note: not allocation
|
|
*/
|
|
|
|
value_t valueString(char_t *value, int flags)
|
|
{
|
|
value_t v = VALUE_VALID;
|
|
|
|
v.type = string;
|
|
if (flags & VALUE_ALLOCATE) {
|
|
v.allocated = 1;
|
|
v.value.string = gstrdup(B_L, value);
|
|
} else {
|
|
v.allocated = 0;
|
|
v.value.string = value;
|
|
}
|
|
return v;
|
|
}
|
|
|
|
/******************************************************************************/
|
|
/*
|
|
* Free any storage allocated for a value.
|
|
*/
|
|
|
|
void valueFree(value_t *v)
|
|
{
|
|
a_assert(v);
|
|
|
|
if (v->valid && v->allocated && v->type == string &&
|
|
v->value.string != NULL) {
|
|
bfree(B_L, v->value.string);
|
|
}
|
|
v->type = undefined;
|
|
v->valid = 0;
|
|
v->allocated = 0;
|
|
}
|
|
|
|
/******************************************************************************/
|