public void TestArray()
{
var xml = new CXmlDeserializer();
var ser = new CXmlSerializer();
SArray foo = xml.DeserializeString <SArray>(_XmlList[0]);
Assert.AreEqual(foo.Ints.Length, 2, "Deserialization failed");
Assert.AreEqual(foo.Ints[0].I, 1, "Deserialization failed");
Assert.AreEqual(foo.Ints[1].I, 1, "Deserialization failed");
string res = ser.Serialize(foo);
Assert.AreEqual(_XmlList[0], res, "Serialization failed");
foo = xml.DeserializeString <SArray>(_XmlList[1]);
Assert.AreEqual(foo.Ints.Length, 0, "Deserialization2 failed");
res = ser.Serialize(foo);
Assert.AreEqual(_XmlList[2], res, "Serialization2 failed");
foo = xml.DeserializeString <SArray>(_XmlList[2]);
Assert.AreEqual(foo.Ints.Length, 0, "Deserialization2 failed");
res = ser.Serialize(foo);
Assert.AreEqual(_XmlList[2], res, "Serialization2 failed");
_AssertFail <SArray, CXmlException>(_Empty);
}
internal SArrayBookmark(SArray <T> a, int p) : base(p)
{
_a = a;
}
private static object TranslateArray(SArray obj)
{
return(obj.ArrayMembers.Select(Translate).ToArray());
}
/// <summary>
/// Converts a string expression into a script object.
/// </summary>
private SObject ToScriptObject(string exp)
{
exp = exp.Trim();
// This means it's either an indexer or an array
if (exp.EndsWith("]"))
{
if (!(exp.StartsWith("[") && !exp.Remove(0, 1).Contains("["))) // When there's no "[" besides the start, and it starts with [, then it is an array. Otherwise, do real check.
{
// It is possible that we are having a simple array declaration here.
// We check that by looking if we can find a "[" before the expression ends:
var depth = 0;
var index = exp.Length - 2;
var indexerStartIndex = 0;
var foundIndexer = false;
StringEscapeHelper escaper = new RightToLeftStringEscapeHelper(exp, index);
while (index > 0 && !foundIndexer)
{
var t = exp[index];
escaper.CheckStartAt(index);
if (!escaper.IsString)
{
if (t == ')' || t == '}' || t == ']')
{
depth++;
}
else if (t == '(' || t == '{')
{
depth--;
}
else if (t == '[')
{
if (depth == 0)
{
if (index > 0)
{
indexerStartIndex = index;
foundIndexer = true;
}
}
else
{
depth--;
}
}
}
index--;
}
if (foundIndexer)
{
var indexerCode = exp.Substring(indexerStartIndex + 1, exp.Length - indexerStartIndex - 2);
var identifier = exp.Remove(indexerStartIndex);
var statementResult = ExecuteStatement(new ScriptStatement(indexerCode));
return(ToScriptObject(identifier).GetMember(this, statementResult, true));
}
}
}
// Normal object return procedure:
// Negative number:
var isNegative = false;
if (exp.StartsWith("-"))
{
exp = exp.Remove(0, 1);
isNegative = true;
}
double dblResult;
SObject returnObject;
if (exp == SObject.LITERAL_NULL)
{
returnObject = Null;
}
else if (exp == SObject.LITERAL_UNDEFINED)
{
returnObject = Undefined;
}
else if (exp == SObject.LITERAL_BOOL_FALSE)
{
returnObject = CreateBool(false);
}
else if (exp == SObject.LITERAL_BOOL_TRUE)
{
returnObject = CreateBool(true);
}
else if (exp == SObject.LITERAL_NAN)
{
returnObject = CreateNumber(double.NaN);
}
else if (exp == SObject.LITERAL_THIS)
{
returnObject = Context.This;
}
else if (SNumber.TryParse(exp, out dblResult))
{
returnObject = CreateNumber(dblResult);
}
else if (exp.StartsWith("\"") && exp.EndsWith("\"") || exp.StartsWith("\'") && exp.EndsWith("\'"))
{
returnObject = CreateString(exp.Remove(exp.Length - 1, 1).Remove(0, 1), true, false);
}
else if (exp.StartsWith("$\"") && exp.EndsWith("\"") || exp.StartsWith("$\'") && exp.EndsWith("\'"))
{
returnObject = CreateString(exp.Remove(exp.Length - 1, 1).Remove(0, 2), true, true);
}
else if (exp.StartsWith("@\"") && exp.EndsWith("\"") || exp.StartsWith("@\'") && exp.EndsWith("\'"))
{
returnObject = CreateString(exp.Remove(exp.Length - 1, 1).Remove(0, 2), false, false);
}
else if (exp.StartsWith("{") && exp.EndsWith("}"))
{
returnObject = SProtoObject.Parse(this, exp);
}
else if (exp.StartsWith("[") && exp.EndsWith("]"))
{
returnObject = SArray.Parse(this, exp);
}
else if (exp.StartsWith("function") && Regex.IsMatch(exp, REGEX_FUNCTION))
{
returnObject = new SFunction(this, exp);
}
else if (Context.IsAPIUsing(exp))
{
returnObject = Context.GetAPIUsing(exp);
}
else if (Context.IsVariable(exp))
{
returnObject = Context.GetVariable(exp);
}
else if (Context.This.HasMember(this, exp))
{
returnObject = Context.This.GetMember(this, CreateString(exp), false);
}
else if (Context.IsPrototype(exp))
{
returnObject = Context.GetPrototype(exp);
}
else if (exp.StartsWith("new "))
{
returnObject = Context.CreateInstance(exp);
}
else if (exp.StartsWith(ObjectBuffer.OBJ_PREFIX))
{
var strId = exp.Remove(0, ObjectBuffer.OBJ_PREFIX.Length);
var id = 0;
if (int.TryParse(strId, out id) && ObjectBuffer.HasObject(id))
{
returnObject = (SObject)ObjectBuffer.GetObject(id);
}
else
{
returnObject = ErrorHandler.ThrowError(ErrorType.SyntaxError, ErrorHandler.MESSAGE_SYNTAX_INVALID_TOKEN, exp);
}
}
else
{
returnObject = ErrorHandler.ThrowError(ErrorType.ReferenceError, ErrorHandler.MESSAGE_REFERENCE_NOT_DEFINED, exp);
}
if (isNegative)
{
returnObject = ObjectOperators.NegateNumber(this, returnObject);
}
return(returnObject);
}
static void SingleArray_SystemArray()
{
Console.Clear();
int[] SArray = new int[0];
if (AskForInput("одномерного массива"))
{
ReadingFromFile RFF = new ReadingFromFile();
try
{
SArray = RFF.SingleArrayFromFile();
}
catch { Console.WriteLine("Не удалось считать из файла"); Menu(); }
}
else
{
while (true)
{
Console.Clear();
Console.WriteLine("Введите массив, каждый элемент через пробел");
string[] CurrentArray = Console.ReadLine().Split(' ');
SArray = new int[CurrentArray.Length];
try
{
for (int i = 0; i < SArray.Length; i++)
{
SArray[i] = int.Parse(CurrentArray[i]);
}
break;
}
catch { CheckKeyForMenu(); }
}
}
//Вывод
Console.Clear();
Console.WriteLine("Вывожу массив");
foreach (var item in SArray)
{
Console.Write("{0}\t", item);
}
Console.WriteLine("\n\nМаксимальное значение: \nНомер:{2} \tИндекс:{0}\tЗначение:{1}", Array.IndexOf(SArray, SArray.Max()), SArray.Max(), Array.IndexOf(SArray, SArray.Max()) + 1);
Console.WriteLine("\n\nМинимальное значение: \nНомер:{2} \tИндекс:{0}\tЗначение:{1}", Array.IndexOf(SArray, SArray.Min()), SArray.Min(), Array.IndexOf(SArray, SArray.Min()) + 1);
Array.Sort(SArray);
Console.WriteLine("\n\nСортировка по возрастанию");
foreach (var item in SArray)
{
Console.Write("{0}\t", item);
}
Array.Reverse(SArray);
Console.WriteLine("\n\nСортировка по убыванию");
foreach (var item in SArray)
{
Console.Write("{0}\t", item);
}
Console.WriteLine("\n\nВывод четных чисел массива");
Array.Sort(SArray);
int counter = 0;//Сколько четных элементов
for (int i = 0; i < SArray.Length; i++)
{
if (SArray[i] % 2 == 0)
{
counter++;
}
}
if (counter == 0)
{
Console.WriteLine("В массиве нет четных чисел.");
}
else//запись четных элементов
{
int[] a_sortByCodeArray_even = Array.FindAll(SArray, x => x % 2 == 0);
// Вывод
foreach (var item in a_sortByCodeArray_even)
{
Console.Write("{0}\t", item);
}
}
#region e
Console.WriteLine("\nНажминте любую клавишу для возвращения в меню");
Console.ReadKey();
Menu();
#endregion
}
static void Main(string[] args)
{
// Tests for SList (unordered list)
var sl = SList <string> .New("Red", "Blue", "Green");
sl = sl.InsertAt("Yellow", 0);
var s2 = sl;
sl = sl.RemoveAt(3);
sl = sl.UpdateAt("Pink", 1);
sl = sl.InsertAt("Orange", 2);
Check <string>(sl.ToArray(), "Yellow", "Pink", "Orange", "Blue");
Check <string>(s2.ToArray(), "Yellow", "Red", "Blue", "Green");
Console.WriteLine("SList done");
// Tests for SArray
var sa = new SArray <string>("Red", "Blue", "Green");
sa = sa.InsertAt(0, "Yellow");
sa = sa.RemoveAt(3);
var sb = sa;
sa = sa.InsertAt(2, "Orange", "Violet");
Check(sa.ToArray(), "Yellow", "Red", "Orange", "Violet", "Blue");
Check(sb.ToArray(), "Yellow", "Red", "Blue");
Console.WriteLine("SArray done");
// Tests for SSearchTree<string>
var ss = SSearchTree <string> .New("InfraRed", "Red", "Orange", "Yellow", "Green", "Blue", "Violet");
Check(ss.ToArray(), "Blue", "Green", "InfraRed", "Orange", "Red", "Violet", "Yellow");
var si = SSearchTree <int> .New(56, 22, 24, 31, 23);
Check(si.ToArray(), 22, 23, 24, 31, 56);
Console.WriteLine("SSearchTree done");
// Tests for SDict
var sd = SDict <string, string> .Empty;
sd = sd.Add("Y", "Yellow");
sd = sd.Add("G", "Green");
sd = sd.Add("B", "Blue");
sd = sd.Remove("G");
var sr = new string[sd.Count];
var j = 0;
for (var b = sd.First(); b != null; b = b.Next())
{
sr[j++] = b.Value.key + ": " + b.Value.val;
}
Check(sr, "B: Blue", "Y: Yellow");
Console.WriteLine("SDict done");
// Tests for SMTree
var ti = SList <TreeInfo> .Empty;
ti = ti.InsertAt(new TreeInfo("0", 'D', 'D'), 0); // onDuplicate must be Disallow on all except last entry
ti = ti.InsertAt(new TreeInfo("1", 'A', 'A'), 1);
var sm = new SMTree(ti);
var test = new string[] { "BALTIM", "ANNU", "A", "ANNO", "BALTIC", "BRAIL" };
for (var i = 0; i < test.Length; i++)
{
sm = Add(sm, test[i], i);
}
var sorted = new string[test.Length];
j = 0;
for (var b = sm.First(); b != null; b = b.Next())
{
sorted[j++] = test[((MTreeBookmark)b).value()];
}
// we are only sorting on the first two letters!
// Check() we should offer some alternatives here
Check(sorted, "A", "ANNU", "ANNO", "BALTIM", "BALTIC", "BRAIL");
Console.WriteLine("SMTree done");
File.Delete("strong");
File.Create("strong").Close();
var d = SDatabase.Open("strong");
var tr = new STransaction(d);
tr = new STransaction(tr, new SString("This is Strong"));
tr = new STransaction(tr, new STable(tr, "tbl"));
var c = tr.Commit();
d.Close();
d = SDatabase.Open("strong");
Console.WriteLine(d.objects.First().Value.val.ToString());
Console.ReadKey();
}
