diff --git a/ase/awk/Awk.cpp b/ase/awk/Awk.cpp index 20ed9397..979b1347 100644 --- a/ase/awk/Awk.cpp +++ b/ase/awk/Awk.cpp @@ -1,5 +1,5 @@ /* - * $Id: Awk.cpp,v 1.1 2007/04/30 05:47:33 bacon Exp $ + * $Id: Awk.cpp,v 1.2 2007/05/01 12:39:22 bacon Exp $ */ #include @@ -22,12 +22,21 @@ namespace ASE int Awk::parse () { + if (awk == ASE_NULL) + { + /*awk = ase_awk_open (*/ + } + return ase_awk_parse (awk, ASE_NULL); } int Awk::run (/*const ase_char_t* main*/) { - //return ase_awk_parse (awk, main); + if (awk == ASE_NULL) + { + } + + //return ase_awk_run (awk, main); return 0; } diff --git a/ase/cnt/Awk.cs b/ase/cnt/Awk.cs new file mode 100644 index 00000000..9a5d17f2 --- /dev/null +++ b/ase/cnt/Awk.cs @@ -0,0 +1,420 @@ +/* + * $Id: Awk.cs,v 1.1 2007/05/01 07:47:12 bacon Exp $ + */ + +using System; +using System.Collections.Generic; +using System.Text; +using System.IO; + +using COM = System.Runtime.InteropServices.ComTypes; + +namespace ASECNT +{ + public class Awk : ASECOM.IAwkEvents + { + private ASECOM.Awk awk; + + private int cookie = -1; + private COM.IConnectionPoint icp; + + private Stream sourceInputStream = null; + private Stream sourceOutputStream = null; + private StreamReader sourceInputReader; + private StreamWriter sourceOutputWriter; + + private Stream consoleInputStream = null; + private Stream consoleOutputStream = null; + private StreamReader consoleInputReader; + private StreamWriter consoleOutputWriter; + + public delegate object FunctionHandler (object[] args); + private System.Collections.Hashtable funcTable; + + char[] consoleInputBuffer = new char[1024]; + + public Awk() + { + this.funcTable = new System.Collections.Hashtable(); + + this.awk = new ASECOM.Awk(); + this.awk.UseLongLong = true; + //this.awk.UseCrlf = true; + + COM.IConnectionPointContainer icpc = + (COM.IConnectionPointContainer)awk; + Guid g = typeof(ASECOM.IAwkEvents).GUID; + + try + { + icpc.FindConnectionPoint(ref g, out icp); + icp.Advise(this, out this.cookie); + } + catch (System.Runtime.InteropServices.COMException ex) + { + this.cookie = -1; + //System.Windows.Forms.MessageBox.Show(ex.Message); + } + } + + /*~Awk() + { + if (cookie != -1 && icp != null) + { + try + { + icp.Unadvise(cookie); + cookie = -1; + } + catch (System.Runtime.InteropServices.COMException ex) + { + System.Windows.Forms.MessageBox.Show(ex.Message); + } + } + }*/ + + public int ErrorCode + { + get { return awk.ErrorCode; } + } + + public int ErrorLine + { + get { return awk.ErrorLine; } + } + + public string ErrorMessage + { + get { return awk.ErrorMessage; } + } + + public bool ImplicitVariable + { + get { return awk.ImplicitVariable; } + set { awk.ImplicitVariable = value; } + } + + public bool ExplicitVariable + { + get { return awk.ExplicitVariable; } + set { awk.ExplicitVariable = value; } + } + + public bool UniqueFunction + { + get { return awk.UniqueFunction; } + set { awk.UniqueFunction = value; } + } + + public bool VariableShading + { + get { return awk.VariableShading; } + set { awk.VariableShading = value; } + } + + public bool ShiftOperators + { + get { return awk.ShiftOperators; } + set { awk.ShiftOperators = value; } + } + + public bool IdivOperator + { + get { return awk.IdivOperator; } + set { awk.IdivOperator = value; } + } + + public bool ConcatString + { + get { return awk.ConcatString; } + set { awk.ConcatString = value; } + } + + public bool SupportExtio + { + get { return awk.SupportExtio; } + set { awk.SupportExtio = value; } + } + + public bool SupportBlockless + { + get { return awk.SupportBlockless; } + set { awk.SupportBlockless = value; } + } + + public bool StringBaseOne + { + get { return awk.StringBaseOne; } + set { awk.StringBaseOne = value; } + } + + public bool StripSpaces + { + get { return awk.StripSpaces; } + set { awk.StripSpaces = value; } + } + + public bool Nextofile + { + get { return awk.Nextofile; } + set { awk.Nextofile = value; } + } + + public bool Usecrlf + { + get { return awk.UseCrlf; } + set { awk.UseCrlf = value; } + } + + public string EntryPoint + { + get { return awk.EntryPoint; } + set { awk.EntryPoint = value; } + } + + public bool ArgumentsToEntryPoint + { + get { return awk.ArgumentsToEntryPoint; } + set { awk.ArgumentsToEntryPoint = value; } + } + + public bool Debug + { + get { return awk.Debug; } + set { awk.Debug = value; } + } + + /* this property doesn't need to be available to the public + * as it can be always true in .NET environment. However, + * it is kept private here for reference */ + private bool UseLongLong + { + get { return awk.UseLongLong; } + set { awk.UseLongLong = value; } + } + + public int MaxDepthForBlockParse + { + get { return awk.MaxDepthForBlockParse; } + set { awk.MaxDepthForBlockParse = value; } + } + + public int MaxDepthForBlockRun + { + get { return awk.MaxDepthForBlockRun; } + set { awk.MaxDepthForBlockRun = value; } + } + + public int MaxDepthForExprParse + { + get { return awk.MaxDepthForExprParse; } + set { awk.MaxDepthForExprParse = value; } + } + + public int MaxDepthForExprRun + { + get { return awk.MaxDepthForExprRun; } + set { awk.MaxDepthForExprRun = value; } + } + + public int MaxDepthForRexBuild + { + get { return awk.MaxDepthForRexBuild; } + set { awk.MaxDepthForRexBuild = value; } + } + + public int MaxDepthForRexMatch + { + get { return awk.MaxDepthForRexMatch; } + set { awk.MaxDepthForRexMatch = value; } + } + + public virtual bool AddFunction(string name, int minArgs, int maxArgs, FunctionHandler handler) + { + if (funcTable.ContainsKey(name)) return false; + + funcTable.Add(name, handler); + if (!awk.AddFunction(name, minArgs, maxArgs)) + { + funcTable.Remove(name); + return false; + } + + return true; + } + + public virtual bool DeleteFunction(string name) + { + if (!funcTable.ContainsKey(name)) return false; + + if (awk.DeleteFunction(name)) + { + funcTable.Remove(name); + return true; + } + + return false; + } + + public virtual bool Parse() + { + return awk.Parse(); + } + + public virtual bool Run () + { + return awk.Run(null); + } + + public virtual bool Run(string[] args) + { + return awk.Run(args); + } + + public Stream SourceInputStream + { + get { return this.sourceInputStream; } + set { this.sourceInputStream = value; } + } + + public Stream SourceOutputStream + { + get { return this.sourceOutputStream; } + set { this.sourceOutputStream = value; } + } + + public Stream ConsoleInputStream + { + get { return this.consoleInputStream; } + set { this.consoleInputStream = value; } + } + + public Stream ConsoleOutputStream + { + get { return this.consoleOutputStream; } + set { this.consoleOutputStream = value; } + } + + public virtual int OpenSource(ASECOM.AwkSourceMode mode) + { + if (mode == ASECOM.AwkSourceMode.AWK_SOURCE_READ) + { + if (this.sourceInputStream == null) return 0; + this.sourceInputReader = new StreamReader (this.sourceInputStream); + return 1; + } + else if (mode == ASECOM.AwkSourceMode.AWK_SOURCE_WRITE) + { + if (this.sourceOutputStream == null) return 0; + this.sourceOutputWriter = new StreamWriter (this.sourceOutputStream); + return 1; + } + + return -1; + } + + public virtual int CloseSource(ASECOM.AwkSourceMode mode) + { + if (mode == ASECOM.AwkSourceMode.AWK_SOURCE_READ) + { + this.sourceInputReader.Close (); + return 0; + } + else if (mode == ASECOM.AwkSourceMode.AWK_SOURCE_WRITE) + { + this.sourceOutputWriter.Close (); + return 0; + } + + return -1; + } + + public virtual int ReadSource(ASECOM.Buffer buf) + { + buf.Value = this.sourceInputReader.ReadLine(); + if (buf.Value == null) return 0; + return buf.Value.Length; + } + + public virtual int WriteSource(ASECOM.Buffer buf) + { + this.sourceOutputWriter.Write(buf.Value); + return buf.Value.Length; + } + + public virtual int OpenExtio(ASECOM.AwkExtio extio) + { + if (extio.Mode == ASECOM.AwkExtioMode.AWK_EXTIO_CONSOLE_READ) + { + if (this.consoleInputStream == null) return 0; + this.consoleInputReader = new StreamReader(this.consoleInputStream); + return 1; + } + else if (extio.Mode == ASECOM.AwkExtioMode.AWK_EXTIO_CONSOLE_WRITE) + { + if (this.consoleOutputStream == null) return 0; + this.consoleOutputWriter = new StreamWriter(this.consoleOutputStream); + return 1; + } + + return -1; + } + + public virtual int CloseExtio(ASECOM.AwkExtio extio) + { + if (extio.Mode == ASECOM.AwkExtioMode.AWK_EXTIO_CONSOLE_READ) + { + this.consoleInputReader.Close(); + return 0; + } + else if (extio.Mode == ASECOM.AwkExtioMode.AWK_EXTIO_CONSOLE_WRITE) + { + this.consoleOutputWriter.Close(); + return 0; + } + + return -1; + } + + public virtual int ReadExtio(ASECOM.AwkExtio extio, ASECOM.Buffer buf) + { + if (extio.Mode == ASECOM.AwkExtioMode.AWK_EXTIO_CONSOLE_READ) + { + int n = this.consoleInputReader.Read(consoleInputBuffer, 0, consoleInputBuffer.Length); + if (n == 0) return 0; + buf.Value = new string(consoleInputBuffer, 0, n); + return buf.Value.Length; + } + + return -1; + } + + public virtual int WriteExtio(ASECOM.AwkExtio extio, ASECOM.Buffer buf) + { + if (extio.Mode == ASECOM.AwkExtioMode.AWK_EXTIO_CONSOLE_WRITE) + { + this.consoleOutputWriter.Write(buf.Value); + return buf.Value.Length; + } + + return -1; + } + + public virtual int FlushExtio(ASECOM.AwkExtio extio) + { + return -1; + } + + public virtual int NextExtio(ASECOM.AwkExtio extio) + { + return 1; + } + + public virtual object HandleFunction(string name, object argarray) + { + FunctionHandler handler = (FunctionHandler)funcTable[name]; + return handler((object[])argarray); + } + + } +} diff --git a/ase/cnt/Properties/AssemblyInfo.cs b/ase/cnt/Properties/AssemblyInfo.cs new file mode 100644 index 00000000..cce92045 --- /dev/null +++ b/ase/cnt/Properties/AssemblyInfo.cs @@ -0,0 +1,35 @@ +using System.Reflection; +using System.Runtime.CompilerServices; +using System.Runtime.InteropServices; + +// General Information about an assembly is controlled through the following +// set of attributes. Change these attribute values to modify the information +// associated with an assembly. +[assembly: AssemblyTitle("asecnt")] +[assembly: AssemblyDescription("")] +[assembly: AssemblyConfiguration("")] +[assembly: AssemblyCompany("")] +[assembly: AssemblyProduct("asecnt")] +[assembly: AssemblyCopyright("Copyright © 2007")] +[assembly: AssemblyTrademark("")] +[assembly: AssemblyCulture("")] + +// Setting ComVisible to false makes the types in this assembly not visible +// to COM components. If you need to access a type in this assembly from +// COM, set the ComVisible attribute to true on that type. +[assembly: ComVisible(false)] + +// The following GUID is for the ID of the typelib if this project is exposed to COM +[assembly: Guid("be3e4e5d-2eac-4629-bdc6-d61b1c858015")] + +// Version information for an assembly consists of the following four values: +// +// Major Version +// Minor Version +// Build Number +// Revision +// +// You can specify all the values or you can default the Revision and Build Numbers +// by using the '*' as shown below: +[assembly: AssemblyVersion("1.0.0.0")] +[assembly: AssemblyFileVersion("1.0.0.0")] diff --git a/ase/cnt/StdAwk.cs b/ase/cnt/StdAwk.cs new file mode 100644 index 00000000..f0e61d1a --- /dev/null +++ b/ase/cnt/StdAwk.cs @@ -0,0 +1,60 @@ +/* + * $Id: StdAwk.cs,v 1.1 2007/05/01 07:47:12 bacon Exp $ + */ + +using System; +using System.Collections.Generic; +using System.Text; + +namespace ASECNT +{ + public class StdAwk: Awk + { + public StdAwk(): base () + { + AddFunction("sin", 1, 1, new FunctionHandler(handleSin)); + AddFunction("cos", 1, 1, new FunctionHandler(handleCos)); + AddFunction("tan", 1, 1, new FunctionHandler(handleTan)); + } + + protected virtual object handleSin(object[] args) + { + if (args[0] is System.Double) + { + return System.Math.Sin((double)args[0]); + } + else if (args[0] is System.Int32) + { + return System.Math.Sin((double)(int)args[0]); + } + else if (args[0] is System.Int64) + { + return System.Math.Sin((double)(long)args[0]); + } + else if (args[0] is string) + { + double t; + + /* TODO: atoi */ + try { t = System.Double.Parse((string)args[0]); } + catch (System.Exception e) { t = 0; } + + return System.Math.Sin(t); + } + else + { + return System.Math.Sin(0.0); + } + } + + protected virtual object handleCos(object[] args) + { + return 0; + } + + protected virtual object handleTan(object[] args) + { + return 0; + } + } +} diff --git a/ase/cnt/asecnt.csproj b/ase/cnt/asecnt.csproj new file mode 100644 index 00000000..c161624c --- /dev/null +++ b/ase/cnt/asecnt.csproj @@ -0,0 +1,58 @@ + + + Debug + AnyCPU + 8.0.50727 + 2.0 + {7F679165-41FB-4E1E-B3F5-23C5EE94166A} + Library + Properties + AESCNT + asecnt + + + true + full + false + ..\Debug\lib\ + DEBUG;TRACE + prompt + 4 + + + pdbonly + true + ..\Release\lib\ + TRACE + prompt + 4 + + + + + + + + + + + + + + {F9C69806-16A1-4162-998A-876B33C470BF} + 1 + 0 + 0 + tlbimp + False + + + + + \ No newline at end of file