ultimatepp/uppsrc/Core/Vcont.cpp
cxl 9860702ab7 Bits improvements
git-svn-id: svn://ultimatepp.org/upp/trunk@11032 f0d560ea-af0d-0410-9eb7-867de7ffcac7
2017-04-26 11:33:02 +00:00

142 lines
2.5 KiB
C++

#include "Core.h"
namespace Upp {
struct Vector_ {
void *vector;
int items;
int alloc;
};
#ifdef _DEBUG
void *break_when_picked;
void BreakWhenPicked(void *ptr)
{
if(ptr == break_when_picked)
__BREAK__;
}
void BREAK_WHEN_PICKED__(void *ptr)
{
break_when_picked = ptr;
}
#endif
void VectorReAlloc_(void *v_, int newalloc, int sizeofT)
{
Vector_ *v = (Vector_*)v_;
ASSERT(newalloc >= v->items);
ASSERT(v->items >= 0); // Pick semantics broken
size_t sz0 = (size_t)newalloc * sizeofT;
size_t sz = sz0;
void *newvector = newalloc ? MemoryAllocSz(sz) : NULL;
v->alloc = newalloc == INT_MAX ? INT_MAX // maximum alloc reached
: (int)((sz - sz0) / sizeofT + newalloc); // adjust alloc to real memory size
if(v->vector)
memcpy(newvector, v->vector, (size_t)v->items * sizeofT);
v->vector = newvector;
}
void VectorReAllocF_(void *v_, int newalloc, int sizeofT)
{
Vector_ *v = (Vector_*)v_;
void *prev = v->vector;
VectorReAlloc_(v, newalloc, sizeofT);
MemoryFree(prev);
}
void VectorGrow_(void *v_, int sizeofT)
{
Vector_ *v = (Vector_*)v_;
if(v->alloc == INT_MAX)
Panic("Too many items in container!");
#ifdef _DEBUG
VectorReAlloc_(v, max(v->alloc + 1, v->alloc >= INT_MAX / 2 ? INT_MAX : 2 * v->alloc), sizeofT);
#else
VectorReAlloc_(v, max(v->alloc + 1, v->alloc >= int((int64)2 * INT_MAX / 3) ? INT_MAX : v->alloc + (v->alloc >> 1)), sizeofT);
#endif
}
void VectorGrowF_(void *v_, int sizeofT)
{
Vector_ *v = (Vector_*)v_;
void *prev = v->vector;
VectorGrow_(v, sizeofT);
MemoryFree(prev);
}
int64 NewInVectorSerial()
{
static int64 x;
INTERLOCKED {
++x;
}
return x;
}
thread__ int64 invector_cache_serial_;
thread__ int invector_cache_blki_;
thread__ int invector_cache_offset_;
thread__ int invector_cache_end_;
void Bits::Free()
{
if(bp)
MemoryFree(bp);
}
void Bits::Clear()
{
alloc = 0;
bp = NULL;
}
void Bits::Realloc(int nalloc)
{
size_t sz = sizeof(dword) * nalloc;
dword *nbp = (dword *)MemoryAllocSz(sz);
nalloc = sz / sizeof(dword);
if(bp) {
Copy(nbp, bp, bp + min(alloc, nalloc));
Free();
}
if(nalloc > alloc)
Fill(nbp + alloc, nbp + nalloc, (dword)0);
bp = nbp;
alloc = nalloc;
}
void Bits::Expand(int q)
{
Realloc(3 * q / 2 + 1);
}
void Bits::Reserve(int nbits)
{
int n = (nbits + 31) >> 5;
if(n > alloc)
Realloc(n);
}
void Bits::Shrink()
{
int lasti = alloc - 1;
while(lasti > 0 && bp[lasti] == 0)
lasti--;
int nalloc = lasti + 1;
if(nalloc != alloc)
Realloc(nalloc);
}
dword *Bits::CreateRaw(int n_dwords)
{
Clear();
Realloc(n_dwords);
return bp;
}
}