bool INDI::LightBoxInterface::snoopLightBox(XMLEle *root)
{
if (isDimmable == false)
return false;
XMLEle *ep = nullptr;
const char *propName = findXMLAttValu(root, "name");
if (FilterIntensityN == nullptr && !strcmp(propName, "FILTER_NAME"))
{
for (ep = nextXMLEle(root, 1); ep != nullptr; ep = nextXMLEle(root, 0))
{
// If new, add.
addFilterDuration(pcdataXMLEle(ep), 0);
}
device->defineNumber(&FilterIntensityNP);
char errmsg[MAXRBUF];
IUReadConfig(nullptr, device->getDeviceName(), "FLAT_LIGHT_FILTER_INTENSITY", 1, errmsg);
if (device->isConnected())
{
if (currentFilterSlot < FilterIntensityNP.nnp)
{
double duration = FilterIntensityN[currentFilterSlot].value;
if (duration > 0)
SetLightBoxBrightness(duration);
}
}
}
else if (!strcmp(propName, "FILTER_SLOT"))
{
// Only accept IPS_OK/IPS_IDLE state
if (strcmp(findXMLAttValu(root, "state"), "Ok") && strcmp(findXMLAttValu(root, "state"), "Idle"))
return false;
for (ep = nextXMLEle(root, 1); ep != nullptr; ep = nextXMLEle(root, 0))
{
const char *elemName = findXMLAttValu(ep, "name");
if (!strcmp(elemName, "FILTER_SLOT_VALUE"))
{
currentFilterSlot = atoi(pcdataXMLEle(ep)) - 1;
break;
}
}
if (FilterIntensityN && device->isConnected())
{
if (currentFilterSlot < FilterIntensityNP.nnp)
{
double duration = FilterIntensityN[currentFilterSlot].value;
if (duration > 0)
SetLightBoxBrightness(duration);
}
}
}
return false;
}
bool INDI::Weather::ISSnoopDevice(XMLEle *root)
{
XMLEle *ep = nullptr;
const char *propName = findXMLAttValu(root, "name");
if (isConnected())
{
if (!strcmp(propName, "GEOGRAPHIC_COORD"))
{
// Only accept IPS_OK state
if (strcmp(findXMLAttValu(root, "state"), "Ok"))
return false;
double longitude = -1, latitude = -1, elevation = -1;
for (ep = nextXMLEle(root, 1); ep != nullptr; ep = nextXMLEle(root, 0))
{
const char *elemName = findXMLAttValu(ep, "name");
if (!strcmp(elemName, "LAT"))
latitude = atof(pcdataXMLEle(ep));
else if (!strcmp(elemName, "LONG"))
longitude = atof(pcdataXMLEle(ep));
else if (!strcmp(elemName, "ELEV"))
elevation = atof(pcdataXMLEle(ep));
}
return processLocationInfo(latitude, longitude, elevation);
}
}
return DefaultDevice::ISSnoopDevice(root);
}
/* read more from the given client, send to each appropriate driver when see
* xml closure. also send all newXXX() to all other interested clients.
* shut down client if any trouble.
*/
static void
clientMsg (ClInfo *cp)
{
char buf[BUFSZ];
int i, nr;
/* read client */
nr = read (cp->s, buf, sizeof(buf));
if (nr < 0) {
fprintf (stderr, "Client %d: %s\n", cp->s, strerror(errno));
shutdownClient (cp);
return;
}
if (nr == 0) {
if (verbose)
fprintf (stderr, "Client %d: read EOF\n", cp->s);
shutdownClient (cp);
return;
}
if (verbose > 2)
fprintf (stderr, "Client %d: read %d:\n%.*s", cp->s, nr, nr, buf);
/* process XML, sending when find closure */
for (i = 0; i < nr; i++) {
char err[1024];
XMLEle *root = readXMLEle (cp->lp, buf[i], err);
if (root) {
char *roottag = tagXMLEle(root);
if (verbose > 1)
fprintf (stderr, "Client %d: read %s\n", cp->s,
xmlLog(root));
/* record BLOB message locally, others go to matching drivers */
if (!strcmp (roottag, "enableBLOB")) {
cp->blob = crackBLOB (pcdataXMLEle(root));
delXMLEle (root);
} else {
char *dev = findXMLAttValu (root, "device");
/* snag interested devices */
if (!strcmp (roottag, "getProperties"))
addClDevice (cp, dev);
/* send message to driver(s) responsible for dev */
send2Drivers (root, dev);
/* echo new* commands back to other clients, else done */
if (!strncmp (roottag, "new", 3))
send2Clients (cp, root, dev); /* does delXMLEle */
else
delXMLEle (root);
}
} else if (err[0])
fprintf (stderr, "Client %d: %s\n", cp->s, err);
}
}
/* print key attributes and values of the given xml to stderr.
*/
void
traceMsg (XMLEle *root)
{
static const char *prtags[] = {
"defNumber", "oneNumber",
"defText", "oneText",
"defSwitch", "oneSwitch",
"defLight", "oneLight",
};
XMLEle *e;
const char *msg, *perm, *pcd;
unsigned int i;
/* print tag header */
fprintf (stderr, "%s %s %s %s", tagXMLEle(root),
findXMLAttValu(root,"device"),
findXMLAttValu(root,"name"),
findXMLAttValu(root,"state"));
pcd = pcdataXMLEle (root);
if (pcd[0])
fprintf (stderr, " %s", pcd);
perm = findXMLAttValu(root,"perm");
if (perm[0])
fprintf (stderr, " %s", perm);
msg = findXMLAttValu(root,"message");
if (msg[0])
fprintf (stderr, " '%s'", msg);
/* print each array value */
for (e = nextXMLEle(root,1); e; e = nextXMLEle(root,0))
for (i = 0; i < sizeof(prtags)/sizeof(prtags[0]); i++)
if (strcmp (prtags[i], tagXMLEle(e)) == 0)
fprintf (stderr, "\n %10s='%s'", findXMLAttValu(e,"name"),
pcdataXMLEle (e));
fprintf (stderr, "\n");
}
bool WeatherMeta::ISSnoopDevice(XMLEle *root)
{
const char *propName = findXMLAttValu(root, "name");
const char *deviceName = findXMLAttValu(root, "device");
if (isConnected())
{
if (strcmp(propName, "WEATHER_STATUS") == 0)
{
for (int i = 0; i < 4; i++)
{
if (ActiveDeviceT[i].text != nullptr && strcmp(ActiveDeviceT[i].text, deviceName) == 0)
{
IPState stationState;
if (crackIPState(findXMLAttValu(root, "state"), &stationState) < 0)
break;
StationL[i].s = stationState;
updateOverallState();
break;
}
}
return true;
}
if (strcmp(propName, "WEATHER_UPDATE") == 0)
{
XMLEle *ep = nextXMLEle(root, 1);
for (int i = 0; i < 4; i++)
{
if (ActiveDeviceT[i].text != nullptr && strcmp(ActiveDeviceT[i].text, deviceName) == 0)
{
updatePeriods[i] = atof(pcdataXMLEle(ep));
updateUpdatePeriod();
break;
}
}
}
}
return INDI::DefaultDevice::ISSnoopDevice(root);
}
/* read more from the given driver, send to each interested client when see
* xml closure. if driver dies, try restarting.
* return 0 if ok else -1 if had to shut down anything.
*/
int
readFromDriver (DvrInfo *dp)
{
char buf[MAXRBUF];
int shutany = 0;
ssize_t i, nr;
/* read driver */
nr = read (dp->rfd, buf, sizeof(buf));
if (nr <= 0) {
if (nr < 0)
fprintf (stderr, "%s: Driver %s: stdin %s\n", indi_tstamp(NULL),
dp->name, strerror(errno));
else
fprintf (stderr, "%s: Driver %s: stdin EOF\n",
indi_tstamp(NULL), dp->name);
shutdownDvr (dp, 1);
return (-1);
}
/* process XML, sending when find closure */
for (i = 0; i < nr; i++)
{
char err[1024];
XMLEle *root = readXMLEle (dp->lp, buf[i], err);
if (root)
{
char *roottag = tagXMLEle(root);
const char *dev = findXMLAttValu (root, "device");
const char *name = findXMLAttValu (root, "name");
int isblob = !strcmp (tagXMLEle(root), "setBLOBVector");
Msg *mp;
if (verbose > 2)
{
fprintf(stderr, "%s: Driver %s: read ", indi_tstamp(0),dp->name);
traceMsg (root);
} else if (verbose > 1) {
fprintf (stderr, "%s: Driver %s: read <%s device='%s' name='%s'>\n",
indi_tstamp(NULL), dp->name, tagXMLEle(root),
findXMLAttValu (root, "device"),
findXMLAttValu (root, "name"));
}
/* that's all if driver is just registering a snoop */
if (!strcmp (roottag, "getProperties"))
{
addSDevice (dp, dev, name);
delXMLEle (root);
continue;
}
/* that's all if driver is just registering a BLOB mode */
if (!strcmp (roottag, "enableBLOB"))
{
Property *sp = findSDevice (dp, dev, name);
if (sp)
crackBLOB (pcdataXMLEle (root), &sp->blob);
delXMLEle (root);
continue;
}
/* Found a new device? Let's add it to driver info */
if (dev[0] && isDeviceInDriver(dev, dp) == 0)
{
dp->dev = (char **) realloc(dp->dev, (dp->ndev+1) * sizeof(char *));
dp->dev[dp->ndev] = (char *) malloc(MAXINDIDEVICE * sizeof(char));
strncpy (dp->dev[dp->ndev], dev, MAXINDIDEVICE-1);
dp->dev[dp->ndev][MAXINDIDEVICE-1] = '\0';
#ifdef OSX_EMBEDED_MODE
if (!dp->ndev)
fprintf(stderr, "STARTED \"%s\"\n", dp->name); fflush(stderr);
#endif
dp->ndev++;
}
/* log messages if any and wanted */
if (ldir)
logDMsg (root, dev);
/* build a new message -- set content iff anyone cares */
mp = newMsg();
/* send to interested clients */
if (q2Clients (NULL, isblob, dev, name, mp, root) < 0)
shutany++;
/* send to snooping drivers */
q2SDrivers (isblob, dev, name, mp, root);
/* set message content if anyone cares else forget it */
if (mp->count > 0)
setMsgXMLEle (mp, root);
else
freeMsg (mp);
delXMLEle (root);
} else if (err[0]) {
char *ts = indi_tstamp(NULL);
fprintf (stderr, "%s: Driver %s: XML error: %s\n", ts,
dp->name, err);
fprintf (stderr, "%s: Driver %s: XML read: %.*s\n", ts,
dp->name, (int)nr, buf);
shutdownDvr (dp, 1);
return (-1);
}
}
return (shutany ? -1 : 0);
}
/* read more from the given client, send to each appropriate driver when see
* xml closure. also send all newXXX() to all other interested clients.
* return -1 if had to shut down anything, else 0.
*/
int
readFromClient (ClInfo *cp)
{
char buf[MAXRBUF];
int shutany = 0;
ssize_t i, nr;
/* read client */
nr = read (cp->s, buf, sizeof(buf));
if (nr <= 0) {
if (nr < 0)
fprintf (stderr, "%s: Client %d: read: %s\n", indi_tstamp(NULL),
cp->s, strerror(errno));
else if (verbose > 0)
fprintf (stderr, "%s: Client %d: read EOF\n", indi_tstamp(NULL),
cp->s);
shutdownClient (cp);
return (-1);
}
/* process XML, sending when find closure */
for (i = 0; i < nr; i++) {
char err[1024];
XMLEle *root = readXMLEle (cp->lp, buf[i], err);
if (root) {
char *roottag = tagXMLEle(root);
const char *dev = findXMLAttValu (root, "device");
const char *name = findXMLAttValu (root, "name");
int isblob = !strcmp (tagXMLEle(root), "setBLOBVector");
Msg *mp;
if (verbose > 2) {
fprintf (stderr, "%s: Client %d: read ",indi_tstamp(NULL),cp->s);
traceMsg (root);
} else if (verbose > 1) {
fprintf (stderr, "%s: Client %d: read <%s device='%s' name='%s'>\n",
indi_tstamp(NULL), cp->s, tagXMLEle(root),
findXMLAttValu (root, "device"),
findXMLAttValu (root, "name"));
}
/* snag interested properties.
* N.B. don't open to alldevs if seen specific dev already, else
* remote client connections start returning too much.
*/
if (dev[0])
addClDevice (cp, dev, name, isblob);
else if (!strcmp (roottag, "getProperties") && !cp->nprops)
cp->allprops = 1;
/* snag enableBLOB -- send to remote drivers too */
if (!strcmp (roottag, "enableBLOB"))
// crackBLOB (pcdataXMLEle(root), &cp->blob);
crackBLOBHandling (dev, name, pcdataXMLEle(root), cp);
/* build a new message -- set content iff anyone cares */
mp = newMsg();
/* send message to driver(s) responsible for dev */
q2RDrivers (dev, mp, root);
/* echo new* commands back to other clients */
if (!strncmp (roottag, "new", 3)) {
if (q2Clients (cp, isblob, dev, name, mp, root) < 0)
shutany++;
}
/* set message content if anyone cares else forget it */
if (mp->count > 0)
setMsgXMLEle (mp, root);
else
freeMsg (mp);
delXMLEle (root);
} else if (err[0]) {
char *ts = indi_tstamp(NULL);
fprintf (stderr, "%s: Client %d: XML error: %s\n", ts,
cp->s, err);
fprintf (stderr, "%s: Client %d: XML read: %.*s\n", ts,
cp->s, (int)nr, buf);
shutdownClient (cp);
return (-1);
}
}
return (shutany ? -1 : 0);
}
/* pull apart the name and value from the given message, and set operand value.
* ignore any other messages.
* return 0 if found a recognized operand else -1
*/
static int
setOp (XMLEle *root)
{
char *t = tagXMLEle (root);
const char *d = findXMLAttValu (root, "device");
const char *n = findXMLAttValu (root, "name");
int nset = 0;
double v;
char prop[1024];
XMLEle *ep;
/* check values */
if (!strcmp (t,"defNumberVector") || !strcmp (t,"setNumberVector")) {
for (ep = nextXMLEle(root,1); ep; ep = nextXMLEle(root,0)) {
char *et = tagXMLEle(ep);
if (!strcmp (et,"defNumber") || !strcmp (et,"oneNumber")) {
sprintf (prop, "%s.%s.%s", d, n, findXMLAttValu(ep,"name"));
v = atof(pcdataXMLEle(ep));
if (setOperand (prop, v) == 0) {
nset++;
if (oflag)
fprintf (stderr, "%s=%g\n", prop, v);
}
}
}
} else if(!strcmp(t,"defSwitchVector") || !strcmp(t,"setSwitchVector")){
for (ep = nextXMLEle(root,1); ep; ep = nextXMLEle(root,0)) {
char *et = tagXMLEle(ep);
if (!strcmp (et,"defSwitch") || !strcmp (et,"oneSwitch")) {
sprintf (prop, "%s.%s.%s", d, n, findXMLAttValu(ep,"name"));
v = (double)!strcmp(pcdataXMLEle(ep),"On");
if (setOperand (prop, v) == 0) {
nset++;
if (oflag)
fprintf (stderr, "%s=%g\n", prop, v);
}
}
}
} else if(!strcmp(t,"defLightVector") || !strcmp(t,"setLightVector")){
for (ep = nextXMLEle(root,1); ep; ep = nextXMLEle(root,0)) {
char *et = tagXMLEle(ep);
if (!strcmp (et,"defLight") || !strcmp (et,"oneLight")) {
sprintf (prop, "%s.%s.%s", d, n, findXMLAttValu(ep,"name"));
v = (double)pstatestr(pcdataXMLEle(ep));
if (setOperand (prop, v) == 0) {
nset++;
if (oflag)
fprintf (stderr, "%s=%g\n", prop, v);
}
}
}
}
/* check special elements */
t = (char *) findXMLAttValu (root, "state");
if (t[0]) {
sprintf (prop, "%s.%s._STATE", d, n);
v = (double)pstatestr(t);
if (setOperand (prop, v) == 0) {
nset++;
if (oflag)
fprintf (stderr, "%s=%g\n", prop, v);
}
}
t = (char *) findXMLAttValu (root, "timestamp");
if (t[0]) {
sprintf (prop, "%s.%s._TS", d, n);
v = (double)timestamp(t);
if (setOperand (prop, v) == 0) {
nset++;
if (oflag)
fprintf (stderr, "%s=%g\n", prop, v);
}
}
/* return whether any were set */
return (nset > 0 ? 0 : -1);
}
bool Controller::ISSnoopDevice(XMLEle * root)
{
XMLEle * ep=NULL;
double mag=0, angle=0;
// If joystick is disabled, do not process anything.
if (UseJoystickSP.sp[0].s == ISS_OFF)
return false;
const char * propName = findXMLAttValu(root, "name");
// Check axis
if (!strcmp("JOYSTICK_AXIS", propName))
{
for (ep = nextXMLEle(root, 1) ; ep != NULL ; ep = nextXMLEle(root, 0))
{
const char * elemName = findXMLAttValu(ep, "name");
const char * setting = getControllerSetting(elemName);
if (setting == NULL)
return false;
mag = atof(pcdataXMLEle(ep));
axisCallbackFunc(setting, mag, device);
}
}
// Check buttons
else if (!strcmp("JOYSTICK_BUTTONS", propName))
{
for (ep = nextXMLEle(root, 1) ; ep != NULL ; ep = nextXMLEle(root, 0))
{
const char * elemName = findXMLAttValu(ep, "name");
const char * setting = getControllerSetting(elemName);
if (setting == NULL)
continue;
buttonCallbackFunc(setting, strcmp(pcdataXMLEle(ep), "Off") ? ISS_ON : ISS_OFF, device);
}
}
// Check joysticks
else if (strstr(propName, "JOYSTICK_"))
{
const char * setting = getControllerSetting(propName);
// We don't have this here, so let's not process it
if (setting == NULL)
return false;
for (ep = nextXMLEle(root, 1) ; ep != NULL ; ep = nextXMLEle(root, 0))
{
if (!strcmp("JOYSTICK_MAGNITUDE", findXMLAttValu(ep, "name")))
mag = atof(pcdataXMLEle(ep));
else if (!strcmp("JOYSTICK_ANGLE", findXMLAttValu(ep, "name")))
angle = atof(pcdataXMLEle(ep));
}
joystickCallbackFunc(setting, mag, angle, device);
}
return false;
}
