bp/FrameLib
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Compress SC strings and store global in the FLParam UGen

Browse Source
This commit is contained in:
Alex Harker
2019-11-27 11:20:55 +00:00
parent 018f50f013
commit 63702ca2c8
2 changed files with 105 additions and 71 deletions
Download Patch File Download Diff File Expand all files Collapse all files
FrameLib_SC_UGens/FrameLib.sc
+26 -1
View File
@@ -38,7 +38,32 @@ FLParam : UGen {
*parseSymbol { arg str;
^str.ascii;
var ascii = str.ascii;
var args = Array.newClear((ascii.size + 2) / 3);
var loop = (ascii.size / 3).asInteger;
var loopmod = ascii.size % 3;
loop.do()
{ arg i;
args[i] = ascii[i * 3] + (ascii[i * 3 + 1] * 256) + (ascii[i * 3 + 2].asInteger * 65536);
post("this,=" + ascii[i * 3] + ascii[i * 3 + 1] + ascii[i * 3 + 2] + args[i] + "\n")
};
post("loop is" + loop + loopmod + "\n");
if (loopmod == 1)
{
args[loop] = ascii[loop * 3];
^args;
}{
if (loopmod == 2)
{
args[loop] = ascii[loop * 3] + ascii[loop * 3 + 1] * 256;
^args;
}
{
^args;
}
}
}
*parseItem { arg a;
FrameLib_SC_UGens/FrameLib_SC.cpp
+79 -70
View File
@@ -26,76 +26,6 @@ void FLTest_CalcAudio(FrameLib_SC_UGen *unit, int inNumSamples);
static void FLTest_Dtor(FrameLib_SC_UGen* unit);
struct FrameLib_Param_UGen : public Unit
{
char *mTag;
char *mSymbol;
float *mVector;
size_t mVecLength;
};
size_t FLParam_String(FrameLib_Param_UGen* unit, char*& str, size_t i)
{
size_t length = 0;
Wire **it = unit->mInput + i;
Wire **end = unit->mInput + unit->mNumInputs;
length = (*it++)->mScalarValue;
str = (char *) ft->fRTAlloc(unit->mWorld, sizeof(char) * (length + 1));
for (size_t j = 0; it != end && j < length; it++, j++)
str[j] = (char) (*it)->mScalarValue;
str[length] = 0;
return unit->mNumInputs - (end - it);
}
void FLParam_Vector(FrameLib_Param_UGen* unit, float*& vec, size_t i)
{
size_t length = 0;
Wire **it = unit->mInput + i;
Wire **end = unit->mInput + unit->mNumInputs;
unit->mVecLength = length = (*it++)->mScalarValue;
vec = (float *) ft->fRTAlloc(unit->mWorld, sizeof(float) * (length + 1));
for (size_t j = 0; it != end && j < length; it++, j++)
vec[j] = (*it)->mScalarValue;
}
void FLParam_Ctor(FrameLib_Param_UGen* unit)
{
unit->mTag = nullptr;
unit->mSymbol = nullptr;
unit->mVector = nullptr;
unit->mVecLength = 0;
bool string = unit->mInput[0]->mScalarValue;
size_t pos = FLParam_String(unit, unit->mTag, 1);
if (string)
FLParam_String(unit, unit->mSymbol, pos);
else
FLParam_Vector(unit, unit->mVector, pos);
unit->mCalcFunc = (UnitCalcFunc) &FLTest_CalcZero;
}
void FLParam_Dtor(FrameLib_Param_UGen* unit)
{
using std::vector;
if (unit->mTag)
ft->fRTFree(unit->mWorld, unit->mTag);
unit->mVector.~vector<float>();
if (unit->mSymbol)
ft->fRTFree(unit->mWorld, unit->mSymbol);
}
// Global pbject
struct SC_FrameLib_Global
@@ -243,6 +173,85 @@ struct SC_FrameLib_Global
static SC_FrameLib_Global sGlobal;
// Parameter Object
struct FrameLib_Param_UGen : public Unit
{
FrameLibSC_FrameLib_Global* mGlobal;
char *mTag;
char *mSymbol;
float *mVector;
size_t mVecLength;
};
size_t FLParam_String(FrameLib_Param_UGen* unit, char*& str, size_t i)
{
size_t length = 0;
Wire **it = unit->mInput + i;
Wire **end = unit->mInput + unit->mNumInputs;
length = (*it++)->mScalarValue;
str = (char *) ft->fRTAlloc(unit->mWorld, sizeof(char) * (length * 3 + 1));
for (size_t j = 0; it != end && j < length; it++, j++)
{
int32 chars = (int32) (*it)->mScalarValue;;
char c;
str[j * 3 + 0] = c = (char) (chars & 0xFF);
str[j * 3 + 1] = c = (char) ((chars >> 0x08) & 0xFF);
str[j * 3 + 2] = c = (char) ((chars >> 0x10) & 0xFF);
}
str[length * 3] = 0;
return unit->mNumInputs - (end - it);
}
void FLParam_Vector(FrameLib_Param_UGen* unit, float*& vec, size_t i)
{
size_t length = 0;
Wire **it = unit->mInput + i;
Wire **end = unit->mInput + unit->mNumInputs;
unit->mVecLength = length = (*it++)->mScalarValue;
vec = (float *) ft->fRTAlloc(unit->mWorld, sizeof(float) * (length + 1));
for (size_t j = 0; it != end && j < length; it++, j++)
vec[j] = (*it)->mScalarValue;
}
void FLParam_Ctor(FrameLib_Param_UGen* unit)
{
unit->mGlobal= &sGlobal;
unit->mTag = nullptr;
unit->mSymbol = nullptr;
unit->mVector = nullptr;
unit->mVecLength = 0;
bool string = unit->mInput[0]->mScalarValue;
size_t pos = FLParam_String(unit, unit->mTag, 1);
if (string)
FLParam_String(unit, unit->mSymbol, pos);
else
FLParam_Vector(unit, unit->mVector, pos);
unit->mCalcFunc = (UnitCalcFunc) &FLTest_CalcZero;
}
void FLParam_Dtor(FrameLib_Param_UGen* unit)
{
using std::vector;
if (unit->mTag)
ft->fRTFree(unit->mWorld, unit->mTag);
unit->mVector.~vector<float>();
if (unit->mSymbol)
ft->fRTFree(unit->mWorld, unit->mSymbol);
}
//////////////////////////////////////////////////////////////////
// Proxies