public void ShouldVerifyThatOnlyCodesAreUsed()
{
AddmlFieldDefinition fieldDefinition = new AddmlFieldDefinitionBuilder()
.WithCodeList(new List <AddmlCode>
{
new AddmlCode("Y", ""),
new AddmlCode("N", "")
})
.Build();
FlatFile flatFile = new FlatFile(fieldDefinition.GetAddmlFlatFileDefinition());
ControlCodes test = new ControlCodes();
test.Run(flatFile);
test.Run(new Field(fieldDefinition, "Y"));
test.Run(new Field(fieldDefinition, "N"));
test.Run(new Field(fieldDefinition, "A"));
test.Run(new Field(fieldDefinition, "B"));
test.EndOfFile();
TestRun testRun = test.GetTestRun();
testRun.IsSuccess().Should().BeFalse();
testRun.Results.Count.Should().Be(1);
testRun.Results[0].Location.ToString().Should().Be(fieldDefinition.GetIndex().ToString());
testRun.Results[0].Message.Should().Be("Ikke i kodelisten: A B");
}
public static string ReadDCS(this IResponseReader reader)
{
var cc = new ControlCodes();
var code = reader.ReadNext();
switch (code)
{
case 27:
reader.ReadOrDie((byte)'P');
break;
default:
throw new Exception($"Expected DCS, found {code}");
}
var result = "";
while (!result.EndsWith(cc.ST) && !result.EndsWith((char)(0x9c)))
{
var c = reader.ReadNextChar();
result += c;
}
if (result.EndsWith(cc.ST))
{
return(result.Substring(0, result.Length - 2));
}
else
{
return(result.Substring(0, result.Length - 1));
}
}
public void Send(LetterCodes letter, NumberCodes number, ControlCodes control)
{
using (Socket sock = new Socket(AddressFamily.InterNetwork, SocketType.Dgram, ProtocolType.Udp))
{
byte[] buffer = Encoding.ASCII.GetBytes(GetCode(letter, number, control));
sock.SendTo(buffer, Gateway);
}
}
public static string TrimEnd(string str, ControlCodes code)
{
// Strip the nulls off
str = str.Replace("null", "");
string trimChar = (char)code + "";
return(TrimEnd(str, trimChar));
}
private void SendControlCode(ControlCodes code)
{
if (code != ControlCodes.NAK)
{
_nakCount = 0;
_stream.Write(new byte[] { (byte)code }, 0, 1);
}
else if (++_nakCount == 3)
{
SendControlCode(ControlCodes.EOT);
}
}
public static string ReadToCode(this BinaryReader br, ControlCodes code, bool removeCode = true)
{
string value = string.Empty;
try {
while (br.PeekChar() != (int)code && br.PeekChar() != (int)ControlCodes.ETX)
{
value += br.ReadChar();
}
}
catch (EndOfStreamException) { removeCode = false; }
// Remove the code so the next read is ready
if (removeCode)
{
br.ReadByte();
}
return(value);
}
public string ReadToCode(ControlCodes code, bool removeCode)
{
string rvalue = "";
try {
byte value;
while ((value = Peek()) != (byte)code)
{
if (Enum.IsDefined(typeof(ControlCodes), value))
{
ControlCodes byteCode = (ControlCodes)(buffer[position++]);
if (byteCode == ControlCodes.ETX)
{
break;
}
else
{
rvalue += byteCode.ToString();
}
}
else
{
rvalue += (char)buffer[position++];
}
}
}
catch (IndexOutOfRangeException) {
removeCode = false;
}
// pop the code off
if (removeCode)
{
ReadByte();
}
return(rvalue);
}
public void ScanRange(byte[] rom, int startAddress, int endAddress)
{
if (rom == null)
{
throw new ArgumentNullException();
}
int address = startAddress;
while (address < endAddress)
{
if (ControlCodePredicate(rom, address))
{
IControlCode code = ControlCodes.FirstOrDefault(c => c.IsMatch(rom, address));
if (code == null)
{
throw new Exception("Control code not found");
}
IList <int> references = code.GetReferences(rom, address);
if (references != null)
{
LabelMap.AddRange(references);
}
address += code.ComputeLength(rom, address);
}
else
{
address++;
}
}
}
public IControlCode GetLastControlCode(string str)
{
if (str.Length < 2)
{
return(null);
}
if (!(str[str.Length - 1] == ']'))
{
return(null);
}
int lastOpenBracket = str.LastIndexOf('[');
if (lastOpenBracket < str.LastIndexOf(']', str.Length - 2))
{
return(null);
}
var codeStrings = str.Substring(lastOpenBracket + 1, str.Length - lastOpenBracket - 2)
.Split(' ');
return(ControlCodes.FirstOrDefault(c => c.IsMatch(codeStrings)));
}
public IList <string> FormatPreviewM12(string str, out IList <int> widths, IDictionary <byte, string> charLookup)
{
var sb = new StringBuilder();
widths = new List <int>();
int currentWidth = 0;
var strings = new List <string>();
for (int i = 0; i < str.Length;)
{
if (str[i] == '[')
{
if (str.IndexOf(']', i + 1) == -1)
{
throw new Exception("Opening bracket has no matching closing bracket: position " + i);
}
string[] codeStrings = str.Substring(i + 1, str.IndexOf(']', i + 1) - i - 1)
.Split(' ');
M12ControlCode code = (M12ControlCode)ControlCodes.FirstOrDefault(c => c.IsMatch(codeStrings));
foreach (var codeString in codeStrings)
{
if (codeString[0] == '_')
{
if (codeString[codeString.Length - 1] != '_')
{
throw new Exception("Reference has no closing underscore: position " + i);
}
if (codeString.Length <= 2)
{
throw new Exception("Reference is empty: position " + i);
}
}
else if (!IsHexByte(codeString))
{
throw new Exception(String.Format(
"Encountered invalid code string at position {0}: {1}", i, codeString));
}
}
i = str.IndexOf(']', i + 1) + 1;
if (code == null)
{
// Not matched to anything -- check if it's a valid character sequence
foreach (var codeString in codeStrings)
{
if (!IsHexByte(codeString))
{
sb.Append("[INVALID]");
}
else
{
byte b = Convert.ToByte(codeString, 16);
if (!charLookup.ContainsKey(b))
{
sb.Append("[INVALID]");
}
else
{
sb.Append(charLookup[b]);
currentWidth += virtualWidths[b - 0x50];
}
}
}
}
else
{
switch (code.Identifier)
{
case 0xC:
case 0xD:
case 0xE:
case 0xF:
case 0x10:
case 0x11:
case 0x12:
case 0x15:
case 0x1A:
case 0x2D:
case 0x9F:
case 0xAD:
// Name/item code
sb.Append("[NAME]");
currentWidth += 60;
break;
case 0x0:
case 0x1:
case 0x2:
case 0x3:
// Line break
strings.Add(sb.ToString());
sb.Clear();
widths.Add(currentWidth);
currentWidth = 0;
break;
case 0x20:
sb.Append("[SMAAASH]");
currentWidth += 72;
break;
case 0x21:
sb.Append("[YOU WIN]");
currentWidth += 72;
break;
case 0x23:
case 0x63:
case 0x98:
case 0xB7:
sb.Append("[MONEY]");
currentWidth += 36;
break;
case 0x24:
case 0x25:
case 0x26:
case 0x27:
case 0x28:
case 0x29:
case 0x2A:
case 0x2B:
sb.Append("[STAT]");
currentWidth += 18;
break;
case 0x1E:
case 0x1F:
sb.Append("_");
currentWidth += 10;
break;
}
}
}
else if (str[i] == ']')
{
throw new Exception("Closing bracket has no matching opening bracket: position " + i);
}
else if (str[i] == '^')
{
if (str.IndexOf('^', i + 1) == -1)
{
throw new Exception("Label has no matching closing caret: position " + i);
}
string label = str.Substring(i + 1, str.IndexOf('^', i + 1) - i - 1);
i = str.IndexOf('^', i + 1) + 1;
}
else
{
if (!(str[i] == '\r') && !(str[i] == '\n'))
{
sb.Append(str[i]);
currentWidth += virtualWidths[GetByte(str[i], charLookup) - 0x50];
}
i++;
}
}
if (sb.Length > 0)
{
strings.Add(sb.ToString());
widths.Add(currentWidth);
}
return(strings);
}
public void CompileString(string str, IList <byte> buffer, ref int referenceAddress, IDictionary <byte, string> charLookup, int padLength)
{
int previousBufferSize = buffer.Count;
for (int i = 0; i < str.Length;)
{
if (str[i] == '[')
{
if (str.IndexOf(']', i + 1) == -1)
{
throw new Exception("Opening bracket has no matching closing bracket: position " + i);
}
string[] codeStrings = str.Substring(i + 1, str.IndexOf(']', i + 1) - i - 1)
.Split(' ');
// Match the code
IControlCode code = ControlCodes.FirstOrDefault(c => c.IsMatch(codeStrings));
if (code == null)
{
// Direct copy
for (int j = 0; j < codeStrings.Length; j++)
{
if (!IsHexByte(codeStrings[j]))
{
throw new Exception("Code string for unrecognized control code block must be a byte literal: position " + i);
}
byte value = byte.Parse(codeStrings[j], System.Globalization.NumberStyles.HexNumber);
if (buffer != null)
{
buffer.Add(value);
}
referenceAddress++;
}
}
else
{
// Validate
if (!code.IsValid(codeStrings))
{
throw new Exception("Invalid control code: position " + i);
}
// Parse
code.Compile(codeStrings, buffer, ref referenceAddress, AddressMap);
}
i = str.IndexOf(']', i + 1) + 1;
}
else if (str[i] == ']')
{
throw new Exception("Closing bracket has no matching opening bracket: position " + i);
}
else if (str[i] == '^')
{
if (str.IndexOf('^', i + 1) == -1)
{
throw new Exception("Label has no matching closing caret: position " + i);
}
i = str.IndexOf('^', i + 1) + 1;
}
else
{
if (!(str[i] == '\r') && !(str[i] == '\n'))
{
byte value = GetByte(str[i], charLookup);
if (buffer != null)
{
buffer.Add(value);
}
referenceAddress++;
}
i++;
}
}
// Pad the remaining bytes
if (padLength != -1)
{
int bytesWritten = buffer.Count - previousBufferSize;
if (bytesWritten > padLength)
{
throw new Exception("Exceeded pad length: wrote " + bytesWritten +
" bytes, but the pad length is " + padLength + " bytes");
}
for (int i = bytesWritten; i < padLength; i++)
{
if (buffer != null)
{
buffer.Add(0);
}
referenceAddress++;
}
}
}
public string ReadToCode(ControlCodes code)
{
return(ReadToCode(code, true));
}
public void Send(LetterCodes letter, NumberCodes number, ControlCodes control)
{
using (Socket sock = new Socket(AddressFamily.InterNetwork, SocketType.Dgram, ProtocolType.Udp))
{
byte[] buffer = Encoding.ASCII.GetBytes(GetCode(letter, number, control));
sock.SendTo(buffer, Gateway);
}
}
public static extern bool DeviceIoControl(SafeFileHandle hDevice, ControlCodes dwIoControlCode, IntPtr InBuffer, int nInBufferSize, IntPtr OutBuffer,
int nOutBufferSize, out int pBytesReturned, IntPtr lpOverlapped);
public static string GetCode(LetterCodes letter, NumberCodes number, ControlCodes control)
{
return(string.Format("{0}{1},{2},{3},{4}", startCode, numberCodes[(int)letter],
numberCodes[(int)number], numberCodes[(int)control], endCode));
}
public void ScanString(string str, ref int referenceAddress, IDictionary <byte, string> charLookup, bool scanCodesOnly,
out IList <string> references, out ISet <IControlCode> controlCodes)
{
references = new List <string>();
controlCodes = new HashSet <IControlCode>();
for (int i = 0; i < str.Length;)
{
if (str[i] == '[')
{
if (str.IndexOf(']', i + 1) == -1)
{
throw new Exception("Opening bracket has no matching closing bracket: position " + i);
}
string[] codeStrings = str.Substring(i + 1, str.IndexOf(']', i + 1) - i - 1)
.Split(' ');
IControlCode code = ControlCodes.FirstOrDefault(c => c.IsMatch(codeStrings));
if (!controlCodes.Contains(code))
{
controlCodes.Add(code);
}
foreach (var codeString in codeStrings)
{
if (codeString[0] == '_')
{
if (codeString[codeString.Length - 1] != '_')
{
throw new Exception("Reference has no closing underscore: position " + i);
}
if (codeString.Length <= 2)
{
throw new Exception("Reference is empty: position " + i);
}
if (!scanCodesOnly)
{
referenceAddress += 4;
}
references.Add(codeString.Substring(1, codeString.Length - 2));
}
else if (IsHexByte(codeString))
{
if (!scanCodesOnly)
{
referenceAddress++;
}
}
else
{
throw new Exception(String.Format(
"Encountered invalid code string at position {0}: {1}", i, codeString));
}
}
i = str.IndexOf(']', i + 1) + 1;
}
else if (str[i] == ']')
{
throw new Exception("Closing bracket has no matching opening bracket: position " + i);
}
else if (str[i] == '^')
{
if (str.IndexOf('^', i + 1) == -1)
{
throw new Exception("Label has no matching closing caret: position " + i);
}
string label = str.Substring(i + 1, str.IndexOf('^', i + 1) - i - 1);
if (AddressMap.ContainsKey(label))
{
throw new Exception("Label already defined: position " + i);
}
if (!scanCodesOnly)
{
AddressMap.Add(label, referenceAddress);
}
i = str.IndexOf('^', i + 1) + 1;
}
else
{
if (!(str[i] == '\r') && !(str[i] == '\n'))
{
if (!scanCodesOnly)
{
GetByte(str[i], charLookup); // just check if it's valid
referenceAddress++;
}
}
i++;
}
}
}
public string DecompileRange(byte[] rom, int startAddress, int endAddress, bool newLines)
{
if (rom == null)
{
throw new ArgumentNullException();
}
var builder = new StringBuilder();
bool readUntilEnd = (endAddress == -1);
bool ended = false;
bool suppressNextEnd = false;
int address = startAddress;
while (!ended)
{
if (LabelMap.Labels.ContainsKey(address))
{
builder.Append('^');
builder.Append(LabelMap.Labels[address]);
builder.Append('^');
}
if (ControlCodePredicate(rom, address))
{
IControlCode code = ControlCodes.FirstOrDefault(c => c.IsMatch(rom, address));
if (code == null)
{
throw new Exception("Control code not found");
}
// Check if it's compressed text
if (code.IsCompressedString)
{
builder.Append(code.GetCompressedString(rom, address));
}
else
{
IList <CodeString> codeStrings = code.GetCodeStrings(rom, address);
var filtered = codeStrings.Select(cs => FilterCodeString(cs)).ToArray();
builder.Append(String.Format("[{0}]", String.Join(" ", filtered)));
if (newLines && code.IsEnd && !suppressNextEnd)
{
builder.AppendLine();
}
}
address += code.ComputeLength(rom, address);
/*if (newLines && code.IsEnd && !suppressNextEnd)
* {
* builder.Append("(" + address.ToString("X") + ")");
* }*/
if (readUntilEnd && code.IsEnd)
{
ended = true;
}
if (code.IsEnd)
{
suppressNextEnd = false;
}
else if (code.SuppressNextEnd == true)
{
suppressNextEnd = true;
}
}
else
{
string str = GetChar(rom, address++);
builder.Append(str);
}
if (!readUntilEnd && address >= endAddress)
{
ended = true;
}
}
return(builder.ToString());
}
public static extern bool DeviceIoControl(SafeFileHandle hDevice, ControlCodes dwIoControlCode, IntPtr InBuffer, int nInBufferSize, IntPtr OutBuffer,
int nOutBufferSize, out int pBytesReturned, IntPtr lpOverlapped);
public static string GetCode(LetterCodes letter, NumberCodes number, ControlCodes control)
{
return string.Format("{0}{1},{2},{3},{4}", startCode, numberCodes[(int)letter],
numberCodes[(int)number], numberCodes[(int)control], endCode);
}
