hyung-hwan/qse
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Recovered from cvs revision 2007-10-10 13:22:00

Browse Source
This commit is contained in:
hyung-hwan 2007-10-10 22:33:00 +00:00
parent c79702df8e
commit 3cfcc8b0c9
13 changed files with 2261 additions and 2114 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
ase/ase.sln
View File

@ -19,15 +19,15 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aseawk_jni", "awk\aseawk_jn
EndProject EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "asecom", "com\asecom.vcproj", "{963AF7B5-12E6-42B6-8CBE-89136C1A109B}" Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "asecom", "com\asecom.vcproj", "{963AF7B5-12E6-42B6-8CBE-89136C1A109B}"
ProjectSection(ProjectDependencies) = postProject ProjectSection(ProjectDependencies) = postProject
{5F2E77D5-1485-48D1-9371-987BC55FEE83} = {5F2E77D5-1485-48D1-9371-987BC55FEE83}
{C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD} = {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}
{17621C83-40C9-4305-BAF9-132E250B5FE3} = {17621C83-40C9-4305-BAF9-132E250B5FE3} {17621C83-40C9-4305-BAF9-132E250B5FE3} = {17621C83-40C9-4305-BAF9-132E250B5FE3}
{C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD} = {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}
{5F2E77D5-1485-48D1-9371-987BC55FEE83} = {5F2E77D5-1485-48D1-9371-987BC55FEE83}
EndProjectSection EndProjectSection
EndProject EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aseawk", "test\awk\aseawk.vcproj", "{57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}" Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aseawk", "test\awk\aseawk.vcproj", "{57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}"
ProjectSection(ProjectDependencies) = postProject ProjectSection(ProjectDependencies) = postProject
{5F2E77D5-1485-48D1-9371-987BC55FEE83} = {5F2E77D5-1485-48D1-9371-987BC55FEE83}
{C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD} = {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD} {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD} = {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}
{5F2E77D5-1485-48D1-9371-987BC55FEE83} = {5F2E77D5-1485-48D1-9371-987BC55FEE83}
EndProjectSection EndProjectSection
EndProject EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aselsp", "lsp\aselsp.vcproj", "{42FE7CED-34B7-45C8-92C9-8856E16640D2}" Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aselsp", "lsp\aselsp.vcproj", "{42FE7CED-34B7-45C8-92C9-8856E16640D2}"
@ -37,8 +37,8 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aselsp", "lsp\aselsp.vcproj
EndProject EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aselsp", "test\lsp\aselsp.vcproj", "{868702B0-CB6B-4F1D-B98A-32193347EFAF}" Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aselsp", "test\lsp\aselsp.vcproj", "{868702B0-CB6B-4F1D-B98A-32193347EFAF}"
ProjectSection(ProjectDependencies) = postProject ProjectSection(ProjectDependencies) = postProject
{42FE7CED-34B7-45C8-92C9-8856E16640D2} = {42FE7CED-34B7-45C8-92C9-8856E16640D2}
{C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD} = {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD} {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD} = {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}
{42FE7CED-34B7-45C8-92C9-8856E16640D2} = {42FE7CED-34B7-45C8-92C9-8856E16640D2}
EndProjectSection EndProjectSection
EndProject EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aseawk++", "awk\aseawk++.vcproj", "{E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}" Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aseawk++", "awk\aseawk++.vcproj", "{E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}"
@ -48,8 +48,8 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aseawk++", "awk\aseawk++.vc
EndProject EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aseawk++", "test\awk\aseawk++.vcproj", "{3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}" Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "aseawk++", "test\awk\aseawk++.vcproj", "{3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}"
ProjectSection(ProjectDependencies) = postProject ProjectSection(ProjectDependencies) = postProject
{57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F} = {57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}
{E7A8B741-4E9D-4ED4-9F77-E7F637A678A5} = {E7A8B741-4E9D-4ED4-9F77-E7F637A678A5} {E7A8B741-4E9D-4ED4-9F77-E7F637A678A5} = {E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}
{57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F} = {57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}
EndProjectSection EndProjectSection
EndProject EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "asenet", "net\asenet.vcproj", "{A63E9DF9-1D47-4D81-834C-1D40406C18C4}" Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "asenet", "net\asenet.vcproj", "{A63E9DF9-1D47-4D81-834C-1D40406C18C4}"
@ -85,6 +85,7 @@ Global
{17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug MD|Win32.ActiveCfg = Debug MD|Win32 {17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug MD|Win32.ActiveCfg = Debug MD|Win32
{17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug MD|Win32.Build.0 = Debug MD|Win32 {17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug MD|Win32.Build.0 = Debug MD|Win32
{17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug|Any CPU.ActiveCfg = Debug|Win32 {17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug|Any CPU.ActiveCfg = Debug|Win32
{17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug|Any CPU.Build.0 = Debug|Win32
{17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32 {17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32
{17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug|Mixed Platforms.Build.0 = Debug|Win32 {17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug|Mixed Platforms.Build.0 = Debug|Win32
{17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug|Win32.ActiveCfg = Debug|Win32 {17621C83-40C9-4305-BAF9-132E250B5FE3}.Debug|Win32.ActiveCfg = Debug|Win32
@ -100,6 +101,7 @@ Global
{C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug MD|Win32.ActiveCfg = Debug MD|Win32 {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug MD|Win32.ActiveCfg = Debug MD|Win32
{C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug MD|Win32.Build.0 = Debug MD|Win32 {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug MD|Win32.Build.0 = Debug MD|Win32
{C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug|Any CPU.ActiveCfg = Debug|Win32 {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug|Any CPU.ActiveCfg = Debug|Win32
{C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug|Any CPU.Build.0 = Debug|Win32
{C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32 {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32
{C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug|Mixed Platforms.Build.0 = Debug|Win32 {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug|Mixed Platforms.Build.0 = Debug|Win32
{C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug|Win32.ActiveCfg = Debug|Win32 {C3EBBFAE-9D08-4FA2-8B0E-D09BEBF84EDD}.Debug|Win32.ActiveCfg = Debug|Win32
@ -115,6 +117,7 @@ Global
{5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug MD|Win32.ActiveCfg = Debug MD|Win32 {5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug MD|Win32.ActiveCfg = Debug MD|Win32
{5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug MD|Win32.Build.0 = Debug MD|Win32 {5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug MD|Win32.Build.0 = Debug MD|Win32
{5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug|Any CPU.ActiveCfg = Debug|Win32 {5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug|Any CPU.ActiveCfg = Debug|Win32
{5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug|Any CPU.Build.0 = Debug|Win32
{5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32 {5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32
{5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug|Mixed Platforms.Build.0 = Debug|Win32 {5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug|Mixed Platforms.Build.0 = Debug|Win32
{5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug|Win32.ActiveCfg = Debug|Win32 {5F2E77D5-1485-48D1-9371-987BC55FEE83}.Debug|Win32.ActiveCfg = Debug|Win32
@ -130,6 +133,7 @@ Global
{23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug MD|Win32.ActiveCfg = Debug MD|Win32 {23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug MD|Win32.ActiveCfg = Debug MD|Win32
{23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug MD|Win32.Build.0 = Debug MD|Win32 {23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug MD|Win32.Build.0 = Debug MD|Win32
{23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug|Any CPU.ActiveCfg = Debug|Win32 {23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug|Any CPU.ActiveCfg = Debug|Win32
{23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug|Any CPU.Build.0 = Debug|Win32
{23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32 {23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32
{23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug|Mixed Platforms.Build.0 = Debug|Win32 {23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug|Mixed Platforms.Build.0 = Debug|Win32
{23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug|Win32.ActiveCfg = Debug|Win32 {23B58791-FD44-4F95-9F77-34E4AF45A296}.Debug|Win32.ActiveCfg = Debug|Win32
@ -145,6 +149,7 @@ Global
{963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug MD|Win32.ActiveCfg = Debug MD|Win32 {963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug MD|Win32.ActiveCfg = Debug MD|Win32
{963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug MD|Win32.Build.0 = Debug MD|Win32 {963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug MD|Win32.Build.0 = Debug MD|Win32
{963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug|Any CPU.ActiveCfg = Debug|Win32 {963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug|Any CPU.ActiveCfg = Debug|Win32
{963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug|Any CPU.Build.0 = Debug|Win32
{963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32 {963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32
{963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug|Mixed Platforms.Build.0 = Debug|Win32 {963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug|Mixed Platforms.Build.0 = Debug|Win32
{963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug|Win32.ActiveCfg = Debug|Win32 {963AF7B5-12E6-42B6-8CBE-89136C1A109B}.Debug|Win32.ActiveCfg = Debug|Win32
@ -160,6 +165,7 @@ Global
{57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug MD|Win32.ActiveCfg = Debug MD|Win32 {57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug MD|Win32.ActiveCfg = Debug MD|Win32
{57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug MD|Win32.Build.0 = Debug MD|Win32 {57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug MD|Win32.Build.0 = Debug MD|Win32
{57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug|Any CPU.ActiveCfg = Debug|Win32 {57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug|Any CPU.ActiveCfg = Debug|Win32
{57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug|Any CPU.Build.0 = Debug|Win32
{57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32 {57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32
{57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug|Mixed Platforms.Build.0 = Debug|Win32 {57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug|Mixed Platforms.Build.0 = Debug|Win32
{57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug|Win32.ActiveCfg = Debug|Win32 {57F1E1D0-28B6-42BF-BAFB-045AEE2DCF4F}.Debug|Win32.ActiveCfg = Debug|Win32
@ -175,6 +181,7 @@ Global
{42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug MD|Win32.ActiveCfg = Debug MD|Win32 {42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug MD|Win32.ActiveCfg = Debug MD|Win32
{42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug MD|Win32.Build.0 = Debug MD|Win32 {42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug MD|Win32.Build.0 = Debug MD|Win32
{42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug|Any CPU.ActiveCfg = Debug|Win32 {42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug|Any CPU.ActiveCfg = Debug|Win32
{42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug|Any CPU.Build.0 = Debug|Win32
{42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32 {42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32
{42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug|Mixed Platforms.Build.0 = Debug|Win32 {42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug|Mixed Platforms.Build.0 = Debug|Win32
{42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug|Win32.ActiveCfg = Debug|Win32 {42FE7CED-34B7-45C8-92C9-8856E16640D2}.Debug|Win32.ActiveCfg = Debug|Win32
@ -190,6 +197,7 @@ Global
{868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug MD|Win32.ActiveCfg = Debug MD|Win32 {868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug MD|Win32.ActiveCfg = Debug MD|Win32
{868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug MD|Win32.Build.0 = Debug MD|Win32 {868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug MD|Win32.Build.0 = Debug MD|Win32
{868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug|Any CPU.ActiveCfg = Debug|Win32 {868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug|Any CPU.ActiveCfg = Debug|Win32
{868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug|Any CPU.Build.0 = Debug|Win32
{868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32 {868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32
{868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug|Mixed Platforms.Build.0 = Debug|Win32 {868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug|Mixed Platforms.Build.0 = Debug|Win32
{868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug|Win32.ActiveCfg = Debug|Win32 {868702B0-CB6B-4F1D-B98A-32193347EFAF}.Debug|Win32.ActiveCfg = Debug|Win32
@ -205,6 +213,7 @@ Global
{E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug MD|Win32.ActiveCfg = Debug MD|Win32 {E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug MD|Win32.ActiveCfg = Debug MD|Win32
{E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug MD|Win32.Build.0 = Debug MD|Win32 {E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug MD|Win32.Build.0 = Debug MD|Win32
{E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug|Any CPU.ActiveCfg = Debug|Win32 {E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug|Any CPU.ActiveCfg = Debug|Win32
{E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug|Any CPU.Build.0 = Debug|Win32
{E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32 {E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32
{E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug|Mixed Platforms.Build.0 = Debug|Win32 {E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug|Mixed Platforms.Build.0 = Debug|Win32
{E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug|Win32.ActiveCfg = Debug|Win32 {E7A8B741-4E9D-4ED4-9F77-E7F637A678A5}.Debug|Win32.ActiveCfg = Debug|Win32
@ -220,6 +229,7 @@ Global
{3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug MD|Win32.ActiveCfg = Debug MD|Win32 {3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug MD|Win32.ActiveCfg = Debug MD|Win32
{3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug MD|Win32.Build.0 = Debug MD|Win32 {3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug MD|Win32.Build.0 = Debug MD|Win32
{3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug|Any CPU.ActiveCfg = Debug|Win32 {3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug|Any CPU.ActiveCfg = Debug|Win32
{3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug|Any CPU.Build.0 = Debug|Win32
{3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32 {3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32
{3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug|Mixed Platforms.Build.0 = Debug|Win32 {3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug|Mixed Platforms.Build.0 = Debug|Win32
{3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug|Win32.ActiveCfg = Debug|Win32 {3BEA6CFE-C158-4BFB-B5FB-ED85251E3F98}.Debug|Win32.ActiveCfg = Debug|Win32
@ -235,6 +245,7 @@ Global
{A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug MD|Win32.ActiveCfg = Debug MD|Win32 {A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug MD|Win32.ActiveCfg = Debug MD|Win32
{A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug MD|Win32.Build.0 = Debug MD|Win32 {A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug MD|Win32.Build.0 = Debug MD|Win32
{A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug|Any CPU.ActiveCfg = Debug|Win32 {A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug|Any CPU.ActiveCfg = Debug|Win32
{A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug|Any CPU.Build.0 = Debug|Win32
{A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32 {A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug|Mixed Platforms.ActiveCfg = Debug|Win32
{A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug|Mixed Platforms.Build.0 = Debug|Win32 {A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug|Mixed Platforms.Build.0 = Debug|Win32
{A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug|Win32.ActiveCfg = Debug|Win32 {A63E9DF9-1D47-4D81-834C-1D40406C18C4}.Debug|Win32.ActiveCfg = Debug|Win32

47
ase/awk/Awk.cpp
View File

@ -1,5 +1,5 @@
/* /*
* $Id: Awk.cpp,v 1.69 2007/10/08 09:43:15 bacon Exp $ * $Id: Awk.cpp,v 1.70 2007/10/10 03:37:49 bacon Exp $
* *
* {License} * {License}
*/ */
@ -935,16 +935,34 @@ const Awk::char_t* Awk::Run::getErrorMessage () const
return ase_awk_getrunerrmsg (this->run); return ase_awk_getrunerrmsg (this->run);
} }
void Awk::Run::setError ( void Awk::Run::setError (ErrorCode code)
ErrorCode code, size_t line, const char_t* arg, size_t len)
{ {
ASE_ASSERT (this->run != ASE_NULL); ASE_ASSERT (this->run != ASE_NULL);
ase_awk_setrunerror (this->run, code, 0, ASE_NULL, 0);
}
ase_cstr_t x = { arg, len }; void Awk::Run::setError (ErrorCode code, size_t line)
{
ASE_ASSERT (this->run != ASE_NULL);
ase_awk_setrunerror (this->run, code, line, ASE_NULL, 0);
}
void Awk::Run::setError (ErrorCode code, size_t line, const char_t* arg)
{
ASE_ASSERT (this->run != ASE_NULL);
ase_cstr_t x = { arg, ase_strlen(arg) };
ase_awk_setrunerror (this->run, code, line, &x, 1); ase_awk_setrunerror (this->run, code, line, &x, 1);
} }
void Awk::Run::setError ( void Awk::Run::setError (
ErrorCode code, size_t line, const char_t* arg, size_t len)
{
ASE_ASSERT (this->run != ASE_NULL);
ase_cstr_t x = { arg, len };
ase_awk_setrunerror (this->run, code, line, &x, 1);
}
void Awk::Run::setErrorWithMessage (
ErrorCode code, size_t line, const char_t* msg) ErrorCode code, size_t line, const char_t* msg)
{ {
ASE_ASSERT (this->run != ASE_NULL); ASE_ASSERT (this->run != ASE_NULL);
@ -1063,8 +1081,22 @@ const Awk::char_t* Awk::getErrorMessage () const
return this->errmsg; return this->errmsg;
} }
void Awk::setError ( void Awk::setError (ErrorCode code)
ErrorCode code, size_t line, const char_t* arg, size_t len) {
setError (code, 0, ASE_NULL, 0);
}
void Awk::setError (ErrorCode code, size_t line)
{
setError (code, line, ASE_NULL, 0);
}
void Awk::setError (ErrorCode code, size_t line, const char_t* arg)
{
setError (code, line, arg, ase_strlen(arg));
}
void Awk::setError (ErrorCode code, size_t line, const char_t* arg, size_t len)
{ {
if (awk != ASE_NULL) if (awk != ASE_NULL)
{ {
@ -1082,8 +1114,7 @@ void Awk::setError (
} }
} }
void Awk::setError ( void Awk::setErrorWithMessage (ErrorCode code, size_t line, const char_t* msg)
ErrorCode code, size_t line, const char_t* msg)
{ {
if (awk != ASE_NULL) if (awk != ASE_NULL)
{ {

22
ase/awk/Awk.hpp
View File

@ -1,5 +1,5 @@
/* /*
* $Id: Awk.hpp,v 1.70 2007/10/08 09:43:15 bacon Exp $ * $Id: Awk.hpp,v 1.71 2007/10/10 03:37:49 bacon Exp $
* *
* {License} * {License}
*/ */
@ -578,9 +578,13 @@ public:
size_t getErrorLine () const; size_t getErrorLine () const;
const char_t* getErrorMessage () const; const char_t* getErrorMessage () const;
void setError (ErrorCode code, size_t line = 0, void setError (ErrorCode code);
const char_t* arg = ASE_NULL, size_t len = 0); void setError (ErrorCode code, size_t line);
void setError (ErrorCode code, size_t line, const char_t* msg); void setError (ErrorCode code, size_t line, const char_t* arg);
void setError (ErrorCode code, size_t line, const char_t* arg, size_t len);
void setErrorWithMessage (
ErrorCode code, size_t line, const char_t* msg);
/** /**
* Sets the value of a global variable. The global variable * Sets the value of a global variable. The global variable
@ -705,9 +709,13 @@ public:
const char_t* getErrorMessage () const; const char_t* getErrorMessage () const;
protected: protected:
void setError (ErrorCode code, size_t line = 0, void setError (ErrorCode code);
const char_t* arg = ASE_NULL, size_t len = 0); void setError (ErrorCode code, size_t line);
void setError (ErrorCode code, size_t line, const char_t* msg); void setError (ErrorCode code, size_t line, const char_t* arg);
void setError (ErrorCode code, size_t line, const char_t* arg, size_t len);
void setErrorWithMessage (
ErrorCode code, size_t line, const char_t* msg);
void clearError (); void clearError ();
void retrieveError (); void retrieveError ();

27
ase/awk/aseawk_jni.vcproj
View File

@ -17,7 +17,7 @@
<Configuration <Configuration
Name="Release|Win32" Name="Release|Win32"
OutputDirectory="$(SolutionDir)$(ConfigurationName)\lib" OutputDirectory="$(SolutionDir)$(ConfigurationName)\lib"
IntermediateDirectory="$(ConfigurationName)" IntermediateDirectory="$(ConfigurationName)\jni"
ConfigurationType="2" ConfigurationType="2"
InheritedPropertySheets="$(VCInstallDir)VCProjectDefaults\UpgradeFromVC60.vsprops" InheritedPropertySheets="$(VCInstallDir)VCProjectDefaults\UpgradeFromVC60.vsprops"
UseOfMFC="0" UseOfMFC="0"
@ -54,10 +54,6 @@
StringPooling="true" StringPooling="true"
RuntimeLibrary="0" RuntimeLibrary="0"
EnableFunctionLevelLinking="true" EnableFunctionLevelLinking="true"
PrecompiledHeaderFile=".\release/aseawk_jni.pch"
AssemblerListingLocation=".\release/"
ObjectFile=".\release/"
ProgramDataBaseFileName=".\release/"
WarningLevel="3" WarningLevel="3"
SuppressStartupBanner="true" SuppressStartupBanner="true"
/> />
@ -79,9 +75,6 @@
LinkIncremental="1" LinkIncremental="1"
SuppressStartupBanner="true" SuppressStartupBanner="true"
AdditionalLibraryDirectories="$(OutDir)" AdditionalLibraryDirectories="$(OutDir)"
ProgramDatabaseFile=".\../release/lib/aseawk_jni.pdb"
ImportLibrary="release/aseawk_jni.lib"
TargetMachine="1"
/> />
<Tool <Tool
Name="VCALinkTool" Name="VCALinkTool"
@ -112,7 +105,7 @@
<Configuration <Configuration
Name="Debug|Win32" Name="Debug|Win32"
OutputDirectory="$(SolutionDir)$(ConfigurationName)\lib" OutputDirectory="$(SolutionDir)$(ConfigurationName)\lib"
IntermediateDirectory="$(ConfigurationName)" IntermediateDirectory="$(ConfigurationName)\jni"
ConfigurationType="2" ConfigurationType="2"
InheritedPropertySheets="$(VCInstallDir)VCProjectDefaults\UpgradeFromVC60.vsprops" InheritedPropertySheets="$(VCInstallDir)VCProjectDefaults\UpgradeFromVC60.vsprops"
UseOfMFC="0" UseOfMFC="0"
@ -148,10 +141,6 @@
MinimalRebuild="true" MinimalRebuild="true"
BasicRuntimeChecks="3" BasicRuntimeChecks="3"
RuntimeLibrary="1" RuntimeLibrary="1"
PrecompiledHeaderFile=".\debug/aseawk_jni.pch"
AssemblerListingLocation=".\debug/"
ObjectFile=".\debug/"
ProgramDataBaseFileName=".\debug/"
WarningLevel="3" WarningLevel="3"
SuppressStartupBanner="true" SuppressStartupBanner="true"
DebugInformationFormat="4" DebugInformationFormat="4"
@ -175,9 +164,6 @@
SuppressStartupBanner="true" SuppressStartupBanner="true"
AdditionalLibraryDirectories="$(OutDir)" AdditionalLibraryDirectories="$(OutDir)"
GenerateDebugInformation="true" GenerateDebugInformation="true"
ProgramDatabaseFile=".\../debug/lib/aseawk_jni.pdb"
ImportLibrary="debug/aseawk_jni.lib"
TargetMachine="1"
/> />
<Tool <Tool
Name="VCALinkTool" Name="VCALinkTool"
@ -208,7 +194,7 @@
<Configuration <Configuration
Name="Debug MD|Win32" Name="Debug MD|Win32"
OutputDirectory="$(ConfigurationName)" OutputDirectory="$(ConfigurationName)"
IntermediateDirectory="$(ConfigurationName)" IntermediateDirectory="$(ConfigurationName)\jni"
ConfigurationType="2" ConfigurationType="2"
InheritedPropertySheets="$(VCInstallDir)VCProjectDefaults\UpgradeFromVC60.vsprops" InheritedPropertySheets="$(VCInstallDir)VCProjectDefaults\UpgradeFromVC60.vsprops"
UseOfMFC="0" UseOfMFC="0"
@ -244,10 +230,6 @@
MinimalRebuild="true" MinimalRebuild="true"
BasicRuntimeChecks="3" BasicRuntimeChecks="3"
RuntimeLibrary="3" RuntimeLibrary="3"
PrecompiledHeaderFile=".\debug/aseawk_jni.pch"
AssemblerListingLocation=".\debug/"
ObjectFile=".\debug/"
ProgramDataBaseFileName=".\debug/"
WarningLevel="3" WarningLevel="3"
SuppressStartupBanner="true" SuppressStartupBanner="true"
DebugInformationFormat="4" DebugInformationFormat="4"
@ -271,9 +253,6 @@
SuppressStartupBanner="true" SuppressStartupBanner="true"
AdditionalLibraryDirectories="$(OutDir)" AdditionalLibraryDirectories="$(OutDir)"
GenerateDebugInformation="true" GenerateDebugInformation="true"
ProgramDatabaseFile=".\../debug/lib/aseawk_jni.pdb"
ImportLibrary="debug/aseawk_jni.lib"
TargetMachine="1"
/> />
<Tool <Tool
Name="VCALinkTool" Name="VCALinkTool"

7
ase/awk/awk.h
View File

@ -1,5 +1,5 @@
/* /*
* $Id: awk.h,v 1.16 2007/09/27 11:30:54 bacon Exp $ * $Id: awk.h,v 1.17 2007/10/10 03:37:49 bacon Exp $
* *
* {License} * {License}
*/ */
@ -199,7 +199,10 @@ enum ase_awk_option_t
ASE_AWK_RESET = (1 << 15), ASE_AWK_RESET = (1 << 15),
/* allows the assignment of a map value to a variable */ /* allows the assignment of a map value to a variable */
ASE_AWK_MAPTOVAR = (1 << 16) ASE_AWK_MAPTOVAR = (1 << 16),
/* allows BEGIN, END, pattern-action blocks */
ASE_AWK_PABLOCK = (1 << 17)
}; };
/* error code */ /* error code */

51
ase/awk/jni.c
View File

@ -1,5 +1,5 @@
/* /*
* $Id: jni.c,v 1.15 2007/09/24 11:15:58 bacon Exp $ * $Id: jni.c,v 1.16 2007/10/10 03:37:49 bacon Exp $
* *
* {License} * {License}
*/ */
@ -34,7 +34,14 @@
#define CLASS_EXTIO "ase/awk/Extio" #define CLASS_EXTIO "ase/awk/Extio"
#define FIELD_HANDLE "handle" #define FIELD_HANDLE "handle"
#define MSG_SIZE 256 #if defined(_WIN32) && defined(_MSC_VER) && (_MSC_VER>=1400)
#pragma warning(disable:4996)
#define time_t __time64_t
#define time _time64
#define localtime _localtime64
#define gmtime _gmtime64
#endif
enum enum
{ {
@ -1450,10 +1457,10 @@ static int __handle_bfn (
return -1; return -1;
} }
tmp[0] = (jchar*)'b'; tmp[0] = (jchar)'b';
tmp[1] = (jchar*)'f'; tmp[1] = (jchar)'f';
tmp[2] = (jchar*)'n'; tmp[2] = (jchar)'n';
tmp[3] = (jchar*)'_'; tmp[3] = (jchar)'_';
for (i = 0; i < fnl; i++) tmp[i+4] = (jchar)fnm[i]; for (i = 0; i < fnl; i++) tmp[i+4] = (jchar)fnm[i];
name = (*env)->NewString (env, tmp, fnl+4); name = (*env)->NewString (env, tmp, fnl+4);
free (tmp); free (tmp);
@ -1689,7 +1696,7 @@ static int __handle_bfn (
if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t)) if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t))
{ {
ase_size_t i; jsize x;
ase_char_t* tmp = (ase_char_t*) ase_char_t* tmp = (ase_char_t*)
malloc (ASE_SIZEOF(ase_char_t)*len); malloc (ASE_SIZEOF(ase_char_t)*len);
if (tmp == ASE_NULL) if (tmp == ASE_NULL)
@ -1700,7 +1707,7 @@ static int __handle_bfn (
return -1; return -1;
} }
for (i = 0; i < len; i++) tmp[i] = (ase_char_t)ptr[i]; for (x = 0; x < len; x++) tmp[x] = (ase_char_t)ptr[x];
v = ase_awk_makestrval (run, tmp, len); v = ase_awk_makestrval (run, tmp, len);
free (tmp); free (tmp);
} }
@ -1771,7 +1778,7 @@ JNIEXPORT void JNICALL Java_ase_awk_Awk_addfunc (
if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t)) if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t))
{ {
ase_size_t i; jsize x;
ase_char_t* tmp = (ase_char_t*) ase_char_t* tmp = (ase_char_t*)
malloc (ASE_SIZEOF(ase_char_t)*len); malloc (ASE_SIZEOF(ase_char_t)*len);
if (tmp == ASE_NULL) if (tmp == ASE_NULL)
@ -1785,7 +1792,7 @@ JNIEXPORT void JNICALL Java_ase_awk_Awk_addfunc (
return; return;
} }
for (i = 0; i < len; i++) tmp[i] = (ase_char_t)ptr[i]; for (x = 0; x < len; x++) tmp[x] = (ase_char_t)ptr[x];
n = (ase_awk_addfunc (awk, tmp, len, 0, n = (ase_awk_addfunc (awk, tmp, len, 0,
min_args, max_args, ASE_NULL, __handle_bfn) == NULL)? -1: 0; min_args, max_args, ASE_NULL, __handle_bfn) == NULL)? -1: 0;
free (tmp); free (tmp);
@ -1848,7 +1855,7 @@ JNIEXPORT void JNICALL Java_ase_awk_Awk_delfunc (
if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t)) if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t))
{ {
ase_size_t i; jsize x;
ase_char_t* tmp = (ase_char_t*) ase_char_t* tmp = (ase_char_t*)
malloc (ASE_SIZEOF(ase_char_t)*len); malloc (ASE_SIZEOF(ase_char_t)*len);
if (tmp == ASE_NULL) if (tmp == ASE_NULL)
@ -1862,7 +1869,7 @@ JNIEXPORT void JNICALL Java_ase_awk_Awk_delfunc (
return; return;
} }
for (i = 0; i < len; i++) tmp[i] = (ase_char_t)ptr[i]; for (x = 0; x < len; x++) tmp[x] = (ase_char_t)ptr[x];
n = ase_awk_delfunc (awk, tmp, len); n = ase_awk_delfunc (awk, tmp, len);
free (tmp); free (tmp);
} }
@ -2069,7 +2076,7 @@ JNIEXPORT void JNICALL Java_ase_awk_Awk_setword (
if (ol > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t)) if (ol > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t))
{ {
ase_size_t i; jsize x;
ox = (ase_char_t*)malloc (ASE_SIZEOF(ase_char_t)*ol); ox = (ase_char_t*)malloc (ASE_SIZEOF(ase_char_t)*ol);
if (ox == ASE_NULL) if (ox == ASE_NULL)
{ {
@ -2084,13 +2091,13 @@ JNIEXPORT void JNICALL Java_ase_awk_Awk_setword (
return; return;
} }
for (i = 0; i < ol; i++) ox[i] = (ase_char_t)op[i]; for (x = 0; x < ol; x++) ox[x] = (ase_char_t)op[x];
} }
else ox = (ase_char_t*)op; else ox = (ase_char_t*)op;
if (nl > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t)) if (nl > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t))
{ {
ase_size_t i; jsize x;
nx = (ase_char_t*) malloc (ASE_SIZEOF(ase_char_t)*nl); nx = (ase_char_t*) malloc (ASE_SIZEOF(ase_char_t)*nl);
if (nx == ASE_NULL) if (nx == ASE_NULL)
{ {
@ -2107,7 +2114,7 @@ JNIEXPORT void JNICALL Java_ase_awk_Awk_setword (
return; return;
} }
for (i = 0; i < nl; i++) nx[i] = (ase_char_t)np[i]; for (x = 0; x < nl; x++) nx[x] = (ase_char_t)np[x];
} }
else nx = (ase_char_t*)np; else nx = (ase_char_t*)np;
@ -2152,7 +2159,7 @@ JNIEXPORT void JNICALL Java_ase_awk_Awk_setfilename (
if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t)) if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t))
{ {
ase_size_t i; jsize x;
ase_char_t* tmp = (ase_char_t*) ase_char_t* tmp = (ase_char_t*)
malloc (ASE_SIZEOF(ase_char_t)*len); malloc (ASE_SIZEOF(ase_char_t)*len);
if (tmp == ASE_NULL) if (tmp == ASE_NULL)
@ -2167,7 +2174,7 @@ JNIEXPORT void JNICALL Java_ase_awk_Awk_setfilename (
return; return;
} }
for (i = 0; i < len; i++) tmp[i] = (ase_char_t)ptr[i]; for (x = 0; x < len; x++) tmp[x] = (ase_char_t)ptr[x];
n = ase_awk_setfilename (run, tmp, len); n = ase_awk_setfilename (run, tmp, len);
free (tmp); free (tmp);
} }
@ -2211,7 +2218,7 @@ JNIEXPORT void JNICALL Java_ase_awk_Awk_setofilename (
if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t)) if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t))
{ {
ase_size_t i; jsize x;
ase_char_t* tmp = (ase_char_t*) ase_char_t* tmp = (ase_char_t*)
malloc (ASE_SIZEOF(ase_char_t)*len); malloc (ASE_SIZEOF(ase_char_t)*len);
if (tmp == ASE_NULL) if (tmp == ASE_NULL)
@ -2226,7 +2233,7 @@ JNIEXPORT void JNICALL Java_ase_awk_Awk_setofilename (
return; return;
} }
for (i = 0; i < len; i++) tmp[i] = (ase_char_t)ptr[i]; for (x = 0; x < len; x++) tmp[x] = (ase_char_t)ptr[x];
n = ase_awk_setofilename (run, tmp, len); n = ase_awk_setofilename (run, tmp, len);
free (tmp); free (tmp);
} }
@ -2273,7 +2280,7 @@ JNIEXPORT jobject JNICALL Java_ase_awk_Awk_strtonum (
if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t)) if (len > 0 && ASE_SIZEOF(jchar) != ASE_SIZEOF(ase_char_t))
{ {
ase_size_t i; jsize x;
ase_char_t* tmp = (ase_char_t*) ase_char_t* tmp = (ase_char_t*)
malloc (ASE_SIZEOF(ase_char_t)*len); malloc (ASE_SIZEOF(ase_char_t)*len);
if (tmp == ASE_NULL) if (tmp == ASE_NULL)
@ -2287,7 +2294,7 @@ JNIEXPORT jobject JNICALL Java_ase_awk_Awk_strtonum (
return NULL; return NULL;
} }
for (i = 0; i < len; i++) tmp[i] = (ase_char_t)ptr[i]; for (x = 0; x < len; x++) tmp[x] = (ase_char_t)ptr[x];
n = ase_awk_strtonum ( n = ase_awk_strtonum (
(ase_awk_run_t*)runid, tmp, len, &lv, &rv); (ase_awk_run_t*)runid, tmp, len, &lv, &rv);
free (tmp); free (tmp);

20
ase/awk/parse.c
View File

@ -1,5 +1,5 @@
/* /*
* $Id: parse.c,v 1.18 2007/09/25 15:27:54 bacon Exp $ * $Id: parse.c,v 1.19 2007/10/10 03:37:49 bacon Exp $
* *
* {License} * {License}
*/ */
@ -237,8 +237,8 @@ static kwent_t kwtab[] =
{ ASE_T("in"), 2, TOKEN_IN, 0 }, { ASE_T("in"), 2, TOKEN_IN, 0 },
/* top-level block starters */ /* top-level block starters */
{ ASE_T("BEGIN"), 5, TOKEN_BEGIN, 0 }, { ASE_T("BEGIN"), 5, TOKEN_BEGIN, ASE_AWK_PABLOCK },
{ ASE_T("END"), 3, TOKEN_END, 0 }, { ASE_T("END"), 3, TOKEN_END, ASE_AWK_PABLOCK },
{ ASE_T("function"), 8, TOKEN_FUNCTION, 0 }, { ASE_T("function"), 8, TOKEN_FUNCTION, 0 },
{ ASE_T("func"), 4, TOKEN_FUNCTION, 0 }, { ASE_T("func"), 4, TOKEN_FUNCTION, 0 },
@ -649,6 +649,13 @@ static ase_awk_t* parse_progunit (ase_awk_t* awk)
else if (MATCH(awk,TOKEN_LBRACE)) else if (MATCH(awk,TOKEN_LBRACE))
{ {
/* patternless block */ /* patternless block */
if ((awk->option & ASE_AWK_PABLOCK) == 0)
{
/* TODO: SET ERROR */
SETERRTOK (awk, ASE_AWK_EFUNC);
return ASE_NULL;
}
awk->parse.id.block = PARSE_ACTION_BLOCK; awk->parse.id.block = PARSE_ACTION_BLOCK;
if (parse_pattern_block ( if (parse_pattern_block (
awk, ASE_NULL, ase_false) == ASE_NULL) return ASE_NULL; awk, ASE_NULL, ase_false) == ASE_NULL) return ASE_NULL;
@ -666,6 +673,13 @@ static ase_awk_t* parse_progunit (ase_awk_t* awk)
*/ */
ase_awk_nde_t* ptn; ase_awk_nde_t* ptn;
if ((awk->option & ASE_AWK_PABLOCK) == 0)
{
/* TODO: SET ERROR */
SETERRTOK (awk, ASE_AWK_EFUNC);
return ASE_NULL;
}
awk->parse.id.block = PARSE_PATTERN; awk->parse.id.block = PARSE_PATTERN;
ptn = parse_expression (awk, awk->token.line); ptn = parse_expression (awk, awk->token.line);

167
ase/net/Awk.cpp
View File

@ -1,5 +1,5 @@
/* /*
* $Id: Awk.cpp,v 1.31 2007/10/08 09:43:15 bacon Exp $ * $Id: Awk.cpp,v 1.32 2007/10/10 03:37:49 bacon Exp $
* *
* {License} * {License}
*/ */
@ -18,10 +18,9 @@
using System::Runtime::InteropServices::GCHandle; using System::Runtime::InteropServices::GCHandle;
namespace ASE ASE_BEGIN_NAMESPACE2(ASE,Net)
{
class MojoAwk: protected Awk class MojoAwk: protected ASE::Awk
{ {
public: public:
MojoAwk (): wrapper(nullptr) MojoAwk (): wrapper(nullptr)
@ -94,6 +93,34 @@ namespace ASE
return x; return x;
} }
void setError (ASE::Net::Awk^ wrapper, ErrorCode num)
{
this->wrapper = wrapper;
Awk::setError (num);
this->wrapper = nullptr;
}
void setError (ASE::Net::Awk^ wrapper, ErrorCode num, size_t line)
{
this->wrapper = wrapper;
Awk::setError (num, line);
this->wrapper = nullptr;
}
void setError (ASE::Net::Awk^ wrapper, ErrorCode num, size_t line, const char_t* arg, size_t len)
{
this->wrapper = wrapper;
Awk::setError (num, line, arg, len);
this->wrapper = nullptr;
}
void setErrorWithMessage (ASE::Net::Awk^ wrapper, ErrorCode num, size_t line, const char_t* msg)
{
this->wrapper = wrapper;
Awk::setErrorWithMessage (num, line, msg);
this->wrapper = nullptr;
}
int setErrorString (ASE::Net::Awk^ wrapper, ErrorCode num, const char_t* msg) int setErrorString (ASE::Net::Awk^ wrapper, ErrorCode num, const char_t* msg)
{ {
this->wrapper = wrapper; this->wrapper = wrapper;
@ -226,7 +253,7 @@ namespace ASE
void onRunStatement (Run& run, size_t line) void onRunStatement (Run& run, size_t line)
{ {
//if (wrapper->stopRequested) run.stop (); if (wrapper->stopRequested) run.stop ();
if (wrapper->OnRunStatement != nullptr) if (wrapper->OnRunStatement != nullptr)
{ {
@ -644,13 +671,11 @@ namespace ASE
mutable gcroot<ASE::Net::Awk^> wrapper; mutable gcroot<ASE::Net::Awk^> wrapper;
}; };
namespace Net
{
Awk::Awk () Awk::Awk ()
{ {
funcs = gcnew System::Collections::Hashtable(); funcs = gcnew System::Collections::Hashtable();
awk = new ASE::MojoAwk (); awk = new ASE::Net::MojoAwk ();
if (awk->open (this) == -1) if (awk->open (this) == -1)
{ {
throw gcnew System::Exception (gcnew System::String(awk->getErrorMessage(this))); throw gcnew System::Exception (gcnew System::String(awk->getErrorMessage(this)));
@ -709,13 +734,13 @@ namespace ASE
{ {
if (awk == NULL) if (awk == NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(msg); cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(msg);
bool r = (awk->setErrorString (this, (ASE::Awk::ErrorCode)num, nptr) == 0); bool r = (awk->setErrorString (this, (ASE::Awk::ErrorCode)num, nptr) == 0);
if (!r) { retrieveError (); } if (!r) { RetrieveError (); }
return r; return r;
} }
@ -738,13 +763,13 @@ namespace ASE
bool Awk::Parse () bool Awk::Parse ()
{ {
if (awk == NULL) if (awk != NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
bool r = (awk->parse (this) == 0); bool r = (awk->parse (this) == 0);
if (!r) { retrieveError (); } if (!r) { RetrieveError (); }
return r; return r;
} }
@ -756,11 +781,11 @@ namespace ASE
bool Awk::Run (System::String^ entryPoint, cli::array<System::String^>^ args) bool Awk::Run (System::String^ entryPoint, cli::array<System::String^>^ args)
{ {
runErrorReported = false; runErrorReported = false;
//stopRequested = false; stopRequested = false;
if (awk == NULL) if (awk == NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
@ -776,7 +801,7 @@ namespace ASE
{ {
bool r = (awk->run (this) == 0); bool r = (awk->run (this) == 0);
if (runErrorReported) r = false; if (runErrorReported) r = false;
else if (!r) retrieveError (); else if (!r) RetrieveError ();
return r; return r;
} }
else else
@ -784,7 +809,7 @@ namespace ASE
cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(entryPoint); cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(entryPoint);
bool r = (awk->run (this, nptr) == 0); bool r = (awk->run (this, nptr) == 0);
if (runErrorReported) r = false; if (runErrorReported) r = false;
else if (!r) retrieveError (); else if (!r) RetrieveError ();
return r; return r;
} }
} }
@ -800,7 +825,7 @@ namespace ASE
ptr = (ASE::Awk::char_t**)awk->allocMem (nargs * ASE_SIZEOF(ASE::Awk::char_t*)); ptr = (ASE::Awk::char_t**)awk->allocMem (nargs * ASE_SIZEOF(ASE::Awk::char_t*));
if (ptr == ASE_NULL) if (ptr == ASE_NULL)
{ {
setError (ERROR::NOMEM); SetError (ERROR::NOMEM);
return false; return false;
} }
for (int i = 0; i < nargs; i++) ptr[i] = ASE_NULL; for (int i = 0; i < nargs; i++) ptr[i] = ASE_NULL;
@ -811,7 +836,7 @@ namespace ASE
if (ptr[i] == ASE_NULL) if (ptr[i] == ASE_NULL)
{ {
r = false; r = false;
setError (ERROR::NOMEM); SetError (ERROR::NOMEM);
goto exit_run; goto exit_run;
} }
memcpy (ptr[i], nptr, args[i]->Length*ASE_SIZEOF(ASE::Awk::char_t)); memcpy (ptr[i], nptr, args[i]->Length*ASE_SIZEOF(ASE::Awk::char_t));
@ -845,7 +870,7 @@ namespace ASE
} }
if (runErrorReported) r = false; if (runErrorReported) r = false;
else if (!r) retrieveError (); else if (!r) RetrieveError ();
return r; return r;
} }
@ -865,7 +890,7 @@ namespace ASE
ptr = ASE_NULL; ptr = ASE_NULL;
} }
setError (ERROR::NOMEM); SetError (ERROR::NOMEM);
return false; return false;
} }
} }
@ -873,15 +898,14 @@ namespace ASE
void Awk::Stop () void Awk::Stop ()
{ {
//stopRequested = true; stopRequested = true;
// TODO: implement it...
} }
bool Awk::AddGlobal (System::String^ name, [System::Runtime::InteropServices::Out] int% id) bool Awk::AddGlobal (System::String^ name, [System::Runtime::InteropServices::Out] int% id)
{ {
if (awk == NULL) if (awk == NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
@ -889,7 +913,7 @@ namespace ASE
int n = awk->addGlobal (this, nptr); int n = awk->addGlobal (this, nptr);
if (n == -1) if (n == -1)
{ {
retrieveError (); RetrieveError ();
return false; return false;
} }
@ -901,13 +925,13 @@ namespace ASE
{ {
if (awk == NULL) if (awk == NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(name); cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(name);
int n = awk->deleteGlobal (this, nptr); int n = awk->deleteGlobal (this, nptr);
if (n == -1) retrieveError (); if (n == -1) RetrieveError ();
return n == 0; return n == 0;
} }
@ -917,14 +941,14 @@ namespace ASE
{ {
if (awk == NULL) if (awk == NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(name); cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(name);
int n = awk->addFunction (this, nptr, minArgs, maxArgs, int n = awk->addFunction (this, nptr, minArgs, maxArgs,
(ASE::Awk::FunctionHandler)&MojoAwk::mojoFunctionHandler); (ASE::Awk::FunctionHandler)&MojoAwk::mojoFunctionHandler);
if (n == 0) funcs->Add(name, handler); if (n == 0) funcs->Add(name, handler);
else retrieveError (); else RetrieveError ();
return n == 0; return n == 0;
} }
@ -932,13 +956,13 @@ namespace ASE
{ {
if (awk == NULL) if (awk == NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(name); cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(name);
int n = awk->deleteFunction (this, nptr); int n = awk->deleteFunction (this, nptr);
if (n == 0) funcs->Remove (name); if (n == 0) funcs->Remove (name);
else retrieveError (); else RetrieveError ();
return n == 0; return n == 0;
} }
@ -947,20 +971,17 @@ namespace ASE
const ASE::Awk::Argument* args, size_t nargs, const ASE::Awk::Argument* args, size_t nargs,
const char_t* name, size_t len) const char_t* name, size_t len)
{ {
System::String^ nm = System::String^ nm = gcnew System::String (name, 0, len);
gcnew System::String (name, 0, len);
FunctionHandler^ fh = (FunctionHandler^)funcs[nm]; FunctionHandler^ fh = (FunctionHandler^)funcs[nm];
if (fh == nullptr) if (fh == nullptr)
{ {
// TODO: ctx.setError... ctx->SetError (ERROR::INVAL);
setError (ERROR::INVAL);
return false; return false;
} }
Return^ r = gcnew Return (ret); Return^ r = gcnew Return (ret);
cli::array<Argument^>^ a = cli::array<Argument^>^ a = gcnew cli::array<Argument^> (nargs);
gcnew cli::array<Argument^> (nargs);
size_t i; size_t i;
for (i = 0; i < nargs; i++) for (i = 0; i < nargs; i++)
@ -979,9 +1000,10 @@ namespace ASE
{ {
if (awk == NULL) if (awk == NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
cli::pin_ptr<const ASE::Awk::char_t> optr = PtrToStringChars(ow); cli::pin_ptr<const ASE::Awk::char_t> optr = PtrToStringChars(ow);
cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(nw); cli::pin_ptr<const ASE::Awk::char_t> nptr = PtrToStringChars(nw);
return (awk->setWord (this, optr, ow->Length, nptr, nw->Length) == 0); return (awk->setWord (this, optr, ow->Length, nptr, nw->Length) == 0);
@ -991,7 +1013,7 @@ namespace ASE
{ {
if (awk == NULL) if (awk == NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
cli::pin_ptr<const ASE::Awk::char_t> optr = PtrToStringChars(ow); cli::pin_ptr<const ASE::Awk::char_t> optr = PtrToStringChars(ow);
@ -1002,7 +1024,7 @@ namespace ASE
{ {
if (awk == NULL) if (awk == NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
return (awk->unsetAllWords (this) == 0); return (awk->unsetAllWords (this) == 0);
@ -1012,7 +1034,7 @@ namespace ASE
{ {
if (awk == NULL) if (awk == NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
awk->setMaxDepth (this, (int)id, depth); awk->setMaxDepth (this, (int)id, depth);
@ -1023,27 +1045,76 @@ namespace ASE
{ {
if (awk == NULL) if (awk == NULL)
{ {
setError (ERROR::NOPER); SetError (ERROR::NOPER);
return false; return false;
} }
*depth = awk->getMaxDepth (this, (int)id); *depth = awk->getMaxDepth (this, (int)id);
return true; return true;
} }
void Awk::setError (ERROR num) void Awk::SetError (ERROR num)
{
if (awk != NULL)
{
awk->setError (this, (ASE::Awk::ErrorCode)num);
RetrieveError ();
}
else
{ {
errMsg = ""; errMsg = "";
errLine = 0; errLine = 0;
errCode = num; errCode = num;
}
}
void Awk::SetError (ERROR num, size_t line)
{
if (awk != NULL) if (awk != NULL)
{ {
errMsg = gcnew System::String ( awk->setError (this, (ASE::Awk::ErrorCode)num, line);
awk->getErrorString (this, (ASE::Awk::ErrorCode)num)); RetrieveError ();
}
else
{
errMsg = "";
errLine = line;
errCode = num;
} }
} }
void Awk::retrieveError () void Awk::SetError (ERROR num, size_t line, System::String^ arg)
{
if (awk != NULL)
{
cli::pin_ptr<const ASE::Awk::char_t> p = PtrToStringChars(arg);
awk->setError (this, (ASE::Awk::ErrorCode)num, line, p, arg->Length);
RetrieveError ();
}
else
{
errMsg = "";
errLine = line;
errCode = num;
}
}
void Awk::SetErrorWithMessage (ERROR num, size_t line, System::String^ msg)
{
if (awk != NULL)
{
cli::pin_ptr<const ASE::Awk::char_t> p = PtrToStringChars(msg);
awk->setErrorWithMessage (this, (ASE::Awk::ErrorCode)num, line, p);
RetrieveError ();
}
else
{
errMsg = msg;
errLine = line;
errCode = num;
}
}
void Awk::RetrieveError ()
{ {
if (awk != NULL) if (awk != NULL)
{ {
@ -1053,6 +1124,4 @@ namespace ASE
} }
} }
} ASE_END_NAMESPACE2(Net,ASE)
}

384
ase/net/Awk.hpp
View File

@ -1,5 +1,5 @@
/* /*
* $Id: Awk.hpp,v 1.36 2007/10/08 09:50:52 bacon Exp $ * $Id: Awk.hpp,v 1.37 2007/10/10 03:37:49 bacon Exp $
* *
* {License} * {License}
*/ */
@ -9,12 +9,12 @@
#include <ase/awk/Awk.hpp> #include <ase/awk/Awk.hpp>
#include <vcclr.h> #include <vcclr.h>
namespace ASE ///////////////////////////////
{ ASE_BEGIN_NAMESPACE2(ASE,Net)
///////////////////////////////
class MojoAwk; class MojoAwk;
namespace Net
{
public ref class Awk abstract public ref class Awk abstract
{ {
public: public:
@ -26,6 +26,170 @@ namespace ASE
typedef ASE::Awk::cint_t cint_t; typedef ASE::Awk::cint_t cint_t;
typedef ASE::Awk::bool_t bool_t; typedef ASE::Awk::bool_t bool_t;
[System::Flags] enum class OPTION: int
{
NONE = 0,
IMPLICIT = ASE::Awk::OPT_IMPLICIT,
EXPLICIT = ASE::Awk::OPT_EXPLICIT,
UNIQUEFN = ASE::Awk::OPT_UNIQUEFN,
SHADING = ASE::Awk::OPT_SHADING,
SHIFT = ASE::Awk::OPT_SHIFT,
IDIV = ASE::Awk::OPT_IDIV,
STRCONCAT = ASE::Awk::OPT_STRCONCAT,
EXTIO = ASE::Awk::OPT_EXTIO,
COPROC = ASE::Awk::OPT_COPROC,
BLOCKLESS = ASE::Awk::OPT_BLOCKLESS,
STRBASEONE = ASE::Awk::OPT_BASEONE,
STRIPSPACES = ASE::Awk::OPT_STRIPSPACES,
NEXTOFILE = ASE::Awk::OPT_NEXTOFILE,
CRLF = ASE::Awk::OPT_CRLF,
ARGSTOMAIN = ASE::Awk::OPT_ARGSTOMAIN,
RESET = ASE::Awk::OPT_RESET,
MAPTOVAR = ASE::Awk::OPT_MAPTOVAR
};
enum class DEPTH: int
{
BLOCK_PARSE = ASE::Awk::DEPTH_BLOCK_PARSE,
BLOCK_RUN = ASE::Awk::DEPTH_BLOCK_RUN,
EXPR_PARSE = ASE::Awk::DEPTH_EXPR_PARSE,
EXPR_RUN = ASE::Awk::DEPTH_EXPR_RUN,
REX_BUILD = ASE::Awk::DEPTH_REX_BUILD,
REX_MATCH = ASE::Awk::DEPTH_REX_MATCH
};
// generated by generrcode-net.awk
enum class ERROR: int
{
NOERR = ASE::Awk::ERR_NOERR,
INVAL = ASE::Awk::ERR_INVAL,
NOMEM = ASE::Awk::ERR_NOMEM,
NOSUP = ASE::Awk::ERR_NOSUP,
NOPER = ASE::Awk::ERR_NOPER,
NODEV = ASE::Awk::ERR_NODEV,
NOSPC = ASE::Awk::ERR_NOSPC,
MFILE = ASE::Awk::ERR_MFILE,
MLINK = ASE::Awk::ERR_MLINK,
AGAIN = ASE::Awk::ERR_AGAIN,
NOENT = ASE::Awk::ERR_NOENT,
EXIST = ASE::Awk::ERR_EXIST,
FTBIG = ASE::Awk::ERR_FTBIG,
TBUSY = ASE::Awk::ERR_TBUSY,
ISDIR = ASE::Awk::ERR_ISDIR,
IOERR = ASE::Awk::ERR_IOERR,
OPEN = ASE::Awk::ERR_OPEN,
READ = ASE::Awk::ERR_READ,
WRITE = ASE::Awk::ERR_WRITE,
CLOSE = ASE::Awk::ERR_CLOSE,
INTERN = ASE::Awk::ERR_INTERN,
RUNTIME = ASE::Awk::ERR_RUNTIME,
BLKNST = ASE::Awk::ERR_BLKNST,
EXPRNST = ASE::Awk::ERR_EXPRNST,
SINOP = ASE::Awk::ERR_SINOP,
SINCL = ASE::Awk::ERR_SINCL,
SINRD = ASE::Awk::ERR_SINRD,
SOUTOP = ASE::Awk::ERR_SOUTOP,
SOUTCL = ASE::Awk::ERR_SOUTCL,
SOUTWR = ASE::Awk::ERR_SOUTWR,
LXCHR = ASE::Awk::ERR_LXCHR,
LXDIG = ASE::Awk::ERR_LXDIG,
LXUNG = ASE::Awk::ERR_LXUNG,
ENDSRC = ASE::Awk::ERR_ENDSRC,
ENDCMT = ASE::Awk::ERR_ENDCMT,
ENDSTR = ASE::Awk::ERR_ENDSTR,
ENDREX = ASE::Awk::ERR_ENDREX,
LBRACE = ASE::Awk::ERR_LBRACE,
LPAREN = ASE::Awk::ERR_LPAREN,
RPAREN = ASE::Awk::ERR_RPAREN,
RBRACK = ASE::Awk::ERR_RBRACK,
COMMA = ASE::Awk::ERR_COMMA,
SCOLON = ASE::Awk::ERR_SCOLON,
COLON = ASE::Awk::ERR_COLON,
STMEND = ASE::Awk::ERR_STMEND,
IN = ASE::Awk::ERR_IN,
NOTVAR = ASE::Awk::ERR_NOTVAR,
EXPRES = ASE::Awk::ERR_EXPRES,
WHILE = ASE::Awk::ERR_WHILE,
ASSIGN = ASE::Awk::ERR_ASSIGN,
IDENT = ASE::Awk::ERR_IDENT,
FNNAME = ASE::Awk::ERR_FNNAME,
BLKBEG = ASE::Awk::ERR_BLKBEG,
BLKEND = ASE::Awk::ERR_BLKEND,
DUPBEG = ASE::Awk::ERR_DUPBEG,
DUPEND = ASE::Awk::ERR_DUPEND,
BFNRED = ASE::Awk::ERR_BFNRED,
AFNRED = ASE::Awk::ERR_AFNRED,
GBLRED = ASE::Awk::ERR_GBLRED,
PARRED = ASE::Awk::ERR_PARRED,
DUPPAR = ASE::Awk::ERR_DUPPAR,
DUPGBL = ASE::Awk::ERR_DUPGBL,
DUPLCL = ASE::Awk::ERR_DUPLCL,
BADPAR = ASE::Awk::ERR_BADPAR,
BADVAR = ASE::Awk::ERR_BADVAR,
UNDEF = ASE::Awk::ERR_UNDEF,
LVALUE = ASE::Awk::ERR_LVALUE,
GBLTM = ASE::Awk::ERR_GBLTM,
LCLTM = ASE::Awk::ERR_LCLTM,
PARTM = ASE::Awk::ERR_PARTM,
DELETE = ASE::Awk::ERR_DELETE,
BREAK = ASE::Awk::ERR_BREAK,
CONTINUE = ASE::Awk::ERR_CONTINUE,
NEXTBEG = ASE::Awk::ERR_NEXTBEG,
NEXTEND = ASE::Awk::ERR_NEXTEND,
NEXTFBEG = ASE::Awk::ERR_NEXTFBEG,
NEXTFEND = ASE::Awk::ERR_NEXTFEND,
PRINTFARG = ASE::Awk::ERR_PRINTFARG,
PREPST = ASE::Awk::ERR_PREPST,
GLNCPS = ASE::Awk::ERR_GLNCPS,
DIVBY0 = ASE::Awk::ERR_DIVBY0,
OPERAND = ASE::Awk::ERR_OPERAND,
POSIDX = ASE::Awk::ERR_POSIDX,
ARGTF = ASE::Awk::ERR_ARGTF,
ARGTM = ASE::Awk::ERR_ARGTM,
FNNONE = ASE::Awk::ERR_FNNONE,
NOTIDX = ASE::Awk::ERR_NOTIDX,
NOTDEL = ASE::Awk::ERR_NOTDEL,
NOTMAP = ASE::Awk::ERR_NOTMAP,
NOTMAPIN = ASE::Awk::ERR_NOTMAPIN,
NOTMAPNILIN = ASE::Awk::ERR_NOTMAPNILIN,
NOTREF = ASE::Awk::ERR_NOTREF,
NOTASS = ASE::Awk::ERR_NOTASS,
IDXVALASSMAP = ASE::Awk::ERR_IDXVALASSMAP,
POSVALASSMAP = ASE::Awk::ERR_POSVALASSMAP,
MAPTOSCALAR = ASE::Awk::ERR_MAPTOSCALAR,
SCALARTOMAP = ASE::Awk::ERR_SCALARTOMAP,
MAPNOTALLOWED = ASE::Awk::ERR_MAPNOTALLOWED,
VALTYPE = ASE::Awk::ERR_VALTYPE,
RDELETE = ASE::Awk::ERR_RDELETE,
RNEXTBEG = ASE::Awk::ERR_RNEXTBEG,
RNEXTEND = ASE::Awk::ERR_RNEXTEND,
RNEXTFBEG = ASE::Awk::ERR_RNEXTFBEG,
RNEXTFEND = ASE::Awk::ERR_RNEXTFEND,
BFNUSER = ASE::Awk::ERR_BFNUSER,
BFNIMPL = ASE::Awk::ERR_BFNIMPL,
IOUSER = ASE::Awk::ERR_IOUSER,
IONONE = ASE::Awk::ERR_IONONE,
IOIMPL = ASE::Awk::ERR_IOIMPL,
IONMEM = ASE::Awk::ERR_IONMEM,
IONMNL = ASE::Awk::ERR_IONMNL,
FMTARG = ASE::Awk::ERR_FMTARG,
FMTCNV = ASE::Awk::ERR_FMTCNV,
CONVFMTCHR = ASE::Awk::ERR_CONVFMTCHR,
OFMTCHR = ASE::Awk::ERR_OFMTCHR,
REXRECUR = ASE::Awk::ERR_REXRECUR,
REXRPAREN = ASE::Awk::ERR_REXRPAREN,
REXRBRACKET = ASE::Awk::ERR_REXRBRACKET,
REXRBRACE = ASE::Awk::ERR_REXRBRACE,
REXUNBALPAR = ASE::Awk::ERR_REXUNBALPAR,
REXCOLON = ASE::Awk::ERR_REXCOLON,
REXCRANGE = ASE::Awk::ERR_REXCRANGE,
REXCCLASS = ASE::Awk::ERR_REXCCLASS,
REXBRANGE = ASE::Awk::ERR_REXBRANGE,
REXEND = ASE::Awk::ERR_REXEND,
REXGARBAGE = ASE::Awk::ERR_REXGARBAGE
};
// end of enum class ERROR
ref class Context; ref class Context;
ref class Argument ref class Argument
@ -285,10 +449,30 @@ namespace ASE
return run.stop () == 0; return run.stop () == 0;
} }
/* TODO: void SetError (ASE::Net::Awk::ERROR num)
* GetError {
* SetError return run.setError ((ASE::Awk::ErrorCode)num);
*/ }
void SetError (ASE::Net::Awk::ERROR num, size_t line)
{
return run.setError ((ASE::Awk::ErrorCode)num, line);
}
void SetError (ASE::Net::Awk::ERROR num, size_t line, System::String^ arg)
{
cli::pin_ptr<const char_t> p = PtrToStringChars(arg);
return run.setError (
(ASE::Awk::ErrorCode)num, line, p, arg->Length);
}
void SetErrorWithMessage (
ASE::Net::Awk::ERROR num, size_t line, System::String^ msg)
{
cli::pin_ptr<const char_t> p = PtrToStringChars(msg);
return run.setErrorWithMessage (
(ASE::Awk::ErrorCode)num, line, p);
}
bool SetGlobal (int id, System::String^ v) bool SetGlobal (int id, System::String^ v)
{ {
@ -485,172 +669,6 @@ namespace ASE
MODE^ mode; MODE^ mode;
}; };
[System::Flags] enum class OPTION: int
{
NONE = 0,
IMPLICIT = ASE::Awk::OPT_IMPLICIT,
EXPLICIT = ASE::Awk::OPT_EXPLICIT,
UNIQUEFN = ASE::Awk::OPT_UNIQUEFN,
SHADING = ASE::Awk::OPT_SHADING,
SHIFT = ASE::Awk::OPT_SHIFT,
IDIV = ASE::Awk::OPT_IDIV,
STRCONCAT = ASE::Awk::OPT_STRCONCAT,
EXTIO = ASE::Awk::OPT_EXTIO,
COPROC = ASE::Awk::OPT_COPROC,
BLOCKLESS = ASE::Awk::OPT_BLOCKLESS,
STRBASEONE = ASE::Awk::OPT_BASEONE,
STRIPSPACES = ASE::Awk::OPT_STRIPSPACES,
NEXTOFILE = ASE::Awk::OPT_NEXTOFILE,
CRLF = ASE::Awk::OPT_CRLF,
ARGSTOMAIN = ASE::Awk::OPT_ARGSTOMAIN,
RESET = ASE::Awk::OPT_RESET,
MAPTOVAR = ASE::Awk::OPT_MAPTOVAR
};
enum class DEPTH: int
{
BLOCK_PARSE = ASE::Awk::DEPTH_BLOCK_PARSE,
BLOCK_RUN = ASE::Awk::DEPTH_BLOCK_RUN,
EXPR_PARSE = ASE::Awk::DEPTH_EXPR_PARSE,
EXPR_RUN = ASE::Awk::DEPTH_EXPR_RUN,
REX_BUILD = ASE::Awk::DEPTH_REX_BUILD,
REX_MATCH = ASE::Awk::DEPTH_REX_MATCH
};
// generated by generrcode-net.awk
enum class ERROR: int
{
NOERR = ASE::Awk::ERR_NOERR,
INVAL = ASE::Awk::ERR_INVAL,
NOMEM = ASE::Awk::ERR_NOMEM,
NOSUP = ASE::Awk::ERR_NOSUP,
NOPER = ASE::Awk::ERR_NOPER,
NODEV = ASE::Awk::ERR_NODEV,
NOSPC = ASE::Awk::ERR_NOSPC,
MFILE = ASE::Awk::ERR_MFILE,
MLINK = ASE::Awk::ERR_MLINK,
AGAIN = ASE::Awk::ERR_AGAIN,
NOENT = ASE::Awk::ERR_NOENT,
EXIST = ASE::Awk::ERR_EXIST,
FTBIG = ASE::Awk::ERR_FTBIG,
TBUSY = ASE::Awk::ERR_TBUSY,
ISDIR = ASE::Awk::ERR_ISDIR,
IOERR = ASE::Awk::ERR_IOERR,
OPEN = ASE::Awk::ERR_OPEN,
READ = ASE::Awk::ERR_READ,
WRITE = ASE::Awk::ERR_WRITE,
CLOSE = ASE::Awk::ERR_CLOSE,
INTERN = ASE::Awk::ERR_INTERN,
RUNTIME = ASE::Awk::ERR_RUNTIME,
BLKNST = ASE::Awk::ERR_BLKNST,
EXPRNST = ASE::Awk::ERR_EXPRNST,
SINOP = ASE::Awk::ERR_SINOP,
SINCL = ASE::Awk::ERR_SINCL,
SINRD = ASE::Awk::ERR_SINRD,
SOUTOP = ASE::Awk::ERR_SOUTOP,
SOUTCL = ASE::Awk::ERR_SOUTCL,
SOUTWR = ASE::Awk::ERR_SOUTWR,
LXCHR = ASE::Awk::ERR_LXCHR,
LXDIG = ASE::Awk::ERR_LXDIG,
LXUNG = ASE::Awk::ERR_LXUNG,
ENDSRC = ASE::Awk::ERR_ENDSRC,
ENDCMT = ASE::Awk::ERR_ENDCMT,
ENDSTR = ASE::Awk::ERR_ENDSTR,
ENDREX = ASE::Awk::ERR_ENDREX,
LBRACE = ASE::Awk::ERR_LBRACE,
LPAREN = ASE::Awk::ERR_LPAREN,
RPAREN = ASE::Awk::ERR_RPAREN,
RBRACK = ASE::Awk::ERR_RBRACK,
COMMA = ASE::Awk::ERR_COMMA,
SCOLON = ASE::Awk::ERR_SCOLON,
COLON = ASE::Awk::ERR_COLON,
STMEND = ASE::Awk::ERR_STMEND,
IN = ASE::Awk::ERR_IN,
NOTVAR = ASE::Awk::ERR_NOTVAR,
EXPRES = ASE::Awk::ERR_EXPRES,
WHILE = ASE::Awk::ERR_WHILE,
ASSIGN = ASE::Awk::ERR_ASSIGN,
IDENT = ASE::Awk::ERR_IDENT,
FNNAME = ASE::Awk::ERR_FNNAME,
BLKBEG = ASE::Awk::ERR_BLKBEG,
BLKEND = ASE::Awk::ERR_BLKEND,
DUPBEG = ASE::Awk::ERR_DUPBEG,
DUPEND = ASE::Awk::ERR_DUPEND,
BFNRED = ASE::Awk::ERR_BFNRED,
AFNRED = ASE::Awk::ERR_AFNRED,
GBLRED = ASE::Awk::ERR_GBLRED,
PARRED = ASE::Awk::ERR_PARRED,
DUPPAR = ASE::Awk::ERR_DUPPAR,
DUPGBL = ASE::Awk::ERR_DUPGBL,
DUPLCL = ASE::Awk::ERR_DUPLCL,
BADPAR = ASE::Awk::ERR_BADPAR,
BADVAR = ASE::Awk::ERR_BADVAR,
UNDEF = ASE::Awk::ERR_UNDEF,
LVALUE = ASE::Awk::ERR_LVALUE,
GBLTM = ASE::Awk::ERR_GBLTM,
LCLTM = ASE::Awk::ERR_LCLTM,
PARTM = ASE::Awk::ERR_PARTM,
DELETE = ASE::Awk::ERR_DELETE,
BREAK = ASE::Awk::ERR_BREAK,
CONTINUE = ASE::Awk::ERR_CONTINUE,
NEXTBEG = ASE::Awk::ERR_NEXTBEG,
NEXTEND = ASE::Awk::ERR_NEXTEND,
NEXTFBEG = ASE::Awk::ERR_NEXTFBEG,
NEXTFEND = ASE::Awk::ERR_NEXTFEND,
PRINTFARG = ASE::Awk::ERR_PRINTFARG,
PREPST = ASE::Awk::ERR_PREPST,
GLNCPS = ASE::Awk::ERR_GLNCPS,
DIVBY0 = ASE::Awk::ERR_DIVBY0,
OPERAND = ASE::Awk::ERR_OPERAND,
POSIDX = ASE::Awk::ERR_POSIDX,
ARGTF = ASE::Awk::ERR_ARGTF,
ARGTM = ASE::Awk::ERR_ARGTM,
FNNONE = ASE::Awk::ERR_FNNONE,
NOTIDX = ASE::Awk::ERR_NOTIDX,
NOTDEL = ASE::Awk::ERR_NOTDEL,
NOTMAP = ASE::Awk::ERR_NOTMAP,
NOTMAPIN = ASE::Awk::ERR_NOTMAPIN,
NOTMAPNILIN = ASE::Awk::ERR_NOTMAPNILIN,
NOTREF = ASE::Awk::ERR_NOTREF,
NOTASS = ASE::Awk::ERR_NOTASS,
IDXVALASSMAP = ASE::Awk::ERR_IDXVALASSMAP,
POSVALASSMAP = ASE::Awk::ERR_POSVALASSMAP,
MAPTOSCALAR = ASE::Awk::ERR_MAPTOSCALAR,
SCALARTOMAP = ASE::Awk::ERR_SCALARTOMAP,
MAPNOTALLOWED = ASE::Awk::ERR_MAPNOTALLOWED,
VALTYPE = ASE::Awk::ERR_VALTYPE,
RDELETE = ASE::Awk::ERR_RDELETE,
RNEXTBEG = ASE::Awk::ERR_RNEXTBEG,
RNEXTEND = ASE::Awk::ERR_RNEXTEND,
RNEXTFBEG = ASE::Awk::ERR_RNEXTFBEG,
RNEXTFEND = ASE::Awk::ERR_RNEXTFEND,
BFNUSER = ASE::Awk::ERR_BFNUSER,
BFNIMPL = ASE::Awk::ERR_BFNIMPL,
IOUSER = ASE::Awk::ERR_IOUSER,
IONONE = ASE::Awk::ERR_IONONE,
IOIMPL = ASE::Awk::ERR_IOIMPL,
IONMEM = ASE::Awk::ERR_IONMEM,
IONMNL = ASE::Awk::ERR_IONMNL,
FMTARG = ASE::Awk::ERR_FMTARG,
FMTCNV = ASE::Awk::ERR_FMTCNV,
CONVFMTCHR = ASE::Awk::ERR_CONVFMTCHR,
OFMTCHR = ASE::Awk::ERR_OFMTCHR,
REXRECUR = ASE::Awk::ERR_REXRECUR,
REXRPAREN = ASE::Awk::ERR_REXRPAREN,
REXRBRACKET = ASE::Awk::ERR_REXRBRACKET,
REXRBRACE = ASE::Awk::ERR_REXRBRACE,
REXUNBALPAR = ASE::Awk::ERR_REXUNBALPAR,
REXCOLON = ASE::Awk::ERR_REXCOLON,
REXCRANGE = ASE::Awk::ERR_REXCRANGE,
REXCCLASS = ASE::Awk::ERR_REXCCLASS,
REXBRANGE = ASE::Awk::ERR_REXBRANGE,
REXEND = ASE::Awk::ERR_REXEND,
REXGARBAGE = ASE::Awk::ERR_REXGARBAGE
};
// end of enum class ERROR
typedef ASE::Awk::char_t char_t;
Awk (); Awk ();
!Awk (); !Awk ();
virtual ~Awk (); virtual ~Awk ();
@ -716,6 +734,7 @@ namespace ASE
} }
protected: protected:
MojoAwk* awk; MojoAwk* awk;
OPTION option; OPTION option;
System::Collections::Hashtable^ funcs; System::Collections::Hashtable^ funcs;
@ -768,10 +787,17 @@ namespace ASE
unsigned int errLine; unsigned int errLine;
ERROR errCode; ERROR errCode;
void setError (ERROR num); void SetError (ERROR num);
void retrieveError (); void SetError (ERROR num, size_t line);
void SetError (ERROR num, size_t line, System::String^ arg);
void SetErrorWithMessage (ERROR num, size_t line, System::String^ msg);
void RetrieveError ();
bool runErrorReported; // only used if the run-callback is activated. bool runErrorReported; // only used if the run-callback is activated.
bool stopRequested;
}; };
} //////////////////////////////
} ASE_END_NAMESPACE2(Net,ASE)
//////////////////////////////

11
ase/net/StdAwk.cpp
View File

@ -1,5 +1,5 @@
/* /*
* $Id: StdAwk.cpp,v 1.16 2007/10/08 09:43:15 bacon Exp $ * $Id: StdAwk.cpp,v 1.17 2007/10/10 03:37:49 bacon Exp $
* *
* {License} * {License}
*/ */
@ -16,10 +16,7 @@
#pragma warning(disable:4996) #pragma warning(disable:4996)
namespace ASE ASE_BEGIN_NAMESPACE2(ASE,Net)
{
namespace Net
{
StdAwk::StdAwk () StdAwk::StdAwk ()
{ {
@ -362,5 +359,5 @@ namespace ASE
FILE* fp = (FILE*)ip.ToPointer(); FILE* fp = (FILE*)ip.ToPointer();
return (::fflush (fp) == EOF)? -1: 0; return (::fflush (fp) == EOF)? -1: 0;
} }
}
} ASE_END_NAMESPACE2(Net,ASE)

11
ase/net/StdAwk.hpp
View File

@ -1,13 +1,10 @@
/* /*
* $Id: StdAwk.hpp,v 1.8 2007/10/08 09:43:15 bacon Exp $ * $Id: StdAwk.hpp,v 1.9 2007/10/10 03:37:49 bacon Exp $
*/ */
#include <ase/net/Awk.hpp> #include <ase/net/Awk.hpp>
namespace ASE ASE_BEGIN_NAMESPACE2(ASE,Net)
{
namespace Net
{
public ref class StdAwk abstract: public Awk public ref class StdAwk abstract: public Awk
{ {
@ -53,5 +50,5 @@ namespace ASE
Pipe^ pipe, cli::array<char_t>^ buf, int len) override; Pipe^ pipe, cli::array<char_t>^ buf, int len) override;
virtual int FlushPipe (Pipe^ pipe) override; virtual int FlushPipe (Pipe^ pipe) override;
}; };
}
} ASE_END_NAMESPACE2(Net,ASE)

7
ase/test/awk/Awk.cpp
View File

@ -1,5 +1,5 @@
/* /*
* $Id: Awk.cpp,v 1.41 2007/10/07 15:27:39 bacon Exp $ * $Id: Awk.cpp,v 1.42 2007/10/10 03:37:49 bacon Exp $
*/ */
#include <ase/awk/StdAwk.hpp> #include <ase/awk/StdAwk.hpp>
@ -16,6 +16,11 @@
#include <unistd.h> #include <unistd.h>
#endif #endif
#if defined(_WIN32) && defined(_MSC_VER) && defined(_DEBUG)
#define _CRTDBG_MAP_ALLOC
#include <crtdbg.h>
#endif
class TestAwk: public ASE::StdAwk class TestAwk: public ASE::StdAwk
{ {
public: public:

BIN
ase/test/net/AwkForm.cs
View File

Binary file not shown.