/*
 * Copyright (C) 1996, 1997, 1998, 1999, 2000  Internet Software Consortium.
 * 
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 * 
 * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
 * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
 * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
 * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
 * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
 * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
 * SOFTWARE.
 */

/* $Id: string.c,v 1.4 2000/02/03 23:14:35 halley Exp $ */

/* Principal Author: Ted Lemon */

#include <string.h>		/* memset */

#include <isc/assertions.h>
#include <isc/error.h>

#include <omapi/private.h>

isc_result_t
omapi_string_create(omapi_string_t **d, unsigned int len) {
	omapi_string_t *new;

	new = isc_mem_get(omapi_mctx, OMAPI_STRING_EMPTY_SIZE + len);
	if (new == NULL)
		return (ISC_R_NOMEMORY);
	memset(new, 0, OMAPI_STRING_EMPTY_SIZE);
	new->len = len;

	omapi_string_reference(d, new);

	return (ISC_R_SUCCESS);
}

void
omapi_string_reference(omapi_string_t **r, omapi_string_t *h) {
	REQUIRE(r != NULL && h != NULL);
	REQUIRE(*r == NULL);

	*r = h;
	h->refcnt++;
}

void
omapi_string_dereference(omapi_string_t **h) {
	REQUIRE(h != NULL && *h != NULL);
	REQUIRE((*h)->refcnt > 0);

	if (--((*h)->refcnt) <= 0)
		isc_mem_put(omapi_mctx, *h,
			    OMAPI_STRING_EMPTY_SIZE + (*h)->len);

	*h = NULL;
}

void
omapi_string_totext(omapi_string_t *string, isc_region_t *region) {
	REQUIRE(string != NULL && region != NULL);

	region->base = string->value;
	region->length = string->len;
}

int
omapi_string_stringcmp(omapi_string_t *s1, omapi_string_t *s2) {
	unsigned int len;
	int order;

	if (s1->len > s2->len)
		len = s2->len;
	else
		len = s1->len;

	order = memcmp(s1->value, s2->value, len);
	if (order == 0) {
		if (s1->len > s2->len)
			order = 1;
		else if (s1->len < s2->len)
			order = -1;
	}

	return (order);
}

int
omapi_string_strcmp(omapi_string_t *s1, const char *s2) {
	unsigned int len, slen;
	int order;

	slen = strlen(s2);
	if (slen > s1->len)
		len = s1->len;
	else
		len = slen;

	order = memcmp(s1->value, s2, len);
	if (order == 0) {
		if (s1->len > slen)
			order = 1;
		else if (s1->len < slen)
			order= -1;
	}

	return (order);
}