Recovered from cvs revision 2007-05-02 11:41:00
This commit is contained in:
parent
e1b2079906
commit
6114d3ec90
@ -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 <ase/awk/Awk.hpp>
|
||||
@ -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;
|
||||
}
|
||||
|
||||
|
||||
420
ase/cnt/Awk.cs
Normal file
420
ase/cnt/Awk.cs
Normal file
@ -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);
|
||||
}
|
||||
|
||||
}
|
||||
}
|
||||
35
ase/cnt/Properties/AssemblyInfo.cs
Normal file
35
ase/cnt/Properties/AssemblyInfo.cs
Normal file
@ -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")]
|
||||
60
ase/cnt/StdAwk.cs
Normal file
60
ase/cnt/StdAwk.cs
Normal file
@ -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;
|
||||
}
|
||||
}
|
||||
}
|
||||
58
ase/cnt/asecnt.csproj
Normal file
58
ase/cnt/asecnt.csproj
Normal file
@ -0,0 +1,58 @@
|
||||
<Project DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<ProductVersion>8.0.50727</ProductVersion>
|
||||
<SchemaVersion>2.0</SchemaVersion>
|
||||
<ProjectGuid>{7F679165-41FB-4E1E-B3F5-23C5EE94166A}</ProjectGuid>
|
||||
<OutputType>Library</OutputType>
|
||||
<AppDesignerFolder>Properties</AppDesignerFolder>
|
||||
<RootNamespace>AESCNT</RootNamespace>
|
||||
<AssemblyName>asecnt</AssemblyName>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<DebugType>full</DebugType>
|
||||
<Optimize>false</Optimize>
|
||||
<OutputPath>..\Debug\lib\</OutputPath>
|
||||
<DefineConstants>DEBUG;TRACE</DefineConstants>
|
||||
<ErrorReport>prompt</ErrorReport>
|
||||
<WarningLevel>4</WarningLevel>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<Optimize>true</Optimize>
|
||||
<OutputPath>..\Release\lib\</OutputPath>
|
||||
<DefineConstants>TRACE</DefineConstants>
|
||||
<ErrorReport>prompt</ErrorReport>
|
||||
<WarningLevel>4</WarningLevel>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<Reference Include="System" />
|
||||
<Reference Include="System.Data" />
|
||||
<Reference Include="System.Xml" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="Awk.cs" />
|
||||
<Compile Include="Properties\AssemblyInfo.cs" />
|
||||
<Compile Include="StdAwk.cs" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<COMReference Include="ASECOM">
|
||||
<Guid>{F9C69806-16A1-4162-998A-876B33C470BF}</Guid>
|
||||
<VersionMajor>1</VersionMajor>
|
||||
<VersionMinor>0</VersionMinor>
|
||||
<Lcid>0</Lcid>
|
||||
<WrapperTool>tlbimp</WrapperTool>
|
||||
<Isolated>False</Isolated>
|
||||
</COMReference>
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildBinPath)\Microsoft.CSharp.targets" />
|
||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||
Other similar extension points exist, see Microsoft.Common.targets.
|
||||
<Target Name="BeforeBuild">
|
||||
</Target>
|
||||
<Target Name="AfterBuild">
|
||||
</Target>
|
||||
-->
|
||||
</Project>
|
||||
Loading…
Reference in New Issue
Block a user