2007-11-25 19:42:40 +00:00
|
|
|
/* copyright (c) 2007 magnus auvinen, see licence.txt for more info */
|
2007-08-22 07:52:33 +00:00
|
|
|
#include <stdlib.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <stdarg.h>
|
|
|
|
#include <string.h>
|
2007-11-08 09:11:32 +00:00
|
|
|
#include <ctype.h>
|
2007-08-22 07:52:33 +00:00
|
|
|
#include <time.h>
|
|
|
|
|
2008-08-14 17:19:13 +00:00
|
|
|
/*#include "detect.h"*/
|
|
|
|
#include "system.h"
|
|
|
|
/*#include "e_console.h"*/
|
2007-08-22 07:52:33 +00:00
|
|
|
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
|
|
|
#include <sys/time.h>
|
|
|
|
#include <unistd.h>
|
|
|
|
|
|
|
|
/* unix net includes */
|
2007-11-08 09:11:32 +00:00
|
|
|
#include <sys/stat.h>
|
2007-08-22 07:52:33 +00:00
|
|
|
#include <sys/types.h>
|
|
|
|
#include <sys/socket.h>
|
|
|
|
#include <sys/ioctl.h>
|
|
|
|
#include <errno.h>
|
|
|
|
#include <netdb.h>
|
|
|
|
#include <netinet/in.h>
|
|
|
|
#include <fcntl.h>
|
2007-10-02 16:19:25 +00:00
|
|
|
#include <pthread.h>
|
2007-08-22 07:52:33 +00:00
|
|
|
|
|
|
|
#include <dirent.h>
|
2008-09-30 15:52:15 +00:00
|
|
|
|
|
|
|
#if defined(CONF_PLATFORM_MACOSX)
|
|
|
|
#include <Carbon/Carbon.h>
|
|
|
|
#endif
|
|
|
|
|
2007-08-22 07:52:33 +00:00
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
#define WIN32_LEAN_AND_MEAN
|
2008-05-10 17:18:56 +00:00
|
|
|
#define _WIN32_WINNT 0x0501 /* required for mingw to get getaddrinfo to work */
|
2007-08-22 07:52:33 +00:00
|
|
|
#include <windows.h>
|
|
|
|
#include <winsock2.h>
|
|
|
|
#include <ws2tcpip.h>
|
2009-01-17 22:44:20 +00:00
|
|
|
#include <wspiapi.h>
|
2007-08-22 07:52:33 +00:00
|
|
|
#include <fcntl.h>
|
2007-11-18 22:06:41 +00:00
|
|
|
#include <direct.h>
|
|
|
|
#include <errno.h>
|
2007-08-22 07:52:33 +00:00
|
|
|
|
2010-05-29 07:25:38 +00:00
|
|
|
#ifndef EWOULDBLOCK
|
|
|
|
#define EWOULDBLOCK WSAEWOULDBLOCK
|
|
|
|
#endif
|
2007-08-22 07:52:33 +00:00
|
|
|
#else
|
|
|
|
#error NOT IMPLEMENTED
|
|
|
|
#endif
|
|
|
|
|
2007-10-04 09:49:38 +00:00
|
|
|
#if defined(__cplusplus)
|
|
|
|
extern "C" {
|
|
|
|
#endif
|
|
|
|
|
2008-02-24 16:03:58 +00:00
|
|
|
IOHANDLE io_stdin() { return (IOHANDLE)stdin; }
|
|
|
|
IOHANDLE io_stdout() { return (IOHANDLE)stdout; }
|
|
|
|
IOHANDLE io_stderr() { return (IOHANDLE)stderr; }
|
|
|
|
|
2008-03-10 00:48:45 +00:00
|
|
|
static DBG_LOGGER loggers[16];
|
|
|
|
static int num_loggers = 0;
|
|
|
|
|
2008-04-05 14:50:43 +00:00
|
|
|
static NETSTATS network_stats = {0};
|
2008-10-02 12:29:19 +00:00
|
|
|
static MEMSTATS memory_stats = {0};
|
2008-04-05 14:50:43 +00:00
|
|
|
|
2008-03-10 00:48:45 +00:00
|
|
|
void dbg_logger(DBG_LOGGER logger)
|
|
|
|
{
|
|
|
|
loggers[num_loggers++] = logger;
|
|
|
|
}
|
2007-08-22 07:52:33 +00:00
|
|
|
|
|
|
|
void dbg_assert_imp(const char *filename, int line, int test, const char *msg)
|
|
|
|
{
|
|
|
|
if(!test)
|
|
|
|
{
|
|
|
|
dbg_msg("assert", "%s(%d): %s", filename, line, msg);
|
|
|
|
dbg_break();
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void dbg_break()
|
|
|
|
{
|
|
|
|
*((unsigned*)0) = 0x0;
|
|
|
|
}
|
|
|
|
|
|
|
|
void dbg_msg(const char *sys, const char *fmt, ...)
|
|
|
|
{
|
|
|
|
va_list args;
|
2008-03-29 14:34:40 +00:00
|
|
|
char str[1024*4];
|
2008-03-10 00:48:45 +00:00
|
|
|
char *msg;
|
|
|
|
int i, len;
|
2010-05-29 07:25:38 +00:00
|
|
|
|
2008-03-10 00:48:45 +00:00
|
|
|
str_format(str, sizeof(str), "[%08x][%s]: ", (int)time(0), sys);
|
|
|
|
len = strlen(str);
|
|
|
|
msg = (char *)str + len;
|
2010-05-29 07:25:38 +00:00
|
|
|
|
2007-08-22 07:52:33 +00:00
|
|
|
va_start(args, fmt);
|
2008-03-10 00:48:45 +00:00
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
2008-03-10 10:56:48 +00:00
|
|
|
_vsnprintf(msg, sizeof(str)-len, fmt, args);
|
2008-03-10 00:48:45 +00:00
|
|
|
#else
|
|
|
|
vsnprintf(msg, sizeof(str)-len, fmt, args);
|
2007-08-22 07:52:33 +00:00
|
|
|
#endif
|
|
|
|
va_end(args);
|
2010-05-29 07:25:38 +00:00
|
|
|
|
2008-03-10 00:48:45 +00:00
|
|
|
for(i = 0; i < num_loggers; i++)
|
|
|
|
loggers[i](str);
|
|
|
|
}
|
2008-01-16 22:14:06 +00:00
|
|
|
|
2008-03-10 00:48:45 +00:00
|
|
|
static void logger_stdout(const char *line)
|
|
|
|
{
|
|
|
|
printf("%s\n", line);
|
2008-03-23 01:48:31 +00:00
|
|
|
fflush(stdout);
|
2008-03-10 00:48:45 +00:00
|
|
|
}
|
2008-01-16 22:14:06 +00:00
|
|
|
|
2008-03-10 00:48:45 +00:00
|
|
|
static void logger_debugger(const char *line)
|
|
|
|
{
|
2008-02-11 21:49:26 +00:00
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
2008-03-10 00:48:45 +00:00
|
|
|
OutputDebugString(line);
|
|
|
|
OutputDebugString("\n");
|
2008-02-11 21:49:26 +00:00
|
|
|
#endif
|
2008-03-10 00:48:45 +00:00
|
|
|
}
|
2008-01-16 22:14:06 +00:00
|
|
|
|
2008-03-10 00:48:45 +00:00
|
|
|
|
2010-05-29 07:25:38 +00:00
|
|
|
static IOHANDLE logfile = 0;
|
2008-03-10 00:48:45 +00:00
|
|
|
static void logger_file(const char *line)
|
|
|
|
{
|
|
|
|
io_write(logfile, line, strlen(line));
|
|
|
|
io_write(logfile, "\n", 1);
|
|
|
|
io_flush(logfile);
|
2007-08-22 07:52:33 +00:00
|
|
|
}
|
|
|
|
|
2008-03-10 00:48:45 +00:00
|
|
|
void dbg_logger_stdout() { dbg_logger(logger_stdout); }
|
|
|
|
void dbg_logger_debugger() { dbg_logger(logger_debugger); }
|
|
|
|
void dbg_logger_file(const char *filename)
|
|
|
|
{
|
|
|
|
logfile = io_open(filename, IOFLAG_WRITE);
|
|
|
|
if(logfile)
|
|
|
|
dbg_logger(logger_file);
|
|
|
|
else
|
|
|
|
dbg_msg("dbg/logger", "failed to open '%s' for logging", filename);
|
|
|
|
|
|
|
|
}
|
|
|
|
/* */
|
|
|
|
|
2007-08-22 07:52:33 +00:00
|
|
|
int memory_alloced = 0;
|
|
|
|
|
2008-10-02 12:29:19 +00:00
|
|
|
typedef struct MEMHEADER
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
const char *filename;
|
|
|
|
int line;
|
|
|
|
int size;
|
2008-10-02 12:29:19 +00:00
|
|
|
struct MEMHEADER *prev;
|
|
|
|
struct MEMHEADER *next;
|
|
|
|
} MEMHEADER;
|
2007-08-22 07:52:33 +00:00
|
|
|
|
2008-10-02 12:29:19 +00:00
|
|
|
typedef struct MEMTAIL
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
int guard;
|
2008-10-02 12:29:19 +00:00
|
|
|
} MEMTAIL;
|
2007-08-22 07:52:33 +00:00
|
|
|
|
2008-10-02 12:29:19 +00:00
|
|
|
static struct MEMHEADER *first = 0;
|
2008-10-06 16:44:34 +00:00
|
|
|
static const int MEM_GUARD_VAL = 0xbaadc0de;
|
2007-08-25 08:48:24 +00:00
|
|
|
|
2007-08-22 07:52:33 +00:00
|
|
|
void *mem_alloc_debug(const char *filename, int line, unsigned size, unsigned alignment)
|
|
|
|
{
|
|
|
|
/* TODO: fix alignment */
|
|
|
|
/* TODO: add debugging */
|
2008-10-02 12:29:19 +00:00
|
|
|
MEMHEADER *header = (struct MEMHEADER *)malloc(size+sizeof(MEMHEADER)+sizeof(MEMTAIL));
|
|
|
|
MEMTAIL *tail = (struct MEMTAIL *)(((char*)(header+1))+size);
|
2007-08-22 07:52:33 +00:00
|
|
|
header->size = size;
|
|
|
|
header->filename = filename;
|
|
|
|
header->line = line;
|
2008-10-02 12:29:19 +00:00
|
|
|
|
|
|
|
memory_stats.allocated += header->size;
|
|
|
|
memory_stats.total_allocations++;
|
|
|
|
memory_stats.active_allocations++;
|
2007-08-22 07:52:33 +00:00
|
|
|
|
2008-10-06 16:44:34 +00:00
|
|
|
tail->guard = MEM_GUARD_VAL;
|
2007-08-22 07:52:33 +00:00
|
|
|
|
2008-10-02 12:29:19 +00:00
|
|
|
header->prev = (MEMHEADER *)0;
|
2007-08-22 07:52:33 +00:00
|
|
|
header->next = first;
|
|
|
|
if(first)
|
|
|
|
first->prev = header;
|
|
|
|
first = header;
|
|
|
|
|
|
|
|
/*dbg_msg("mem", "++ %p", header+1); */
|
|
|
|
return header+1;
|
|
|
|
}
|
|
|
|
|
|
|
|
void mem_free(void *p)
|
|
|
|
{
|
|
|
|
if(p)
|
|
|
|
{
|
2008-10-02 12:29:19 +00:00
|
|
|
MEMHEADER *header = (MEMHEADER *)p - 1;
|
|
|
|
MEMTAIL *tail = (MEMTAIL *)(((char*)(header+1))+header->size);
|
2007-08-22 07:52:33 +00:00
|
|
|
|
2008-10-06 16:44:34 +00:00
|
|
|
if(tail->guard != MEM_GUARD_VAL)
|
2007-08-22 07:52:33 +00:00
|
|
|
dbg_msg("mem", "!! %p", p);
|
|
|
|
/* dbg_msg("mem", "-- %p", p); */
|
2008-10-02 12:29:19 +00:00
|
|
|
memory_stats.allocated -= header->size;
|
|
|
|
memory_stats.active_allocations--;
|
2007-08-22 07:52:33 +00:00
|
|
|
|
|
|
|
if(header->prev)
|
|
|
|
header->prev->next = header->next;
|
|
|
|
else
|
|
|
|
first = header->next;
|
|
|
|
if(header->next)
|
|
|
|
header->next->prev = header->prev;
|
|
|
|
|
|
|
|
free(header);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void mem_debug_dump()
|
|
|
|
{
|
|
|
|
char buf[1024];
|
2008-10-02 12:29:19 +00:00
|
|
|
MEMHEADER *header = first;
|
2007-08-22 07:52:33 +00:00
|
|
|
IOHANDLE f = io_open("memory.txt", IOFLAG_WRITE);
|
|
|
|
|
|
|
|
while(header)
|
|
|
|
{
|
2008-02-11 21:49:26 +00:00
|
|
|
str_format(buf, sizeof(buf), "%s(%d): %d\n", header->filename, header->line, header->size);
|
2007-08-22 07:52:33 +00:00
|
|
|
io_write(f, buf, strlen(buf));
|
|
|
|
header = header->next;
|
|
|
|
}
|
2008-02-04 07:36:54 +00:00
|
|
|
|
|
|
|
io_close(f);
|
2007-08-22 07:52:33 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void mem_copy(void *dest, const void *source, unsigned size)
|
|
|
|
{
|
|
|
|
memcpy(dest, source, size);
|
|
|
|
}
|
|
|
|
|
|
|
|
void mem_move(void *dest, const void *source, unsigned size)
|
|
|
|
{
|
|
|
|
memmove(dest, source, size);
|
|
|
|
}
|
|
|
|
|
|
|
|
void mem_zero(void *block,unsigned size)
|
|
|
|
{
|
|
|
|
memset(block, 0, size);
|
|
|
|
}
|
|
|
|
|
2008-10-07 16:17:58 +00:00
|
|
|
int mem_check_imp()
|
2008-10-06 16:44:34 +00:00
|
|
|
{
|
|
|
|
MEMHEADER *header = first;
|
|
|
|
while(header)
|
|
|
|
{
|
|
|
|
MEMTAIL *tail = (MEMTAIL *)(((char*)(header+1))+header->size);
|
|
|
|
if(tail->guard != MEM_GUARD_VAL)
|
|
|
|
{
|
|
|
|
dbg_msg("mem", "Memory check failed at %s(%d): %d", header->filename, header->line, header->size);
|
2008-10-07 16:17:58 +00:00
|
|
|
return 0;
|
2008-10-06 16:44:34 +00:00
|
|
|
}
|
|
|
|
header = header->next;
|
|
|
|
}
|
2008-10-07 16:17:58 +00:00
|
|
|
|
|
|
|
return 1;
|
2008-10-06 16:44:34 +00:00
|
|
|
}
|
|
|
|
|
2007-08-22 07:52:33 +00:00
|
|
|
IOHANDLE io_open(const char *filename, int flags)
|
|
|
|
{
|
|
|
|
if(flags == IOFLAG_READ)
|
|
|
|
return (IOHANDLE)fopen(filename, "rb");
|
|
|
|
if(flags == IOFLAG_WRITE)
|
|
|
|
return (IOHANDLE)fopen(filename, "wb");
|
|
|
|
return 0x0;
|
|
|
|
}
|
|
|
|
|
|
|
|
unsigned io_read(IOHANDLE io, void *buffer, unsigned size)
|
|
|
|
{
|
|
|
|
return fread(buffer, 1, size, (FILE*)io);
|
|
|
|
}
|
|
|
|
|
|
|
|
unsigned io_skip(IOHANDLE io, unsigned size)
|
|
|
|
{
|
|
|
|
fseek((FILE*)io, size, SEEK_CUR);
|
|
|
|
return size;
|
|
|
|
}
|
|
|
|
|
|
|
|
int io_seek(IOHANDLE io, int offset, int origin)
|
|
|
|
{
|
|
|
|
int real_origin;
|
|
|
|
|
|
|
|
switch(origin)
|
|
|
|
{
|
2007-08-25 08:48:24 +00:00
|
|
|
case IOSEEK_START:
|
2007-08-22 07:52:33 +00:00
|
|
|
real_origin = SEEK_SET;
|
|
|
|
break;
|
2007-08-25 08:48:24 +00:00
|
|
|
case IOSEEK_CUR:
|
2007-08-22 07:52:33 +00:00
|
|
|
real_origin = SEEK_CUR;
|
|
|
|
break;
|
2007-08-25 08:48:24 +00:00
|
|
|
case IOSEEK_END:
|
2007-08-22 07:52:33 +00:00
|
|
|
real_origin = SEEK_END;
|
|
|
|
}
|
|
|
|
|
|
|
|
return fseek((FILE*)io, offset, origin);
|
|
|
|
}
|
|
|
|
|
|
|
|
long int io_tell(IOHANDLE io)
|
|
|
|
{
|
|
|
|
return ftell((FILE*)io);
|
|
|
|
}
|
|
|
|
|
|
|
|
long int io_length(IOHANDLE io)
|
|
|
|
{
|
|
|
|
long int length;
|
|
|
|
io_seek(io, 0, IOSEEK_END);
|
|
|
|
length = io_tell(io);
|
2007-08-25 08:48:24 +00:00
|
|
|
io_seek(io, 0, IOSEEK_START);
|
2007-08-22 07:52:33 +00:00
|
|
|
return length;
|
|
|
|
}
|
|
|
|
|
|
|
|
unsigned io_write(IOHANDLE io, const void *buffer, unsigned size)
|
|
|
|
{
|
|
|
|
return fwrite(buffer, 1, size, (FILE*)io);
|
|
|
|
}
|
|
|
|
|
|
|
|
int io_close(IOHANDLE io)
|
|
|
|
{
|
|
|
|
fclose((FILE*)io);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
2008-03-10 00:48:45 +00:00
|
|
|
int io_flush(IOHANDLE io)
|
|
|
|
{
|
|
|
|
fflush((FILE*)io);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2008-02-10 21:54:52 +00:00
|
|
|
void *thread_create(void (*threadfunc)(void *), void *u)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
|
|
|
pthread_t id;
|
|
|
|
pthread_create(&id, NULL, (void *(*)(void*))threadfunc, u);
|
|
|
|
return (void*)id;
|
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
return CreateThread(NULL, 0, (LPTHREAD_START_ROUTINE)threadfunc, u, 0, NULL);
|
|
|
|
#else
|
|
|
|
#error not implemented
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
void thread_wait(void *thread)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
|
|
|
pthread_join((pthread_t)thread, NULL);
|
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
WaitForSingleObject((HANDLE)thread, INFINITE);
|
|
|
|
#else
|
|
|
|
#error not implemented
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
void thread_destroy(void *thread)
|
|
|
|
{
|
2008-03-29 11:44:03 +00:00
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
|
|
|
void *r = 0;
|
|
|
|
pthread_join((pthread_t)thread, &r);
|
|
|
|
#else
|
|
|
|
/*#error not implemented*/
|
|
|
|
#endif
|
2008-02-10 21:54:52 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
void thread_yield()
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
|
|
|
sched_yield();
|
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
Sleep(0);
|
|
|
|
#else
|
|
|
|
#error not implemented
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
2007-08-22 07:52:33 +00:00
|
|
|
void thread_sleep(int milliseconds)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
|
|
|
usleep(milliseconds*1000);
|
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
Sleep(milliseconds);
|
|
|
|
#else
|
|
|
|
#error not implemented
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
2008-02-10 21:54:52 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
2007-10-02 16:19:25 +00:00
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
|
|
|
typedef pthread_mutex_t LOCKINTERNAL;
|
2007-10-04 09:49:38 +00:00
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
typedef CRITICAL_SECTION LOCKINTERNAL;
|
2007-10-02 16:19:25 +00:00
|
|
|
#else
|
|
|
|
#error not implemented on this platform
|
|
|
|
#endif
|
|
|
|
|
|
|
|
LOCK lock_create()
|
|
|
|
{
|
2007-10-04 09:49:38 +00:00
|
|
|
LOCKINTERNAL *lock = (LOCKINTERNAL*)mem_alloc(sizeof(LOCKINTERNAL), 4);
|
2007-10-02 16:19:25 +00:00
|
|
|
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
2007-10-04 09:49:38 +00:00
|
|
|
pthread_mutex_init(lock, 0x0);
|
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
InitializeCriticalSection((LPCRITICAL_SECTION)lock);
|
2007-10-02 16:19:25 +00:00
|
|
|
#else
|
|
|
|
#error not implemented on this platform
|
|
|
|
#endif
|
2007-10-06 17:01:06 +00:00
|
|
|
return (LOCK)lock;
|
2007-10-02 16:19:25 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
void lock_destroy(LOCK lock)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
2007-10-06 17:01:06 +00:00
|
|
|
pthread_mutex_destroy((LOCKINTERNAL *)lock);
|
2007-10-04 09:49:38 +00:00
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
DeleteCriticalSection((LPCRITICAL_SECTION)lock);
|
2007-10-02 16:19:25 +00:00
|
|
|
#else
|
|
|
|
#error not implemented on this platform
|
|
|
|
#endif
|
|
|
|
mem_free(lock);
|
|
|
|
}
|
|
|
|
|
|
|
|
int lock_try(LOCK lock)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
2007-10-06 17:01:06 +00:00
|
|
|
return pthread_mutex_trylock((LOCKINTERNAL *)lock);
|
2007-10-04 09:49:38 +00:00
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
return TryEnterCriticalSection((LPCRITICAL_SECTION)lock);
|
2007-10-02 16:19:25 +00:00
|
|
|
#else
|
|
|
|
#error not implemented on this platform
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
void lock_wait(LOCK lock)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
2007-10-06 17:01:06 +00:00
|
|
|
pthread_mutex_lock((LOCKINTERNAL *)lock);
|
2007-10-04 09:49:38 +00:00
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
EnterCriticalSection((LPCRITICAL_SECTION)lock);
|
2007-10-02 16:19:25 +00:00
|
|
|
#else
|
|
|
|
#error not implemented on this platform
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
void lock_release(LOCK lock)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
2007-10-06 17:01:06 +00:00
|
|
|
pthread_mutex_unlock((LOCKINTERNAL *)lock);
|
2007-10-04 09:49:38 +00:00
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
LeaveCriticalSection((LPCRITICAL_SECTION)lock);
|
2007-10-02 16:19:25 +00:00
|
|
|
#else
|
|
|
|
#error not implemented on this platform
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
2007-08-22 07:52:33 +00:00
|
|
|
/* ----- time ----- */
|
|
|
|
int64 time_get()
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
|
|
|
struct timeval val;
|
|
|
|
gettimeofday(&val, NULL);
|
|
|
|
return (int64)val.tv_sec*(int64)1000000+(int64)val.tv_usec;
|
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
2007-09-23 18:27:04 +00:00
|
|
|
static int64 last = 0;
|
2007-08-22 07:52:33 +00:00
|
|
|
int64 t;
|
|
|
|
QueryPerformanceCounter((PLARGE_INTEGER)&t);
|
2007-09-23 18:27:04 +00:00
|
|
|
if(t<last) /* for some reason, QPC can return values in the past */
|
|
|
|
return last;
|
|
|
|
last = t;
|
2007-08-22 07:52:33 +00:00
|
|
|
return t;
|
|
|
|
#else
|
|
|
|
#error not implemented
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
int64 time_freq()
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_UNIX)
|
|
|
|
return 1000000;
|
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
int64 t;
|
|
|
|
QueryPerformanceFrequency((PLARGE_INTEGER)&t);
|
|
|
|
return t;
|
|
|
|
#else
|
|
|
|
#error not implemented
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
/* ----- network ----- */
|
2008-07-06 11:21:21 +00:00
|
|
|
static void netaddr_to_sockaddr(const NETADDR *src, struct sockaddr *dest)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
2008-07-06 11:21:21 +00:00
|
|
|
/* TODO: IPv6 support */
|
2007-08-22 07:52:33 +00:00
|
|
|
struct sockaddr_in *p = (struct sockaddr_in *)dest;
|
|
|
|
mem_zero(p, sizeof(struct sockaddr_in));
|
|
|
|
p->sin_family = AF_INET;
|
|
|
|
p->sin_port = htons(src->port);
|
|
|
|
p->sin_addr.s_addr = htonl(src->ip[0]<<24|src->ip[1]<<16|src->ip[2]<<8|src->ip[3]);
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
static void sockaddr_to_netaddr(const struct sockaddr *src, NETADDR *dst)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
2008-07-06 11:21:21 +00:00
|
|
|
/* TODO: IPv6 support */
|
2007-08-22 07:52:33 +00:00
|
|
|
unsigned int ip = htonl(((struct sockaddr_in*)src)->sin_addr.s_addr);
|
2008-08-17 07:05:16 +00:00
|
|
|
mem_zero(dst, sizeof(NETADDR));
|
2008-07-06 11:21:21 +00:00
|
|
|
dst->type = NETTYPE_IPV4;
|
2007-08-22 07:52:33 +00:00
|
|
|
dst->port = htons(((struct sockaddr_in*)src)->sin_port);
|
|
|
|
dst->ip[0] = (unsigned char)((ip>>24)&0xFF);
|
|
|
|
dst->ip[1] = (unsigned char)((ip>>16)&0xFF);
|
|
|
|
dst->ip[2] = (unsigned char)((ip>>8)&0xFF);
|
|
|
|
dst->ip[3] = (unsigned char)(ip&0xFF);
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_addr_comp(const NETADDR *a, const NETADDR *b)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
2008-07-06 11:21:21 +00:00
|
|
|
return mem_comp(a, b, sizeof(NETADDR));
|
2007-08-22 07:52:33 +00:00
|
|
|
}
|
|
|
|
|
2008-08-17 07:05:16 +00:00
|
|
|
void net_addr_str(const NETADDR *addr, char *string, int max_length)
|
|
|
|
{
|
|
|
|
if(addr->type == NETTYPE_IPV4)
|
|
|
|
str_format(string, max_length, "%d.%d.%d.%d:%d", addr->ip[0], addr->ip[1], addr->ip[2], addr->ip[3], addr->port);
|
|
|
|
else if(addr->type == NETTYPE_IPV6)
|
|
|
|
{
|
|
|
|
str_format(string, max_length, "[%x:%x:%x:%x:%x:%x:%x:%x]:%d",
|
|
|
|
(addr->ip[0]<<8)|addr->ip[1], (addr->ip[2]<<8)|addr->ip[3], (addr->ip[4]<<8)|addr->ip[5], (addr->ip[6]<<8)|addr->ip[7],
|
|
|
|
(addr->ip[8]<<8)|addr->ip[9], (addr->ip[10]<<8)|addr->ip[11], (addr->ip[12]<<8)|addr->ip[13], (addr->ip[14]<<8)|addr->ip[15],
|
|
|
|
addr->port);
|
|
|
|
}
|
|
|
|
else
|
|
|
|
str_format(string, max_length, "unknown type %d", addr->type);
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_host_lookup(const char *hostname, NETADDR *addr, int types)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
2008-07-06 11:21:21 +00:00
|
|
|
/* TODO: IPv6 support */
|
2008-02-24 16:03:58 +00:00
|
|
|
struct addrinfo hints;
|
|
|
|
struct addrinfo *result;
|
|
|
|
int e;
|
|
|
|
|
|
|
|
mem_zero(&hints, sizeof(hints));
|
|
|
|
hints.ai_family = AF_INET;
|
2007-08-22 07:52:33 +00:00
|
|
|
|
2008-02-24 16:03:58 +00:00
|
|
|
e = getaddrinfo(hostname, NULL, &hints, &result);
|
|
|
|
if(e != 0 || !result)
|
|
|
|
return -1;
|
2007-08-22 07:52:33 +00:00
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
sockaddr_to_netaddr(result->ai_addr, addr);
|
2008-02-24 16:03:58 +00:00
|
|
|
freeaddrinfo(result);
|
2008-07-06 11:21:21 +00:00
|
|
|
addr->port = 0;
|
2008-02-24 16:03:58 +00:00
|
|
|
return 0;
|
2007-08-22 07:52:33 +00:00
|
|
|
}
|
|
|
|
|
2008-09-03 21:02:30 +00:00
|
|
|
static int parse_int(int *out, const char **str)
|
|
|
|
{
|
|
|
|
int i = 0;
|
|
|
|
*out = 0;
|
|
|
|
if(**str < '0' || **str > '9')
|
|
|
|
return -1;
|
|
|
|
|
|
|
|
i = **str - '0';
|
|
|
|
(*str)++;
|
|
|
|
|
|
|
|
while(1)
|
|
|
|
{
|
|
|
|
if(**str < '0' || **str > '9')
|
|
|
|
{
|
|
|
|
*out = i;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
i = (i*10) + (**str - '0');
|
|
|
|
(*str)++;
|
|
|
|
}
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
static int parse_char(char c, const char **str)
|
|
|
|
{
|
|
|
|
if(**str != c) return -1;
|
|
|
|
(*str)++;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
static int parse_uint8(unsigned char *out, const char **str)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
if(parse_int(&i, str) != 0) return -1;
|
|
|
|
if(i < 0 || i > 0xff) return -1;
|
|
|
|
*out = i;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
static int parse_uint16(unsigned short *out, const char **str)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
if(parse_int(&i, str) != 0) return -1;
|
|
|
|
if(i < 0 || i > 0xffff) return -1;
|
|
|
|
*out = i;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
int net_addr_from_str(NETADDR *addr, const char *string)
|
|
|
|
{
|
|
|
|
const char *str = string;
|
|
|
|
mem_zero(addr, sizeof(NETADDR));
|
|
|
|
|
|
|
|
if(str[0] == '[')
|
|
|
|
{
|
|
|
|
/* TODO: ipv6 */
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
/* ipv4 */
|
|
|
|
if(parse_uint8(&addr->ip[0], &str)) return -1;
|
|
|
|
if(parse_char('.', &str)) return -1;
|
|
|
|
if(parse_uint8(&addr->ip[1], &str)) return -1;
|
|
|
|
if(parse_char('.', &str)) return -1;
|
|
|
|
if(parse_uint8(&addr->ip[2], &str)) return -1;
|
|
|
|
if(parse_char('.', &str)) return -1;
|
|
|
|
if(parse_uint8(&addr->ip[3], &str)) return -1;
|
|
|
|
if(*str == ':')
|
|
|
|
{
|
|
|
|
str++;
|
|
|
|
if(parse_uint16(&addr->port, &str)) return -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
addr->type = NETTYPE_IPV4;
|
|
|
|
}
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
NETSOCKET net_udp_create(NETADDR bindaddr)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
2008-07-06 11:21:21 +00:00
|
|
|
/* TODO: IPv6 support */
|
2007-08-22 07:52:33 +00:00
|
|
|
struct sockaddr addr;
|
2007-12-15 12:56:56 +00:00
|
|
|
unsigned int mode = 1;
|
2007-08-22 07:52:33 +00:00
|
|
|
int broadcast = 1;
|
|
|
|
|
|
|
|
/* create socket */
|
|
|
|
int sock = socket(AF_INET, SOCK_DGRAM, 0);
|
|
|
|
if(sock < 0)
|
|
|
|
return NETSOCKET_INVALID;
|
|
|
|
|
|
|
|
/* bind, we should check for error */
|
2008-07-06 11:21:21 +00:00
|
|
|
netaddr_to_sockaddr(&bindaddr, &addr);
|
2007-08-22 07:52:33 +00:00
|
|
|
if(bind(sock, &addr, sizeof(addr)) != 0)
|
|
|
|
{
|
2008-07-06 11:21:21 +00:00
|
|
|
net_udp_close(sock);
|
2007-08-22 07:52:33 +00:00
|
|
|
return NETSOCKET_INVALID;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* set non-blocking */
|
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
2007-12-15 12:56:56 +00:00
|
|
|
ioctlsocket(sock, FIONBIO, (unsigned long *)&mode);
|
2007-08-22 07:52:33 +00:00
|
|
|
#else
|
2007-12-15 12:56:56 +00:00
|
|
|
ioctl(sock, FIONBIO, (unsigned long *)&mode);
|
2007-08-22 07:52:33 +00:00
|
|
|
#endif
|
|
|
|
|
|
|
|
/* set boardcast */
|
2007-10-02 14:14:58 +00:00
|
|
|
setsockopt(sock, SOL_SOCKET, SO_BROADCAST, (const char*)&broadcast, sizeof(broadcast));
|
2007-08-22 07:52:33 +00:00
|
|
|
|
|
|
|
/* return */
|
|
|
|
return sock;
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_udp_send(NETSOCKET sock, const NETADDR *addr, const void *data, int size)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
struct sockaddr sa;
|
|
|
|
int d;
|
|
|
|
mem_zero(&sa, sizeof(sa));
|
2008-07-06 11:21:21 +00:00
|
|
|
netaddr_to_sockaddr(addr, &sa);
|
2007-10-02 14:14:58 +00:00
|
|
|
d = sendto((int)sock, (const char*)data, size, 0, &sa, sizeof(sa));
|
2010-05-29 07:25:38 +00:00
|
|
|
/*if(d < 0)
|
2008-08-17 07:05:16 +00:00
|
|
|
{
|
|
|
|
char addrstr[256];
|
|
|
|
net_addr_str(addr, addrstr, sizeof(addrstr));
|
|
|
|
|
2007-11-08 19:54:18 +00:00
|
|
|
dbg_msg("net", "sendto error %d %x", d, d);
|
2008-08-17 07:05:16 +00:00
|
|
|
dbg_msg("net", "\tsock = %d %x", sock, sock);
|
|
|
|
dbg_msg("net", "\tsize = %d %x", size, size);
|
|
|
|
dbg_msg("net", "\taddr = %s", addrstr);
|
|
|
|
|
2010-05-29 07:25:38 +00:00
|
|
|
}*/
|
2008-04-05 14:50:43 +00:00
|
|
|
network_stats.sent_bytes += size;
|
|
|
|
network_stats.sent_packets++;
|
2007-08-22 07:52:33 +00:00
|
|
|
return d;
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_udp_recv(NETSOCKET sock, NETADDR *addr, void *data, int maxsize)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
struct sockaddr from;
|
|
|
|
int bytes;
|
|
|
|
socklen_t fromlen = sizeof(struct sockaddr);
|
2007-10-02 14:14:58 +00:00
|
|
|
bytes = recvfrom(sock, (char*)data, maxsize, 0, &from, &fromlen);
|
2007-08-22 07:52:33 +00:00
|
|
|
if(bytes > 0)
|
|
|
|
{
|
2008-07-06 11:21:21 +00:00
|
|
|
sockaddr_to_netaddr(&from, addr);
|
2008-04-05 14:50:43 +00:00
|
|
|
network_stats.recv_bytes += bytes;
|
|
|
|
network_stats.recv_packets++;
|
2007-08-22 07:52:33 +00:00
|
|
|
return bytes;
|
|
|
|
}
|
|
|
|
else if(bytes == 0)
|
|
|
|
return 0;
|
|
|
|
return -1; /* error */
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_udp_close(NETSOCKET sock)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
|
|
|
closesocket(sock);
|
|
|
|
#else
|
|
|
|
close((int)sock);
|
|
|
|
#endif
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
NETSOCKET net_tcp_create(const NETADDR *a)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
2008-07-06 11:21:21 +00:00
|
|
|
/* TODO: IPv6 support */
|
2007-08-22 07:52:33 +00:00
|
|
|
struct sockaddr addr;
|
|
|
|
|
|
|
|
/* create socket */
|
|
|
|
int sock = socket(AF_INET, SOCK_STREAM, 0);
|
|
|
|
if(sock < 0)
|
|
|
|
return NETSOCKET_INVALID;
|
|
|
|
|
|
|
|
/* bind, we should check for error */
|
2008-07-06 11:21:21 +00:00
|
|
|
netaddr_to_sockaddr(a, &addr);
|
2007-08-22 07:52:33 +00:00
|
|
|
bind(sock, &addr, sizeof(addr));
|
|
|
|
|
|
|
|
/* return */
|
|
|
|
return sock;
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_tcp_set_non_blocking(NETSOCKET sock)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
2007-12-15 12:56:56 +00:00
|
|
|
unsigned int mode = 1;
|
2007-08-22 07:52:33 +00:00
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
2007-12-15 12:56:56 +00:00
|
|
|
return ioctlsocket(sock, FIONBIO, (unsigned long *)&mode);
|
2007-08-22 07:52:33 +00:00
|
|
|
#else
|
2007-12-15 12:56:56 +00:00
|
|
|
return ioctl(sock, FIONBIO, (unsigned long *)&mode);
|
2007-08-22 07:52:33 +00:00
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_tcp_set_blocking(NETSOCKET sock)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
2007-12-15 12:56:56 +00:00
|
|
|
unsigned int mode = 0;
|
2007-08-22 07:52:33 +00:00
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
2007-12-15 12:56:56 +00:00
|
|
|
return ioctlsocket(sock, FIONBIO, (unsigned long *)&mode);
|
2007-08-22 07:52:33 +00:00
|
|
|
#else
|
2007-12-15 12:56:56 +00:00
|
|
|
return ioctl(sock, FIONBIO, (unsigned long *)&mode);
|
2007-08-22 07:52:33 +00:00
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_tcp_listen(NETSOCKET sock, int backlog)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
return listen(sock, backlog);
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_tcp_accept(NETSOCKET sock, NETSOCKET *new_sock, NETADDR *a)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
int s;
|
|
|
|
socklen_t sockaddr_len;
|
|
|
|
struct sockaddr addr;
|
|
|
|
|
|
|
|
sockaddr_len = sizeof(addr);
|
|
|
|
|
|
|
|
s = accept(sock, &addr, &sockaddr_len);
|
|
|
|
|
|
|
|
if (s != -1)
|
|
|
|
{
|
2008-07-06 11:21:21 +00:00
|
|
|
sockaddr_to_netaddr(&addr, a);
|
2007-08-22 07:52:33 +00:00
|
|
|
*new_sock = s;
|
|
|
|
}
|
|
|
|
return s;
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_tcp_connect(NETSOCKET sock, const NETADDR *a)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
struct sockaddr addr;
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
netaddr_to_sockaddr(a, &addr);
|
2007-08-22 07:52:33 +00:00
|
|
|
return connect(sock, &addr, sizeof(addr));
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_tcp_connect_non_blocking(NETSOCKET sock, const NETADDR *a)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
struct sockaddr addr;
|
|
|
|
int res;
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
netaddr_to_sockaddr(a, &addr);
|
|
|
|
net_tcp_set_non_blocking(sock);
|
2007-08-22 07:52:33 +00:00
|
|
|
res = connect(sock, &addr, sizeof(addr));
|
2008-07-06 11:21:21 +00:00
|
|
|
net_tcp_set_blocking(sock);
|
2007-08-22 07:52:33 +00:00
|
|
|
|
|
|
|
return res;
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_tcp_send(NETSOCKET sock, const void *data, int size)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
int d;
|
2007-10-02 14:14:58 +00:00
|
|
|
d = send((int)sock, (const char*)data, size, 0);
|
2007-08-22 07:52:33 +00:00
|
|
|
return d;
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_tcp_recv(NETSOCKET sock, void *data, int maxsize)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
int bytes;
|
2007-10-02 14:14:58 +00:00
|
|
|
bytes = recv((int)sock, (char*)data, maxsize, 0);
|
2007-08-22 07:52:33 +00:00
|
|
|
return bytes;
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int net_tcp_close(NETSOCKET sock)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
|
|
|
closesocket(sock);
|
|
|
|
#else
|
|
|
|
close((int)sock);
|
|
|
|
#endif
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
int net_errno()
|
|
|
|
{
|
|
|
|
return errno;
|
|
|
|
}
|
|
|
|
|
|
|
|
int net_would_block()
|
|
|
|
{
|
|
|
|
return net_errno() == EWOULDBLOCK;
|
|
|
|
}
|
|
|
|
|
|
|
|
int net_init()
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
|
|
|
WSADATA wsaData;
|
|
|
|
int err = WSAStartup(MAKEWORD(1, 1), &wsaData);
|
|
|
|
dbg_assert(err == 0, "network initialization failed.");
|
|
|
|
return err==0?0:1;
|
|
|
|
#endif
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2008-10-21 18:05:06 +00:00
|
|
|
int fs_listdir(const char *dir, FS_LISTDIR_CALLBACK cb, void *user)
|
2007-08-22 07:52:33 +00:00
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
|
|
|
WIN32_FIND_DATA finddata;
|
|
|
|
HANDLE handle;
|
|
|
|
char buffer[1024*2];
|
2008-02-11 21:49:26 +00:00
|
|
|
str_format(buffer, sizeof(buffer), "%s/*", dir);
|
2007-08-22 07:52:33 +00:00
|
|
|
|
|
|
|
handle = FindFirstFileA(buffer, &finddata);
|
|
|
|
|
|
|
|
if (handle == INVALID_HANDLE_VALUE)
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
/* add all the entries */
|
|
|
|
do
|
|
|
|
{
|
2010-06-04 20:14:02 +00:00
|
|
|
cb(finddata.cFileName, 0, user);
|
2007-08-22 07:52:33 +00:00
|
|
|
} while (FindNextFileA(handle, &finddata));
|
|
|
|
|
|
|
|
FindClose(handle);
|
|
|
|
return 0;
|
|
|
|
#else
|
|
|
|
struct dirent *entry;
|
|
|
|
DIR *d = opendir(dir);
|
|
|
|
|
|
|
|
if(!d)
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
while((entry = readdir(d)) != NULL)
|
|
|
|
cb(entry->d_name, 0, user);
|
|
|
|
|
|
|
|
/* close the directory and return */
|
|
|
|
closedir(d);
|
|
|
|
return 0;
|
|
|
|
#endif
|
|
|
|
}
|
2007-09-25 19:48:52 +00:00
|
|
|
|
2007-11-08 09:11:32 +00:00
|
|
|
int fs_storage_path(const char *appname, char *path, int max)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
2007-11-18 22:06:41 +00:00
|
|
|
HRESULT r;
|
2008-05-10 17:18:56 +00:00
|
|
|
char *home = getenv("APPDATA");
|
|
|
|
if(!home)
|
2008-08-05 21:37:33 +00:00
|
|
|
return -1;
|
2007-11-18 22:06:41 +00:00
|
|
|
_snprintf(path, max, "%s/%s", home, appname);
|
|
|
|
return 0;
|
2007-11-08 09:11:32 +00:00
|
|
|
#else
|
|
|
|
char *home = getenv("HOME");
|
2008-10-06 16:44:34 +00:00
|
|
|
#if !defined(CONF_PLATFORM_MACOSX)
|
2007-11-08 09:11:32 +00:00
|
|
|
int i;
|
2008-10-06 16:44:34 +00:00
|
|
|
#endif
|
2007-11-08 09:11:32 +00:00
|
|
|
if(!home)
|
2008-08-05 21:37:33 +00:00
|
|
|
return -1;
|
2007-11-18 22:06:41 +00:00
|
|
|
|
2008-03-22 15:09:49 +00:00
|
|
|
#if defined(CONF_PLATFORM_MACOSX)
|
|
|
|
snprintf(path, max, "%s/Library/Application Support/%s", home, appname);
|
|
|
|
#else
|
2007-11-08 09:11:32 +00:00
|
|
|
snprintf(path, max, "%s/.%s", home, appname);
|
|
|
|
for(i = strlen(home)+2; path[i]; i++)
|
|
|
|
path[i] = tolower(path[i]);
|
2008-03-22 15:09:49 +00:00
|
|
|
#endif
|
2007-11-08 09:11:32 +00:00
|
|
|
|
2008-08-05 21:37:33 +00:00
|
|
|
return 0;
|
2007-11-08 09:11:32 +00:00
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
int fs_makedir(const char *path)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
2007-11-18 22:06:41 +00:00
|
|
|
if(_mkdir(path) == 0)
|
|
|
|
return 0;
|
|
|
|
if(errno == EEXIST)
|
|
|
|
return 0;
|
2008-08-05 21:37:33 +00:00
|
|
|
return -1;
|
2007-11-08 09:11:32 +00:00
|
|
|
#else
|
|
|
|
if(mkdir(path, 0755) == 0)
|
|
|
|
return 0;
|
|
|
|
if(errno == EEXIST)
|
|
|
|
return 0;
|
2008-08-05 21:37:33 +00:00
|
|
|
return -1;
|
2007-11-08 09:11:32 +00:00
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
2008-10-01 17:16:22 +00:00
|
|
|
int fs_is_dir(const char *path)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
|
|
|
/* TODO: do this smarter */
|
|
|
|
WIN32_FIND_DATA finddata;
|
|
|
|
HANDLE handle;
|
|
|
|
char buffer[1024*2];
|
|
|
|
str_format(buffer, sizeof(buffer), "%s/*", path);
|
|
|
|
|
|
|
|
if ((handle = FindFirstFileA(buffer, &finddata)) == INVALID_HANDLE_VALUE)
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
FindClose(handle);
|
|
|
|
return 1;
|
|
|
|
#else
|
|
|
|
struct stat sb;
|
|
|
|
if (stat(path, &sb) == -1)
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
if (S_ISDIR(sb.st_mode))
|
|
|
|
return 1;
|
|
|
|
else
|
|
|
|
return 0;
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
int fs_chdir(const char *path)
|
|
|
|
{
|
|
|
|
if (fs_is_dir(path))
|
|
|
|
{
|
|
|
|
chdir(path);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
2007-09-25 19:48:52 +00:00
|
|
|
void swap_endian(void *data, unsigned elem_size, unsigned num)
|
|
|
|
{
|
|
|
|
char *src = (char*) data;
|
|
|
|
char *dst = src + (elem_size - 1);
|
|
|
|
|
|
|
|
while(num)
|
|
|
|
{
|
|
|
|
unsigned n = elem_size>>1;
|
|
|
|
char tmp;
|
|
|
|
while(n)
|
|
|
|
{
|
|
|
|
tmp = *src;
|
|
|
|
*src = *dst;
|
|
|
|
*dst = tmp;
|
|
|
|
|
|
|
|
src++;
|
|
|
|
dst--;
|
|
|
|
n--;
|
|
|
|
}
|
|
|
|
|
|
|
|
src = src + (elem_size>>1);
|
|
|
|
dst = src + (elem_size - 1);
|
|
|
|
num--;
|
|
|
|
}
|
|
|
|
}
|
2007-10-04 09:49:38 +00:00
|
|
|
|
2008-02-10 15:32:30 +00:00
|
|
|
int net_socket_read_wait(NETSOCKET sock, int time)
|
|
|
|
{
|
|
|
|
struct timeval tv;
|
|
|
|
fd_set readfds;
|
|
|
|
|
|
|
|
tv.tv_sec = 0;
|
|
|
|
tv.tv_usec = 1000*time;
|
|
|
|
|
|
|
|
FD_ZERO(&readfds);
|
|
|
|
FD_SET(sock, &readfds);
|
|
|
|
|
|
|
|
/* don't care about writefds and exceptfds */
|
|
|
|
select(sock+1, &readfds, NULL, NULL, &tv);
|
|
|
|
if(FD_ISSET(sock, &readfds))
|
|
|
|
return 1;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2008-02-10 21:54:52 +00:00
|
|
|
unsigned time_timestamp()
|
|
|
|
{
|
|
|
|
return time(0);
|
|
|
|
}
|
|
|
|
|
2008-02-11 21:49:26 +00:00
|
|
|
void str_append(char *dst, const char *src, int dst_size)
|
|
|
|
{
|
|
|
|
int s = strlen(dst);
|
|
|
|
int i = 0;
|
|
|
|
while(s < dst_size)
|
|
|
|
{
|
|
|
|
dst[s] = src[i];
|
|
|
|
if(!src[i]) /* check for null termination */
|
|
|
|
break;
|
|
|
|
s++;
|
|
|
|
i++;
|
|
|
|
}
|
|
|
|
|
|
|
|
dst[dst_size-1] = 0; /* assure null termination */
|
|
|
|
}
|
|
|
|
|
|
|
|
void str_copy(char *dst, const char *src, int dst_size)
|
|
|
|
{
|
|
|
|
strncpy(dst, src, dst_size);
|
|
|
|
dst[dst_size-1] = 0; /* assure null termination */
|
|
|
|
}
|
|
|
|
|
2008-11-08 08:27:11 +00:00
|
|
|
int str_length(const char *str)
|
|
|
|
{
|
|
|
|
return (int)strlen(str);
|
|
|
|
}
|
|
|
|
|
2008-02-11 21:49:26 +00:00
|
|
|
void str_format(char *buffer, int buffer_size, const char *format, ...)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
|
|
|
va_list ap;
|
|
|
|
va_start(ap, format);
|
|
|
|
_vsnprintf(buffer, buffer_size, format, ap);
|
|
|
|
va_end(ap);
|
|
|
|
#else
|
|
|
|
va_list ap;
|
|
|
|
va_start(ap, format);
|
|
|
|
vsnprintf(buffer, buffer_size, format, ap);
|
|
|
|
va_end(ap);
|
|
|
|
#endif
|
|
|
|
|
|
|
|
buffer[buffer_size-1] = 0; /* assure null termination */
|
|
|
|
}
|
|
|
|
|
2008-02-24 16:03:58 +00:00
|
|
|
|
|
|
|
|
|
|
|
/* makes sure that the string only contains the characters between 32 and 127 */
|
2008-03-17 01:22:25 +00:00
|
|
|
void str_sanitize_strong(char *str_in)
|
2008-02-24 16:03:58 +00:00
|
|
|
{
|
2008-03-17 01:22:25 +00:00
|
|
|
unsigned char *str = (unsigned char *)str_in;
|
2008-02-24 16:03:58 +00:00
|
|
|
while(*str)
|
|
|
|
{
|
|
|
|
*str &= 0x7f;
|
|
|
|
if(*str < 32)
|
|
|
|
*str = 32;
|
|
|
|
str++;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/* makes sure that the string only contains the characters between 32 and 255 + \r\n\t */
|
2008-03-17 01:22:25 +00:00
|
|
|
void str_sanitize(char *str_in)
|
2008-02-24 16:03:58 +00:00
|
|
|
{
|
2008-03-17 01:22:25 +00:00
|
|
|
unsigned char *str = (unsigned char *)str_in;
|
2008-02-24 16:03:58 +00:00
|
|
|
while(*str)
|
|
|
|
{
|
|
|
|
if(*str < 32 && !(*str == '\r') && !(*str == '\n') && !(*str == '\t'))
|
|
|
|
*str = ' ';
|
|
|
|
str++;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2008-03-29 17:20:21 +00:00
|
|
|
/* case */
|
|
|
|
int str_comp_nocase(const char *a, const char *b)
|
|
|
|
{
|
|
|
|
#if defined(CONF_FAMILY_WINDOWS)
|
|
|
|
return _stricmp(a,b);
|
|
|
|
#else
|
|
|
|
return strcasecmp(a,b);
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
2009-06-13 16:54:04 +00:00
|
|
|
int str_comp(const char *a, const char *b)
|
|
|
|
{
|
|
|
|
return strcmp(a, b);
|
|
|
|
}
|
|
|
|
|
2010-05-29 07:25:38 +00:00
|
|
|
int str_comp_num(const char *a, const char *b, const int num)
|
|
|
|
{
|
|
|
|
return strncmp(a, b, num);
|
|
|
|
}
|
2009-06-13 16:54:04 +00:00
|
|
|
|
2008-03-29 17:20:21 +00:00
|
|
|
const char *str_find_nocase(const char *haystack, const char *needle)
|
|
|
|
{
|
|
|
|
while(*haystack) /* native implementation */
|
|
|
|
{
|
|
|
|
const char *a = haystack;
|
|
|
|
const char *b = needle;
|
|
|
|
while(*a && *b && tolower(*a) == tolower(*b))
|
|
|
|
{
|
|
|
|
a++;
|
|
|
|
b++;
|
|
|
|
}
|
|
|
|
if(!(*b))
|
|
|
|
return haystack;
|
2009-06-13 16:54:04 +00:00
|
|
|
haystack++;
|
|
|
|
}
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
const char *str_find(const char *haystack, const char *needle)
|
|
|
|
{
|
|
|
|
while(*haystack) /* native implementation */
|
|
|
|
{
|
|
|
|
const char *a = haystack;
|
|
|
|
const char *b = needle;
|
|
|
|
while(*a && *b && *a == *b)
|
|
|
|
{
|
|
|
|
a++;
|
|
|
|
b++;
|
|
|
|
}
|
|
|
|
if(!(*b))
|
|
|
|
return haystack;
|
2008-03-29 17:20:21 +00:00
|
|
|
haystack++;
|
|
|
|
}
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2008-04-05 14:50:43 +00:00
|
|
|
void str_hex(char *dst, int dst_size, const void *data, int data_size)
|
|
|
|
{
|
|
|
|
static const char hex[] = "0123456789ABCDEF";
|
|
|
|
int b;
|
|
|
|
|
|
|
|
for(b = 0; b < data_size && b < dst_size/4-4; b++)
|
|
|
|
{
|
|
|
|
dst[b*3] = hex[((const unsigned char *)data)[b]>>4];
|
|
|
|
dst[b*3+1] = hex[((const unsigned char *)data)[b]&0xf];
|
|
|
|
dst[b*3+2] = ' ';
|
|
|
|
dst[b*3+3] = 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2008-07-06 11:21:21 +00:00
|
|
|
int mem_comp(const void *a, const void *b, int size)
|
|
|
|
{
|
|
|
|
return memcmp(a,b,size);
|
|
|
|
}
|
|
|
|
|
2008-10-02 12:29:19 +00:00
|
|
|
const MEMSTATS *mem_stats()
|
|
|
|
{
|
|
|
|
return &memory_stats;
|
|
|
|
}
|
|
|
|
|
2008-04-05 14:50:43 +00:00
|
|
|
void net_stats(NETSTATS *stats_inout)
|
|
|
|
{
|
|
|
|
*stats_inout = network_stats;
|
|
|
|
}
|
|
|
|
|
2008-09-30 15:52:15 +00:00
|
|
|
void gui_messagebox(const char *title, const char *message)
|
|
|
|
{
|
|
|
|
#if defined(CONF_PLATFORM_MACOSX)
|
|
|
|
DialogRef theItem;
|
|
|
|
DialogItemIndex itemIndex;
|
|
|
|
|
|
|
|
/* FIXME: really needed? can we rely on glfw? */
|
|
|
|
/* HACK - get events without a bundle */
|
|
|
|
ProcessSerialNumber psn;
|
|
|
|
GetCurrentProcess(&psn);
|
|
|
|
TransformProcessType(&psn,kProcessTransformToForegroundApplication);
|
|
|
|
SetFrontProcess(&psn);
|
|
|
|
/* END HACK */
|
|
|
|
|
|
|
|
CreateStandardAlert(kAlertStopAlert,
|
2008-10-02 14:37:48 +00:00
|
|
|
CFStringCreateWithCString(NULL, title, kCFStringEncodingASCII),
|
|
|
|
CFStringCreateWithCString(NULL, message, kCFStringEncodingASCII),
|
|
|
|
NULL,
|
|
|
|
&theItem);
|
2008-09-30 15:52:15 +00:00
|
|
|
|
|
|
|
RunStandardAlert(theItem, NULL, &itemIndex);
|
|
|
|
#elif defined(CONF_FAMILY_UNIX)
|
|
|
|
static char cmd[1024];
|
|
|
|
/* use xmessage which is available on nearly every X11 system */
|
2008-09-30 17:10:19 +00:00
|
|
|
snprintf(cmd, sizeof(cmd), "xmessage -center -title '%s' '%s'",
|
2008-09-30 15:52:15 +00:00
|
|
|
title,
|
|
|
|
message);
|
|
|
|
|
|
|
|
system(cmd);
|
|
|
|
#elif defined(CONF_FAMILY_WINDOWS)
|
|
|
|
MessageBox(NULL,
|
|
|
|
message,
|
|
|
|
title,
|
|
|
|
MB_ICONEXCLAMATION | MB_OK);
|
|
|
|
#else
|
|
|
|
/* this is not critical */
|
|
|
|
#warning not implemented
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
2008-11-08 08:27:11 +00:00
|
|
|
int str_isspace(char c) { return c == ' ' || c == '\n' || c == '\t'; }
|
2008-09-30 15:52:15 +00:00
|
|
|
|
2009-06-15 08:15:53 +00:00
|
|
|
char str_uppercase(char c)
|
|
|
|
{
|
|
|
|
if(c >= 'a' && c <= 'z')
|
|
|
|
return 'A' + (c-'a');
|
|
|
|
return c;
|
|
|
|
}
|
|
|
|
|
2010-05-29 07:25:38 +00:00
|
|
|
int str_toint(const char *str) { return atoi(str); }
|
|
|
|
float str_tofloat(const char *str) { return atof(str); }
|
|
|
|
|
2008-09-30 15:52:15 +00:00
|
|
|
|
2009-06-13 08:22:37 +00:00
|
|
|
|
|
|
|
static int str_utf8_isstart(char c)
|
|
|
|
{
|
|
|
|
if((c&0xC0) == 0x80) /* 10xxxxxx */
|
|
|
|
return 0;
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
int str_utf8_rewind(const char *str, int cursor)
|
|
|
|
{
|
|
|
|
while(cursor)
|
|
|
|
{
|
|
|
|
cursor--;
|
|
|
|
if(str_utf8_isstart(*(str + cursor)))
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
return cursor;
|
|
|
|
}
|
|
|
|
|
|
|
|
int str_utf8_forward(const char *str, int cursor)
|
|
|
|
{
|
|
|
|
const char *buf = str + cursor;
|
|
|
|
if(!buf[0])
|
|
|
|
return cursor;
|
|
|
|
|
|
|
|
if((*buf&0x80) == 0x0) /* 0xxxxxxx */
|
|
|
|
return cursor+1;
|
|
|
|
else if((*buf&0xE0) == 0xC0) /* 110xxxxx */
|
|
|
|
{
|
|
|
|
if(!buf[1]) return cursor+1;
|
|
|
|
return cursor+2;
|
|
|
|
}
|
|
|
|
else if((*buf & 0xF0) == 0xE0) /* 1110xxxx */
|
|
|
|
{
|
|
|
|
if(!buf[1]) return cursor+1;
|
|
|
|
if(!buf[2]) return cursor+2;
|
|
|
|
return cursor+2;
|
|
|
|
}
|
|
|
|
else if((*buf & 0xF8) == 0xF0) /* 11110xxx */
|
|
|
|
{
|
|
|
|
if(!buf[1]) return cursor+1;
|
|
|
|
if(!buf[2]) return cursor+2;
|
|
|
|
if(!buf[3]) return cursor+3;
|
|
|
|
return cursor+3;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* invalid */
|
|
|
|
return cursor+1;
|
|
|
|
}
|
|
|
|
|
|
|
|
int str_utf8_encode(char *ptr, int chr)
|
|
|
|
{
|
|
|
|
/* encode */
|
|
|
|
if(chr <= 0x7F)
|
|
|
|
{
|
|
|
|
ptr[0] = (char)chr;
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
else if(chr <= 0x7FF)
|
|
|
|
{
|
|
|
|
ptr[0] = 0xC0|((chr>>6)&0x1F);
|
|
|
|
ptr[1] = 0x80|(chr&0x3F);
|
|
|
|
return 2;
|
|
|
|
}
|
|
|
|
else if(chr <= 0xFFFF)
|
|
|
|
{
|
|
|
|
ptr[0] = 0xE0|((chr>>12)&0x0F);
|
|
|
|
ptr[1] = 0xC0|((chr>>6)&0x3F);
|
|
|
|
ptr[2] = 0xC0|(chr&0x3F);
|
|
|
|
return 3;
|
|
|
|
}
|
|
|
|
else if(chr <= 0x10FFFF)
|
|
|
|
{
|
|
|
|
ptr[0] = 0xF0|((chr>>18)&0x07);
|
|
|
|
ptr[1] = 0xC0|((chr>>12)&0x3F);
|
|
|
|
ptr[2] = 0xC0|((chr>>6)&0x3F);
|
|
|
|
ptr[3] = 0xC0|(chr&0x3F);
|
|
|
|
return 4;
|
|
|
|
}
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
int str_utf8_decode(const char **ptr)
|
|
|
|
{
|
|
|
|
const char *buf = *ptr;
|
|
|
|
int ch = 0;
|
|
|
|
|
|
|
|
do
|
|
|
|
{
|
|
|
|
if((*buf&0x80) == 0x0) /* 0xxxxxxx */
|
|
|
|
{
|
|
|
|
ch = *buf;
|
|
|
|
buf++;
|
|
|
|
}
|
|
|
|
else if((*buf&0xE0) == 0xC0) /* 110xxxxx */
|
|
|
|
{
|
|
|
|
ch = (*buf++ & 0x3F) << 6; if(!(*buf)) break;
|
|
|
|
ch += (*buf++ & 0x3F);
|
|
|
|
if(ch == 0) ch = -1;
|
|
|
|
}
|
|
|
|
else if((*buf & 0xF0) == 0xE0) /* 1110xxxx */
|
|
|
|
{
|
|
|
|
ch = (*buf++ & 0x1F) << 12; if(!(*buf)) break;
|
|
|
|
ch += (*buf++ & 0x3F) << 6; if(!(*buf)) break;
|
|
|
|
ch += (*buf++ & 0x3F);
|
|
|
|
if(ch == 0) ch = -1;
|
|
|
|
}
|
|
|
|
else if((*buf & 0xF8) == 0xF0) /* 11110xxx */
|
|
|
|
{
|
|
|
|
ch = (*buf++ & 0x0F) << 18; if(!(*buf)) break;
|
|
|
|
ch += (*buf++ & 0x3F) << 12; if(!(*buf)) break;
|
|
|
|
ch += (*buf++ & 0x3F) << 6; if(!(*buf)) break;
|
|
|
|
ch += (*buf++ & 0x3F);
|
|
|
|
if(ch == 0) ch = -1;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
/* invalid */
|
|
|
|
buf++;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
*ptr = buf;
|
|
|
|
return ch;
|
|
|
|
} while(0);
|
|
|
|
|
|
|
|
/* out of bounds */
|
|
|
|
*ptr = buf;
|
|
|
|
return -1;
|
|
|
|
|
|
|
|
}
|
|
|
|
|
2009-06-15 13:01:04 +00:00
|
|
|
|
|
|
|
unsigned str_quickhash(const char *str)
|
|
|
|
{
|
|
|
|
unsigned hash = 5381;
|
|
|
|
for(; *str; str++)
|
|
|
|
hash = ((hash << 5) + hash) + (*str); /* hash * 33 + c */
|
|
|
|
return hash;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2007-10-04 09:49:38 +00:00
|
|
|
#if defined(__cplusplus)
|
|
|
|
}
|
|
|
|
#endif
|