internal See2Context MakeEscFreq(ModelPpm model, int numMasked, out int escFreq)
{
See2Context psee2C;
int numStats = NumStats;
int nonMasked = numStats - numMasked;
if (numStats != 256)
{
PpmContext suff = GetTempPpmContext(model.Heap);
suff.Address = GetSuffix();
int idx1 = model.GetNs2Indx()[nonMasked - 1];
int idx2 = 0;
idx2 += ((nonMasked < suff.NumStats - numStats) ? 1 : 0);
idx2 += 2 * ((_freqData.SummFreq < 11 * numStats) ? 1 : 0);
idx2 += 4 * ((numMasked > nonMasked) ? 1 : 0);
idx2 += model.HiBitsFlag;
psee2C = model.GetSee2Cont()[idx1][idx2];
escFreq = psee2C.Mean;
}
else
{
psee2C = model.DummySee2Cont;
escFreq = 1;
}
return(psee2C);
}
private See2Context MakeEscFreq2(ModelPpm model, int diff)
{
See2Context psee2C;
int numStats = NumStats;
if (numStats != 256)
{
PpmContext suff = GetTempPpmContext(model.Heap);
suff.Address = GetSuffix();
int idx1 = model.GetNs2Indx()[diff - 1];
int idx2 = 0;
idx2 += ((diff < suff.NumStats - numStats) ? 1 : 0);
idx2 += 2 * ((_freqData.SummFreq < 11 * numStats) ? 1 : 0);
idx2 += 4 * ((model.NumMasked > diff) ? 1 : 0);
idx2 += model.HiBitsFlag;
psee2C = model.GetSee2Cont()[idx1][idx2];
model.Coder.SubRange.Scale = psee2C.Mean;
}
else
{
psee2C = model.DummySee2Cont;
model.Coder.SubRange.Scale = 1;
}
return(psee2C);
}
internal void update1_0(ModelPpm model, int p)
{
model.FoundState.Address = p;
model.PrevSuccess = 2 * model.FoundState.Freq > _freqData.SummFreq ? 1 : 0;
model.IncRunLength(model.PrevSuccess);
_freqData.IncrementSummFreq(4);
model.FoundState.IncrementFreq(4);
if (model.FoundState.Freq > ModelPpm.MAX_FREQ)
{
Rescale(model);
}
}
internal int GetArrayIndex(ModelPpm model, State rs)
{
PpmContext tempSuffix = GetTempPpmContext(model.SubAlloc.Heap);
tempSuffix.Address = GetSuffix();
int ret = 0;
ret += model.PrevSuccess;
ret += model.GetNs2BsIndx()[tempSuffix.NumStats - 1];
ret += model.HiBitsFlag + 2 * model.GetHb2Flag()[rs.Symbol];
ret += ((Utility.URShift(model.RunLength, 26)) & 0x20);
return(ret);
}
internal int CreateChild(ModelPpm model, State pStats, StateRef firstState)
{
PpmContext pc = GetTempPpmContext(model.SubAlloc.Heap);
pc.Address = model.SubAlloc.AllocContext();
if (pc != null)
{
pc.NumStats = 1;
pc.SetOneState(firstState);
pc.SetSuffix(this);
pStats.SetSuccessor(pc);
}
return(pc.Address);
}
internal void Update2(ModelPpm model, int p)
{
State temp = _tempState5.Initialize(model.Heap);
temp.Address = p;
model.FoundState.Address = p;
model.FoundState.IncrementFreq(4);
_freqData.IncrementSummFreq(4);
if (temp.Freq > ModelPpm.MAX_FREQ)
{
Rescale(model);
}
model.IncEscCount(1);
model.RunLength = model.InitRl;
}
// public static void ppmdSwap(ModelPPM model, StatePtr state1, StatePtr state2)
// {
// byte[] bytes = model.getSubAlloc().getHeap();
// int p1 = state1.Address;
// int p2 = state2.Address;
//
// for (int i = 0; i < StatePtr.size; i++) {
// byte temp = bytes[p1+i];
// bytes[p1+i] = bytes[p2+i];
// bytes[p2+i] = temp;
// }
// state1.Address=p1);
// state2.Address=p2);
// }
internal void Update1(ModelPpm model, int p)
{
model.FoundState.Address = p;
model.FoundState.IncrementFreq(4);
_freqData.IncrementSummFreq(4);
State p0 = _tempState3.Initialize(model.Heap);
State p1 = _tempState4.Initialize(model.Heap);
p0.Address = p;
p1.Address = p - State.SIZE;
if (p0.Freq > p1.Freq)
{
State.PpmdSwap(p0, p1);
model.FoundState.Address = p1.Address;
if (p1.Freq > ModelPpm.MAX_FREQ)
{
Rescale(model);
}
}
}
internal void DecodeBinSymbol(ModelPpm model)
{
State rs = _tempState1.Initialize(model.Heap);
rs.Address = _oneState.Address; // State&
model.HiBitsFlag = model.GetHb2Flag()[model.FoundState.Symbol];
int off1 = rs.Freq - 1;
int off2 = GetArrayIndex(model, rs);
int bs = model.BinSumm[off1][off2];
if (model.Coder.GetCurrentShiftCount(ModelPpm.TOT_BITS) < bs)
{
model.FoundState.Address = rs.Address;
rs.IncrementFreq((rs.Freq < 128) ? 1 : 0);
model.Coder.SubRange.LowCount = 0;
model.Coder.SubRange.HighCount = bs;
bs = ((bs + ModelPpm.INTERVAL - GetMean(bs, ModelPpm.PERIOD_BITS, 2)) & 0xffff);
model.BinSumm[off1][off2] = bs;
model.PrevSuccess = 1;
model.IncRunLength(1);
}
else
{
model.Coder.SubRange.LowCount = bs;
bs = (bs - GetMean(bs, ModelPpm.PERIOD_BITS, 2)) & 0xFFFF;
model.BinSumm[off1][off2] = bs;
model.Coder.SubRange.HighCount = ModelPpm.BIN_SCALE;
model.InitEsc = EXP_ESCAPE[Utility.URShift(bs, 10)];
model.NumMasked = 1;
model.CharMask[rs.Symbol] = model.EscCount;
model.PrevSuccess = 0;
model.FoundState.Address = 0;
}
//int a = 0;//TODO just 4 debugging
}
internal bool DecodeSymbol1(ModelPpm model)
{
RangeCoder coder = model.Coder;
coder.SubRange.Scale = _freqData.SummFreq;
State p = new State(model.Heap);
p.Address = _freqData.GetStats();
int i, hiCnt;
long count = coder.CurrentCount;
if (count >= coder.SubRange.Scale)
{
return(false);
}
if (count < (hiCnt = p.Freq))
{
coder.SubRange.HighCount = hiCnt;
model.PrevSuccess = (2 * hiCnt > coder.SubRange.Scale) ? 1 : 0;
model.IncRunLength(model.PrevSuccess);
hiCnt += 4;
model.FoundState.Address = p.Address;
model.FoundState.Freq = hiCnt;
_freqData.IncrementSummFreq(4);
if (hiCnt > ModelPpm.MAX_FREQ)
{
Rescale(model);
}
coder.SubRange.LowCount = 0;
return(true);
}
if (model.FoundState.Address == 0)
{
return(false);
}
model.PrevSuccess = 0;
int numStats = NumStats;
i = numStats - 1;
while ((hiCnt += p.IncrementAddress().Freq) <= count)
{
if (--i == 0)
{
model.HiBitsFlag = model.GetHb2Flag()[model.FoundState.Symbol];
coder.SubRange.LowCount = hiCnt;
model.CharMask[p.Symbol] = model.EscCount;
model.NumMasked = numStats;
i = numStats - 1;
model.FoundState.Address = 0;
do
{
model.CharMask[p.DecrementAddress().Symbol] = model.EscCount;
}while (--i != 0);
coder.SubRange.HighCount = coder.SubRange.Scale;
return(true);
}
}
coder.SubRange.LowCount = hiCnt - p.Freq;
coder.SubRange.HighCount = hiCnt;
Update1(model, p.Address);
return(true);
}
internal bool DecodeSymbol2(ModelPpm model)
{
long count;
int hiCnt, i = NumStats - model.NumMasked;
See2Context psee2C = MakeEscFreq2(model, i);
RangeCoder coder = model.Coder;
// STATE* ps[256], ** pps=ps, * p=U.Stats-1;
State p = _tempState1.Initialize(model.Heap);
State temp = _tempState2.Initialize(model.Heap);
p.Address = _freqData.GetStats() - State.SIZE;
int pps = 0;
hiCnt = 0;
do
{
do
{
p.IncrementAddress(); // p++;
}while (model.CharMask[p.Symbol] == model.EscCount);
hiCnt += p.Freq;
_ps[pps++] = p.Address;
}while (--i != 0);
coder.SubRange.IncScale(hiCnt);
count = coder.CurrentCount;
if (count >= coder.SubRange.Scale)
{
return(false);
}
pps = 0;
p.Address = _ps[pps];
if (count < hiCnt)
{
hiCnt = 0;
while ((hiCnt += p.Freq) <= count)
{
p.Address = _ps[++pps]; // p=*++pps;
}
coder.SubRange.HighCount = hiCnt;
coder.SubRange.LowCount = hiCnt - p.Freq;
psee2C.Update();
Update2(model, p.Address);
}
else
{
coder.SubRange.LowCount = hiCnt;
coder.SubRange.HighCount = coder.SubRange.Scale;
i = NumStats - model.NumMasked; // ->NumMasked;
pps--;
do
{
temp.Address = _ps[++pps]; // (*++pps)
model.CharMask[temp.Symbol] = model.EscCount;
}while (--i != 0);
psee2C.IncSumm((int)coder.SubRange.Scale);
model.NumMasked = NumStats;
}
return(true);
}
internal void Rescale(ModelPpm model)
{
int oldNs = NumStats, i = NumStats - 1, adder, escFreq;
// STATE* p1, * p;
State p1 = new State(model.Heap);
State p = new State(model.Heap);
State temp = new State(model.Heap);
for (p.Address = model.FoundState.Address; p.Address != _freqData.GetStats(); p.DecrementAddress())
{
temp.Address = p.Address - State.SIZE;
State.PpmdSwap(p, temp);
}
temp.Address = _freqData.GetStats();
temp.IncrementFreq(4);
_freqData.IncrementSummFreq(4);
escFreq = _freqData.SummFreq - p.Freq;
adder = (model.OrderFall != 0) ? 1 : 0;
p.Freq = Utility.URShift((p.Freq + adder), 1);
_freqData.SummFreq = p.Freq;
do
{
p.IncrementAddress();
escFreq -= p.Freq;
p.Freq = Utility.URShift((p.Freq + adder), 1);
_freqData.IncrementSummFreq(p.Freq);
temp.Address = p.Address - State.SIZE;
if (p.Freq > temp.Freq)
{
p1.Address = p.Address;
StateRef tmp = new StateRef();
tmp.Values = p1;
State temp2 = new State(model.Heap);
State temp3 = new State(model.Heap);
do
{
// p1[0]=p1[-1];
temp2.Address = p1.Address - State.SIZE;
p1.SetValues(temp2);
p1.DecrementAddress();
temp3.Address = p1.Address - State.SIZE;
}while (p1.Address != _freqData.GetStats() && tmp.Freq > temp3.Freq);
p1.SetValues(tmp);
}
}while (--i != 0);
if (p.Freq == 0)
{
do
{
i++;
p.DecrementAddress();
}while (p.Freq == 0);
escFreq += i;
NumStats = NumStats - i;
if (NumStats == 1)
{
StateRef tmp = new StateRef();
temp.Address = _freqData.GetStats();
tmp.Values = temp;
// STATE tmp=*U.Stats;
do
{
// tmp.Freq-=(tmp.Freq >> 1)
tmp.DecrementFreq(Utility.URShift(tmp.Freq, 1));
escFreq = Utility.URShift(escFreq, 1);
}while (escFreq > 1);
model.SubAlloc.FreeUnits(_freqData.GetStats(), Utility.URShift((oldNs + 1), 1));
_oneState.SetValues(tmp);
model.FoundState.Address = _oneState.Address;
return;
}
}
escFreq -= Utility.URShift(escFreq, 1);
_freqData.IncrementSummFreq(escFreq);
int n0 = Utility.URShift((oldNs + 1), 1), n1 = Utility.URShift((NumStats + 1), 1);
if (n0 != n1)
{
_freqData.SetStats(model.SubAlloc.ShrinkUnits(_freqData.GetStats(), n0, n1));
}
model.FoundState.Address = _freqData.GetStats();
}
