Further file organization
Further file organization
This commit is contained in:
Jaysyn904
592
nwn/nwnprc/trunk/include/inc_heap.nss
Normal file
592
nwn/nwnprc/trunk/include/inc_heap.nss
Normal file
@@ -0,0 +1,592 @@
|
||||
//::///////////////////////////////////////////////
|
||||
//:: Heap include
|
||||
//:: inc_heap
|
||||
//:://////////////////////////////////////////////
|
||||
/** @file
|
||||
A simple maxheap, backed by an array.
|
||||
Insertion priority is determined by an interger
|
||||
parameter, data stored may be anything.
|
||||
|
||||
Heap element indices begin at one, for convenience.
|
||||
|
||||
For optimization, I use binary search instead of
|
||||
switches. Result: It's fugly
|
||||
|
||||
Return values are similar to the ones in
|
||||
Mr. Figglesworth's sdl_array
|
||||
|
||||
@author Ornedan
|
||||
@date Created - 16.03.2005
|
||||
*/
|
||||
//:://////////////////////////////////////////////
|
||||
//:://////////////////////////////////////////////
|
||||
|
||||
//////////////////////////////////////////////////
|
||||
/* Constant defintions */
|
||||
//////////////////////////////////////////////////
|
||||
/*
|
||||
const int SDL_SUCCESS = 1;
|
||||
const int SDL_ERROR_ALREADY_EXISTS = 1001;
|
||||
const int SDL_ERROR_DOES_NOT_EXIST = 1002;
|
||||
const int SDL_ERROR_OUT_OF_BOUNDS = 1003;
|
||||
const int SDL_ERROR_NO_ZERO_SIZE = 1004;
|
||||
const int SDL_ERROR_NOT_VALID_OBJECT = 1005;
|
||||
*/
|
||||
|
||||
/// Heap entity type - float
|
||||
const int ENTITY_TYPE_FLOAT = 1;
|
||||
/// Heap entity type - integer
|
||||
const int ENTITY_TYPE_INTEGER = 2;
|
||||
/// Heap entity type - object
|
||||
const int ENTITY_TYPE_OBJECT = 3;
|
||||
/// Heap entity type - string
|
||||
const int ENTITY_TYPE_STRING = 4;
|
||||
|
||||
// Internal constants
|
||||
const string HEAP_PREFIX = "heap_";
|
||||
const string KEY_SUFFIX = "_key";
|
||||
const string ELEMENT_SUFFIX = "_element";
|
||||
const string TYPE_SUFFIX = "_type";
|
||||
|
||||
//////////////////////////////////////////////////
|
||||
/* Function prototypes */
|
||||
//////////////////////////////////////////////////
|
||||
|
||||
/**
|
||||
* Initializes heap variables on the storage object.
|
||||
*
|
||||
* @param oStore object that the heap will be stored as locals on
|
||||
* @param sName the name of the heap
|
||||
* @return SDL_* constant
|
||||
*/
|
||||
int heap_create(object oStore, string sName);
|
||||
|
||||
/**
|
||||
* Deletes the heap and all it's entries.
|
||||
*
|
||||
* @param oStore object the heap is stored on
|
||||
* @param sName the name of the heap
|
||||
* @return SDL_* constant
|
||||
*/
|
||||
int heap_delete(object oStore, string sName);
|
||||
|
||||
/**
|
||||
* Checks to see if a heap exists.
|
||||
*
|
||||
* @param oStore object the heap is stored on
|
||||
* @param sName the name of the heap
|
||||
* @return TRUE if a heap with the given name is stored on oStore.
|
||||
* FALSE otherwise.
|
||||
*/
|
||||
int heap_exists(object oStore, string sName);
|
||||
|
||||
/**
|
||||
* Gets the number of elements in the heap
|
||||
*
|
||||
* @param oStore object the heap is stored on
|
||||
* @param sName the name of the heap
|
||||
* @return the number of elements in the heap, or -1 on error.
|
||||
*/
|
||||
int heap_get_size(object oStore, string sName);
|
||||
|
||||
|
||||
/**
|
||||
* Heap insertion functions - float.
|
||||
* Inserts the given key & element pair at a location in the heap
|
||||
* determined by the key.
|
||||
* Return order of elements inserted with the same key is not defined.
|
||||
*
|
||||
* @param oStore object the heap to be used is stored on
|
||||
* @param sName the name of the heap
|
||||
* @param nKey integer value used to determine insertion location
|
||||
* @param fEntry element to be insterted
|
||||
* @return SDL_* constant
|
||||
*/
|
||||
int heap_put_float(object oStore, string sName, int nKey, float fEntry);
|
||||
|
||||
/**
|
||||
* Heap insertion functions - integer.
|
||||
* Inserts the given key & element pair at a location in the heap
|
||||
* determined by the key.
|
||||
* Return order of elements inserted with the same key is not defined.
|
||||
*
|
||||
* @param oStore object the heap to be used is stored on
|
||||
* @param sName the name of the heap
|
||||
* @param nKey integer value used to determine insertion location
|
||||
* @param nEntry element to be insterted
|
||||
* @return SDL_* constant
|
||||
*/
|
||||
int heap_put_int(object oStore, string sName, int nKey, int nEntry);
|
||||
|
||||
/**
|
||||
* Heap insertion functions - object.
|
||||
* Inserts the given key & element pair at a location in the heap
|
||||
* determined by the key.
|
||||
* Return order of elements inserted with the same key is not defined.
|
||||
*
|
||||
* @param oStore object the heap to be used is stored on
|
||||
* @param sName the name of the heap
|
||||
* @param nKey integer value used to determine insertion location
|
||||
* @param oEntry element to be insterted
|
||||
* @return SDL_* constant
|
||||
*/
|
||||
int heap_put_object(object oStore, string sName, int nKey, object oEntry);
|
||||
|
||||
/**
|
||||
* Heap insertion functions - string
|
||||
.
|
||||
* Inserts the given key & element pair at a location in the heap
|
||||
* determined by the key.
|
||||
* Return order of elements inserted with the same key is not defined.
|
||||
*
|
||||
* @param oStore object the heap to be used is stored on
|
||||
* @param sName the name of the heap
|
||||
* @param nKey integer value used to determine insertion location
|
||||
* @param sEntry element to be insterted
|
||||
* @return SDL_* constant
|
||||
*/
|
||||
int heap_put_string(object oStore, string sName, int nKey, string sEntry);
|
||||
|
||||
|
||||
/**
|
||||
* Checks the type of the element at the top of the heap. Errors if
|
||||
* heap does not exist or is empty.
|
||||
*
|
||||
* @param oStore object the heap to be used is stored on
|
||||
* @param sName the name of the heap
|
||||
* @return one of the ENTITY_TYPE_* constants, or 0 on error.
|
||||
*/
|
||||
int heap_get_type(object oStore, string sName);
|
||||
|
||||
/**
|
||||
* Gets the top element of the heap as float.
|
||||
*
|
||||
* @param oStore object the heap to be used is stored on
|
||||
* @param sName the name of the heap
|
||||
* @return top element of the heap as float. If the type
|
||||
* of the top element was not float, returns 0.0f
|
||||
*/
|
||||
float heap_get_float(object oStore, string sName);
|
||||
|
||||
/**
|
||||
* Gets the top element of the heap as integer.
|
||||
*
|
||||
* @param oStore object the heap to be used is stored on
|
||||
* @param sName the name of the heap
|
||||
* @return top element of the heap as integer. If the type
|
||||
* of the top element was not integer, returns 0
|
||||
*/
|
||||
int heap_get_int(object oStore, string sName);
|
||||
|
||||
/**
|
||||
* Gets the top element of the heap as object.
|
||||
*
|
||||
* @param oStore object the heap to be used is stored on
|
||||
* @param sName the name of the heap
|
||||
* @return top element of the heap as object. If the type
|
||||
* of the top element was not object, returns OBJECT_INVALID
|
||||
*/
|
||||
object heap_get_object(object oStore, string sName);
|
||||
|
||||
/**
|
||||
* Gets the top element of the heap as string.
|
||||
*
|
||||
* @param oStore object the heap to be used is stored on
|
||||
* @param sName the name of the heap
|
||||
* @return top element of the heap as string. If the type
|
||||
* of the top element was not string, returns ""
|
||||
*/
|
||||
string heap_get_string(object oStore, string sName);
|
||||
|
||||
/**
|
||||
* Deletes the top element of the heap and reorders the heap to
|
||||
* preserve the heap conditions.
|
||||
*
|
||||
* @param oStore object the heap to be used is stored on
|
||||
* @param sName the name of the heap
|
||||
* @return one of the SDL_* constants
|
||||
*/
|
||||
int heap_remove(object oStore, string sName);
|
||||
|
||||
|
||||
//////////////////////////////////////////////////
|
||||
/* Include section */
|
||||
//////////////////////////////////////////////////
|
||||
|
||||
//#include "inc_utility"
|
||||
#include "inc_array" //The only part of inc_utility it needs
|
||||
|
||||
|
||||
//////////////////////////////////////////////////
|
||||
/* Function defintions */
|
||||
//////////////////////////////////////////////////
|
||||
|
||||
|
||||
|
||||
int heap_create(object oStore, string sName){
|
||||
// Validity checks
|
||||
if(!GetIsObjectValid(oStore))
|
||||
return SDL_ERROR_NOT_VALID_OBJECT;
|
||||
if(GetLocalInt(oStore, sName))
|
||||
return SDL_ERROR_ALREADY_EXISTS;
|
||||
|
||||
// Initialize the size (always one greater than the actual size)
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName, 1);
|
||||
return SDL_SUCCESS;
|
||||
}
|
||||
|
||||
|
||||
int heap_delete(object oStore, string sName){
|
||||
// Validity checks
|
||||
int nSize = GetLocalInt(oStore, HEAP_PREFIX + sName);
|
||||
if(!nSize)
|
||||
return SDL_ERROR_DOES_NOT_EXIST;
|
||||
|
||||
nSize -= 1;
|
||||
int nTempType;
|
||||
for(; nSize >= 0; nSize--){
|
||||
// Delete the storage values
|
||||
nTempType = GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + TYPE_SUFFIX);
|
||||
DeleteLocalInt (oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + TYPE_SUFFIX);
|
||||
DeleteLocalInt (oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + KEY_SUFFIX);
|
||||
|
||||
if(nTempType > ENTITY_TYPE_INTEGER){
|
||||
if(nTempType > ENTITY_TYPE_OBJECT)
|
||||
DeleteLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + ELEMENT_SUFFIX);
|
||||
else
|
||||
DeleteLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + ELEMENT_SUFFIX);
|
||||
}else{
|
||||
if(nTempType > ENTITY_TYPE_FLOAT)
|
||||
DeleteLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + ELEMENT_SUFFIX);
|
||||
else
|
||||
DeleteLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + ELEMENT_SUFFIX);
|
||||
}
|
||||
}
|
||||
|
||||
// Delete the size variable
|
||||
DeleteLocalInt(oStore, HEAP_PREFIX + sName);
|
||||
return SDL_SUCCESS;
|
||||
}
|
||||
|
||||
|
||||
int heap_exists(object oStore, string sName){
|
||||
if(GetLocalInt(oStore, HEAP_PREFIX + sName))
|
||||
return TRUE;
|
||||
else
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
|
||||
int heap_get_size(object oStore, string sName){
|
||||
return GetLocalInt(oStore, HEAP_PREFIX + sName) - 1;
|
||||
}
|
||||
|
||||
|
||||
/* Some functions for simulating the element links */
|
||||
int heap_parent(int nIndex){ return (nIndex - 1) / 2; }
|
||||
int heap_lchild(int nIndex){ return (nIndex * 2) + 1; }
|
||||
int heap_rchild(int nIndex){ return (nIndex * 2) + 2; }
|
||||
/* An element swapper */
|
||||
void heap_swap(object oStore, string sName, int nInd1, int nInd2){
|
||||
int nTempKey = GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + KEY_SUFFIX);
|
||||
int nTempType = GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + TYPE_SUFFIX);
|
||||
float fTemp;
|
||||
int nTemp;
|
||||
object oTemp;
|
||||
string sTemp;
|
||||
|
||||
// Grab the element from index1
|
||||
if(nTempType > ENTITY_TYPE_INTEGER){
|
||||
if(nTempType > ENTITY_TYPE_OBJECT){
|
||||
sTemp = GetLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX);
|
||||
DeleteLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX);
|
||||
}else{
|
||||
oTemp = GetLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX);
|
||||
DeleteLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX);
|
||||
}}else{
|
||||
if(nTempType > ENTITY_TYPE_FLOAT){
|
||||
nTemp = GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX);
|
||||
DeleteLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX);
|
||||
}else{
|
||||
fTemp = GetLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX);
|
||||
DeleteLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX);
|
||||
}}
|
||||
|
||||
// Start moving from index2
|
||||
int nTempType2 = GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + TYPE_SUFFIX);
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + TYPE_SUFFIX,
|
||||
nTempType2);
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + KEY_SUFFIX,
|
||||
GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + KEY_SUFFIX));
|
||||
// Illegal use of enumerations. Don't do this at home :p
|
||||
if(nTempType2 > ENTITY_TYPE_INTEGER){
|
||||
if(nTempType2 > ENTITY_TYPE_OBJECT){
|
||||
SetLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX,
|
||||
GetLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX));
|
||||
DeleteLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX);
|
||||
}else{
|
||||
SetLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX,
|
||||
GetLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX));
|
||||
DeleteLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX);
|
||||
}}else{
|
||||
if(nTempType2 > ENTITY_TYPE_FLOAT){
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX,
|
||||
GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX));
|
||||
DeleteLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX);
|
||||
}else{
|
||||
SetLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd1) + ELEMENT_SUFFIX,
|
||||
GetLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX));
|
||||
DeleteLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX);
|
||||
}}
|
||||
|
||||
// Place the stuff copied to temporary variables to their new place
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + TYPE_SUFFIX,
|
||||
nTempType);
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + KEY_SUFFIX,
|
||||
nTempKey);
|
||||
if(nTempType > ENTITY_TYPE_INTEGER){
|
||||
if(nTempType > ENTITY_TYPE_OBJECT)
|
||||
SetLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX,
|
||||
sTemp);
|
||||
else
|
||||
SetLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX,
|
||||
oTemp);
|
||||
}else{
|
||||
if(nTempType > ENTITY_TYPE_FLOAT)
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX,
|
||||
nTemp);
|
||||
else
|
||||
SetLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInd2) + ELEMENT_SUFFIX,
|
||||
fTemp);
|
||||
}
|
||||
}
|
||||
|
||||
/* A function that gets the location where the given
|
||||
* key should be inserted. Moves other elements around
|
||||
* to clear the location
|
||||
*/
|
||||
int heap_get_insert_location(object oStore, string sName, int nKey){
|
||||
// Insert into position just beyond the end of current elements
|
||||
int nIndex = heap_get_size(oStore, sName);
|
||||
int nTempType;
|
||||
while(nIndex > 0 && GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(heap_parent(nIndex)) + KEY_SUFFIX) < nKey){
|
||||
// Move the parent entry down
|
||||
nTempType = GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(heap_parent(nIndex)) + TYPE_SUFFIX);
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nIndex) + TYPE_SUFFIX,
|
||||
nTempType);
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nIndex) + KEY_SUFFIX,
|
||||
GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(heap_parent(nIndex)) + KEY_SUFFIX));
|
||||
// Illegal use of enumerations. Don't do this at home :p
|
||||
// The old entry is deleted, since the entry to be inserted might not be of the same type
|
||||
if(nTempType > ENTITY_TYPE_INTEGER){
|
||||
if(nTempType > ENTITY_TYPE_OBJECT){
|
||||
SetLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(nIndex) + ELEMENT_SUFFIX,
|
||||
GetLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(heap_parent(nIndex)) + ELEMENT_SUFFIX));
|
||||
DeleteLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(heap_parent(nIndex)) + ELEMENT_SUFFIX);
|
||||
}else{
|
||||
SetLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(nIndex) + ELEMENT_SUFFIX,
|
||||
GetLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(heap_parent(nIndex)) + ELEMENT_SUFFIX));
|
||||
DeleteLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(heap_parent(nIndex)) + ELEMENT_SUFFIX);
|
||||
}}else{
|
||||
if(nTempType > ENTITY_TYPE_FLOAT){
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nIndex) + ELEMENT_SUFFIX,
|
||||
GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(heap_parent(nIndex)) + ELEMENT_SUFFIX));
|
||||
DeleteLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(heap_parent(nIndex)) + ELEMENT_SUFFIX);
|
||||
}else{
|
||||
SetLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(nIndex) + ELEMENT_SUFFIX,
|
||||
GetLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(heap_parent(nIndex)) + ELEMENT_SUFFIX));
|
||||
DeleteLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(heap_parent(nIndex)) + ELEMENT_SUFFIX);
|
||||
}}
|
||||
|
||||
nIndex = heap_parent(nIndex);
|
||||
}
|
||||
|
||||
return nIndex;
|
||||
}
|
||||
/*if(a > 2){
|
||||
if(a > 3)
|
||||
b = ENTITY_TYPE_STRING;
|
||||
else
|
||||
b = ENTITY_TYPE_OBJECT;
|
||||
}else{
|
||||
if(a > 1)
|
||||
b = ENTITY_TYPE_INTEGER;
|
||||
else
|
||||
b = ENTITY_TYPE_FLOAT;
|
||||
}*/
|
||||
|
||||
int heap_put_float(object oStore, string sName, int nKey, float fEntry){
|
||||
// Validity checks
|
||||
if(!GetLocalInt(oStore, HEAP_PREFIX + sName))
|
||||
return SDL_ERROR_DOES_NOT_EXIST;
|
||||
|
||||
// Get the location to insert to
|
||||
int nInsert = heap_get_insert_location(oStore, sName, nKey);
|
||||
|
||||
// Insert the new element
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + TYPE_SUFFIX, ENTITY_TYPE_FLOAT);
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + KEY_SUFFIX, nKey);
|
||||
SetLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + ELEMENT_SUFFIX, fEntry);
|
||||
|
||||
// Mark the insertion
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName, GetLocalInt(oStore, HEAP_PREFIX + sName) + 1);
|
||||
return SDL_SUCCESS;
|
||||
}
|
||||
|
||||
int heap_put_int(object oStore, string sName, int nKey, int nEntry){
|
||||
// Validity checks
|
||||
if(!GetLocalInt(oStore, HEAP_PREFIX + sName))
|
||||
return SDL_ERROR_DOES_NOT_EXIST;
|
||||
|
||||
// Get the location to insert to
|
||||
int nInsert = heap_get_insert_location(oStore, sName, nKey);
|
||||
|
||||
// Insert the new element
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + KEY_SUFFIX, nKey);
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + TYPE_SUFFIX, ENTITY_TYPE_INTEGER);
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + ELEMENT_SUFFIX, nEntry);
|
||||
|
||||
// Mark the insertion
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName, GetLocalInt(oStore, HEAP_PREFIX + sName) + 1);
|
||||
return SDL_SUCCESS;
|
||||
}
|
||||
|
||||
int heap_put_string(object oStore, string sName, int nKey, string sEntry){
|
||||
// Validity checks
|
||||
if(!GetLocalInt(oStore, HEAP_PREFIX + sName))
|
||||
return SDL_ERROR_DOES_NOT_EXIST;
|
||||
|
||||
// Get the location to insert to
|
||||
int nInsert = heap_get_insert_location(oStore, sName, nKey);
|
||||
|
||||
// Insert the new element
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + KEY_SUFFIX, nKey);
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + TYPE_SUFFIX, ENTITY_TYPE_STRING);
|
||||
SetLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + ELEMENT_SUFFIX, sEntry);
|
||||
|
||||
// Mark the insertion
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName, GetLocalInt(oStore, HEAP_PREFIX + sName) + 1);
|
||||
return SDL_SUCCESS;
|
||||
}
|
||||
|
||||
int heap_put_object(object oStore, string sName, int nKey, object oEntry){
|
||||
// Validity checks
|
||||
if(!GetLocalInt(oStore, HEAP_PREFIX + sName))
|
||||
return SDL_ERROR_DOES_NOT_EXIST;
|
||||
|
||||
// Get the location to insert to
|
||||
int nInsert = heap_get_insert_location(oStore, sName, nKey);
|
||||
|
||||
// Insert the new element
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + KEY_SUFFIX, nKey);
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + TYPE_SUFFIX, ENTITY_TYPE_OBJECT);
|
||||
SetLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(nInsert) + ELEMENT_SUFFIX, oEntry);
|
||||
|
||||
// Mark the insertion
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName, GetLocalInt(oStore, HEAP_PREFIX + sName) + 1);
|
||||
return SDL_SUCCESS;
|
||||
}
|
||||
|
||||
|
||||
int heap_remove(object oStore, string sName){
|
||||
// Validity checks
|
||||
if(!GetLocalInt(oStore, HEAP_PREFIX + sName))
|
||||
return SDL_ERROR_DOES_NOT_EXIST;
|
||||
|
||||
int nSize = heap_get_size(oStore, sName);
|
||||
if(!nSize)
|
||||
return SDL_ERROR_OUT_OF_BOUNDS;
|
||||
|
||||
// Move the bottommost element over the max
|
||||
nSize--;
|
||||
heap_swap(oStore, sName, 0, nSize);
|
||||
// Delete the bottommost element
|
||||
int nTempType = GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + TYPE_SUFFIX);
|
||||
DeleteLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + TYPE_SUFFIX);
|
||||
DeleteLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + KEY_SUFFIX);
|
||||
|
||||
if(nTempType > ENTITY_TYPE_INTEGER){
|
||||
if(nTempType > ENTITY_TYPE_OBJECT)
|
||||
DeleteLocalString(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + ELEMENT_SUFFIX);
|
||||
else
|
||||
DeleteLocalObject(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + ELEMENT_SUFFIX);
|
||||
}else{
|
||||
if(nTempType > ENTITY_TYPE_FLOAT)
|
||||
DeleteLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + ELEMENT_SUFFIX);
|
||||
else
|
||||
DeleteLocalFloat(oStore, HEAP_PREFIX + sName + "_" + IntToString(nSize) + ELEMENT_SUFFIX);
|
||||
}
|
||||
// Mark the heapsize as reduced
|
||||
SetLocalInt(oStore, HEAP_PREFIX + sName, nSize + 1);
|
||||
// Move nSize to point at the new last entry
|
||||
nSize--;
|
||||
// Re-assert the heap conditions
|
||||
int nLeft, nRight, nMax, nIndex = 0;
|
||||
int bContinue = TRUE;
|
||||
while(bContinue){
|
||||
bContinue = FALSE;
|
||||
nLeft = heap_lchild(nIndex);
|
||||
nRight = heap_rchild(nIndex);
|
||||
|
||||
if(nRight <= nSize){
|
||||
if(GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nLeft) + KEY_SUFFIX)
|
||||
>
|
||||
GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nLeft) + KEY_SUFFIX))
|
||||
nMax = nLeft;
|
||||
else
|
||||
nMax = nRight;
|
||||
|
||||
if(GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nIndex) + KEY_SUFFIX)
|
||||
<
|
||||
GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nMax) + KEY_SUFFIX)){
|
||||
heap_swap(oStore, sName, nIndex, nMax);
|
||||
bContinue = TRUE;
|
||||
}
|
||||
}
|
||||
else if(nLeft == nSize &&
|
||||
GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nIndex) + KEY_SUFFIX)
|
||||
<
|
||||
GetLocalInt(oStore, HEAP_PREFIX + sName + "_" + IntToString(nLeft) + KEY_SUFFIX))
|
||||
heap_swap(oStore, sName, nIndex, nLeft);
|
||||
}
|
||||
|
||||
return SDL_SUCCESS;
|
||||
}
|
||||
|
||||
|
||||
int heap_get_type(object oStore, string sName){
|
||||
// Validity checks
|
||||
if(!GetLocalInt(oStore, HEAP_PREFIX + sName))
|
||||
return SDL_ERROR_DOES_NOT_EXIST;
|
||||
|
||||
// Return the heap top element's type
|
||||
return GetLocalInt(oStore, HEAP_PREFIX + sName + "_0" + TYPE_SUFFIX);
|
||||
}
|
||||
|
||||
|
||||
float heap_get_float(object oStore, string sName){
|
||||
return GetLocalInt(oStore, HEAP_PREFIX + sName + "_0" + TYPE_SUFFIX) == ENTITY_TYPE_FLOAT ?
|
||||
GetLocalFloat(oStore, HEAP_PREFIX + sName + "_0" + ELEMENT_SUFFIX) :
|
||||
0.0f;
|
||||
}
|
||||
|
||||
int heap_get_int(object oStore, string sName){
|
||||
return GetLocalInt(oStore, HEAP_PREFIX + sName + "_0" + TYPE_SUFFIX) == ENTITY_TYPE_INTEGER ?
|
||||
GetLocalInt(oStore, HEAP_PREFIX + sName + "_0" + ELEMENT_SUFFIX) :
|
||||
0;
|
||||
}
|
||||
|
||||
object heap_get_object(object oStore, string sName){
|
||||
return GetLocalInt(oStore, HEAP_PREFIX + sName + "_0" + TYPE_SUFFIX) == ENTITY_TYPE_OBJECT ?
|
||||
GetLocalObject(oStore, HEAP_PREFIX + sName + "_0" + ELEMENT_SUFFIX) :
|
||||
OBJECT_INVALID;
|
||||
}
|
||||
|
||||
string heap_get_string(object oStore, string sName){
|
||||
return GetLocalInt(oStore, HEAP_PREFIX + sName + "_0" + TYPE_SUFFIX) == ENTITY_TYPE_STRING ?
|
||||
GetLocalString(oStore, HEAP_PREFIX + sName + "_0" + ELEMENT_SUFFIX) :
|
||||
"";
|
||||
}
|
||||
|
||||
|
||||
//void main(){}
|
||||
Reference in New Issue
Block a user