#include "paramtrans.h"
#include <frams/util/extvalue.h>

void TwoWayMap::printList(const SListTempl<int>& L)
{
for (int i=0;i<L.size();i++)
	{
	int x=L(i);
	if (x>=0) printf("%d",x);
	else printf("x");
	}
}

void TwoWayMap::print()
{
printList(map);
printf("/");
printList(invmap);
}

void TwoWayMap::reset(int size)
{
map.clear(); invmap.clear();
for (int i=0;i<size;i++)
	{
	map.set(i,i);
	invmap.set(i,i);
	}
}

/** @return -2 = out of bounds */
int TwoWayMap::get(int pos)
{
if ((pos<0)||(pos>=map.size())) return -2;
return map(pos);
}

/** @return -2 = out of bounds */
int TwoWayMap::invget(int pos)
{
if ((pos<0)||(pos>=invmap.size())) return -2;
return invmap(pos);
}

void TwoWayMap::insert(int i)
{// map/invmap: 01234/01234 add(1) -> 0-1234/02345
//             1--40-2/406-3 add(1) -> 1---40-2/507-4
map.insert(i,-1);
for (int p=i+1;p<map.size();p++)
	{
	int x=map(p);
	if (x>=0)
		invmap.set(x,p);
	}
}

void TwoWayMap::remove(int i)
{
// map/invmap: 01234/01234 rem(1) -> 0234/0-123
//             1--40-2/406-3 rem(1) -> 1-40-2/305-2
int x=map(i);
if (x>=0) invmap.set(x,-1);
map.remove(i);
for (int p=i;p<map.size();p++)
	{
	int x=map(p);
	if (x>=0)
		invmap.set(x,p);
	}
}

///////////////////////////

ParamTransaction::ParamTransaction(MutableParamInterface &mpi)
	:par(mpi)
{
panode=par.onadd.add(STATRICKCALLBACK(this,&ParamTransaction::onPropAdd,0));
pdnode=par.ondelete.add(STATRICKCALLBACK(this,&ParamTransaction::onPropDelete,0));
pcnode=par.onchange.add(STATRICKCALLBACK(this,&ParamTransaction::onPropChange,0));
ganode=par.ongroupadd.add(STATRICKCALLBACK(this,&ParamTransaction::onGroupAdd,0));
gdnode=par.ongroupdelete.add(STATRICKCALLBACK(this,&ParamTransaction::onGroupDelete,0));
gcnode=par.ongroupchange.add(STATRICKCALLBACK(this,&ParamTransaction::onGroupChange,0));
reset();
}

ParamTransaction::~ParamTransaction()
{
par.onadd.removeNode(panode);
par.ondelete.removeNode(pdnode);
par.onchange.removeNode(pcnode);
par.ongroupadd.removeNode(ganode);
par.ongroupdelete.removeNode(gdnode);
par.ongroupchange.removeNode(gcnode);
}

void ParamTransaction::reset()
{
resetMaps();
changed=false;
grchanged=false;
}

void ParamTransaction::onPropAdd(void* data,intptr_t i)
{
propmap.insert((int)i);
changed=true;
}

void ParamTransaction::onPropDelete(void* data,intptr_t i)
{
propmap.remove((int)i);
changed=true;
}

void ParamTransaction::onGroupAdd(void* data,intptr_t i)
{
groupmap.insert((int)i);
grchanged=true;
}

void ParamTransaction::onGroupDelete(void* data,intptr_t i)
{
groupmap.remove((int)i);
grchanged=true;
}

void ParamTransaction::onPropChange(void* data,intptr_t i)
{
changed=true;
}

void ParamTransaction::onGroupChange(void* data,intptr_t i)
{
grchanged=true;
}

void ParamTransaction::resetMaps()
{
propmap.reset(par.getPropCount());
groupmap.reset(par.getGroupCount());
}

int ParamTransaction::propertyPosition(int prop)
{return propmap.invget(prop);}

int ParamTransaction::groupPosition(int group)
{return groupmap.invget(group);}

const char * ParamTransaction::id(int i)
{
i=propertyPosition(i);
if (i==-2) return 0;
if (i>=0) return par.id(i); else return "?";
}

const char * ParamTransaction::name(int i)
{
i=propertyPosition(i);
if (i==-2) return 0;
if (i>=0) return par.name(i); else return "?";
}

const char * ParamTransaction::type(int i)
{
i=propertyPosition(i);
if (i==-2) return 0;
if (i>=0) return par.type(i); else return "?";
}

const char * ParamTransaction::help(int i)
{
i=propertyPosition(i);
return (i>=0)?par.help(i):0;
}

int ParamTransaction::flags(int i)
{
i=propertyPosition(i);
return (i>=0)?par.flags(i):0;
}

int ParamTransaction::group(int i)
{
i=propertyPosition(i);
return (i>=0)?par.group(i):0;
}

const char * ParamTransaction::grname(int i)
{
i=groupPosition(i);
if (i==-2) return 0;
return (i>=0)?par.grname(i):"?";
}

int ParamTransaction::grmember(int g, int i)
{
g=groupPosition(g);
if (g<0) return -9999;
for(int p=0;p<getPropCount();p++)
	if (group(p)==g)
		if (!i--) 
			return p;
return -9999;
}

void ParamTransaction::call(int i, ExtValue *a, ExtValue *b)
{
i=propertyPosition(i);
if (i>=0) par.call(i,a,b);
}

SString ParamTransaction::getString(int i)
{
i=propertyPosition(i);
return (i>=0)?par.getString(i):SString();
}

paInt ParamTransaction::getInt(int i)
{
i=propertyPosition(i);
return (i>=0)?par.getInt(i):0;
}

double ParamTransaction::getDouble(int i)
{
i=propertyPosition(i);
return (i>=0)?par.getDouble(i):0;
}

ExtObject ParamTransaction::getObject(int i)
{
i=propertyPosition(i);
return (i>=0)?par.getObject(i):ExtObject();
}

ExtValue ParamTransaction::getExtValue(int i)
{
i=propertyPosition(i);
return (i>=0)?par.getExtValue(i):ExtValue();
}

int ParamTransaction::setInt(int i, paInt v)
{
i=propertyPosition(i);
return (i>=0)?par.setInt(i,v):PSET_NOPROPERTY;
}

int ParamTransaction::setDouble(int i, double v)
{
i=propertyPosition(i);
return (i>=0)?par.setDouble(i,v):PSET_NOPROPERTY;
}

int ParamTransaction::setString(int i, const SString &v)
{
i=propertyPosition(i);
return (i>=0)?par.setString(i,v):PSET_NOPROPERTY;
}

int ParamTransaction::setObject(int i, const ExtObject &v)
{
i=propertyPosition(i);
return (i>=0)?par.setObject(i,v):PSET_NOPROPERTY;
}

int ParamTransaction::setExtValue(int i, const ExtValue &v)
{
i=propertyPosition(i);
return (i>=0)?par.setExtValue(i,v):PSET_NOPROPERTY;
}