internal ProgramBlock ProgramRun(string address, string options)
{
int pid = 0;
int.TryParse(address, out pid);
ProgramBlock program = homegenie.ProgramManager.Programs.Find(p => p.Address == pid);
if (program != null)
{
if (program.IsEnabled)
{
try
{
homegenie.ProgramManager.Run(program, options);
}
catch (Exception e)
{
HomeGenieService.LogError(e);
}
}
else
{
homegenie.RaiseEvent(
Domains.HomeGenie_System,
Domains.HomeAutomation_HomeGenie_Automation,
program.Address.ToString(),
"Program Error",
Properties.RuntimeError,
"Program is disabled, cannot run."
);
}
}
return(program);
}
public EventsHelper ModuleParameterChange(Func <ModuleHelper, ModuleParameter, bool> handler)
{
ProgramBlock pb = _homegenie.ProgramEngine.Programs.Find(p => p.Address.ToString() == _myprogramid.ToString());
pb.ModuleChangedHandler = handler;
return(this);
}
private static ProgramBlock<MilocInstruction> Do(ProgramBlock<MilocInstruction> prog)
{
foreach (var f in prog.Functions)
{
var calleds = new List<string>();
f.VisitBlocks(b =>
{
foreach (var i in b.Code)
{
var call = i as CallInstruction;
if (call != null)
{
if (!calleds.Contains(call.Str0))
{
calleds.Add(call.Str0);
}
}
}
});
f.FunctionsCalled = calleds;
var stable = Program.Stable.Value;
var argCounts = calleds.Select(funName => stable.Children.Where(n => n.Name == funName).First().Formals.Count);
if (argCounts.Any())
f.MaxOutArgs = argCounts.Max();
}
return prog;
}
// Use this for initialization
void Start()
{
programBlock = GetComponent <ProgramBlock> ();
programBlock.SetProgramBlockName("If");
trueFalseBlock = ProgramFile.AddProgramBlock <ProgramTrueFalseBlock> (gameObject).GetComponent <ProgramTrueFalseBlock> ();
assignVariableBlock = ProgramFile.AddProgramBlock <ProgramAssignVariableBlock> (gameObject).GetComponent <ProgramAssignVariableBlock> ();
}
internal ProgramBlock ProgramToggle(string address, string options)
{
int pid = 0;
int.TryParse(address, out pid);
ProgramBlock program = homegenie.ProgramEngine.Programs.Find(p => p.Address == pid);
if (program != null)
{
if (program.IsRunning)
{
ProgramBreak(address);
program.IsEnabled = true;
}
else
{
if (!program.IsEnabled)
{
program.IsEnabled = true;
}
try
{
homegenie.ProgramEngine.Run(program, options);
}
catch
{
}
;
}
}
return(program);
}
public EventsHelper WebServiceCallReceived(string apicall, Func <object, object> handler)
{
ProgramBlock pb = _homegenie.ProgramEngine.Programs.Find(p => p.Address.ToString() == _myprogramid.ToString());
pb._registeredapicalls.Add(apicall);
_homegenie.RegisterDynamicApi(apicall, handler);
return(this);
}
// Use this for initialization
void Start()
{
programBlock = GetComponent <ProgramBlock> ();
programBlock.SetProgramBlockName("Assign Variable");
programVariableReference = ProgramFile.AddProgramBlock <ProgramVariableReference> (gameObject).GetComponent <ProgramVariableReference>();
programNumber = ProgramFile.AddProgramBlock <ProgramNumber> (gameObject).GetComponent <ProgramNumber>();
}
public static ProgramBlock<MilocInstruction> DoOpt(ProgramBlock<MilocInstruction> prog)
{
var self = new UselessCodeRemoval();
self.prog = prog;
self.defs = new ReachingDef<MilocInstruction>(prog);
self.Mark();
return self.Sweep();
}
private bool ProgramsDiff(ProgramBlock oldProgram, ProgramBlock newProgram)
{
bool unchanged = (oldProgram.ScriptSetup == newProgram.ScriptSetup) &&
(oldProgram.ScriptSource == newProgram.ScriptSource) &&
(oldProgram.Name == newProgram.Name) &&
(oldProgram.Description == newProgram.Description) &&
(oldProgram.Group == newProgram.Group) &&
(oldProgram.Type == newProgram.Type);
return !unchanged;
}
public ProgramFeature Feature(string propname)
{
ProgramBlock pb = _homegenie.ProgramEngine.Programs.Find(p => p.Address.ToString() == _myprogramid.ToString());
ProgramFeature pf = null;
//
try { pf = pb.Features.Find(f => f.Property == propname); }
catch { }
//
return(pf);
}
public ProgramHelper WithName(string programname)
{
ProgramBlock pb = _homegenie.ProgramEngine.Programs.Find(p => p.Name.ToLower() == programname.ToLower());
ProgramHelper ph = null;
if (pb != null)
{
ph = new ProgramHelper(_homegenie, pb.Address);
}
return(ph);
}
/// <summary>
/// Writes program data to the memory
/// </summary>
/// <param name="cbData">The program to write</param>
public void WriteProgram(ProgramBlock cbData)
{
// Load all the parts of the program to the memory
for (ProgramBlock.BlockContainer cur = cbData.GetFirst(); cur != null; cur = cbData.GetNext())
{
Write(cur.iAddress, cur.theBlock, false);
}
// +0x100 just to be sure
HeapManager = new VAX11HeapManager((uint)cbData.Size + 0x100, Settings.Simulator.iSP - Settings.Simulator.iStackSize);
}
/// <summary>
/// Creates new program. Get CodeBlock to load into the simulator's memory
/// </summary>
/// <param name="cbProgram">CodeBlock to load into the simulator's memory</param>
/// <param name="DebugMode">True if the new program suppose to run in debug mode</param>
public Program(ProgramBlock cbProgram, bool DebugMode, frmMain theMainApplication, string sInputFile, string sOutputFile)
{
theProgram = cbProgram;
_theMainApplication = theMainApplication;
BreakPointWait = new AutoResetEvent(false);
_BreakPointList = new BreakPointList();
bInDebug = DebugMode;
con = new VAX11Simulator.Console(sInputFile, sOutputFile);
theSimulator = new VAX11Simulator.Simulator(theProgram, con);
theSimulator.memory.OnMemoryAccess += new MemoryAccessedFunc(MemoryAcessedHandler);
theSimulator.memory.OnPageFault += new PageFaultFunc(PageFaultHandler);
con.InterruptsEvent += new VAX11Simulator.Console.InterruptsDelegate(InterruptHendler);
}
internal ProgramBlock ProgramBreak(string address)
{
int pid = 0; int.TryParse(address, out pid);
ProgramBlock program = homegenie.ProgramEngine.Programs.Find(p => p.Address == pid);
if (program != null)
{
program.IsEnabled = false;
program.Stop();
homegenie.UpdateProgramsDatabase();
}
return(program);
}
public GameObject AddProgramBlock(ProgramBlock block)
{
GameObject newProgramFileGraphic = GameObject.Instantiate(programVariableGraphicPrefab);
ProgramGUIVariableGraphic newGraphic = newProgramFileGraphic.GetComponent <ProgramGUIVariableGraphic> ();
programVariableGraphics.Add(newGraphic);
newProgramFileGraphic.GetComponent <RectTransform> ().parent = variableParent;
newProgramFileGraphic.GetComponent <RectTransform> ().anchoredPosition = new Vector2(
0,
150 + (-100 * (programVariableGraphics.Count - 1)));
return(newProgramFileGraphic);
}
public CSharpEngine(ProgramBlock pb) : base(pb)
{
// TODO: SetShadowCopyPath/SetShadowCopyFiles methods are deprecated...
// TODO: create own AppDomain for "programDomain" instead of using CurrentDomain
// TODO: and use AppDomainSetup to set shadow copy for each app domain
// TODO: !!! verify AppDomain compatibility with mono !!!
if (!isShadowCopySet)
{
isShadowCopySet = true;
var domain = AppDomain.CurrentDomain;
domain.SetShadowCopyPath(Path.Combine(domain.BaseDirectory, "programs"));
domain.SetShadowCopyFiles();
}
}
private bool ProgramsDiff(ProgramBlock oldProgram, ProgramBlock newProgram)
{
var unchanged = JsonConvert.SerializeObject(oldProgram.ConditionType) == JsonConvert.SerializeObject(newProgram.ConditionType) &&
JsonConvert.SerializeObject(oldProgram.Conditions) == JsonConvert.SerializeObject(newProgram.Conditions) &&
JsonConvert.SerializeObject(oldProgram.Commands) == JsonConvert.SerializeObject(newProgram.Commands) &&
oldProgram.ScriptCondition == newProgram.ScriptCondition &&
oldProgram.ScriptSource == newProgram.ScriptSource &&
oldProgram.Name == newProgram.Name &&
oldProgram.Description == newProgram.Description &&
oldProgram.Group == newProgram.Group &&
oldProgram.Type == newProgram.Type;
return(!unchanged);
}
public CSharpEngine(ProgramBlock programBlock) : base(programBlock)
{
// TODO: SetShadowCopyPath/SetShadowCopyFiles methods are deprecated...
// TODO: create own AppDomain for "programDomain" instead of using CurrentDomain
// TODO: and use AppDomainSetup to set shadow copy for each app domain
// TODO: !!! verify AppDomain compatibility with mono !!!
if (!IsShadowCopySet)
{
IsShadowCopySet = true;
var domain = AppDomain.CurrentDomain;
domain.SetShadowCopyPath(FilePaths.ProgramsFolder);
domain.SetShadowCopyFiles();
}
}
private static string GetWizardScript(ProgramBlock program)
{
if (program.Type.ToLower() != "wizard" ||
(program.Conditions.Count <= 0 && program.Commands.Count <= 0))
{
return(null);
}
WizardEngine.WizardScript script = new WizardEngine.WizardScript(null)
{
Commands = program.Commands.ToList <ScriptCommand>(),
Conditions = program.Conditions.ToList <ScriptCondition>(),
ConditionType = program.ConditionType
};
return(JsonConvert.SerializeObject(script));
}
public void Run(string programid, string optionstring)
{
//TODO: improve locking for single instance run only
ProgramBlock pb = _homegenie.ProgramEngine.Programs.Find(p => p.Address.ToString() == programid || p.Name == programid);
pb.IsRunning = true;
if (pb.Type.ToLower() == "csharp")
{
pb.RunScript(_homegenie, optionstring);
}
else
{
_homegenie.ProgramEngine.ExecuteWizardScript(pb);
}
pb.IsRunning = false;
}
public WizardScript(ProgramBlock pb)
{
if (pb == null || String.IsNullOrEmpty(pb.ScriptSource))
{
return;
}
try
{
var s = JsonConvert.DeserializeObject <WizardScript>(pb.ScriptSource);
Commands = s.Commands;
Conditions = s.Conditions;
ConditionType = s.ConditionType;
}
catch (Exception e)
{
// TODO: report initialization exception
}
}
public ProgramHelper AddFeature(string fordomains, string formoduletypes, string propname, string description, string type) // default type = checkbox
{
ProgramBlock pb = _homegenie.ProgramEngine.Programs.Find(p => p.Address.ToString() == _myprogramid.ToString());
ProgramFeature pf = null;
//
try { pf = pb.Features.Find(f => f.Property == propname); }
catch { }
//
if (pf == null)
{
pf = new ProgramFeature();
pb.Features.Add(pf);
}
pf.FieldType = type;
pf.Property = propname;
pf.Description = description;
pf.ForDomains = fordomains;
pf.ForTypes = formoduletypes;
return(this);
}
public ProgramBlock<SparcInstruction> DoAllocation(ProgramBlock<SparcInstruction> start)
{
numRegs = getMaxRegValue(start) + 1;
spilleds = new BitArray(numRegs);
while (true)
{
setupVars(start);
doGenAndKill(start);
doLiveoutSets(start);
doGraph(start);
var uncoloredRegs = colorGraph(start);
if (uncoloredRegs.Select(r => r.Value.Count).Sum() == 0)
break;
var regsToSpill = new BitArray(numRegs);
foreach (var kvp in uncoloredRegs)
{
if (kvp.Value.Count != 0)
{
var rToSpill = kvp.Value.Where(r => !spilleds[r]).Where(r => getSparcRegister(r) == null).First();
regsToSpill.Set(rToSpill, true);
}
}
spilleds.Or(regsToSpill);
start = (ProgramBlock<SparcInstruction>)start.Convert(new SpillConverter(regsToSpill));
//Console.WriteLine("spilled {0} regs, trying again", regsToSpill.TrueIndexs().Count());
}
//print(start);
return (ProgramBlock<SparcInstruction>)start.Convert(new SparcRegisterConverter(colorMapping));
}
/*
*
* public ProgramHelper Set(string value)
* {
* this.value = value;
* //if (_programmodule != null)
* {
* ModuleParameter parameter = Utility.ModuleParameterGet(_programmodule, this.parameter);
* if (parameter == null)
* {
* _programmodule.Properties.Add(new ModuleParameter() { Name = this.parameter, Value = value });
* }
* else
* {
* parameter.Value = value;
* }
* }
* return this;
* }
*
* public ProgramHelper Set(string value, string description)
* {
* this.value = value;
* //if (_programmodule != null)
* {
* ModuleParameter parameter = Utility.ModuleParameterGet(_programmodule, this.parameter);
* if (parameter == null)
* {
* _programmodule.Properties.Add(new ModuleParameter() { Name = this.parameter, Value = value, Description = description });
* }
* else
* {
* if (initialized || parameter.Value == "")
* {
* parameter.Value = value;
* }
* parameter.Description = description;
* }
* }
* return this;
* }
*/
// that isn't of any use here.. .anyway... =)
public ProgramHelper Reset()
{
this.parameter = "";
this.value = "";
// this.initialized = false;
//
if (_programmodule == null)
{
_relocateprogrammodule();
}
//
// remove all features
//
ProgramBlock pb = _homegenie.ProgramEngine.Programs.Find(p => p.Address.ToString() == _myprogramid.ToString());
pb.Features.Clear();
//
initialized = false;
//
AddControlWidget(""); // no control widget --> not visible
//
return(this);
}
/// <summary>
/// Consturctor
/// </summary>
/// <param name="cbUserCode">User Program to load</param>
/// <param name="con">Console for the simulator</param>
public Simulator(ProgramBlock cbUserCode, VAX11Simulator.Console con)
{
// Allocate registers and set default values
r = new Registers();
r[14] = Settings.Simulator.iSP;
r[15] = cbUserCode.EntryPoint;
r[17] = r[14] + 0x100; // SCBB
// Allocate memory and load the user's program to there
Mem = new Memory(0, int.MaxValue);
Mem.WriteProgram(cbUserCode);
// Save console reference
_console = con;
// Initalize interrupt vectors
foreach (SimEvent e in HardwareInterruptsChecker)
{
Mem.Write(e.SCBB_OFFSET + r[17].ReadLong(), new CodeBlock(0L, 4), false);
}
OutputThreadOn = false;
}
public ProgramHelper AddControlWidget(string widget)
{
ProgramBlock pb = _homegenie.ProgramEngine.Programs.Find(p => p.Address == _myprogramid);
VirtualModule m = _homegenie.VirtualModules.Find(rm => rm.ParentId == _myprogramid.ToString() && rm.Domain == _myprogramdomain && rm.Address == _myprogramid.ToString());
//
if (m == null)
{
m = new VirtualModule()
{
ParentId = _myprogramid.ToString(), Visible = (widget != ""), Domain = _myprogramdomain, Address = _myprogramid.ToString(), Name = pb.Name, DeviceType = Module.DeviceTypes.Program
};
_homegenie.VirtualModules.Add(m);
}
//
m.Name = pb.Name;
m.Domain = _myprogramdomain;
m.Visible = (widget != "");
Utility.ModuleParameterSet(m, Properties.WIDGET_DISPLAYMODULE, widget);
//
_relocateprogrammodule();
//
return(this);
}
private void _checkscheduleditems(object state)
{
for (int i = 0; i < _scheduleditems.Count; i++)
{
SchedulerItem item = _scheduleditems[i];
// TODO: execute items only once instead of repeating for the whole minute
string currentoccurrence = DateTime.Now.ToString("yyyy-MM-dd HH:mm");
if (item.IsEnabled && item.LastOccurrence != currentoccurrence && IsScheduling(item.CronExpression))
{
// update last/next occurrence values
item.LastOccurrence = currentoccurrence;
item.NextOccurrence = _getnextoccurrence(item.CronExpression);
// execute associated task if any
if (!String.IsNullOrEmpty(item.ProgramId))
{
ProgramBlock pb = _mastercontrolprogram.Programs.Find(p => p.Address.ToString() == item.ProgramId || p.Name == item.ProgramId);
if (pb != null)
{
_mastercontrolprogram.Run(pb, "");
}
}
}
}
}
public ProgramEngineBase(ProgramBlock pb)
{
programBlock = pb;
}
private void doGraph(ProgramBlock<SparcInstruction> start)
{
foreach (var f in start.Functions)
{
if (coloringDone.Contains(f.Name))
continue;
var dg = allDepGraphs[f];
f.VisitBlocks(b =>
{
var lset = new BitArray(liveoutSets[b]);
foreach (var instr in Enumerable.Reverse(b.Code))
{
//1) add an edge from t to each member of live out (in the interfence graph)
foreach (var r in instr.DestRegs)
{
for (int i = 0; i < numRegs; i++)
{
if (lset[i] && r.IntVal != i)
{
addEdge(dg, i, r.IntVal);
}
}
}
//2) remove target from LO
foreach (var r in instr.DestRegs)
{
lset[r.IntVal] = false;
}
//3) add sources to LO
foreach (var r in instr.SourceRegs)
{
lset[r.IntVal] = true;
}
}
});
}
}
public void ProcessRequest(MIGClientRequest request, MIGInterfaceCommand migCommand)
{
switch (migCommand.Command)
{
case "Interfaces.List":
migCommand.Response = "[ ";
foreach (var kv in homegenie.Interfaces)
{
var migInterface = kv.Value;
var ifaceConfig = homegenie.SystemConfiguration.MIGService.GetInterface(migInterface.Domain);
if (ifaceConfig == null || !ifaceConfig.IsEnabled)
{
continue;
}
migCommand.Response += "{ \"Domain\" : \"" + migInterface.Domain + "\", \"IsConnected\" : \"" + migInterface.IsConnected + "\" },";
}
if (homegenie.UpdateChecker != null && homegenie.UpdateChecker.IsUpdateAvailable)
{
migCommand.Response += "{ \"Domain\" : \"" + Domains.HomeGenie_UpdateChecker + "\", \"IsConnected\" : \"True\" }";
migCommand.Response += " ]";
}
else
{
migCommand.Response = migCommand.Response.Substring(0, migCommand.Response.Length - 1) + " ]";
}
//
break;
//TODO: should this be moved somewhere to MIG?
case "Interfaces.Configure":
switch (migCommand.GetOption(0))
{
case "Hardware.SerialPorts":
if (Environment.OSVersion.Platform == PlatformID.Unix)
{
var serialPorts = System.IO.Ports.SerialPort.GetPortNames();
var portList = new List <string>();
for (int p = serialPorts.Length - 1; p >= 0; p--)
{
if (serialPorts[p].Contains("/ttyS") || serialPorts[p].Contains("/ttyUSB"))
{
portList.Add(serialPorts[p]);
}
}
if (Raspberry.Board.Current.IsRaspberryPi)
{
if (!portList.Contains("/dev/ttyAMA0"))
{
portList.Add("/dev/ttyAMA0"); // RaZberry
}
if (!portList.Contains("/dev/ttyACM0"))
{
portList.Add("/dev/ttyACM0"); // ZME_UZB1
}
}
migCommand.Response = JsonHelper.GetSimpleResponse(JsonConvert.SerializeObject(portList));
}
else
{
var portNames = System.IO.Ports.SerialPort.GetPortNames();
migCommand.Response = JsonHelper.GetSimpleResponse(JsonConvert.SerializeObject(portNames));
}
break;
}
break;
case "System.Configure":
if (migCommand.GetOption(0) == "Service.Restart")
{
Program.Quit(true);
migCommand.Response = JsonHelper.GetSimpleResponse("OK");
}
else if (migCommand.GetOption(0) == "UpdateManager.UpdatesList")
{
migCommand.Response = JsonConvert.SerializeObject(homegenie.UpdateChecker.RemoteUpdates);
}
else if (migCommand.GetOption(0) == "UpdateManager.Check")
{
homegenie.UpdateChecker.Check();
migCommand.Response = JsonHelper.GetSimpleResponse("OK");
}
else if (migCommand.GetOption(0) == "UpdateManager.DownloadUpdate")
{
var resultMessage = "ERROR";
bool success = homegenie.UpdateChecker.DownloadUpdateFiles();
if (success)
{
if (homegenie.UpdateChecker.IsRestartRequired)
{
resultMessage = "RESTART";
}
else
{
resultMessage = "OK";
}
}
migCommand.Response = JsonHelper.GetSimpleResponse(resultMessage);
}
else if (migCommand.GetOption(0) == "UpdateManager.InstallUpdate") //UpdateManager.InstallProgramsCommit")
{
string resultMessage = "OK";
if (!homegenie.UpdateChecker.InstallFiles())
{
resultMessage = "ERROR";
}
else
{
if (homegenie.UpdateChecker.IsRestartRequired)
{
resultMessage = "RESTART";
Utility.RunAsyncTask(() =>
{
Thread.Sleep(2000);
Program.Quit(true);
});
}
else
{
homegenie.LoadConfiguration();
homegenie.MigService.ClearWebCache();
homegenie.UpdateChecker.Check();
}
}
migCommand.Response = JsonHelper.GetSimpleResponse(resultMessage);
}
else if (migCommand.GetOption(0) == "HttpService.SetWebCacheEnabled")
{
if (migCommand.GetOption(1) == "1")
{
homegenie.MigService.IsWebCacheEnabled = true;
homegenie.SystemConfiguration.MIGService.EnableWebCache = "true";
}
else
{
homegenie.MigService.IsWebCacheEnabled = false;
homegenie.SystemConfiguration.MIGService.EnableWebCache = "false";
}
homegenie.SystemConfiguration.Update();
migCommand.Response = JsonHelper.GetSimpleResponse("OK");
}
else if (migCommand.GetOption(0) == "HttpService.GetWebCacheEnabled")
{
migCommand.Response = JsonHelper.GetSimpleResponse(homegenie.MigService.IsWebCacheEnabled ? "1" : "0");
}
else if (migCommand.GetOption(0) == "HttpService.GetPort")
{
migCommand.Response = JsonHelper.GetSimpleResponse(homegenie.SystemConfiguration.HomeGenie.ServicePort.ToString());
}
else if (migCommand.GetOption(0) == "HttpService.SetPort")
{
try
{
homegenie.SystemConfiguration.HomeGenie.ServicePort = int.Parse(migCommand.GetOption(1));
homegenie.SystemConfiguration.Update();
}
catch
{
}
}
else if (migCommand.GetOption(0) == "Statistics.GetStatisticsDatabaseMaximumSize")
{
migCommand.Response = JsonHelper.GetSimpleResponse(homegenie.SystemConfiguration.HomeGenie.Statistics.MaxDatabaseSizeMBytes.ToString());
}
else if (migCommand.GetOption(0) == "Statistics.SetStatisticsDatabaseMaximumSize")
{
try
{
homegenie.SystemConfiguration.HomeGenie.Statistics.MaxDatabaseSizeMBytes = int.Parse(migCommand.GetOption(1));
homegenie.SystemConfiguration.Update();
}
catch
{
}
}
else if (migCommand.GetOption(0) == "SystemLogging.DownloadCsv")
{
string csvlog = "";
string logpath = Path.Combine("log", "homegenie.log");
if (migCommand.GetOption(1) == "1")
{
logpath = Path.Combine("log", "homegenie.log.bak");
}
if (File.Exists(logpath))
{
using (var fs = new FileStream(logpath, FileMode.Open, FileAccess.Read, FileShare.ReadWrite))
using (var sr = new StreamReader(fs, Encoding.Default))
{
csvlog = sr.ReadToEnd();
}
}
(request.Context as HttpListenerContext).Response.AddHeader("Content-Disposition", "attachment;filename=homegenie_log_" + migCommand.GetOption(1) + ".csv");
migCommand.Response = csvlog;
}
else if (migCommand.GetOption(0) == "SystemLogging.Enable")
{
SystemLogger.Instance.OpenLog();
homegenie.SystemConfiguration.HomeGenie.EnableLogFile = "true";
homegenie.SystemConfiguration.Update();
}
else if (migCommand.GetOption(0) == "SystemLogging.Disable")
{
SystemLogger.Instance.CloseLog();
homegenie.SystemConfiguration.HomeGenie.EnableLogFile = "false";
homegenie.SystemConfiguration.Update();
}
else if (migCommand.GetOption(0) == "SystemLogging.IsEnabled")
{
migCommand.Response = JsonHelper.GetSimpleResponse((homegenie.SystemConfiguration.HomeGenie.EnableLogFile.ToLower().Equals("true") ? "1" : "0"));
}
else if (migCommand.GetOption(0) == "Security.SetPassword")
{
// password only for now, with fixed user login 'admin'
string pass = migCommand.GetOption(1) == "" ? "" : MIG.Utility.Encryption.SHA1.GenerateHashString(migCommand.GetOption(1));
homegenie.MigService.SetWebServicePassword(pass);
homegenie.SystemConfiguration.HomeGenie.UserPassword = pass;
// regenerate encrypted files
homegenie.SystemConfiguration.Update();
homegenie.UpdateModulesDatabase();
}
else if (migCommand.GetOption(0) == "Security.ClearPassword")
{
homegenie.MigService.SetWebServicePassword("");
homegenie.SystemConfiguration.HomeGenie.UserPassword = "";
// regenerate encrypted files
homegenie.SystemConfiguration.Update();
homegenie.UpdateModulesDatabase();
}
else if (migCommand.GetOption(0) == "Security.HasPassword")
{
migCommand.Response = JsonHelper.GetSimpleResponse((homegenie.SystemConfiguration.HomeGenie.UserPassword != "" ? "1" : "0"));
}
else if (migCommand.GetOption(0) == "System.ConfigurationRestore")
{
// file uploaded by user
string archivename = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "homegenie_restore_config.zip");
if (!Directory.Exists("tmp"))
{
Directory.CreateDirectory("tmp");
}
try
{
var downloadedMessageInfo = new DirectoryInfo("tmp");
foreach (var file in downloadedMessageInfo.GetFiles())
{
file.Delete();
}
foreach (DirectoryInfo directory in downloadedMessageInfo.GetDirectories())
{
directory.Delete(true);
}
}
catch
{
}
//
try
{
var encoding = (request.Context as HttpListenerContext).Request.ContentEncoding;
string boundary = MIG.Gateways.WebServiceUtility.GetBoundary((request.Context as HttpListenerContext).Request.ContentType);
MIG.Gateways.WebServiceUtility.SaveFile(encoding, boundary, request.InputStream, archivename);
Utility.UncompressZip(archivename, Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp"));
File.Delete(archivename);
}
catch
{
}
}
else if (migCommand.GetOption(0) == "System.ConfigurationRestoreS1")
{
var serializer = new XmlSerializer(typeof(List <ProgramBlock>));
var reader = new StreamReader(Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "programs.xml"));
var newProgramsData = (List <ProgramBlock>)serializer.Deserialize(reader);
reader.Close();
var newProgramList = new List <ProgramBlock>();
foreach (ProgramBlock program in newProgramsData)
{
if (program.Address >= ProgramEngine.USER_SPACE_PROGRAMS_START)
{
ProgramBlock p = new ProgramBlock();
p.Address = program.Address;
p.Name = program.Name;
p.Description = program.Description;
newProgramList.Add(p);
}
}
newProgramList.Sort(delegate(ProgramBlock p1, ProgramBlock p2)
{
string c1 = p1.Address.ToString();
string c2 = p2.Address.ToString();
return(c1.CompareTo(c2));
});
migCommand.Response = JsonConvert.SerializeObject(newProgramList);
}
else if (migCommand.GetOption(0) == "System.ConfigurationRestoreS2")
{
var serializer = new XmlSerializer(typeof(List <Group>));
var reader = new StreamReader(Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "automationgroups.xml"));
var automationGroups = (List <Group>)serializer.Deserialize(reader);
reader.Close();
//
foreach (var automationGroup in automationGroups)
{
if (homegenie.AutomationGroups.Find(g => g.Name == automationGroup.Name) == null)
{
homegenie.AutomationGroups.Add(automationGroup);
}
}
//
homegenie.UpdateGroupsDatabase("Automation");
//
//File.Copy(Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "automationgroups.xml"), "./automationgroups.xml", true);
File.Copy(Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "groups.xml"), Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "groups.xml"), true);
File.Copy(Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "lircconfig.xml"), Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "lircconfig.xml"), true);
File.Copy(Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "modules.xml"), Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "modules.xml"), true);
File.Copy(Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "scheduler.xml"), Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "scheduler.xml"), true);
File.Copy(Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "systemconfig.xml"), Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "systemconfig.xml"), true);
//
homegenie.LoadConfiguration();
//
// Restore automation programs
string selectedPrograms = migCommand.GetOption(1);
serializer = new XmlSerializer(typeof(List <ProgramBlock>));
reader = new StreamReader(Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "programs.xml"));
var newProgramsData = (List <ProgramBlock>)serializer.Deserialize(reader);
reader.Close();
foreach (var program in newProgramsData)
{
var currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == program.Address);
program.IsRunning = false;
// Only restore user space programs
if (selectedPrograms.Contains("," + program.Address.ToString() + ",") && program.Address >= ProgramEngine.USER_SPACE_PROGRAMS_START)
{
int oldPid = program.Address;
if (currentProgram == null)
{
var newPid = ((currentProgram != null && currentProgram.Address == program.Address) ? homegenie.ProgramEngine.GeneratePid() : program.Address);
try
{
File.Copy(Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "programs", program.Address + ".dll"), Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "programs", newPid + ".dll"), true);
}
catch
{
}
program.Address = newPid;
homegenie.ProgramEngine.ProgramAdd(program);
}
else if (currentProgram != null)
{
homegenie.ProgramEngine.ProgramRemove(currentProgram);
try
{
File.Copy(Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "programs", program.Address + ".dll"), Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "programs", program.Address + ".dll"), true);
}
catch
{
}
homegenie.ProgramEngine.ProgramAdd(program);
}
// Restore Arduino program folder ...
// TODO: this is untested yet...
if (program.Type.ToLower() == "arduino")
{
string sourceFolder = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "programs", "arduino", oldPid.ToString());
string arduinoFolder = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "programs", "arduino", program.Address.ToString());
if (Directory.Exists(arduinoFolder))
{
Directory.Delete(arduinoFolder, true);
}
Directory.CreateDirectory(arduinoFolder);
foreach (string newPath in Directory.GetFiles(sourceFolder))
{
File.Copy(newPath, newPath.Replace(sourceFolder, arduinoFolder), true);
}
}
}
else if (currentProgram != null && program.Address < ProgramEngine.USER_SPACE_PROGRAMS_START)
{
// Only restore Enabled/Disabled status of system programs
currentProgram.IsEnabled = program.IsEnabled;
}
}
//
homegenie.UpdateProgramsDatabase();
//
// regenerate encrypted files
homegenie.UpdateModulesDatabase();
homegenie.SystemConfiguration.Update();
}
else if (migCommand.GetOption(0) == "System.ConfigurationReset")
{
homegenie.RestoreFactorySettings();
}
else if (migCommand.GetOption(0) == "System.ConfigurationBackup")
{
homegenie.BackupCurrentSettings();
(request.Context as HttpListenerContext).Response.Redirect("/hg/html/homegenie_backup_config.zip");
}
else if (migCommand.GetOption(0) == "System.ConfigurationLoad")
{
homegenie.LoadConfiguration();
}
break;
case "Modules.Get":
try
{
var module = homegenie.Modules.Find(m => m.Domain == migCommand.GetOption(0) && m.Address == migCommand.GetOption(1));
migCommand.Response = Utility.Module2Json(module, false);
}
catch (Exception ex)
{
migCommand.Response = JsonHelper.GetSimpleResponse("ERROR: \n" + ex.Message + "\n\n" + ex.StackTrace);
}
break;
case "Modules.List":
try
{
homegenie.modules_Sort();
migCommand.Response = homegenie.GetJsonSerializedModules(migCommand.GetOption(0).ToLower() == "short");
}
catch (Exception ex)
{
migCommand.Response = JsonHelper.GetSimpleResponse("ERROR: \n" + ex.Message + "\n\n" + ex.StackTrace);
}
break;
case "Modules.RoutingReset":
try
{
for (int m = 0; m < homegenie.Modules.Count; m++)
{
homegenie.Modules[m].RoutingNode = "";
}
migCommand.Response = JsonHelper.GetSimpleResponse("OK");
}
catch (Exception ex)
{
migCommand.Response = JsonHelper.GetSimpleResponse("ERROR: \n" + ex.Message + "\n\n" + ex.StackTrace);
}
break;
case "Modules.Save":
string body = new StreamReader(request.InputStream).ReadToEnd();
var newModules = JsonConvert.DeserializeObject(body) as JArray;
for (int i = 0; i < newModules.Count; i++)
{
try
{
var module = homegenie.Modules.Find(m => m.Address == newModules[i]["Address"].ToString() && m.Domain == newModules[i]["Domain"].ToString());
module.Name = newModules[i]["Name"].ToString();
//
try
{
module.DeviceType = (MIG.ModuleTypes)Enum.Parse(typeof(MIG.ModuleTypes), newModules[i]["DeviceType"].ToString(), true);
}
catch
{
// TODO: check what's wrong here...
}
//
var moduleProperties = newModules[i]["Properties"] as JArray;
for (int p = 0; p < moduleProperties.Count; p++)
{
string propertyName = moduleProperties[p]["Name"].ToString();
string propertyValue = moduleProperties[p]["Value"].ToString();
ModuleParameter parameter = null;
parameter = module.Properties.Find(delegate(ModuleParameter mp)
{
return(mp.Name == propertyName);
});
//
if (propertyName == ModuleParameters.MODPAR_VIRTUALMETER_WATTS)
{
try
{
propertyValue = double.Parse(propertyValue.Replace(",", "."), System.Globalization.CultureInfo.InvariantCulture).ToString();
}
catch
{
propertyValue = "0";
}
}
//
if (parameter == null)
{
module.Properties.Add(new ModuleParameter()
{
Name = propertyName,
Value = propertyValue
});
}
else
{
if (moduleProperties[p]["NeedsUpdate"] != null && moduleProperties[p]["NeedsUpdate"].ToString() == "true")
{
parameter.Value = propertyValue;
}
}
}
}
catch (Exception)
{
//TODO: notify exception?
}
}
homegenie.UpdateModulesDatabase();//write modules
break;
case "Modules.Update":
string streamContent = new StreamReader(request.InputStream).ReadToEnd();
var newModule = JsonConvert.DeserializeObject <Module>(streamContent);
var currentModule = homegenie.Modules.Find(p => p.Domain == newModule.Domain && p.Address == newModule.Address);
//
if (currentModule == null)
{
homegenie.Modules.Add(newModule);
}
else
{
currentModule.Name = newModule.Name;
currentModule.Description = newModule.Description;
currentModule.DeviceType = newModule.DeviceType;
foreach (var newParameter in newModule.Properties)
{
var currentParameter = currentModule.Properties.Find(mp => mp.Name == newParameter.Name);
if (currentParameter == null)
{
currentModule.Properties.Add(newParameter);
}
else if (newParameter.NeedsUpdate)
{
currentParameter.Value = newParameter.Value;
}
}
// look for deleted properties
var deletedParameters = new List <ModuleParameter>();
foreach (var parameter in currentModule.Properties)
{
var currentParameter = newModule.Properties.Find(mp => mp.Name == parameter.Name);
if (currentParameter == null)
{
deletedParameters.Add(parameter);
}
}
foreach (var parameter in deletedParameters)
{
currentModule.Properties.Remove(parameter);
}
deletedParameters.Clear();
}
//
homegenie.UpdateModulesDatabase();
break;
case "Modules.Delete":
var deletedModule = homegenie.Modules.Find(m => m.Domain == migCommand.GetOption(0) && m.Address == migCommand.GetOption(1));
if (deletedModule != null)
{
homegenie.Modules.Remove(deletedModule);
}
migCommand.Response = JsonHelper.GetSimpleResponse("OK");
//
homegenie.UpdateModulesDatabase();
break;
case "Groups.ModulesList":
var theGroup = homegenie.Groups.Find(z => z.Name.ToLower() == migCommand.GetOption(0).Trim().ToLower());
if (theGroup != null)
{
string jsonmodules = "[";
for (int m = 0; m < theGroup.Modules.Count; m++)
{
var groupModule = homegenie.Modules.Find(mm => mm.Domain == theGroup.Modules[m].Domain && mm.Address == theGroup.Modules[m].Address);
if (groupModule != null)
{
jsonmodules += Utility.Module2Json(groupModule, false) + ",\n";
}
}
jsonmodules = jsonmodules.TrimEnd(',', '\n');
jsonmodules += "]";
migCommand.Response = jsonmodules;
}
break;
case "Groups.List":
try
{
migCommand.Response = JsonConvert.SerializeObject(homegenie.GetGroups(migCommand.GetOption(0)));
}
catch (Exception ex)
{
migCommand.Response = JsonHelper.GetSimpleResponse("ERROR: \n" + ex.Message + "\n\n" + ex.StackTrace);
}
break;
case "Groups.Rename":
string oldName = migCommand.GetOption(1);
string newName = new StreamReader(request.InputStream).ReadToEnd();
var currentGroup = homegenie.GetGroups(migCommand.GetOption(0)).Find(g => g.Name == oldName);
var newGroup = homegenie.GetGroups(migCommand.GetOption(0)).Find(g => g.Name == newName);
// ensure that the new group name is not already defined
if (newGroup == null && currentGroup != null)
{
currentGroup.Name = newName;
homegenie.UpdateGroupsDatabase(migCommand.GetOption(0));
//cmd.response = JsonHelper.GetSimpleResponse("OK");
}
else
{
migCommand.Response = JsonHelper.GetSimpleResponse("New name already in use.");
}
break;
case "Groups.Sort":
using (var reader = new StreamReader(request.InputStream))
{
var newGroupList = new List <Group>();
string[] newPositionOrder = reader.ReadToEnd().Split(new[] { ';' }, StringSplitOptions.RemoveEmptyEntries);
for (int i = 0; i < newPositionOrder.Length; i++)
{
newGroupList.Add(homegenie.GetGroups(migCommand.GetOption(0))[int.Parse(newPositionOrder[i])]);
}
homegenie.GetGroups(migCommand.GetOption(0)).Clear();
homegenie.GetGroups(migCommand.GetOption(0)).RemoveAll(g => true);
homegenie.GetGroups(migCommand.GetOption(0)).AddRange(newGroupList);
homegenie.UpdateGroupsDatabase(migCommand.GetOption(0));
}
//
try
{
migCommand.Response = JsonConvert.SerializeObject(homegenie.GetGroups(migCommand.GetOption(0)));
}
catch (Exception ex)
{
migCommand.Response = JsonHelper.GetSimpleResponse("ERROR: \n" + ex.Message + "\n\n" + ex.StackTrace);
}
break;
case "Groups.SortModules":
using (var reader = new StreamReader(request.InputStream))
{
string groupName = migCommand.GetOption(1);
Group sortGroup = null;
try
{
sortGroup = homegenie.GetGroups(migCommand.GetOption(0)).Find(zn => zn.Name == groupName);
}
catch
{
}
//
if (sortGroup != null)
{
var newModulesReference = new List <ModuleReference>();
string[] newPositionOrder = reader.ReadToEnd().Split(new[] { ';' }, StringSplitOptions.RemoveEmptyEntries);
for (int i = 0; i < newPositionOrder.Length; i++)
{
newModulesReference.Add(sortGroup.Modules[int.Parse(newPositionOrder[i])]);
}
sortGroup.Modules.Clear();
sortGroup.Modules = newModulesReference;
homegenie.UpdateGroupsDatabase(migCommand.GetOption(0));
}
}
try
{
migCommand.Response = JsonConvert.SerializeObject(homegenie.GetGroups(migCommand.GetOption(0)));
}
catch (Exception ex)
{
migCommand.Response = JsonHelper.GetSimpleResponse("ERROR: \n" + ex.Message + "\n\n" + ex.StackTrace);
}
break;
case "Groups.Add":
string newGroupName = new StreamReader(request.InputStream).ReadToEnd();
homegenie.GetGroups(migCommand.GetOption(0)).Add(new Group()
{
Name = newGroupName
});
homegenie.UpdateGroupsDatabase(migCommand.GetOption(0));//write groups
break;
case "Groups.Delete":
string deletedGroupName = new StreamReader(request.InputStream).ReadToEnd();
Group deletedGroup = null;
try
{
deletedGroup = homegenie.GetGroups(migCommand.GetOption(0)).Find(zn => zn.Name == deletedGroupName);
}
catch
{
}
//
if (deletedGroup != null)
{
homegenie.GetGroups(migCommand.GetOption(0)).Remove(deletedGroup);
homegenie.UpdateGroupsDatabase(migCommand.GetOption(0));//write groups
if (migCommand.GetOption(0).ToLower() == "automation")
{
var groupPrograms = homegenie.ProgramEngine.Programs.FindAll(p => p.Group.ToLower() == deletedGroup.Name.ToLower());
if (groupPrograms != null)
{
// delete group association from programs
foreach (ProgramBlock program in groupPrograms)
{
program.Group = "";
}
}
}
}
break;
case "Groups.Save":
string jsonGroups = new StreamReader(request.InputStream).ReadToEnd();
var newGroups = JsonConvert.DeserializeObject <List <Group> >(jsonGroups);
for (int i = 0; i < newGroups.Count; i++)
{
try
{
var group = homegenie.Groups.Find(z => z.Name == newGroups[i].Name);
group.Modules.Clear();
group.Modules = newGroups[i].Modules;
}
catch
{
}
}
homegenie.UpdateGroupsDatabase(migCommand.GetOption(0));//write groups
break;
case "Widgets.List":
List <string> widgetsList = new List <string>();
var groups = Directory.GetDirectories(widgetBasePath);
for (int d = 0; d < groups.Length; d++)
{
var categories = Directory.GetDirectories(groups[d]);
for (int c = 0; c < categories.Length; c++)
{
var widgets = Directory.GetFiles(categories[c], "*.js");
var group = groups[d].Replace(widgetBasePath, "").Substring(1);
var category = categories[c].Replace(groups[d], "").Substring(1);
for (int w = 0; w < widgets.Length; w++)
{
widgetsList.Add(group + "/" + category + "/" + Path.GetFileNameWithoutExtension(widgets[w]));
}
}
}
migCommand.Response = JsonConvert.SerializeObject(widgetsList);
break;
case "Widgets.Add":
{
string response = "ERROR";
string widgetPath = migCommand.GetOption(0); // eg. homegenie/generic/dimmer
string[] widgetParts = widgetPath.Split('/');
widgetParts[0] = new String(widgetParts[0].Where(Char.IsLetter).ToArray()).ToLower();
widgetParts[1] = new String(widgetParts[1].Where(Char.IsLetter).ToArray()).ToLower();
widgetParts[2] = new String(widgetParts[2].Where(Char.IsLetter).ToArray()).ToLower();
if (!String.IsNullOrWhiteSpace(widgetParts[0]) && !String.IsNullOrWhiteSpace(widgetParts[1]) && !String.IsNullOrWhiteSpace(widgetParts[2]))
{
string filePath = Path.Combine(widgetBasePath, widgetParts[0], widgetParts[1]);
if (!Directory.Exists(filePath))
{
Directory.CreateDirectory(filePath);
}
// copy widget template into the new widget
var htmlFile = Path.Combine(filePath, widgetParts[2] + ".html");
var jsFile = Path.Combine(filePath, widgetParts[2] + ".js");
if (!File.Exists(htmlFile) && !File.Exists(jsFile))
{
File.Copy(Path.Combine(widgetBasePath, "template.html"), htmlFile);
File.Copy(Path.Combine(widgetBasePath, "template.js"), jsFile);
response = "OK";
}
}
migCommand.Response = JsonHelper.GetSimpleResponse(response);
}
break;
case "Widgets.Save":
{
string response = "ERROR";
string widgetData = new StreamReader(request.InputStream).ReadToEnd();
string fileType = migCommand.GetOption(0);
string widgetPath = migCommand.GetOption(1); // eg. homegenie/generic/dimmer
string[] widgetParts = widgetPath.Split('/');
string filePath = Path.Combine(widgetBasePath, widgetParts[0], widgetParts[1]);
if (!Directory.Exists(filePath))
{
Directory.CreateDirectory(filePath);
}
switch (fileType)
{
// html/javascript source
case "html":
case "js":
using (TextWriter widgetWriter = new StreamWriter(Path.Combine(filePath, widgetParts[2] + "." + fileType)))
{
widgetWriter.Write(widgetData);
}
response = "OK";
break;
// style sheet file
case "css":
break;
// locale file
case "json":
break;
// image file
case "jpg":
case "png":
case "gif":
break;
}
migCommand.Response = JsonHelper.GetSimpleResponse(response);
}
break;
case "Widgets.Delete":
{
string response = "ERROR";
string widgetPath = migCommand.GetOption(0); // eg. homegenie/generic/dimmer
string[] widgetParts = widgetPath.Split('/');
string filePath = Path.Combine(widgetBasePath, widgetParts[0], widgetParts[1], widgetParts[2] + ".");
if (File.Exists(filePath + "html"))
{
File.Delete(filePath + "html");
response = "OK";
}
if (File.Exists(filePath + "js"))
{
File.Delete(filePath + "js");
response = "OK";
}
migCommand.Response = JsonHelper.GetSimpleResponse(response);
}
break;
case "Widgets.Export":
{
string widgetPath = migCommand.GetOption(0); // eg. homegenie/generic/dimmer
string[] widgetParts = widgetPath.Split('/');
string widgetBundle = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "export", widgetPath.Replace('/', '_') + ".zip");
if (File.Exists(widgetBundle))
{
File.Delete(widgetBundle);
}
else if (!Directory.Exists(Path.GetDirectoryName(widgetBundle)))
{
Directory.CreateDirectory(Path.GetDirectoryName(widgetBundle));
}
string inputPath = Path.Combine(widgetBasePath, widgetParts[0], widgetParts[1]);
string outputPath = Path.Combine(widgetParts[0], widgetParts[1]);
string infoFilePath = Path.Combine(inputPath, "widget.info");
File.WriteAllText(infoFilePath, "HomeGenie exported widget.");
Utility.AddFileToZip(widgetBundle, infoFilePath, "widget.info");
Utility.AddFileToZip(widgetBundle, Path.Combine(inputPath, widgetParts[2] + ".html"), Path.Combine(outputPath, widgetParts[2] + ".html"));
Utility.AddFileToZip(widgetBundle, Path.Combine(inputPath, widgetParts[2] + ".js"), Path.Combine(outputPath, widgetParts[2] + ".js"));
//
byte[] bundleData = File.ReadAllBytes(widgetBundle);
(request.Context as HttpListenerContext).Response.AddHeader("Content-Disposition", "attachment; filename=\"" + widgetPath.Replace('/', '_') + ".zip\"");
(request.Context as HttpListenerContext).Response.OutputStream.Write(bundleData, 0, bundleData.Length);
}
break;
case "Widgets.Import":
{
var encoding = (request.Context as HttpListenerContext).Request.ContentEncoding;
string boundary = MIG.Gateways.WebServiceUtility.GetBoundary((request.Context as HttpListenerContext).Request.ContentType);
string archiveFile = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "import_widget.zip");
string importPath = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "tmp", "import");
if (Directory.Exists(importPath))
{
Directory.Delete(importPath, true);
}
MIG.Gateways.WebServiceUtility.SaveFile(encoding, boundary, request.InputStream, archiveFile);
// TODO: should extract to temporary folder and look for widget.info data file before copying anything
List <string> extractedFiles = Utility.UncompressZip(archiveFile, importPath);
if (File.Exists(Path.Combine(importPath, "widget.info")))
{
foreach (string f in extractedFiles)
{
if (f.EndsWith(".html") || f.EndsWith(".js"))
{
string destFolder = Path.Combine(widgetBasePath, Path.GetDirectoryName(f));
if (!Directory.Exists(destFolder))
{
Directory.CreateDirectory(destFolder);
}
File.Copy(Path.Combine(importPath, f), Path.Combine(widgetBasePath, f), true);
}
}
//migCommand.Response = JsonHelper.GetSimpleResponse("OK");
}
else
{
//migCommand.Response = JsonHelper.GetSimpleResponse("ERROR");
}
}
break;
case "Widgets.Parse":
{
string widgetData = new StreamReader(request.InputStream).ReadToEnd();
var parser = new JavaScriptParser();
try
{
migCommand.Response = JsonHelper.GetSimpleResponse("OK");
parser.Parse(widgetData);
}
catch (Jint.Parser.ParserException e)
{
migCommand.Response = JsonHelper.GetSimpleResponse("ERROR (" + e.LineNumber + "," + e.Column + "): " + e.Description);
}
}
break;
}
}
public void ProcessRequest(MIGClientRequest request, MIGInterfaceCommand migCommand)
{
string streamcontent = "";
ProgramBlock currentProgram;
ProgramBlock newProgram;
//
homegenie.ExecuteAutomationRequest(migCommand);
if (migCommand.Command.StartsWith("Macro."))
{
switch (migCommand.Command)
{
case "Macro.Record":
homegenie.ProgramEngine.MacroRecorder.RecordingEnable();
break;
case "Macro.Save":
newProgram = homegenie.ProgramEngine.MacroRecorder.SaveMacro(migCommand.GetOption(1));
migCommand.Response = newProgram.Address.ToString();
break;
case "Macro.Discard":
homegenie.ProgramEngine.MacroRecorder.RecordingDisable();
break;
case "Macro.SetDelay":
switch (migCommand.GetOption(0).ToLower())
{
case "none":
homegenie.ProgramEngine.MacroRecorder.DelayType = MacroDelayType.None;
break;
case "mimic":
homegenie.ProgramEngine.MacroRecorder.DelayType = MacroDelayType.Mimic;
break;
case "fixed":
double secs = double.Parse(migCommand.GetOption(1), System.Globalization.CultureInfo.InvariantCulture);
homegenie.ProgramEngine.MacroRecorder.DelayType = MacroDelayType.Fixed;
homegenie.ProgramEngine.MacroRecorder.DelaySeconds = secs;
break;
}
break;
case "Macro.GetDelay":
migCommand.Response = "[{ DelayType : '" + homegenie.ProgramEngine.MacroRecorder.DelayType + "', DelayOptions : '" + homegenie.ProgramEngine.MacroRecorder.DelaySeconds + "' }]";
break;
}
}
else if (migCommand.Command.StartsWith("Scheduling."))
{
switch (migCommand.Command)
{
case "Scheduling.Add":
case "Scheduling.Update":
var item = homegenie.ProgramEngine.SchedulerService.AddOrUpdate(migCommand.GetOption(0), migCommand.GetOption(1).Replace("|", "/"));
item.ProgramId = migCommand.GetOption(2);
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Delete":
homegenie.ProgramEngine.SchedulerService.Remove(migCommand.GetOption(0));
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Enable":
homegenie.ProgramEngine.SchedulerService.Enable(migCommand.GetOption(0));
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Disable":
homegenie.ProgramEngine.SchedulerService.Disable(migCommand.GetOption(0));
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Get":
migCommand.Response = JsonConvert.SerializeObject(homegenie.ProgramEngine.SchedulerService.Get(migCommand.GetOption(0)));
break;
case "Scheduling.List":
homegenie.ProgramEngine.SchedulerService.Items.Sort((SchedulerItem s1, SchedulerItem s2) =>
{
return(s1.Name.CompareTo(s2.Name));
});
migCommand.Response = JsonConvert.SerializeObject(homegenie.ProgramEngine.SchedulerService.Items);
break;
}
}
else if (migCommand.Command.StartsWith("Programs."))
{
if (migCommand.Command != "Programs.Import")
{
streamcontent = new StreamReader(request.InputStream).ReadToEnd();
}
//
switch (migCommand.Command)
{
case "Programs.Import":
string archiveName = "homegenie_program_import.hgx";
if (File.Exists(archiveName))
{
File.Delete(archiveName);
}
//
var encoding = (request.Context as HttpListenerContext).Request.ContentEncoding;
string boundary = MIG.Gateways.WebServiceUtility.GetBoundary((request.Context as HttpListenerContext).Request.ContentType);
MIG.Gateways.WebServiceUtility.SaveFile(encoding, boundary, request.InputStream, archiveName);
//
var serializer = new XmlSerializer(typeof(ProgramBlock));
var reader = new StreamReader(archiveName);
newProgram = (ProgramBlock)serializer.Deserialize(reader);
reader.Close();
//
newProgram.Address = homegenie.ProgramEngine.GeneratePid();
newProgram.Group = migCommand.GetOption(0);
homegenie.ProgramEngine.ProgramAdd(newProgram);
//
newProgram.IsEnabled = false;
newProgram.ScriptErrors = "";
newProgram.AppAssembly = null;
//
homegenie.ProgramEngine.CompileScript(newProgram);
//
homegenie.UpdateProgramsDatabase();
//migCommand.response = JsonHelper.GetSimpleResponse(programblock.Address);
migCommand.Response = newProgram.Address.ToString();
break;
case "Programs.Export":
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
var writerSettings = new System.Xml.XmlWriterSettings();
writerSettings.Indent = true;
var programSerializer = new System.Xml.Serialization.XmlSerializer(typeof(ProgramBlock));
var builder = new StringBuilder();
var writer = System.Xml.XmlWriter.Create(builder, writerSettings);
programSerializer.Serialize(writer, currentProgram);
writer.Close();
migCommand.Response = builder.ToString();
//
(request.Context as HttpListenerContext).Response.AddHeader("Content-Disposition", "attachment; filename=\"" + currentProgram.Address + "-" + currentProgram.Name.Replace(" ", "_") + ".hgx\"");
break;
case "Programs.List":
var programList = new List <ProgramBlock>(homegenie.ProgramEngine.Programs);
programList.Sort(delegate(ProgramBlock p1, ProgramBlock p2)
{
string c1 = p1.Name + " " + p1.Address;
string c2 = p2.Name + " " + p2.Address;
return(c1.CompareTo(c2));
});
migCommand.Response = JsonConvert.SerializeObject(programList);
break;
case "Programs.Add":
newProgram = new ProgramBlock()
{
Group = migCommand.GetOption(0), Name = streamcontent, Type = "Wizard", ScriptCondition = "// A \"return true;\" statement at any point of this code block, will cause the program to run.\n// For manually activated program, just leave a \"return false\" statement here.\n\nreturn false;\n"
};
newProgram.Address = homegenie.ProgramEngine.GeneratePid();
homegenie.ProgramEngine.ProgramAdd(newProgram);
homegenie.UpdateProgramsDatabase();
migCommand.Response = JsonHelper.GetSimpleResponse(newProgram.Address.ToString());
break;
case "Programs.Delete":
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
//TODO: remove groups associations as well
currentProgram.IsEnabled = false;
homegenie.ProgramEngine.ProgramRemove(currentProgram);
homegenie.UpdateProgramsDatabase();
// remove associated module entry
homegenie.Modules.RemoveAll(m => m.Domain == Domains.HomeAutomation_HomeGenie_Automation && m.Address == currentProgram.Address.ToString());
homegenie.UpdateModulesDatabase();
}
break;
case "Programs.Compile":
case "Programs.Update":
newProgram = JsonConvert.DeserializeObject <ProgramBlock>(streamcontent);
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == newProgram.Address);
//
if (currentProgram == null)
{
newProgram.Address = homegenie.ProgramEngine.GeneratePid();
homegenie.ProgramEngine.ProgramAdd(newProgram);
}
else
{
if (currentProgram.Type.ToLower() != newProgram.Type.ToLower())
{
currentProgram.AppAssembly = null; // dispose assembly and interrupt current task
}
currentProgram.Type = newProgram.Type;
currentProgram.Group = newProgram.Group;
currentProgram.Name = newProgram.Name;
currentProgram.Description = newProgram.Description;
currentProgram.IsEnabled = newProgram.IsEnabled;
currentProgram.ScriptCondition = newProgram.ScriptCondition;
currentProgram.ScriptSource = newProgram.ScriptSource;
currentProgram.Commands = newProgram.Commands;
currentProgram.Conditions = newProgram.Conditions;
currentProgram.ConditionType = newProgram.ConditionType;
// reset last condition evaluation status
currentProgram.LastConditionEvaluationResult = false;
}
//
if (migCommand.Command == "Programs.Compile")
{
// reset previous error status
currentProgram.IsEnabled = false;
currentProgram.Stop();
currentProgram.ScriptErrors = "";
//
List <ProgramError> errors = homegenie.ProgramEngine.CompileScript(currentProgram);
//
currentProgram.IsEnabled = newProgram.IsEnabled;
currentProgram.ScriptErrors = JsonConvert.SerializeObject(errors);
migCommand.Response = currentProgram.ScriptErrors;
}
//
homegenie.UpdateProgramsDatabase();
//
homegenie.modules_RefreshPrograms();
homegenie.modules_RefreshVirtualModules();
homegenie.modules_Sort();
break;
case "Programs.Run":
currentProgram = ProgramRun(migCommand.GetOption(0), migCommand.GetOption(1));
break;
case "Programs.Toggle":
currentProgram = ProgramToggle(migCommand.GetOption(0), migCommand.GetOption(1));
break;
case "Programs.Break":
currentProgram = ProgramBreak(migCommand.GetOption(0));
break;
case "Programs.Restart":
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
currentProgram.IsEnabled = false;
try
{
currentProgram.Stop();
}
catch { }
currentProgram.IsEnabled = true;
homegenie.UpdateProgramsDatabase();
}
break;
case "Programs.Enable":
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
currentProgram.IsEnabled = true;
homegenie.UpdateProgramsDatabase();
}
break;
case "Programs.Disable":
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
currentProgram.IsEnabled = false;
try
{
currentProgram.Stop();
}
catch { }
homegenie.UpdateProgramsDatabase();
}
break;
}
}
}
private void setupVars(ProgramBlock<SparcInstruction> start)
{
foreach (var f in start.Functions)
{
if (coloringDone.Contains(f.Name))
continue;
f.VisitBlocks(b =>
{
genSets[b] = new BitArray(numRegs);
killSets[b] = new BitArray(numRegs);
liveoutSets[b] = new BitArray(numRegs);
});
}
foreach (var f in start.Functions)
{
if (coloringDone.Contains(f.Name))
continue;
var aDepGraph = new BitArray[numRegs];
for (int i = 0; i < numRegs; i++)
{
aDepGraph[i] = new BitArray(numRegs);
}
allDepGraphs[f] = aDepGraph;
}
foreach (var f in start.Functions)
{
if (coloringDone.Contains(f.Name))
continue;
colorMapping[f.Name] = new SparcRegister[numRegs];
}
}
private void print(ProgramBlock<SparcInstruction> start)
{
foreach (var k in genSets.Keys)
{
Console.WriteLine("Block {0} with {1} instrs", k.Label, k.Code.Count);
var kset = killSets[k];
var gset = genSets[k];
var lset = liveoutSets[k];
for (int i = 0; i < numRegs; i++)
{
if (gset[i])
Console.WriteLine("g:{0}", getRegister(i));
if (kset[i])
Console.WriteLine("k:{0}", getRegister(i));
if (lset[i])
Console.WriteLine("l:{0}", getRegister(i));
}
Console.WriteLine();
}
Console.WriteLine("derp graphs");
foreach (var f in start.Functions)
{
Console.WriteLine("fun {0}:", f.Name);
var dgraph = allDepGraphs[f];
Console.Write(",");
for (int i = 0; i < numRegs; i++)
{
Console.Write("{0},", getRegister(i));
}
Console.WriteLine();
for (int i = 0; i < numRegs; i++)
{
Console.Write("{0},", getRegister(i));
for (int j = 0; j < numRegs; j++)
{
Console.Write("{0},", dgraph[i][j] ? "â–ˆ" : "â–‘");
}
Console.WriteLine();
}
}
}
public void AddCodeBlockToOpenFile(ProgramBlock programBlock)
{
}
public void ProcessRequest(MIGClientRequest request, MIGInterfaceCommand migCommand)
{
string streamContent = "";
ProgramBlock currentProgram;
ProgramBlock newProgram;
string sketchFile = "", sketchFolder = "";
//
homegenie.ExecuteAutomationRequest(migCommand);
if (migCommand.Command.StartsWith("Macro."))
{
switch (migCommand.Command)
{
case "Macro.Record":
homegenie.ProgramEngine.MacroRecorder.RecordingEnable();
break;
case "Macro.Save":
newProgram = homegenie.ProgramEngine.MacroRecorder.SaveMacro(migCommand.GetOption(1));
migCommand.Response = newProgram.Address.ToString();
break;
case "Macro.Discard":
homegenie.ProgramEngine.MacroRecorder.RecordingDisable();
break;
case "Macro.SetDelay":
switch (migCommand.GetOption(0).ToLower())
{
case "none":
homegenie.ProgramEngine.MacroRecorder.DelayType = MacroDelayType.None;
break;
case "mimic":
homegenie.ProgramEngine.MacroRecorder.DelayType = MacroDelayType.Mimic;
break;
case "fixed":
double secs = double.Parse(
migCommand.GetOption(1),
System.Globalization.CultureInfo.InvariantCulture
);
homegenie.ProgramEngine.MacroRecorder.DelayType = MacroDelayType.Fixed;
homegenie.ProgramEngine.MacroRecorder.DelaySeconds = secs;
break;
}
break;
case "Macro.GetDelay":
migCommand.Response = "[{ DelayType : '" + homegenie.ProgramEngine.MacroRecorder.DelayType + "', DelayOptions : '" + homegenie.ProgramEngine.MacroRecorder.DelaySeconds + "' }]";
break;
}
}
else if (migCommand.Command.StartsWith("Scheduling."))
{
switch (migCommand.Command)
{
case "Scheduling.Add":
case "Scheduling.Update":
var item = homegenie.ProgramEngine.SchedulerService.AddOrUpdate(
migCommand.GetOption(0),
migCommand.GetOption(1).Replace(
"|",
"/"
)
);
item.ProgramId = migCommand.GetOption(2);
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Delete":
homegenie.ProgramEngine.SchedulerService.Remove(migCommand.GetOption(0));
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Enable":
homegenie.ProgramEngine.SchedulerService.Enable(migCommand.GetOption(0));
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Disable":
homegenie.ProgramEngine.SchedulerService.Disable(migCommand.GetOption(0));
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Get":
migCommand.Response = JsonConvert.SerializeObject(homegenie.ProgramEngine.SchedulerService.Get(migCommand.GetOption(0)));
break;
case "Scheduling.List":
homegenie.ProgramEngine.SchedulerService.Items.Sort((SchedulerItem s1, SchedulerItem s2) =>
{
return(s1.Name.CompareTo(s2.Name));
});
migCommand.Response = JsonConvert.SerializeObject(homegenie.ProgramEngine.SchedulerService.Items);
break;
}
}
else if (migCommand.Command.StartsWith("Programs."))
{
if (migCommand.Command != "Programs.Import")
{
streamContent = new StreamReader(request.InputStream).ReadToEnd();
}
//
switch (migCommand.Command)
{
case "Programs.Import":
string archiveName = "homegenie_program_import.hgx";
if (File.Exists(archiveName))
{
File.Delete(archiveName);
}
//
var encoding = (request.Context as HttpListenerContext).Request.ContentEncoding;
string boundary = MIG.Gateways.WebServiceUtility.GetBoundary((request.Context as HttpListenerContext).Request.ContentType);
MIG.Gateways.WebServiceUtility.SaveFile(encoding, boundary, request.InputStream, archiveName);
//
int newPid = homegenie.ProgramEngine.GeneratePid();
var reader = new StreamReader(archiveName);
char[] signature = new char[2];
reader.Read(signature, 0, 2);
reader.Close();
if (signature[0] == 'P' && signature[1] == 'K')
{
// Read and uncompress zip file content (arduino program bundle)
string zipFileName = archiveName.Replace(".hgx", ".zip");
if (File.Exists(zipFileName))
{
File.Delete(zipFileName);
}
File.Move(archiveName, zipFileName);
string destFolder = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, Utility.GetTmpFolder(), "import");
if (Directory.Exists(destFolder))
{
Directory.Delete(destFolder, true);
}
Utility.UncompressZip(zipFileName, destFolder);
string bundleFolder = Path.Combine("programs", "arduino", newPid.ToString());
if (Directory.Exists(bundleFolder))
{
Directory.Delete(bundleFolder, true);
}
if (!Directory.Exists(Path.Combine("programs", "arduino")))
{
Directory.CreateDirectory(Path.Combine("programs", "arduino"));
}
Directory.Move(Path.Combine(destFolder, "src"), bundleFolder);
reader = new StreamReader(Path.Combine(destFolder, "program.hgx"));
}
else
{
reader = new StreamReader(archiveName);
}
var serializer = new XmlSerializer(typeof(ProgramBlock));
newProgram = (ProgramBlock)serializer.Deserialize(reader);
reader.Close();
//
newProgram.Address = newPid;
newProgram.Group = migCommand.GetOption(0);
homegenie.ProgramEngine.ProgramAdd(newProgram);
//
newProgram.IsEnabled = false;
newProgram.ScriptErrors = "";
newProgram.AppAssembly = null;
//
if (newProgram.Type.ToLower() != "arduino")
{
homegenie.ProgramEngine.CompileScript(newProgram);
}
//
homegenie.UpdateProgramsDatabase();
//migCommand.response = JsonHelper.GetSimpleResponse(programblock.Address);
migCommand.Response = newProgram.Address.ToString();
break;
case "Programs.Export":
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
string filename = currentProgram.Address + "-" + currentProgram.Name.Replace(" ", "_");
//
var writerSettings = new System.Xml.XmlWriterSettings();
writerSettings.Indent = true;
var programSerializer = new System.Xml.Serialization.XmlSerializer(typeof(ProgramBlock));
var builder = new StringBuilder();
var writer = System.Xml.XmlWriter.Create(builder, writerSettings);
programSerializer.Serialize(writer, currentProgram);
writer.Close();
//
if (currentProgram.Type.ToLower() == "arduino")
{
string arduinoBundle = Path.Combine(AppDomain.CurrentDomain.BaseDirectory,
Utility.GetTmpFolder(),
"export",
filename + ".zip");
if (File.Exists(arduinoBundle))
{
File.Delete(arduinoBundle);
}
else if (!Directory.Exists(Path.GetDirectoryName(arduinoBundle)))
{
Directory.CreateDirectory(Path.GetDirectoryName(arduinoBundle));
}
string mainProgramFile = Path.Combine(Path.GetDirectoryName(arduinoBundle), "program.hgx");
File.WriteAllText(
mainProgramFile,
builder.ToString()
);
Utility.AddFileToZip(arduinoBundle, mainProgramFile, "program.hgx");
sketchFolder = Path.Combine("programs", "arduino", currentProgram.Address.ToString());
foreach (string f in Directory.GetFiles(sketchFolder))
{
if (!Path.GetFileName(f).StartsWith("sketch_"))
{
Utility.AddFileToZip(
arduinoBundle,
Path.Combine(sketchFolder, Path.GetFileName(f)),
Path.Combine(
"src",
Path.GetFileName(f)
)
);
}
}
//
byte[] bundleData = File.ReadAllBytes(arduinoBundle);
(request.Context as HttpListenerContext).Response.AddHeader(
"Content-Disposition",
"attachment; filename=\"" + filename + ".zip\""
);
(request.Context as HttpListenerContext).Response.OutputStream.Write(bundleData, 0, bundleData.Length);
}
else
{
(request.Context as HttpListenerContext).Response.AddHeader(
"Content-Disposition",
"attachment; filename=\"" + filename + ".hgx\""
);
migCommand.Response = builder.ToString();
}
break;
case "Programs.List":
var programList = new List <ProgramBlock>(homegenie.ProgramEngine.Programs);
programList.Sort(delegate(ProgramBlock p1, ProgramBlock p2)
{
string c1 = p1.Name + " " + p1.Address;
string c2 = p2.Name + " " + p2.Address;
return(c1.CompareTo(c2));
});
migCommand.Response = JsonConvert.SerializeObject(programList);
break;
case "Programs.Add":
newProgram = new ProgramBlock()
{
Group = migCommand.GetOption(0),
Name = streamContent,
Type = "Wizard"
};
newProgram.Address = homegenie.ProgramEngine.GeneratePid();
homegenie.ProgramEngine.ProgramAdd(newProgram);
homegenie.UpdateProgramsDatabase();
migCommand.Response = JsonHelper.GetSimpleResponse(newProgram.Address.ToString());
break;
case "Programs.Delete":
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
//TODO: remove groups associations as well
currentProgram.IsEnabled = false;
homegenie.ProgramEngine.ProgramRemove(currentProgram);
homegenie.UpdateProgramsDatabase();
// remove associated module entry
homegenie.Modules.RemoveAll(m => m.Domain == Domains.HomeAutomation_HomeGenie_Automation && m.Address == currentProgram.Address.ToString());
homegenie.UpdateModulesDatabase();
}
break;
case "Programs.Compile":
case "Programs.Update":
newProgram = JsonConvert.DeserializeObject <ProgramBlock>(streamContent);
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == newProgram.Address);
//
if (currentProgram == null)
{
newProgram.Address = homegenie.ProgramEngine.GeneratePid();
homegenie.ProgramEngine.ProgramAdd(newProgram);
}
else
{
if (currentProgram.Type.ToLower() != newProgram.Type.ToLower())
{
currentProgram.AppAssembly = null; // dispose assembly and interrupt current task
}
currentProgram.Type = newProgram.Type;
currentProgram.Group = newProgram.Group;
currentProgram.Name = newProgram.Name;
currentProgram.Description = newProgram.Description;
currentProgram.IsEnabled = newProgram.IsEnabled;
currentProgram.ScriptCondition = newProgram.ScriptCondition;
currentProgram.ScriptSource = newProgram.ScriptSource;
currentProgram.Commands = newProgram.Commands;
currentProgram.Conditions = newProgram.Conditions;
currentProgram.ConditionType = newProgram.ConditionType;
// reset last condition evaluation status
currentProgram.LastConditionEvaluationResult = false;
}
//
if (migCommand.Command == "Programs.Compile")
{
// reset previous error status
currentProgram.IsEnabled = false;
currentProgram.Stop();
currentProgram.ScriptErrors = "";
//
List <ProgramError> errors = homegenie.ProgramEngine.CompileScript(currentProgram);
//
currentProgram.IsEnabled = newProgram.IsEnabled;
currentProgram.ScriptErrors = JsonConvert.SerializeObject(errors);
migCommand.Response = currentProgram.ScriptErrors;
}
//
homegenie.UpdateProgramsDatabase();
//
homegenie.modules_RefreshPrograms();
homegenie.modules_RefreshVirtualModules();
homegenie.modules_Sort();
break;
case "Programs.Arduino.FileLoad":
sketchFolder = Path.GetDirectoryName(ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0)));
sketchFile = migCommand.GetOption(1);
if (sketchFile == "main")
{
// "main" is a special keyword to indicate the main program sketch file
sketchFile = ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0));
}
sketchFile = Path.Combine(sketchFolder, Path.GetFileName(sketchFile));
migCommand.Response = JsonHelper.GetSimpleResponse(File.ReadAllText(sketchFile));
break;
case "Programs.Arduino.FileSave":
sketchFolder = Path.GetDirectoryName(ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0)));
sketchFile = Path.Combine(sketchFolder, Path.GetFileName(migCommand.GetOption(1)));
File.WriteAllText(sketchFile, streamContent);
break;
case "Programs.Arduino.FileAdd":
sketchFolder = Path.GetDirectoryName(ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0)));
if (!Directory.Exists(sketchFolder))
{
Directory.CreateDirectory(sketchFolder);
}
sketchFile = Path.Combine(sketchFolder, Path.GetFileName(migCommand.GetOption(1)));
if (File.Exists(sketchFile))
{
migCommand.Response = JsonHelper.GetSimpleResponse("EXISTS");
}
else if (!ArduinoAppFactory.IsValidProjectFile(sketchFile))
{
migCommand.Response = JsonHelper.GetSimpleResponse("INVALID_NAME");
}
else
{
StreamWriter sw = File.CreateText(sketchFile);
sw.Close();
sw.Dispose();
sw = null;
migCommand.Response = JsonHelper.GetSimpleResponse("OK");
}
break;
case "Programs.Arduino.FileDelete":
sketchFolder = Path.GetDirectoryName(ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0)));
sketchFile = Path.Combine(sketchFolder, Path.GetFileName(migCommand.GetOption(1)));
if (!File.Exists(sketchFile))
{
migCommand.Response = JsonHelper.GetSimpleResponse("NOT_FOUND");
}
else
{
File.Delete(sketchFile);
migCommand.Response = JsonHelper.GetSimpleResponse("OK");
}
break;
case "Programs.Arduino.FileList":
sketchFolder = Path.GetDirectoryName(ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0)));
List <string> files = new List <string>();
foreach (string f in Directory.GetFiles(sketchFolder))
{
if (ArduinoAppFactory.IsValidProjectFile(f))
{
files.Add(Path.GetFileName(f));
}
}
migCommand.Response = JsonConvert.SerializeObject(files);
break;
case "Programs.Run":
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
// clear any runtime errors before running
currentProgram.ScriptErrors = "";
homegenie.ProgramEngine.RaiseProgramModuleEvent(
currentProgram,
Properties.RUNTIME_ERROR,
""
);
ProgramRun(migCommand.GetOption(0), migCommand.GetOption(1));
}
break;
case "Programs.Toggle":
currentProgram = ProgramToggle(migCommand.GetOption(0), migCommand.GetOption(1));
break;
case "Programs.Break":
currentProgram = ProgramBreak(migCommand.GetOption(0));
break;
case "Programs.Restart":
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
currentProgram.IsEnabled = false;
try
{
currentProgram.Stop();
}
catch
{
}
currentProgram.IsEnabled = true;
homegenie.UpdateProgramsDatabase();
}
break;
case "Programs.Enable":
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
currentProgram.IsEnabled = true;
homegenie.UpdateProgramsDatabase();
}
break;
case "Programs.Disable":
currentProgram = homegenie.ProgramEngine.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
currentProgram.IsEnabled = false;
try
{
currentProgram.Stop();
}
catch
{
}
homegenie.UpdateProgramsDatabase();
}
break;
}
}
}
public ArduinoEngine(ProgramBlock pb) : base(pb)
{
}
public WizardEngine(ProgramBlock pb)
: base(pb)
{
}
public RubyEngine(ProgramBlock pb) : base(pb)
{
}
public JavascriptEngine(ProgramBlock pb)
: base(pb)
{
}
public static ProgramBlock<MilocInstruction> DoOpt(ProgramBlock<MilocInstruction> prog)
{
var defs = new ReachingDef<MilocInstruction>(prog);
var conv = prog.Convert(new MilocConverter<MilocInstruction>(new PowerReductionTranslator(defs)));
return (ProgramBlock<MilocInstruction>)conv;
}
private static void optimizeBitcode(ProgramBlock<LlvmInstruction> c, string tmp)
{
ProcessStartInfo si = new ProcessStartInfo("opt.exe", "-std-compile-opts -std-link-opts -o \"" + tmp + "\"");
si.UseShellExecute = false;
si.RedirectStandardInput = true;
si.RedirectStandardError = true;
si.RedirectStandardOutput = true;
Process p = Process.Start(si);
c.Print(p.StandardInput, new LlvmPrinter());
p.StandardInput.Flush();
p.StandardInput.Close();
var text = p.StandardOutput.ReadToEnd();
var err = p.StandardError.ReadToEnd();
p.WaitForExit();
text += p.StandardOutput.ReadToEnd();
err += p.StandardError.ReadToEnd();
if (p.ExitCode != 0)
throw new EvilException(EvilSystem.Llvm, err);
}
/// <summary>
///
/// </summary>
/// <param name="start"></param>
/// <returns>-1 if all nodes were colorable, otherwise the id of the virtual register that coud not be colored.</returns>
private Dictionary<string, List<int>> colorGraph(ProgramBlock<SparcInstruction> start)
{
var functionsToUncoloredRegisters = new Dictionary<string, List<int>>();
foreach (var f in start.Functions)
{
if (coloringDone.Contains(f.Name))
continue;
functionsToUncoloredRegisters[f.Name] = colorFunction(f);
if (functionsToUncoloredRegisters[f.Name].Count == 0)
coloringDone.Add(f.Name);
}
return functionsToUncoloredRegisters;
}
private void doGenAndKill(ProgramBlock<SparcInstruction> start)
{
foreach (var f in start.Functions)
{
if (coloringDone.Contains(f.Name))
continue;
f.VisitBlocks(b =>
{
var gset = genSets[b];
var kset = killSets[b];
foreach (var instr in b.Code)
{
instr.SourceRegs.Where(r => !kset[r.IntVal]).Map(r => gset.Set(r.IntVal, true));
instr.DestRegs.Map(r => kset.Set(r.IntVal, true));
}
});
}
}
// Use this for initialization
void Start()
{
programBlock = GetComponent <ProgramBlock> ();
programBlock.SetProgramBlockName("True False");
}
public void ProcessRequest(MigClientRequest request)
{
var migCommand = request.Command;
string streamContent = "";
ProgramBlock currentProgram;
ProgramBlock newProgram;
string sketchFile = "", sketchFolder = "";
//
homegenie.ExecuteAutomationRequest(migCommand);
if (migCommand.Command.StartsWith("Macro."))
{
switch (migCommand.Command)
{
case "Macro.Record":
homegenie.ProgramManager.MacroRecorder.RecordingEnable();
break;
case "Macro.Save":
newProgram = homegenie.ProgramManager.MacroRecorder.SaveMacro(migCommand.GetOption(1));
request.ResponseData = newProgram.Address.ToString();
break;
case "Macro.Discard":
homegenie.ProgramManager.MacroRecorder.RecordingDisable();
break;
case "Macro.SetDelay":
switch (migCommand.GetOption(0).ToLower())
{
case "none":
homegenie.ProgramManager.MacroRecorder.DelayType = MacroDelayType.None;
break;
case "mimic":
homegenie.ProgramManager.MacroRecorder.DelayType = MacroDelayType.Mimic;
break;
case "fixed":
double secs = double.Parse(
migCommand.GetOption(1),
System.Globalization.CultureInfo.InvariantCulture
);
homegenie.ProgramManager.MacroRecorder.DelayType = MacroDelayType.Fixed;
homegenie.ProgramManager.MacroRecorder.DelaySeconds = secs;
break;
}
break;
case "Macro.GetDelay":
request.ResponseData = "{ \"DelayType\" : \"" + homegenie.ProgramManager.MacroRecorder.DelayType + "\", \"DelayOptions\" : \"" + homegenie.ProgramManager.MacroRecorder.DelaySeconds + "\" }";
break;
}
}
else if (migCommand.Command.StartsWith("Scheduling."))
{
switch (migCommand.Command)
{
case "Scheduling.Add":
case "Scheduling.Update":
var newSchedule = JsonConvert.DeserializeObject <SchedulerItem>(request.RequestText);
var item = homegenie.ProgramManager.SchedulerService.AddOrUpdate(
newSchedule.Name,
newSchedule.CronExpression,
newSchedule.Data,
newSchedule.Description,
newSchedule.Script
);
if (newSchedule.BoundDevices != null)
{
item.BoundDevices = newSchedule.BoundDevices;
}
if (newSchedule.BoundModules != null)
{
item.BoundModules = newSchedule.BoundModules;
}
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Delete":
homegenie.ProgramManager.SchedulerService.Remove(migCommand.GetOption(0));
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Enable":
homegenie.ProgramManager.SchedulerService.Enable(migCommand.GetOption(0));
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Disable":
homegenie.ProgramManager.SchedulerService.Disable(migCommand.GetOption(0));
homegenie.UpdateSchedulerDatabase();
break;
case "Scheduling.Get":
request.ResponseData = homegenie.ProgramManager.SchedulerService.Get(migCommand.GetOption(0));
break;
case "Scheduling.ListOccurrences":
int hours = 24;
int.TryParse(migCommand.GetOption(0), out hours);
DateTime dateStart = DateTime.Today.ToUniversalTime();
string startFrom = migCommand.GetOption(1);
if (!String.IsNullOrWhiteSpace(startFrom))
{
dateStart = Utility.JavascriptToDate(long.Parse(startFrom));
}
List <dynamic> nextList = new List <dynamic>();
foreach (var ce in homegenie.ProgramManager.SchedulerService.Items)
{
if (!ce.IsEnabled)
{
continue;
}
var evt = new { Name = ce.Name, Description = ce.Description, RunScript = !String.IsNullOrWhiteSpace(ce.Script), Occurrences = new List <double>() };
var d = dateStart;
var dateEnd = dateStart.AddHours(hours);
var occurs = homegenie.ProgramManager.SchedulerService.GetScheduling(dateStart, dateEnd, ce.CronExpression);
occurs.Sort();
foreach (var dt in occurs)
{
evt.Occurrences.Add(Utility.DateToJavascript(dt.ToUniversalTime()));
}
if (evt.Occurrences.Count > 0)
{
nextList.Add(evt);
}
}
request.ResponseData = nextList;
break;
case "Scheduling.List":
homegenie.ProgramManager.SchedulerService.Items.Sort((SchedulerItem s1, SchedulerItem s2) =>
{
return(s1.Name.CompareTo(s2.Name));
});
request.ResponseData = homegenie.ProgramManager.SchedulerService.Items;
break;
case "Scheduling.Describe":
var cronDescription = "";
try {
cronDescription = ExpressionDescriptor.GetDescription(migCommand.GetOption(0).Trim());
cronDescription = Char.ToLowerInvariant(cronDescription[0]) + cronDescription.Substring(1);
} catch { }
request.ResponseData = new ResponseText(cronDescription);
break;
case "Scheduling.SolarTimes":
var solarTimes = new SolarTimes(DateTime.Now, homegenie.ProgramManager.SchedulerService.Location["latitude"].Value, homegenie.ProgramManager.SchedulerService.Location["longitude"].Value);
request.ResponseData = solarTimes;
break;
}
}
else if (migCommand.Command.StartsWith("Programs."))
{
if (migCommand.Command != "Programs.Import")
{
streamContent = request.RequestText;
}
//
switch (migCommand.Command)
{
case "Programs.Import":
string archiveName = "homegenie_program_import.hgx";
if (File.Exists(archiveName))
{
File.Delete(archiveName);
}
//
MIG.Gateways.WebServiceUtility.SaveFile(request.RequestData, archiveName);
int newPid = homegenie.ProgramManager.GeneratePid();
newProgram = homegenie.PackageManager.ProgramImport(newPid, archiveName, migCommand.GetOption(0));
/*
* int newPid = homegenie.ProgramManager.GeneratePid();
* var reader = new StreamReader(archiveName);
* char[] signature = new char[2];
* reader.Read(signature, 0, 2);
* reader.Close();
* if (signature[0] == 'P' && signature[1] == 'K')
* {
* // Read and uncompress zip file content (arduino program bundle)
* string zipFileName = archiveName.Replace(".hgx", ".zip");
* if (File.Exists(zipFileName))
* File.Delete(zipFileName);
* File.Move(archiveName, zipFileName);
* string destFolder = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, Utility.GetTmpFolder(), "import");
* if (Directory.Exists(destFolder))
* Directory.Delete(destFolder, true);
* Utility.UncompressZip(zipFileName, destFolder);
* string bundleFolder = Path.Combine("programs", "arduino", newPid.ToString());
* if (Directory.Exists(bundleFolder))
* Directory.Delete(bundleFolder, true);
* if (!Directory.Exists(Path.Combine("programs", "arduino")))
* Directory.CreateDirectory(Path.Combine("programs", "arduino"));
* Directory.Move(Path.Combine(destFolder, "src"), bundleFolder);
* reader = new StreamReader(Path.Combine(destFolder, "program.hgx"));
* }
* else
* {
* reader = new StreamReader(archiveName);
* }
* var serializer = new XmlSerializer(typeof(ProgramBlock));
* newProgram = (ProgramBlock)serializer.Deserialize(reader);
* reader.Close();
* //
* newProgram.Address = newPid;
* newProgram.Group = migCommand.GetOption(0);
* homegenie.ProgramManager.ProgramAdd(newProgram);
* //
* newProgram.IsEnabled = false;
* newProgram.ScriptErrors = "";
* newProgram.Engine.SetHost(homegenie);
* //
* if (newProgram.Type.ToLower() != "arduino")
* {
* homegenie.ProgramManager.CompileScript(newProgram);
* }
*/
homegenie.UpdateProgramsDatabase();
//migCommand.response = JsonHelper.GetSimpleResponse(programblock.Address);
request.ResponseData = newProgram.Address.ToString();
break;
case "Programs.Export":
currentProgram = homegenie.ProgramManager.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
string filename = currentProgram.Address + "-" + currentProgram.Name.Replace(" ", "_");
//
var writerSettings = new System.Xml.XmlWriterSettings();
writerSettings.Indent = true;
writerSettings.Encoding = Encoding.UTF8;
var programSerializer = new System.Xml.Serialization.XmlSerializer(typeof(ProgramBlock));
var builder = new StringBuilder();
var writer = System.Xml.XmlWriter.Create(builder, writerSettings);
programSerializer.Serialize(writer, currentProgram);
writer.Close();
//
if (currentProgram.Type.ToLower() == "arduino")
{
string arduinoBundle = Path.Combine(AppDomain.CurrentDomain.BaseDirectory,
Utility.GetTmpFolder(),
"export",
filename + ".zip");
if (File.Exists(arduinoBundle))
{
File.Delete(arduinoBundle);
}
else if (!Directory.Exists(Path.GetDirectoryName(arduinoBundle)))
{
Directory.CreateDirectory(Path.GetDirectoryName(arduinoBundle));
}
string mainProgramFile = Path.Combine(Path.GetDirectoryName(arduinoBundle), "program.hgx");
File.WriteAllText(
mainProgramFile,
builder.ToString()
);
Utility.AddFileToZip(arduinoBundle, mainProgramFile, "program.hgx");
sketchFolder = Path.Combine("programs", "arduino", currentProgram.Address.ToString());
foreach (string f in Directory.GetFiles(sketchFolder))
{
if (!Path.GetFileName(f).StartsWith("sketch_"))
{
Utility.AddFileToZip(
arduinoBundle,
Path.Combine(sketchFolder, Path.GetFileName(f)),
Path.Combine(
"src",
Path.GetFileName(f)
)
);
}
}
//
byte[] bundleData = File.ReadAllBytes(arduinoBundle);
(request.Context.Data as HttpListenerContext).Response.AddHeader(
"Content-Disposition",
"attachment; filename=\"" + filename + ".zip\""
);
(request.Context.Data as HttpListenerContext).Response.OutputStream.Write(bundleData, 0, bundleData.Length);
}
else
{
(request.Context.Data as HttpListenerContext).Response.AddHeader(
"Content-Disposition",
"attachment; filename=\"" + filename + ".hgx\""
);
request.ResponseData = builder.ToString();
}
break;
case "Programs.List":
var programList = new List <ProgramBlock>(homegenie.ProgramManager.Programs);
programList.Sort(delegate(ProgramBlock p1, ProgramBlock p2)
{
string c1 = p1.Name + " " + p1.Address;
string c2 = p2.Name + " " + p2.Address;
return(c1.CompareTo(c2));
});
request.ResponseData = programList;
break;
case "Programs.Get":
try
{
var prg = homegenie.ProgramManager.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
var settings = new JsonSerializerSettings {
Formatting = Formatting.Indented
};
request.ResponseData = JsonConvert.SerializeObject(prg, settings);
}
catch (Exception ex)
{
request.ResponseData = new ResponseText("ERROR: \n" + ex.Message + "\n\n" + ex.StackTrace);
}
break;
case "Programs.Add":
newProgram = new ProgramBlock()
{
Group = migCommand.GetOption(0),
Name = streamContent,
Type = "Wizard"
};
newProgram.Address = homegenie.ProgramManager.GeneratePid();
homegenie.ProgramManager.ProgramAdd(newProgram);
homegenie.UpdateProgramsDatabase();
request.ResponseData = new ResponseText(newProgram.Address.ToString());
break;
case "Programs.Delete":
currentProgram = homegenie.ProgramManager.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
//TODO: remove groups associations as well
homegenie.ProgramManager.ProgramRemove(currentProgram);
homegenie.UpdateProgramsDatabase();
// remove associated module entry
homegenie.Modules.RemoveAll(m => m.Domain == Domains.HomeAutomation_HomeGenie_Automation && m.Address == currentProgram.Address.ToString());
homegenie.UpdateModulesDatabase();
}
break;
case "Programs.Compile":
case "Programs.Update":
newProgram = JsonConvert.DeserializeObject <ProgramBlock>(streamContent);
currentProgram = homegenie.ProgramManager.Programs.Find(p => p.Address == newProgram.Address);
//
if (currentProgram == null)
{
newProgram.Address = homegenie.ProgramManager.GeneratePid();
homegenie.ProgramManager.ProgramAdd(newProgram);
}
else
{
bool typeChanged = (currentProgram.Type.ToLower() != newProgram.Type.ToLower());
currentProgram.Type = newProgram.Type;
currentProgram.Group = newProgram.Group;
currentProgram.Name = newProgram.Name;
currentProgram.Description = newProgram.Description;
if (typeChanged)
{
currentProgram.Engine.SetHost(homegenie);
}
currentProgram.IsEnabled = newProgram.IsEnabled;
currentProgram.ScriptCondition = newProgram.ScriptCondition;
currentProgram.ScriptSource = newProgram.ScriptSource;
currentProgram.Commands = newProgram.Commands;
currentProgram.Conditions = newProgram.Conditions;
currentProgram.ConditionType = newProgram.ConditionType;
// reset last condition evaluation status
currentProgram.LastConditionEvaluationResult = false;
}
//
if (migCommand.Command == "Programs.Compile")
{
// reset previous error status
currentProgram.IsEnabled = false;
currentProgram.Engine.StopProgram();
currentProgram.ScriptErrors = "";
//
List <ProgramError> errors = homegenie.ProgramManager.CompileScript(currentProgram);
//
currentProgram.IsEnabled = newProgram.IsEnabled && errors.Count == 0;
currentProgram.ScriptErrors = JsonConvert.SerializeObject(errors);
request.ResponseData = currentProgram.ScriptErrors;
}
//
homegenie.UpdateProgramsDatabase();
//
homegenie.modules_RefreshPrograms();
homegenie.modules_RefreshVirtualModules();
homegenie.modules_Sort();
break;
case "Programs.Arduino.FileLoad":
sketchFolder = Path.GetDirectoryName(ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0)));
sketchFile = migCommand.GetOption(1);
if (sketchFile == "main")
{
// "main" is a special keyword to indicate the main program sketch file
sketchFile = ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0));
}
sketchFile = Path.Combine(sketchFolder, Path.GetFileName(sketchFile));
request.ResponseData = new ResponseText(File.ReadAllText(sketchFile));
break;
case "Programs.Arduino.FileSave":
sketchFolder = Path.GetDirectoryName(ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0)));
sketchFile = Path.Combine(sketchFolder, Path.GetFileName(migCommand.GetOption(1)));
File.WriteAllText(sketchFile, streamContent);
break;
case "Programs.Arduino.FileAdd":
sketchFolder = Path.GetDirectoryName(ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0)));
if (!Directory.Exists(sketchFolder))
{
Directory.CreateDirectory(sketchFolder);
}
sketchFile = Path.Combine(sketchFolder, Path.GetFileName(migCommand.GetOption(1)));
if (File.Exists(sketchFile))
{
request.ResponseData = new ResponseText("EXISTS");
}
else if (!ArduinoAppFactory.IsValidProjectFile(sketchFile))
{
request.ResponseData = new ResponseText("INVALID_NAME");
}
else
{
StreamWriter sw = File.CreateText(sketchFile);
sw.Close();
sw.Dispose();
sw = null;
request.ResponseData = new ResponseText("OK");
}
break;
case "Programs.Arduino.FileDelete":
sketchFolder = Path.GetDirectoryName(ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0)));
sketchFile = Path.Combine(sketchFolder, Path.GetFileName(migCommand.GetOption(1)));
if (!File.Exists(sketchFile))
{
request.ResponseData = new ResponseText("NOT_FOUND");
}
else
{
File.Delete(sketchFile);
request.ResponseData = new ResponseText("OK");
}
break;
case "Programs.Arduino.FileList":
sketchFolder = Path.GetDirectoryName(ArduinoAppFactory.GetSketchFile(migCommand.GetOption(0)));
List <string> files = new List <string>();
foreach (string f in Directory.GetFiles(sketchFolder))
{
if (ArduinoAppFactory.IsValidProjectFile(f))
{
files.Add(Path.GetFileName(f));
}
}
request.ResponseData = files;
break;
case "Programs.Run":
currentProgram = homegenie.ProgramManager.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
// clear any runtime errors before running
currentProgram.ScriptErrors = "";
homegenie.ProgramManager.RaiseProgramModuleEvent(
currentProgram,
Properties.RuntimeError,
""
);
currentProgram.IsEnabled = true;
System.Threading.Thread.Sleep(500);
ProgramRun(migCommand.GetOption(0), migCommand.GetOption(1));
}
break;
case "Programs.Toggle":
currentProgram = ProgramToggle(migCommand.GetOption(0), migCommand.GetOption(1));
break;
case "Programs.Break":
currentProgram = ProgramBreak(migCommand.GetOption(0));
break;
case "Programs.Restart":
currentProgram = homegenie.ProgramManager.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
currentProgram.IsEnabled = false;
try
{
currentProgram.Engine.StopProgram();
}
catch
{
}
currentProgram.IsEnabled = true;
homegenie.UpdateProgramsDatabase();
}
break;
case "Programs.Enable":
currentProgram = homegenie.ProgramManager.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
currentProgram.IsEnabled = true;
homegenie.UpdateProgramsDatabase();
}
break;
case "Programs.Disable":
currentProgram = homegenie.ProgramManager.Programs.Find(p => p.Address == int.Parse(migCommand.GetOption(0)));
if (currentProgram != null)
{
currentProgram.IsEnabled = false;
try
{
currentProgram.Engine.StopProgram();
}
catch
{
}
homegenie.UpdateProgramsDatabase();
}
break;
}
}
}
private int getMaxRegValue(ProgramBlock<SparcInstruction> start)
{
var allReg = new List<Register>();
foreach (var f in start.Functions)
{
f.VisitBlocks(b =>
{
foreach (var instr in b.Code)
{
allReg.AddRange(instr.SourceRegs);
allReg.AddRange(instr.DestRegs);
}
});
}
return allReg.Select(r => r.IntVal).Max();
}
private void doLiveoutSets(ProgramBlock<SparcInstruction> start)
{
bool changed = false;
do
{
changed = false;
foreach (var f in start.Functions)
{
if (coloringDone.Contains(f.Name))
continue;
f.VisitBlocks(b =>
{
var gset = genSets[b];
var kset = killSets[b];
var lset = liveoutSets[b];
var newLset = new BitArray(numRegs);
if (!b.IsReturn)
{
foreach (var suc in b.Nexts)
{
var sucKset = killSets[suc as BasicBlock<SparcInstruction>];
var sucGset = genSets[suc as BasicBlock<SparcInstruction>];
var sucLset = liveoutSets[suc as BasicBlock<SparcInstruction>];
var sucSet = new BitArray(numRegs);
//do lset - kset
sucSet.Or(sucLset).Xor(sucKset).And(sucLset);
//do gen union with the above
sucSet.Or(sucGset);
//union with new lset
newLset.Or(sucSet);
}
}
var countingSet = new BitArray(lset);
countingSet.Xor(newLset);
var countArr = new int[countingSet.IntArraySize()];
countingSet.CopyTo(countArr, 0);
for (int i = 0; i < countArr.Length; i++)
{
changed |= countArr[i] != 0;
}
if (changed)
{
liveoutSets[b] = newLset;
}
}, false);
}
}
while (changed);
}
public PythonEngine(ProgramBlock pb) : base(pb)
{
}
