mirror of
https://github.com/KolibriOS/kolibrios.git
synced 2024-12-05 06:41:55 +03:00
befac9b242
git-svn-id: svn://kolibrios.org@5936 a494cfbc-eb01-0410-851d-a64ba20cac60
244 lines
4.0 KiB
C
244 lines
4.0 KiB
C
/*
|
|
2015
|
|
Author: Pavel Yakovlev.
|
|
*/
|
|
|
|
#define LIB_NAME "array"
|
|
|
|
#include "coff.h"
|
|
|
|
#include <string.c>
|
|
#include <stdlib.c>
|
|
|
|
typedef struct
|
|
{
|
|
dword key;
|
|
dword value;
|
|
} array;
|
|
|
|
char *ARRAY_KEY_STRING = (char *)0;
|
|
char *ARRAY_VALUE_STRING = (char *)0;
|
|
array *ARRAY_ADRESS = (dword)0;
|
|
|
|
dword hash_binary(char *data,dword size)
|
|
{
|
|
byte h1,h2,h3,h4;
|
|
if(!size) return 0;
|
|
h1 = *data;
|
|
if(size==1) return h1<<24;
|
|
h2 = *++data;
|
|
if(size==2) return (h1<<24)|(h2<<16);
|
|
h3 = *++data;
|
|
if(size==3) return (h1<<24)|(h2<<16)|(h3<<8);
|
|
h4 = *++data;
|
|
if(size==4) return (h1<<24)|(h2<<16)|(h3<<8)|(h4);
|
|
|
|
size-=4;
|
|
|
|
while(size--)
|
|
{
|
|
h1^=*data;h2^=*data;h3^=*data;h4^=*data;
|
|
++data;
|
|
}
|
|
|
|
return (h1<<24)|(h2<<16)|(h3<<8)|(h4);
|
|
}
|
|
dword hash_string(char *data)
|
|
{
|
|
byte h1,h2,h3,h4;
|
|
if(!*data) return 0;
|
|
h1 = *data;
|
|
if(!*++data) return h1<<24;
|
|
h2 = *data;
|
|
if(!*++data) return (h1<<24)|(h2<<16);
|
|
h3 = *data;
|
|
if(!*++data) return (h1<<24)|(h2<<16)|(h3<<8);
|
|
h4 = *data;
|
|
if(!*++data) return (h1<<24)|(h2<<16)|(h3<<8)|(h4);
|
|
|
|
while(*data)
|
|
{
|
|
h1^=*data;h2^=*data;h3^=*data;h4^=*data;
|
|
++data;
|
|
}
|
|
|
|
return (h1<<24)|(h2<<16)|(h3<<8)|(h4);
|
|
}
|
|
|
|
dword hash_integer(dword dec)
|
|
{
|
|
dword tmp = dec;
|
|
tmp <<= 16;
|
|
tmp ^= 0xFFFFFFFF;
|
|
dec &= tmp;
|
|
dec ^= dec>>5;
|
|
dec += dec<<3;
|
|
dec ^= dec>>13;
|
|
tmp = dec<<9;
|
|
tmp ^= 0xFFFFFFFF;
|
|
dec += tmp;
|
|
dec ^= dec>>17;
|
|
return dec;
|
|
}
|
|
|
|
dword buffer = 0xFF;
|
|
dword ARRAY_COUNT = 0;
|
|
dword tmp,tmp1;
|
|
|
|
array *key_string_set(dword *ary,char *key,void *data)
|
|
{
|
|
//dword *ptr = (dword *)ary;
|
|
array *m;
|
|
if(!*ary)
|
|
{
|
|
*ary = (dword)malloc(sizeof(array)*(buffer+1));
|
|
m = (array *)*ary;
|
|
m[0].value = buffer;
|
|
}
|
|
|
|
else
|
|
{
|
|
m = (array *)*ary;
|
|
if(m[0].value<=m[0].key)
|
|
{
|
|
m[0].value += buffer;
|
|
*ary = (dword)realloc((void*)*ary,sizeof(array)*(m[0].value+1));
|
|
}
|
|
}
|
|
|
|
++m[0].key;
|
|
|
|
dword tmp = hash_string(key)%buffer;
|
|
tmp+=(m[0].value/buffer)*buffer;
|
|
++tmp;
|
|
|
|
while(m[tmp].key)
|
|
{
|
|
if(!strcmp(key,(char*)m[tmp].key))break;
|
|
++tmp;
|
|
}
|
|
m[tmp].key = (dword)key;
|
|
m[tmp].value = (dword)data;
|
|
return m;
|
|
}
|
|
|
|
array *key_binary_set(dword *ary,void *key,void *data,dword size)
|
|
{
|
|
|
|
array *m;
|
|
if(!*ary)
|
|
{
|
|
*ary = (dword)malloc(sizeof(array)*(buffer+1));
|
|
m = (array *)*ary;
|
|
m[0].value = buffer+1;
|
|
}
|
|
else
|
|
{
|
|
m = (array *)*ary;
|
|
}
|
|
|
|
++m[0].key;
|
|
|
|
dword tmp = hash_string(key)%buffer;
|
|
++tmp;
|
|
while(m[tmp].key)
|
|
{
|
|
if(!strncmp((char*)key,(char*)m[tmp].key,size))break;
|
|
++tmp;
|
|
}
|
|
m[tmp].key = (dword)key;
|
|
m[tmp].value = (dword)data;
|
|
return m;
|
|
}
|
|
|
|
array *key_integer_set(dword *ary,dword key,void *data)
|
|
{
|
|
|
|
|
|
if(!*ary)
|
|
{
|
|
//(dword)m[0].value = (dword)buffer;
|
|
*ary = (dword)malloc(sizeof(array)*(buffer+1));
|
|
}
|
|
|
|
array *m = (array *)*ary;
|
|
|
|
dword tmp = hash_integer(key)%buffer;
|
|
|
|
while(m[tmp].key)
|
|
{
|
|
if(key==m[tmp].key)break;
|
|
++tmp;
|
|
}
|
|
m[tmp].key = (dword)key;
|
|
m[tmp].value = (dword)data;
|
|
return m;
|
|
}
|
|
|
|
|
|
void *key_string_get(dword *ary,char *key)
|
|
{
|
|
if(!*ary)return 0;
|
|
|
|
array *m = (array *)*ary;
|
|
|
|
dword tmp = hash_string(key)%buffer;
|
|
tmp+=(m[0].value/buffer)*buffer;
|
|
++tmp;
|
|
while(m[tmp].key)
|
|
{
|
|
if(!strcmp(key,(char*)m[tmp].key))break;
|
|
++tmp;
|
|
}
|
|
return (void *)m[tmp].value;
|
|
}
|
|
|
|
void *key_binary_get(dword *ary,char *key,dword size)
|
|
{
|
|
if(!*ary)return 0;
|
|
|
|
array *m = (array *)*ary;
|
|
|
|
dword tmp = hash_string(key)%buffer;
|
|
|
|
while(m[tmp].key)
|
|
{
|
|
if(!strncmp(key,(char*)m[tmp].key,size))break;
|
|
++tmp;
|
|
}
|
|
return (void *)m[tmp].value;
|
|
}
|
|
|
|
void *key_integer_get(dword *ary,dword key)
|
|
{
|
|
if(!*ary)return 0;
|
|
|
|
array *m = (array *)*ary;
|
|
|
|
dword tmp = hash_integer(key)%buffer;
|
|
|
|
while(m[tmp].key)
|
|
{
|
|
if(key==m[tmp].key)break;
|
|
++tmp;
|
|
}
|
|
return (void *)m[tmp].value;
|
|
}
|
|
|
|
|
|
EXPORT_
|
|
export(buffer)
|
|
|
|
export(hash_string)
|
|
export(hash_binary)
|
|
export(hash_integer)
|
|
|
|
export(key_string_set)
|
|
export(key_binary_set)
|
|
export(key_integer_set)
|
|
|
|
export(key_string_get)
|
|
export(key_binary_get)
|
|
export(key_integer_get)
|
|
|
|
_EXPORT |