diff options
| -rw-r--r-- | slv2/value.h | 130 | ||||
| -rw-r--r-- | src/value.c | 141 |
2 files changed, 271 insertions, 0 deletions
diff --git a/slv2/value.h b/slv2/value.h new file mode 100644 index 0000000..abc7a57 --- /dev/null +++ b/slv2/value.h @@ -0,0 +1,130 @@ +/* SLV2 + * Copyright (C) 2007 Dave Robillard <http://drobilla.net> + * + * This library is free software; you can redistribute it and/or modify it + * under the terms of the GNU General Public License as published by the Free + * Software Foundation; either version 2 of the License, or (at your option) + * any later version. + * + * This library is distributed in the hope that it will be useful, but WITHOUT + * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or + * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License + * for more details. + * + * You should have received a copy of the GNU General Public License along + * with this program; if not, write to the Free Software Foundation, Inc., + * 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. + */ + +#ifndef __SLV2_VALUE_H__ +#define __SLV2_VALUE_H__ + +#ifdef __cplusplus +extern "C" { +#endif + +#include <stdbool.h> +#include <slv2/types.h> + +/** \addtogroup data + * @{ + */ + + +/** Return whether two values are equivalent. + */ +bool +slv2_value_equals(SLV2Value value, SLV2Value other); + + +/** Return whether the value is a URI (resource). + * + * Time = O(1) + */ +bool +slv2_value_is_uri(SLV2Value value); + + +/** Return this value as a URI string, e.g. "http://example.org/foo". + * + * Valid to call only if slv2_value_is_uri(\a value) returns true. + * Returned value is owned by \a value and must not be freed by caller. + * + * Time = O(1) + */ +const char* +slv2_value_as_uri(SLV2Value value); + + +/** Return whether this value is a literal (i.e. not a URI). + * + * Returns true if \a value is a string or numeric value. + * + * Time = O(1) + */ +bool +slv2_value_is_literal(SLV2Value value); + + +/** Return whether this value is a string literal. + * + * Returns true if \a value is a string (but not numeric) value. + * + * Time = O(1) + */ +bool +slv2_value_is_string(SLV2Value value); + + +/** Return whether this value is a string literal. + * + * Time = O(1) + */ +const char* +slv2_value_as_string(SLV2Value value); + + +/** Return whether this value is a decimal literal. + * + * Time = O(1) + */ +bool +slv2_value_is_float(SLV2Value value); + + +/** Return \a value as a float. + * + * Valid to call only if slv2_value_is_float(\a value) or + * slv2_value_is_int(\a value) returns true. + * + * Time = O(1) + */ +float +slv2_value_as_float(SLV2Value value); + + +/** Return whether this value is an integer literal. + * + * Time = O(1) + */ +bool +slv2_value_is_int(SLV2Value value); + + +/** Return \a value as an integer. + * + * Valid to call only if slv2_value_is_int(\a value) returns true. + * + * Time = O(1) + */ +int +slv2_value_as_int(SLV2Value value); + + +/** @} */ + +#ifdef __cplusplus +} +#endif + +#endif /* __SLV2_VALUE_H__ */ diff --git a/src/value.c b/src/value.c new file mode 100644 index 0000000..1d7ead0 --- /dev/null +++ b/src/value.c @@ -0,0 +1,141 @@ +/* SLV2 + * Copyright (C) 2007 Dave Robillard <http://drobilla.net> + * + * This library is free software; you can redistribute it and/or modify it + * under the terms of the GNU General Public License as published by the Free + * Software Foundation; either version 2 of the License, or (at your option) + * any later version. + * + * This library is distributed in the hope that it will be useful, but WITHOUT + * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or + * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License + * for more details. + * + * You should have received a copy of the GNU General Public License along + * with this program; if not, write to the Free Software Foundation, Inc., + * 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. + */ + +#define _XOPEN_SOURCE 500 + +#include <stdlib.h> +#include <string.h> +#include <assert.h> +#include <raptor.h> +#include <slv2/value.h> +#include "slv2_internal.h" + + +/* private */ +SLV2Value +slv2_value_new(SLV2ValueType type, const char* str) +{ + SLV2Value val = (SLV2Value)malloc(sizeof(struct _Value)); + val->str_val = strdup(str); + val->type = type; + + //printf("New value, t=%d, %s\n", type, str); + + if (type == SLV2_VALUE_INT) { + char* endptr = 0; + val->val.int_val = strtol(str, &endptr, 10); + } else if (type == SLV2_VALUE_FLOAT) { + char* endptr = 0; + val->val.float_val = strtod(str, &endptr); + } else { + val->val.int_val = 0; + } + + return val; +} + + +/* private */ +void +slv2_value_free(SLV2Value val) +{ + free(val->str_val); + free(val); +} + + +bool +slv2_value_equals(SLV2Value value, SLV2Value other) +{ + if (value->type != other->type) + return false; + else + return ! strcmp(value->str_val, other->str_val); +} + + +bool +slv2_value_is_uri(SLV2Value value) +{ + return (value->type == SLV2_VALUE_URI); +} + + +const char* +slv2_value_as_uri(SLV2Value value) +{ + assert(slv2_value_is_uri(value)); + return value->str_val; +} + + +bool +slv2_value_is_literal(SLV2Value value) +{ + // No blank nodes + return (value->type != SLV2_VALUE_URI); +} + + +bool +slv2_value_is_string(SLV2Value value) +{ + return (value->type == SLV2_VALUE_STRING); +} + + +const char* +slv2_value_as_string(SLV2Value value) +{ + assert(slv2_value_is_string(value)); + return value->str_val; +} + + +bool +slv2_value_is_int(SLV2Value value) +{ + return (value->type == SLV2_VALUE_INT); +} + + +int +slv2_value_as_int(SLV2Value value) +{ + assert(slv2_value_is_int(value)); + return value->val.int_val; +} + + +bool +slv2_value_is_float(SLV2Value value) +{ + return (value->type == SLV2_VALUE_FLOAT); +} + + +float +slv2_value_as_float(SLV2Value value) +{ + assert(slv2_value_is_float(value) || slv2_value_is_int(value)); + if (slv2_value_is_float(value)) + return value->val.float_val; + else // slv2_value_is_int(value) + return (float)value->val.int_val; +} + |