private static string StepsToString(IList <Step> steps, ref int index, ref ArmState state, ArmState initialState,
int trackLoopLength)
{
var result = "";
foreach (var step in steps)
{
while (index < step.Index)
{
result += "\r\n";
index++;
}
switch (step.Action)
{
case Action.RESET:
if (state.Grabbed)
{
result += Action.DROP.ToString().ToLowerInvariant() + "\r\n";
index++;
}
index = GoTo(index, (t, a) =>
{
result += a.ToString().ToLowerInvariant() + "\r\n";
return(t + 1);
}, state, initialState, trackLoopLength);
state = initialState;
break;
case Action.REPEAT:
IList <Step> replay = new List <Step>();
var i = steps.IndexOf(step) - 1;
while (i >= 0 && steps[i].Action == Action.REPEAT)
{
i--;
}
while (i >= 0 && steps[i].Action != Action.REPEAT)
{
replay.Insert(0, steps[i]);
i--;
}
var start = steps[i + 1].Index;
var subIndex = start;
result += StepsToString(replay, ref subIndex, ref state, initialState, trackLoopLength);
index += subIndex - start;
break;
default:
result += step.Action.ToString().ToLowerInvariant() + "\r\n";
state = step.Action.Apply(state);
break;
}
index++;
}
return(result);
}
public override (int, ArmState, List <Step>) Resolve(int index, ArmState armState,
int trackLoopLength,
Dictionary <string, List <Command> > macros, Dictionary <string, int> signals)
{
return(index + 1, _action.Apply(armState), new List <Step> {
_action.AsStep(index)
});
}
private static void GoToArm(Part arm, ref ArmState state, ref int index, ArmState target)
{
index = GoTo(index, (i, a) =>
{
arm.Steps.Add(a.AsStep(i++));
return(i);
}, state, target, arm.TrackLoopLength);
state = target;
}
public override (int, ArmState, List <Step>) Resolve(int index, ArmState armState, int trackLoopLength,
Dictionary <string, List <Command> > macros, Dictionary <string, int> signals)
{
lock (signals)
{
signals.Add(_name, index);
}
return(index, armState, new List <Step>());
}
public string ToCode(Part arm)
{
var index = 0;
var state = new ArmState {
Rotation = arm.Rotation, TrackPosition = 0, Length = arm.Size, Grabbed = false
};
var initialState = state;
return(StepsToString(arm.Steps, ref index, ref state, initialState, arm.TrackLoopLength));
}
public static T GoTo <T>(T t, Func <T, Action, T> action, ArmState fromState, ArmState toState,
int trackLoopLength)
{
int rotateBy = (toState.Rotation - fromState.Rotation + 6) % 6;
if (rotateBy <= 3)
{
for (; rotateBy > 0; rotateBy--)
{
fromState = Action.ROTATE_COUNTERCLOCKWISE.Apply(fromState);
t = action.Invoke(t, Action.ROTATE_COUNTERCLOCKWISE);
}
}
else
{
for (; rotateBy < 6; rotateBy++)
{
fromState = Action.ROTATE_CLOCKWISE.Apply(fromState);
t = action.Invoke(t, Action.ROTATE_CLOCKWISE);
}
}
int moveBy = (toState.TrackPosition - fromState.TrackPosition + trackLoopLength) % trackLoopLength;
if (moveBy <= trackLoopLength / 2)
{
for (; moveBy > 0; moveBy--)
{
fromState = Action.FORWARD.Apply(fromState);
t = action.Invoke(t, Action.FORWARD);
}
}
else
{
for (; moveBy < 6; moveBy++)
{
fromState = Action.BACK.Apply(fromState);
t = action.Invoke(t, Action.BACK);
}
}
while (fromState.Length < toState.Length)
{
fromState = Action.EXTEND.Apply(fromState);
t = action.Invoke(t, Action.EXTEND);
}
while (fromState.Length > toState.Length)
{
fromState = Action.RETRACT.Apply(fromState);
t = action.Invoke(t, Action.RETRACT);
}
return(t);
}
public void FillFromCode(Part arm, string code)
{
var state = new ArmState {
Rotation = arm.Rotation, TrackPosition = 0, Length = arm.Size, Grabbed = false
};
var initialState = state;
var index = 0;
arm.Steps.Clear();
ParseLines(arm, Regex.Split(code, @"\r\n"), ref state, initialState, ref index);
}
public override (int, ArmState, List <Step>) Resolve(int index, ArmState armState, int trackLoopLength,
Dictionary <string, List <Command> > macros, Dictionary <string, int> signals)
{
List <Step> steps = new List <Step>();
index = CodeParser.GoTo(index, (i, action) =>
{
steps.Add(action.AsStep(i));
return(i + 1);
}, armState, _target, trackLoopLength);
return(index, _target, steps);
}
public static ArmState Apply(this Action action, ArmState state)
{
switch (action)
{
case Action.ROTATE_CLOCKWISE:
state.Rotation--;
break;
case Action.ROTATE_COUNTERCLOCKWISE:
state.Rotation++;
break;
case Action.EXTEND:
state.Length++;
break;
case Action.RETRACT:
state.Length--;
break;
case Action.GRAB:
state.Grabbed = true;
break;
case Action.DROP:
state.Grabbed = false;
break;
case Action.PIVOT_CLOCKWISE:
case Action.PIVOT_COUNTERCLOCKWISE:
break;
case Action.FORWARD:
state.TrackPosition++;
break;
case Action.BACK:
state.TrackPosition--;
break;
case Action.REPEAT:
case Action.RESET:
throw new NotImplementedException();
case Action.NOOP:
break;
}
return(state);
}
public override (int, ArmState, List <Step>) Resolve(int index, ArmState armState, int trackLoopLength, Dictionary <string, List <Command> > macros, Dictionary <string, int> signals)
{
List <Step> steps = new List <Step>();
if (macros.ContainsKey(_name))
{
foreach (var command in macros[_name])
{
List <Step> intermediate;
(index, armState, intermediate) =
command.Resolve(index, armState, trackLoopLength, macros, signals);
steps.AddRange(intermediate);
}
}
else
{
Valid = false;
}
return(index, armState, steps);
}
public override (int, ArmState, List <Step>) Resolve(int index, ArmState armState, int trackLoopLength,
Dictionary <string, List <Command> > macros, Dictionary <string, int> signals)
{
int signalIndex;
lock (signals)
{
while (!signals.TryGetValue(_name, out signalIndex))
{
if (!Monitor.Wait(signals, 100))
{
Valid = false;
break;
}
}
}
if (index < signalIndex)
{
index = signalIndex;
}
return(index, armState, new List <Step>());
}
public abstract (int, ArmState, List <Step>) Resolve(int index, ArmState armState, int trackLoopLength,
Dictionary <string, List <Command> > macros, Dictionary <string, int> signals);
public GotoCommand(ArmState target)
{
_target = target;
}
public override (int, ArmState, List <Step>) Resolve(int index, ArmState armState, int trackLoopLength, Dictionary <string, List <Command> > macros, Dictionary <string, int> signals)
{
Valid = false;
return(index, armState, new List <Step>());
}
private static (ArmState, int) ApplyToArm(Part arm, ArmState state, int index, Action action)
{
state = action.Apply(state);
arm.Steps.Add(action.AsStep(index++));
return(state, index);
}
private void ParseLines(Part arm, IEnumerable <string> lines, ref ArmState state, ArmState initialState,
ref int index)
{
foreach (var line in lines)
{
switch (line.ToLowerInvariant().Trim())
{
case "":
index++;
break;
case "rc":
case "rotate_clockwise":
(state, index) = ApplyToArm(arm, state, index, Action.ROTATE_CLOCKWISE);
break;
case "rcc":
case "rotate_counterclockwise":
(state, index) = ApplyToArm(arm, state, index, Action.ROTATE_COUNTERCLOCKWISE);
break;
case "e":
case "extend":
(state, index) = ApplyToArm(arm, state, index, Action.EXTEND);
break;
case "r":
case "retract":
(state, index) = ApplyToArm(arm, state, index, Action.RETRACT);
break;
case "g":
case "grab":
(state, index) = ApplyToArm(arm, state, index, Action.GRAB);
break;
case "d":
case "drop":
(state, index) = ApplyToArm(arm, state, index, Action.DROP);
break;
case "pc":
case "pivot_clockwise":
(state, index) = ApplyToArm(arm, state, index, Action.PIVOT_CLOCKWISE);
break;
case "pcc":
case "pivot_counterclockwise":
(state, index) = ApplyToArm(arm, state, index, Action.PIVOT_COUNTERCLOCKWISE);
break;
case "f":
case "forward":
(state, index) = ApplyToArm(arm, state, index, Action.FORWARD);
break;
case "b":
case "back":
(state, index) = ApplyToArm(arm, state, index, Action.BACK);
break;
case "rep":
case "repeat":
Repeat(arm, ref index);
break;
case "res":
case "reset":
GoToArm(arm, ref state, ref index, initialState);
break;
case "noop":
arm.Steps.Add(new Step(index++, Action.NOOP));
break;
default:
var gotoMatch = new Regex(@"goto( -?[0-9]+)( -?[0-9]+)?( -?[0-9]+)? *").Match(line);
if (gotoMatch.Success)
{
var target = new ArmState
{
Rotation = int.Parse(gotoMatch.Groups[1].Value),
TrackPosition = gotoMatch.Groups[2].Length > 0
? int.Parse(gotoMatch.Groups[2].Value)
: state.TrackPosition,
Length = gotoMatch.Groups[3].Length > 0
? int.Parse(gotoMatch.Groups[3].Value)
: state.Length
};
GoToArm(arm, ref state, ref index, target);
break;
}
var signal = new Regex(@"signal (.+) *").Match(line);
if (signal.Success)
{
lock (Lock)
{
_signals.TryAdd(signal.Groups[1].Value, index);
Monitor.PulseAll(Lock);
}
break;
}
var wait = new Regex(@"wait (.+) *").Match(line);
if (wait.Success)
{
int signalIndex;
lock (Lock)
{
while (!_signals.TryGetValue(wait.Groups[1].Value, out signalIndex))
{
if (!Monitor.Wait(Lock, 100))
{
throw new Exception(line + " without signal");
}
}
}
if (index < signalIndex)
{
index = signalIndex;
}
break;
}
if (_macros.ContainsKey(line.ToLowerInvariant().Trim()))
{
ParseLines(arm, Regex.Split(_macros[line.ToLowerInvariant().Trim()], @"\r\n"), ref state,
initialState, ref index);
break;
}
throw new Exception("Cannot parse '" + line + "'");
}
}
}