nuclear@2: /* reimplementation of the subset of glib used by libsmf
nuclear@2:  *
nuclear@2:  * Copyright (C) 2012 John Tsiombikas <nuclear@mutantstargoat.com>
nuclear@2:  * All rights reserved.
nuclear@2:  *
nuclear@2:  * Redistribution and use in source and binary forms, with or without
nuclear@2:  * modification, are permitted provided that the following conditions are met:
nuclear@2:  *
nuclear@2:  * 1. Redistributions of source code must retain the above copyright notice, this
nuclear@2:  *    list of conditions and the following disclaimer.
nuclear@2:  * 2. Redistributions in binary form must reproduce the above copyright notice,
nuclear@2:  *    this list of conditions and the following disclaimer in the documentation
nuclear@2:  *    and/or other materials provided with the distribution.
nuclear@2:  *
nuclear@2:  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
nuclear@2:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
nuclear@2:  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
nuclear@2:  * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR
nuclear@2:  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
nuclear@2:  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
nuclear@2:  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
nuclear@2:  * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
nuclear@2:  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
nuclear@2:  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
nuclear@2:  */
nuclear@2: 
nuclear@0: #include <stdio.h>
nuclear@0: #include <stdlib.h>
nuclear@0: #include <string.h>
nuclear@0: #include <stdarg.h>
nuclear@0: #include <assert.h>
nuclear@0: #include "fake_glib.h"
nuclear@0: 
nuclear@0: FakeGPtrArray *fg_ptr_array_new(void)
nuclear@0: {
nuclear@0: 	FakeGPtrArray *arr;
nuclear@0: 
nuclear@0: 	if(!(arr = malloc(sizeof *arr))) {
nuclear@0: 		return 0;
nuclear@0: 	}
nuclear@0: 	arr->pdata = 0;
nuclear@0: 	arr->len = 0;
nuclear@0: 	return arr;
nuclear@0: }
nuclear@0: 
nuclear@0: void **fg_ptr_array_free(FakeGPtrArray *arr, int free_seg)
nuclear@0: {
nuclear@0: 	void **res;
nuclear@0: 
nuclear@0: 	if(!arr) {
nuclear@0: 		return 0;
nuclear@0: 	}
nuclear@0: 
nuclear@0: 	if(free_seg) {
nuclear@0: 		free(arr->pdata);
nuclear@0: 		res = 0;
nuclear@0: 	} else {
nuclear@0: 		res = arr->pdata;
nuclear@0: 	}
nuclear@0: 	free(arr);
nuclear@0: 	return res;
nuclear@0: }
nuclear@0: 
nuclear@0: void fg_ptr_array_add(FakeGPtrArray *arr, void *data)
nuclear@0: {
nuclear@0: 	int idx = arr->len++;
nuclear@0: 
nuclear@0: 	arr->pdata = realloc(arr->pdata, arr->len * sizeof *arr->pdata);
nuclear@0: 	assert(arr->pdata);
nuclear@0: 
nuclear@0: 	arr->pdata[idx] = data;
nuclear@0: }
nuclear@0: 
nuclear@0: int fg_ptr_array_remove(FakeGPtrArray *arr, void *data)
nuclear@0: {
nuclear@0: 	int i;
nuclear@0: 
nuclear@0: 	for(i=0; i<arr->len; i++) {
nuclear@0: 		if(arr->pdata[i] == data) {
nuclear@0: 			fg_ptr_array_remove_index(arr, i);
nuclear@0: 			return 1;
nuclear@0: 		}
nuclear@0: 	}
nuclear@0: 
nuclear@0: 	return 0;
nuclear@0: }
nuclear@0: 
nuclear@0: void *fg_ptr_array_remove_index(FakeGPtrArray *arr, unsigned int idx)
nuclear@0: {
nuclear@0: 	void *data = arr->pdata[idx];
nuclear@0: 	int rest = --arr->len - idx;
nuclear@0: 	if(rest > 0) {
nuclear@0: 		memmove(arr->pdata + idx, arr->pdata + idx + 1, rest * sizeof *arr->pdata);
nuclear@0: 	}
nuclear@0: 	return data;
nuclear@0: }
nuclear@0: 
nuclear@0: void fg_ptr_array_sort(FakeGPtrArray *arr, FakeGCompareFunc cmp)
nuclear@0: {
nuclear@0: 	qsort(arr->pdata, arr->len, sizeof *arr->pdata, cmp);
nuclear@0: }
nuclear@0: 
nuclear@0: /* -- logging -- */
nuclear@0: 
nuclear@1: void fg_message(const char *fmt, ...)
nuclear@1: {
nuclear@1: 	va_list ap;
nuclear@1: 
nuclear@1: 	va_start(ap, fmt);
nuclear@1: 	vprintf(fmt, ap);
nuclear@1: 	va_end(ap);
nuclear@1: 	putchar('\n');
nuclear@1: }
nuclear@1: 
nuclear@0: void fg_warning(const char *fmt, ...)
nuclear@0: {
nuclear@0: 	va_list ap;
nuclear@0: 
nuclear@0: 	printf("warning: ");
nuclear@0: 
nuclear@0: 	va_start(ap, fmt);
nuclear@0: 	vprintf(fmt, ap);
nuclear@0: 	va_end(ap);
nuclear@1: 	putchar('\n');
nuclear@0: }
nuclear@0: 
nuclear@0: void fg_critical(const char *fmt, ...)
nuclear@0: {
nuclear@0: 	va_list ap;
nuclear@0: 
nuclear@0: 	printf("critical: ");
nuclear@0: 
nuclear@0: 	va_start(ap, fmt);
nuclear@0: 	vfprintf(stderr, fmt, ap);
nuclear@0: 	va_end(ap);
nuclear@1: 	putchar('\n');
nuclear@0: 
nuclear@0: 	if(getenv("G_DEBUG")) {
nuclear@0: 		abort();
nuclear@0: 	}
nuclear@0: }
nuclear@0: 
nuclear@0: void fg_error(const char *fmt, ...)
nuclear@0: {
nuclear@0: 	va_list ap;
nuclear@0: 
nuclear@0: 	printf("error: ");
nuclear@0: 
nuclear@0: 	va_start(ap, fmt);
nuclear@0: 	vfprintf(stderr, fmt, ap);
nuclear@0: 	va_end(ap);
nuclear@1: 	putchar('\n');
nuclear@0: 	abort();
nuclear@0: }
nuclear@0: 
nuclear@0: void fg_debug(const char *fmt, ...)
nuclear@0: {
nuclear@0: 	va_list ap;
nuclear@0: 
nuclear@0: 	printf("debug: ");
nuclear@0: 
nuclear@0: 	va_start(ap, fmt);
nuclear@0: 	vprintf(fmt, ap);
nuclear@0: 	va_end(ap);
nuclear@1: 	putchar('\n');
nuclear@0: }