private void Execute(IGeneratedAlgorithm ca)
{
// If there is a message update listener, try to add in the engine to listen to messages.
if (this.MessageUpdated != null)
{
DebuggingSupport.TryAddRemoveEventListenerDynamic(ca, OnMessageUpdated, add: true);
}
// Register the ProgressChanged handler only while doing inference within InferenceEngine.
// We do not want the handler to run if the user accesses the GeneratedAlgorithms directly.
ca.ProgressChanged += OnProgressChanged;
try
{
Stopwatch s = null;
if (ShowTimings)
{
s = new Stopwatch();
s.Start();
FileStats.Clear();
}
if (ResetOnObservedValueChanged)
{
ca.Execute(NumberOfIterations);
}
else
{
ca.Update(NumberOfIterations - ca.NumberOfIterationsDone);
}
if (s != null)
{
long elapsed = s.ElapsedMilliseconds;
Console.WriteLine("Inference time was {1}ms (max {0} iterations)",
NumberOfIterations, elapsed);
if (FileStats.ReadCount > 0 || FileStats.WriteCount > 0)
{
Console.WriteLine("{0} file reads {1} file writes", FileStats.ReadCount, FileStats.WriteCount);
}
}
}
finally
{
ca.ProgressChanged -= OnProgressChanged;
if (this.MessageUpdated != null)
{
DebuggingSupport.TryAddRemoveEventListenerDynamic(ca, OnMessageUpdated, add: false);
}
}
}
// Usage: Xamarin.Interactive.Console.exe {IdentifyAgentRequest args}
// Passing no arguments is supported for debug scenarios.
public static void Main()
{
var ctx = new SingleThreadSynchronizationContext();
SynchronizationContext.SetSynchronizationContext(ctx);
var agent = new ConsoleAgent();
MacIntegration.Integrate(agent);
try {
var request = IdentifyAgentRequest.FromCommandLineArguments(Environment.GetCommandLineArgs());
if (request != null && request.ProcessId >= 0)
{
if (Environment.OSVersion.Platform == PlatformID.Unix)
{
new Thread(() => {
MonoTouch.Hosting.ProcessMonitor.WaitPid(request.ProcessId);
Environment.Exit(0);
})
{
IsBackground = true
}.Start();
}
else
{
var parentProcess = Process.GetProcessById(request.ProcessId);
parentProcess.EnableRaisingEvents = true;
parentProcess.Exited += (o, e) => Environment.Exit(0);
}
}
} catch (Exception e) {
Log.Error("Main", e);
}
agent.Start(new AgentStartOptions {
ClientSessionKind = ClientSessionKind.Workbook
});
DebuggingSupport.LaunchClientAppForDebugging(agent);
ctx.RunOnCurrentThread();
}
public override void DidFinishLaunching(NSNotification notification)
{
var ppid = getppid();
NSWorkspace.Notifications.ObserveDidTerminateApplication((sender, e) => {
if (e.Application.ProcessIdentifier == ppid)
{
NSApplication.SharedApplication.Terminate(e.Application);
}
});
var agent = new MacAgent();
agent.Start(new AgentStartOptions {
ClientSessionKind = ClientSessionKind.Workbook
});
DebuggingSupport.LaunchClientAppForDebugging(agent);
}
void App_OnStartup(object sender, StartupEventArgs e)
{
var agent = new WpfAgent(() => new MainWindow());
try {
var request = IdentifyAgentRequest.FromCommandLineArguments(Environment.GetCommandLineArgs());
if (request.ProcessId >= 0)
{
var parentProcess = Process.GetProcessById(request.ProcessId);
parentProcess.EnableRaisingEvents = true;
parentProcess.Exited += (o, _) => Environment.Exit(0);
}
} catch (Exception ex) {
Log.Error("App", ex);
}
agent.Start(new AgentStartOptions {
ClientSessionKind = ClientSessionKind.Workbook
});
DebuggingSupport.LaunchClientAppForDebugging(agent);
}
/// <summary>
///
/// </summary>
/// <param name="macBase"></param>
/// <param name="dateTime"></param>
private static void NetManagerStreamReceive(IMAC macBase, DateTime dateTime, Packet packet)
{
#if DBG_VERBOSE
DebuggingSupport.PrintMessageReceived(macBase, "Net Manager");
#elif DBG_SIMPLE
Debug.Print("");
#endif
//Debug.Print("\ton " + packet.PayloadType);
var rcvPayloadBytes = packet.Payload;
//var payload = new string(Encoding.UTF8.GetChars(rcvPayloadBytes));
#if DBG_VERBOSE
SystemGlobal.PrintNumericVals("Net Manager Rcv: ", rcvPayloadBytes);
#elif DBG_SIMPLE
Debug.Print("");
#endif
switch ((NetManagerGlobal.MessageIds)rcvPayloadBytes[0])
{
case NetManagerGlobal.MessageIds.Heartbeat:
ushort originator;
ushort numBeat;
SystemGlobal.NodeTypes nodeType;
ushort parent;
byte TTL;
NetManagerGlobal.MoteMessages.Parse.HeartBeat(rcvPayloadBytes, out originator, out numBeat, out nodeType, out parent, out TTL);
// NetManagerGlobal.MoteMessages.Parse.HeartBeat(rcvPayloadBytes, out originator, out numBeat, out nodeType, out parent, out bestetx, out neighbors, out nbrStatus, out numSamplesRec, out numSyncSent, out avgRSSI, out ewrnp);
// NetManagerGlobal.MoteMessages.Parse.HeartBeat(rcvPayloadBytes, out originator, out numBeat, out nodeType, out parent, out bestetx, out num_nbrs, out neighbors, out nbrStatus, out numSamplesRec, out numSyncSent, out avgRSSI, out ewrnp, out isAvailableForUpperLayers, out TTL);
Debug.Print("\t>>> Heartbeat #" + numBeat + " from neighbor " + packet.Src + " by " + originator + " with TTL " + TTL);
#if DBG_DIAGNOSTIC
Debug.Print("Parent: " + parent);
Debug.Print("");
#endif
#if RELAY_NODE || CLIENT_NODE
// If we're the originator of the message, or if (TTL-1) is 0, do not pass it on.
if (originator == _netManagerPipe.MACRadioObj.RadioAddress || --TTL == 0)
{
return;
}
RoutingGlobal.AddChild(originator, packet.Src);
#region Uncomment when not using scheduler
// TODO: Uncomment lines when not using scheduler
// If in a reset, do not forward TODO: Change this to "spray"
if (RoutingGlobal._color == Color.Red)
{
#if DBG_VERBOSE
Debug.Print("\tIn a Reset wave... not forwarded");
#endif
return;
}
// If parent is available, pass it on
if (RoutingGlobal.IsParent)
{
byte[] routedMsg = new byte[rcvPayloadBytes.Length];
var size = NetManagerGlobal.MoteMessages.Compose.Heartbeat(routedMsg, originator, numBeat, nodeType, parent, TTL);
var status = RoutingGlobal.SendToParent(_netManagerPipe, routedMsg, size);
if (status != 999)
{
RoutingGlobal.UpdateNumTriesInCurrentWindow_Parent(1);
#if !DBG_LOGIC
Debug.Print("Updated numTriesInCurrentWindow for Parent " + RoutingGlobal.Parent + "; new value = " + RoutingGlobal.GetNumTriesInCurrentWindow_Parent());
#endif
}
else //Retry once
{
#if !DBG_LOGIC
Debug.Print("Retrying packet");
#endif
RoutingGlobal.CleanseCandidateTable(_netManagerPipe);
Candidate tmpBest = CandidateTable.GetBestCandidate(false);
NetManagerGlobal.TempParent = tmpBest.GetMacID();
status = NetManagerGlobal.SendToTempParent(_netManagerPipe, routedMsg, size);
if (status != 999)
{
tmpBest.UpdateNumTriesInCurrentWindow(1);
#if !DBG_LOGIC
Debug.Print("Updated numTriesInCurrentWindow for TempParent " + NetManagerGlobal.TempParent + "; new value = " + tmpBest.GetNumTriesInCurrentWindow());
#endif
}
}
}
#endregion
#region unused
// If parent is not available, broadcast it
//{
// //var size = NetManagerGlobal.ComposeMessages.CreateHeartbeat(NetManagerGlobal.MsgBytes, _netManagerPipe.MACRadioObj.RadioAddress);
// SystemGlobal.BroadcastBeacon(_netManagerPipe, rcvPayloadBytes, packet.Size);
//}
//if (payload.Substring(0, 9).Equals("Heartbeat")) //Relay heartbeats, generated hourly
//{
// Debug.Print("\tReceived Heartbeat: " + payload.Substring(0, 9) + "; source: " + payload.Substring(9) + "; from neighbor: " + packet.Src);
// if (RoutingGlobal.Parent == SystemGlobal.NoParent)
// {
// return;
// }
// var toSendByte = Encoding.UTF8.GetBytes(payload);
// var status = _netManagerPipe.Send(RoutingGlobal.Parent, toSendByte, 0, (ushort)toSendByte.Length);
// if (status != NetOpStatus.S_Success)
// {
// Debug.Print("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Send status: " + status);
// }
// SystemGlobal.PrintNumericVals("Net Manager Snd: ", toSendByte);
// Debug.Print("Forwarded Heartbeat: " + payload.Substring(0, 9) + "; source: " + payload.Substring(9) + "; from Node: " + packet.Src + " to Node: " + RoutingGlobal.Parent);
//}
#endregion
#endif
#if BASE_STATION
string msg = NetManagerGlobal.PCMessages.Compose.Heartbeat(originator, numBeat, nodeType, parent);
try
{
_serialComm.Write(msg);
#if DBG_VERBOSE
Debug.Print("\n************ Heartbeat forwarded to PC " + msg.Substring(1, msg.Length - 2));
#endif
}
catch (Exception ex)
{
Debug.Print("SerialComm exception for Heartbeat message [" + msg + "]\n" + ex);
}
#endif
break;
default:
throw new ArgumentOutOfRangeException();
}
}
private static void DistResetStreamReceive(IMAC macBase, DateTime time, Packet packet)
{
#if DBG_VERBOSE
DebuggingSupport.PrintMessageReceived(macBase, "Distributed Reset");
#endif
if (packet == null)
{
return;
}
#if !DBG_LOGIC
Debug.Print("\tRSSI: " + packet.RSSI + ", from " + packet.Src);
#endif
var rcvPayloadBytes = packet.Payload;
//var payload = new string(Encoding.UTF8.GetChars(rcvPayloadBytes));
#if DBG_VERBOSE
SystemGlobal.PrintNumericVals("\tDistributed reset Rcv: ", rcvPayloadBytes);
#endif
try
{
ushort[] neighbors = MACBase.NeighborListArray();
var neighborStatus = _distResetPipe.NeighborStatus(packet.Src);
if (neighborStatus == null)
{
#if DBG_VERBOSE
Debug.Print("\t\t!!!!!!!!!!!!!!!!! Node " + packet.Src + " is not a Neighbor (MACBase.NeighborStatus returned null)");
#elif DBG_SIMPLE
Debug.Print("Sender not a neighbor.");
#endif
// If node in children table, drop it
if (Array.IndexOf(_children._childrenList, packet.Src) < -1)
{
_children.DropChild(packet.Src);
}
return;
}
//Debug.Print("\t\tFwd avg RSSI: " + neighborStatus.ReceiveLink.AverageRSSI + ", Rev avg RSSI: " + neighborStatus.SendLink.AverageRSSI);
switch ((MessageIds)rcvPayloadBytes[0])
{
case MessageIds.AddParent:
#if !DBG_LOGIC
Debug.Print("\t>>> AddParent");
#endif
if (_children.AddChild(packet.Src))
{
#if DBG_VERBOSE
Debug.Print("+++ Added new child: " + packet.Src + " +++");
#elif DBG_SIMPLE
Debug.Print("Added new child: " + packet.Src);
#endif
}
else
{
#if DBG_VERBOSE
Debug.Print("@@@ Child already exists: " + packet.Src + " @@@");
#endif
}
return;
case MessageIds.DropParent:
#if !DBG_LOGIC
Debug.Print("\t>>> DropParent");
#endif
if (_children.DropChild(packet.Src))
{
#if DBG_VERBOSE
Debug.Print("--- Dropped child: " + packet.Src + " ---");
#elif DBG_SIMPLE
Debug.Print("Dropped child: " + packet.Src);
#endif
}
else
{
#if DBG_VERBOSE
Debug.Print("@@@ Child does not exist: " + packet.Src + " @@@");
#endif
}
return;
case MessageIds.Reset:
#if !DBG_LOGIC
Debug.Print("\t>>> ResetWave");
#endif
// Decode round number
ushort round_num;
ParseMessages.ParseResetMessage(rcvPayloadBytes, out round_num);
// Is this a legit reset wave?
if (RoutingGlobal._color == Color.Red || packet.Src != RoutingGlobal.Parent || round_num != _resetMsgNum)
{
#if DBG_VERBOSE
Debug.Print("!!! ILLEGAL RESET WAVE# " + round_num + ": Received from: " + packet.Src + " !!!");
#elif DBG_SIMPLE
Debug.Print("Illegal reset wave " + round_num + " from " + packet.Src);
#endif
return;
}
// Refresh children table
_children.CleanseChildrenTable();
if (_children.IsEmpty()) // Start completion wave if leaf node
{
#if DBG_VERBOSE
Debug.Print("*** LEAF NODE REACHED: Initiating completion wave# " + round_num + " ***");
#elif DBG_SIMPLE
Debug.Print("At leaf; initiating completion wave " + round_num);
#endif
Send_CompletionWave(round_num);
// Create status query to existing candidates
var msgBytes = new byte[3];
var size = ComposeMessages.CreateStatusQueryMessage(msgBytes, (ushort)_statusMsgNum);
// Multicast query to candidates
if (MulticastToCandidates(msgBytes, size)) // If there are candidates
{
// Wait for response
_statusResponseTimer.Change(10000, Timeout.Infinite); // 10 second timer
// Reset candidate table
CandidateTable.Initialize((byte)neighbors.Length);
}
else //Empty candidate table; set parent immediately
{
// Set best node in candidate table as parent
RoutingGlobal.SetParent(false);
// Reset params
RoutingGlobal._color = Color.Green;
// Send "Add Parent" message to new parent
DistributedReset.Send_AddParent();
_statusMsgNum++;
}
_resetMsgNum++;
}
else
{
// Forward reset wave to own children
Send_ResetWave(rcvPayloadBytes);
}
return;
case MessageIds.Completion:
#if !DBG_LOGIC
Debug.Print("\t>>> CompletionWave");
#endif
// Decode round number
ushort round;
ParseMessages.ParseCompletionMessage(rcvPayloadBytes, out round);
// Is this a legit completion wave?
int pos = Array.IndexOf(_children._childrenList, packet.Src);
if (RoutingGlobal._color != Color.Red || pos == -1 || round != _resetMsgNum)
{
#if DBG_VERBOSE
Debug.Print("!!! ILLEGAL COMPLETION WAVE# " + round + ": Received from: " + packet.Src + " !!!");
#elif DBG_SIMPLE
Debug.Print("Illegal completion wave " + round + " from " + packet.Src);
#endif
return;
}
_completionMsgs[pos] = true;
// Forward completion wave if received from all children
for (int i = 0; i < _completionMsgs.Length; i++)
{
if (!_completionMsgs[i]) // If not received from any child, return
{
return;
}
}
// Else, forward completion wave to parent
#if DBG_VERBOSE
Debug.Print("*** RECEIVED COMPLETION MESSAGES FROM ALL CHILDREN: initiating completion wave# " + round + " ***");
#elif DBG_SIMPLE
Debug.Print("All children responded; initiating completion wave " + round);
#endif
Send_CompletionWave(round);
// Purge children table
_children = new ChildrenList();
_completionMsgs = null;
_distResetTimer.Change(Timeout.Infinite, Timeout.Infinite);
// Create status query to existing candidates
var msgBytes1 = new byte[3];
var size1 = ComposeMessages.CreateStatusQueryMessage(msgBytes1, (ushort)_statusMsgNum);
// Multicast query to candidates
if (MulticastToCandidates(msgBytes1, size1)) // If there are candidates
{
// Wait for response
_statusResponseTimer.Change(10000, Timeout.Infinite); // 10 second timer
// Reset candidate table
CandidateTable.Initialize((byte)neighbors.Length);
}
else //Empty candidate table; set parent immediately
{
// Set best node in candidate table as parent
RoutingGlobal.SetParent(false);
// Reset params
RoutingGlobal._color = Color.Green;
// Send "Add Parent" message to new parent
DistributedReset.Send_AddParent();
_statusMsgNum++;
}
_resetMsgNum++;
return;
case MessageIds.StatusQuery:
#if !DBG_LOGIC
Debug.Print("\t>>> StatusQuery");
#endif
//If in a reset wave or no valid path, don't bother responding
if (RoutingGlobal._color == Color.Red || RoutingGlobal.BestEtx >= RoutingGlobal.Infinity)
{
#if DBG_VERBOSE
Debug.Print("!!! Not responding. Color: " + RoutingGlobal._color + ", BestEtx: " + RoutingGlobal.BestEtx + " !!!");
#elif DBG_SIMPLE
Debug.Print("Not responding. Color: " + RoutingGlobal._color + ", BestEtx: " + RoutingGlobal.BestEtx);
#endif
return;
}
// Decode round number
ushort status_msgnum;
ParseMessages.ParseStatusQueryMessage(rcvPayloadBytes, out status_msgnum);
// Send status response
var msgBytes2 = new byte[5];
var size2 = ComposeMessages.CreateStatusResponseMessage(msgBytes2, status_msgnum);
NetOpStatus status = _distResetPipe.Send(RoutingGlobal.Parent, msgBytes2, 0, (ushort)size2);
return;
case MessageIds.StatusResponse:
#if !DBG_LOGIC
Debug.Print("\t>>> StatusResponse");
#endif
ushort status_respnum;
Color col;
byte etx;
byte pathEWRNP_B2N;
// Decode message
ParseMessages.ParseStatusResponseMessage(rcvPayloadBytes, out col, out etx, out status_respnum, out pathEWRNP_B2N);
// Is this a valid response?
if (status_respnum != _statusMsgNum)
{
#if DBG_VERBOSE
Debug.Print("!!! ILLEGAL STATUS RESPONSE# " + status_respnum + ": Received from: " + packet.Src + " !!!");
#elif DBG_SIMPLE
Debug.Print("Illegal status response " + status_respnum + " from " + packet.Src);
#endif
return;
}
byte tempEtx = (byte)(etx + 1);
// Add candidate if its offered etx exceeds _minEtx
if (tempEtx >= RoutingGlobal._minEtx)
{
CandidateTable.AddCandidate(packet.Src, 0, tempEtx, pathEWRNP_B2N, RoutingGlobal.MaxEtx); // TODO: Add RSSI later
#if DBG_VERBOSE
Debug.Print("+++ Added new candidate: " + packet.Src + "; path length: " + tempEtx + " +++");
#elif DBG_SIMPLE
Debug.Print("New candidate " + packet.Src + ":[" + tempEtx + "]");
#endif
}
else
{
#if DBG_VERBOSE
Debug.Print("--- Not a candidate: " + packet.Src + "; path length: " + tempEtx + " ---");
#elif DBG_SIMPLE
Debug.Print("Not a candidate " + packet.Src + ":[" + tempEtx + "]");
#endif
}
return;
default:
#if !DBG_LOGIC
Debug.Print("\tUnknown message received <" + rcvPayloadBytes[0] + ">");
#endif
break;
}
}
catch (Exception e) { Debug.Print(e.StackTrace); }
}
/// <summary>
/// Handle an App message
/// </summary>
/// <param name="macBase"></param>
/// <param name="dateTime"></param>
/// <param name="packet"></param>
public static void AppPipeReceive(IMAC macBase, DateTime dateTime, Packet packet)
{
#if DBG_VERBOSE
DebuggingSupport.PrintMessageReceived(macBase, "App");
#elif DBG_SIMPLE
Debug.Print("");
Debug.Print("AppPipeReceive ");
#endif
try
{
#if !DBG_LOGIC
Debug.Print("\tFrom " + packet.Src);
#endif
DebuggingSupport.PrintMessageReceived(macBase, "App");
//Debug.Print("\ton " + packet.PayloadType);
//var rcvPayloadBytes = packet.Payload;
//var rcvPayloadBytes = SystemGlobal.GetTrimmedPayload(packet);
byte[] rcvPayloadBytes = packet.Payload;
#if DBG_VERBOSE
SystemGlobal.PrintNumericVals("App Rcv: ", rcvPayloadBytes);
#elif DBG_SIMPLE
Debug.Print("");
#endif
switch ((AppGlobal.MessageIds)rcvPayloadBytes[0])
{
case AppGlobal.MessageIds.Detect:
{
AppGlobal.ClassificationType classificationType;
ushort originator;
byte TTL;
ushort detectionNumber;
AppGlobal.MoteMessages.Parse.Detection(rcvPayloadBytes, out classificationType, out detectionNumber, out originator, out TTL);
#if DBG_SIMPLE
Debug.Print("\tDetect. From neighbor " + packet.Src + " # " + detectionNumber + ". Classification " + (char)classificationType + " created by " + originator + " with TTL " + TTL);
#endif
#if RELAY_NODE || CLIENT_NODE
// Check if originated by self or if TTL-1 = 0
if (originator == AppGlobal.AppPipe.MACRadioObj.RadioAddress || --TTL == 0)
{
return;
}
#region Uncomment when scheduler disabled
// If in a reset, do not forward TODO: Change this to "spray"
if (RoutingGlobal._color == Color.Red)
{
#if DBG_VERBOSE
Debug.Print("\tIn a Reset wave... not forwarded");
#endif
return;
}
#endregion
#region Uncomment when scheduler disabled
/* TODO: Uncomment lines 368-394 when not using scheduler*/
// Not originated by self.
// If parent is available, pass it on
if (RoutingGlobal.IsParent)
{
byte[] routedMsg = new byte[rcvPayloadBytes.Length];
var size = AppGlobal.MoteMessages.Compose.Detection(routedMsg, originator, classificationType, detectionNumber, TTL);
Debug.Print("routed message len: " + routedMsg.Length);
Debug.Print("routedMsg: " + routedMsg.ToString());
var status = RoutingGlobal.SendToParent(AppGlobal.AppPipe, routedMsg, size);
Debug.Print("status " + status);
if (status != 999)
{
RoutingGlobal.UpdateNumTriesInCurrentWindow_Parent(1);
#if !DBG_LOGIC
Debug.Print("Updated numTriesInCurrentWindow for Parent " + RoutingGlobal.Parent + "; new value = " + RoutingGlobal.GetNumTriesInCurrentWindow_Parent());
#endif
}
else //Retry once
{
#if !DBG_LOGIC
Debug.Print("Retrying packet");
#endif
if (status != 999)
{
RoutingGlobal.UpdateNumTriesInCurrentWindow_Parent(1);
}
}
}
#endregion
#elif BASE_STATION
var msg = AppGlobal.PCMessages.Compose.Detection(originator, classificationType, detectionNumber);
try
{
_serialComm.Write(msg);
#if DBG_VERBOSE
Debug.Print("\n************ Detection sent to PC " + msg.Substring(1, msg.Length - 2));
#endif
}
catch (Exception ex)
{
Debug.Print("SerialComm exception for Detection message [" + msg + "]\n" + ex);
}
#endif
break;
}
case AppGlobal.MessageIds.Send:
{
AppGlobal.ClassificationType classificationType;
ushort originator;
byte TTL;
ushort sndNumber;
ushort payloadLength;
_lcd.Write("PSnd");
AppGlobal.MoteMessages.Parse.SendPacket(rcvPayloadBytes, out classificationType, out sndNumber, out originator, out TTL, out payloadLength);
int rcvHeader = AppGlobal.SendMessageSize;
byte[] sendPayload = new byte[payloadLength];
AppGlobal.MoteMessages.getPayload.SendPacket(rcvPayloadBytes, rcvHeader, sendPayload, (int)payloadLength);
#if DBG_VERBOSE
Debug.Print("Received Packet #" + sndNumber + " from neighbor " + packet.Src);
Debug.Print(" Classification: " + (char)classificationType);
Debug.Print(" Originator: " + originator);
Debug.Print(" payload Length: " + payloadLength + "\n");
//Debug.Print("Received Packet # " + sndNumber + "From neighbor " + packet.Src + " with Classification " + (char)classificationType + ", created by " + originator + " with payload " + payloadString);
#endif
#if CLIENT_NODE
Debug.Print("\tClient Recieved a send message...");
//_serialComm.Write(rcvPayloadBytes);
#elif RELAY_NODE
// Check if originated by self or if TTL-1 = 0
if (originator == AppGlobal.AppPipe.MACRadioObj.RadioAddress || --TTL == 0)
{
return;
}
#region Uncomment when scheduler disabled
// If in a reset, do not forward TODO: Change this to "spray"
if (RoutingGlobal._color == Color.Red)
{
#if DBG_VERBOSE
Debug.Print("\tIn a Reset wave... not forwarded");
#endif
return;
}
#endregion
#region Uncomment when scheduler disabled
/* TODO: Uncomment lines 368-394 when not using scheduler*/
// Not originated by self.
// If parent is available, pass it on
int payloadSize = sizeof(byte) * payloadLength;
// remove ushort in length because popping first in path
int rcvSize = rcvHeader + payloadSize;
byte[] routedMsg = new byte[rcvSize];
if (RoutingGlobal.IsParent)
{
var headerSize = AppGlobal.MoteMessages.Compose.SendPacket(routedMsg, originator, classificationType, sndNumber, TTL, payloadLength);
AppGlobal.MoteMessages.AddPayload.RecievePacket(routedMsg, headerSize, sendPayload, payloadLength);
Debug.Print("Sending Packet # " + sndNumber + " to neighbor " + RoutingGlobal.Parent);
Debug.Print(" Classification: " + (char)classificationType);
Debug.Print(" Originator: " + originator);
Debug.Print(" payload Length: " + payloadLength + "\n");
var status = RoutingGlobal.SendToParent(AppGlobal.AppPipe, routedMsg, rcvSize);
//Neighbor(AppGlobal.AppPipe, next_neighbor, routedMsg, size);
if (status != 999)
{
Debug.Print("Send Successful");
RoutingGlobal.UpdateNumTriesInCurrentWindow_Parent(1);
#if !DBG_LOGIC
Debug.Print("Updated numTriesInCurrentWindow for Parent " + RoutingGlobal.Parent + "; new value = " + RoutingGlobal.GetNumTriesInCurrentWindow_Parent());
#endif
}
else //Retry once
{
#if !DBG_LOGIC
Debug.Print("Retrying packet");
#endif
status = RoutingGlobal.SendToParent(AppGlobal.AppPipe, routedMsg, rcvSize);
if (status != 999)
{
Debug.Print("Send Successful");
//tmpBest.UpdateNumTriesInCurrentWindow(1);
#if !DBG_LOGIC
//Debug.Print("Updated numTriesInCurrentWindow for TempParent " + AppGlobal.TempParent + "; new value = " + tmpBest.GetNumTriesInCurrentWindow());
#endif
}
}
}
#endregion
#elif BASE_STATION
_packetNumber = sndNumber;
_TTL = TTL;
_payloadLength = payloadLength;
_destination = originator;
//Debug.Print("Base serial output: " + rcvString);
_serialComm.Write(sendPayload);
/*
* var rcvString = new string(System.Text.Encoding.UTF8.GetChars(rcvPayloadBytes));
* Debug.Print("Base serial output: " + rcvString);
* _serialComm.Write(rcvString);
*
* //wait for reply
* int rcvSize = AppGlobal.MoteMessages.Length.SendPacket(pathLength, payloadLength);
* classificationType = AppGlobal.ClassificationType.Recieve;
* byte[] rcvPayload;
* if (payloadLength == 1)
* {
* rcvPayload = BitConverter.GetBytes(GetBaseReply(sendPayload));
* }
* else
* {
* rcvPayload = BitConverter.GetBytes('c');
* }
* int rcvPayloadLength = rcvPayload.Length;
*
* ushort next_neighbor = path[pathLength - 1];
*
* int headerSize = AppGlobal.MoteMessages.Compose.RecievePacket(rcvPayloadBytes, originator, classificationType, sndNumber, TTL, pathLength, path, payloadLength);
* AppGlobal.MoteMessages.AddPayload.RecievePacket(rcvPayloadBytes, headerSize, rcvPayload, rcvPayloadLength);
*
#if DBG_VERBOSE
* Debug.Print("Sending Packet #" + sndNumber + " to neighbor " + next_neighbor);
* Debug.Print(" Classification: " + (char)classificationType);
* Debug.Print(" Originator: " + originator);
* Debug.Print(" path Length: " + pathLength);
* Debug.Print(" payload Length: " + rcvPayloadLength + "\n");
#endif
* try
* {
#if DBG_VERBOSE
* Debug.Print("Send Successful");
#endif
* var status = RoutingGlobal.SendToNeighbor(AppGlobal.AppPipe, next_neighbor, rcvPayloadBytes, rcvSize);
*
#if DBG_VERBOSE
* Debug.Print("\n************ Detection sent to PC " + msg.Substring(1,msg.Length-2));
#endif
* }
* catch (Exception ex)
* {
* Debug.Print("SerialComm exception for Detection message [" + rcvSize + "]\n" + ex);
* }
*/
#endif
break;
}
case AppGlobal.MessageIds.Recieve:
{
AppGlobal.ClassificationType classificationType;
ushort originator;
ushort destination;
byte TTL;
ushort rcvNumber;
ushort payloadLength;
_lcd.Write("PRcv");
AppGlobal.MoteMessages.Parse.RecievePacket(rcvPayloadBytes, out classificationType, out rcvNumber, out originator, out destination, out TTL, out payloadLength);
#if DBG_VERBOSE
Debug.Print("Received Packet #" + rcvNumber + " from neighbor " + packet.Src);
Debug.Print(" Classification: " + (char)classificationType);
Debug.Print(" Originator: " + originator);
Debug.Print(" payload Length: " + payloadLength + "\n");
#endif
//Debug.Print("\tRecieve. From neighbor " + packet.Src + " # " + rcvNumber + ". Classification " + (char)classificationType + " created by " + originator + " with TTL " + TTL);
#if CLIENT_NODE
int rcvHeader = AppGlobal.RecieveMessageSize;
byte[] rcvPayload = new byte[payloadLength];
AppGlobal.MoteMessages.getPayload.RecievePacket(rcvPayloadBytes, rcvHeader, rcvPayload, (int)payloadLength);
//var rcvString = new string(System.Text.Encoding.UTF8.GetChars(rcvPayload));
//Debug.Print("Client serial output: " + rcvString);
_serialComm.Write(rcvPayloadBytes);
#elif RELAY_NODE
// Check if originated by self or if TTL-1 = 0
if (originator == AppGlobal.AppPipe.MACRadioObj.RadioAddress || --TTL == 0)
{
return;
}
#region Uncomment when scheduler disabled
// If in a reset, do not forward TODO: Change this to "spray"
if (RoutingGlobal._color == Color.Red)
{
#if DBG_VERBOSE
Debug.Print("\tIn a Reset wave... not forwarded");
#endif
return;
}
#endregion
#region Uncomment when scheduler disabled
/* TODO: Uncomment lines 368-394 when not using scheduler*/
// Not originated by self.
// If parent is available, pass it on
int sndHeader = AppGlobal.RecieveMessageSize;
byte[] sndPayload = new byte[payloadLength];
AppGlobal.MoteMessages.getPayload.SendPacket(rcvPayloadBytes, sndHeader, sndPayload, (int)payloadLength);
int sendSize = sndHeader + payloadLength;
var routedMsg = new byte[sendSize];
var headerSize = AppGlobal.MoteMessages.Compose.RecievePacket(routedMsg, originator, classificationType, rcvNumber, TTL, payloadLength);
AppGlobal.MoteMessages.AddPayload.RecievePacket(routedMsg, headerSize, sndPayload, payloadLength);
#if DBG_VERBOSE
Debug.Print("Sending Packet # " + rcvNumber + " to child");
Debug.Print(" Classification: " + (char)classificationType);
Debug.Print(" Originator: " + originator);
Debug.Print(" payload Length: " + payloadLength + "\n");
#endif
var status = RoutingGlobal.SendToChild(AppGlobal.AppPipe, destination, routedMsg, sendSize);
if (status != 999)
{
Debug.Print("Send Successful");
RoutingGlobal.UpdateNumTriesInCurrentWindow_Parent(1);
#if !DBG_LOGIC
Debug.Print("Updated numTriesInCurrentWindow for Parent " + RoutingGlobal.Parent + "; new value = " + RoutingGlobal.GetNumTriesInCurrentWindow_Parent());
#endif
}
else //Retry once
{
#if !DBG_LOGIC
Debug.Print("Retrying packet");
#endif
status = RoutingGlobal.SendToChild(AppGlobal.AppPipe, destination, routedMsg, sendSize);
if (status != 999)
{
Debug.Print("Send Successful");
//tmpBest.UpdateNumTriesInCurrentWindow(1);
#if !DBG_LOGIC
//Debug.Print("Updated numTriesInCurrentWindow for TempParent " + AppGlobal.TempParent + "; new value = " + tmpBest.GetNumTriesInCurrentWindow());
#endif
}
}
#endregion
#elif BASE_STATION
#endif
break;
}
default:
Debug.Print("AppPipeReceive unknown rcvPayloadBytes[0] ");
throw new ArgumentOutOfRangeException();
}
#region unused
////var rcvPayloadChar = Encoding.UTF8.GetChars(rcvPayloadBytes);
////var payload = new string(rcvPayloadChar);
//if (payload.Substring(0, 5).Equals("Human")) //Data packets--human
//{
// Debug.Print("\n\tReceived decision: " + payload.Substring(0, 5) + "; source: " + payload.Substring(5) + "; from Node: " + packet.Src);
// _lcd.Write("" + (++_numData));
//}
//if (RoutingGlobal.Parent == SystemGlobal.NoParent)
//{
// Debug.Print("\tNo parent specified ");
// return;
//}
////Debug.Print("\t\t*** Parent: "+ Parent+", SelfAddress: "+SelfAddress);
//if (RoutingGlobal.Parent == _routing.SelfAddress)
//{
// Debug.Print("\tAt base");
// return;
//}
//var toSendByte = Encoding.UTF8.GetBytes(payload);
//var status = AppPipe.Send(RoutingGlobal.Parent, toSendByte, 0, (ushort)toSendByte.Length);
//if (status != NetOpStatus.S_Success)
//{
// Debug.Print("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Send status: " + status);
//}
//SystemGlobal.PrintNumericVals("App Snd: ", toSendByte);
//Debug.Print("Forwarded to parent node: " + RoutingGlobal.Parent);
#endregion
}
catch (Exception e)
{
Debug.Print(e.ToString());
}
}
