/** * @return void * @param * @param * @desc Remote or local exec. Either exectues it locally or calles remote exec depending on whether $syncserver is localhost or not. */ function rl_exec($masterserver, $slaveserver, $cmd) { global $gbl, $sgbl, $login, $ghtml; // Convert to driverapp here. Only here do we have the full information (masterserver/syncserver) to to get the syntosystem class properly. if ($cmd->action === "set" || $cmd->action === 'dowas') { $robject = $cmd->robject; $clo = myclone($robject); //dprint("Just before $robject {$robject->nname} " . $robject->domain_l . "<br> "); lxclass::clearChildrenAndParent($clo); $clo->syncserver = $slaveserver; $clo->createSyncClass(); //dprint("Just after $robject {$robject->nname} " . $robject->domain_l . "<br> "); $cmd->robject = $clo; } if (!$masterserver || $masterserver === "localhost") { $cmd->slaveserver = null; if (!isset($gbl->pserver_password) && isset($cmd->slave_password)) { $gbl->pserver_password = $cmd->slave_password; } $result = remote_exec($slaveserver, $cmd); } else { $cmd->slaveserver = $slaveserver; $result = remote_exec($masterserver, $cmd); } return $result; }
function dprintr($var, $type = 0) { global $sgbl; if ($type > $sgbl->dbg) { return; } if (is_object($var) && method_exists($var, "clearChildrenAndParent")) { $newvar = myclone($var); lxclass::clearChildrenAndParent($newvar); $newvar->driverApp = 'unset for printing'; $newvar->__parent_o = 'unset for printing'; $class = $newvar->get__table(); if (csb($class, "sp_")) { $bclass = strfrom($class, "sp_") . "_b"; $newvar->{$bclass}->__parent_o = 'unset for printing'; } } else { $newvar = $var; } if ($sgbl->isBlackBackground()) { print "<font color=gray>"; } print_r($newvar); if ($sgbl->isBlackBackground()) { print "</font> "; } }