linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

- do not check running state for changing evvontroller parameters

Browse Source
This commit is contained in:
zolliker
2012-06-19 06:55:40 +00:00
parent 23f539a449
commit dd1dba8298
1 changed files with 20 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
evcontroller.c
View File

@ -920,19 +920,32 @@ int EVCGetPar(pEVControl self, char *name, float *fVal)
int EVCSetPar(pEVControl self, char *name, float fVal, SConnection * pCon) int EVCSetPar(pEVControl self, char *name, float fVal, SConnection * pCon)
{ {
ObPar *pPar = NULL; ObPar *pPar = NULL;
char pBueffel[512];
int iRet, savedStatus; int iRet, savedStatus;
assert(self); assert(self);
assert(pCon); assert(pCon);
savedStatus = GetStatus(); /* fool status check in ObParSet (avoid "Cannot change parameter while running" message */ /* find the parameter */
SetStatus(eBatch); pPar = ObParFind(self->pParam, name);
iRet = ObParSet(self->pParam, self->pName, name, fVal, pCon); if (pPar == NULL) {
SetStatus(savedStatus); SCPrintf(pCon, eError, "ERROR: %s.%s parameter not found",
if (!iRet) { self->pName, name);
return iRet; return 0;
} }
/* DO NOT CHECK RUNNING STATE, this is not needed */
/* check permission */
if (!SCMatchRights(pCon, pPar->iCode)) {
SCPrintf(pCon, eError, "ERROR: Insufficient privilege to change %s.%s",
self->pName, name);
return 0;
}
/* passed all tests: do It! */
pPar->fVal = fVal;
iRet = 1;
if (self->iTcl) { if (self->iTcl) {
iRet = UpdateTclVariable(self->pDriv, name, fVal); iRet = UpdateTclVariable(self->pDriv, name, fVal);
} }