2004-01-18 Mike Kestner <mkestner@ximian.com>
* generator/Field.cs : refactored code from StructBase * generator/StructBase.cs : spin off Field class svn path=/trunk/gtk-sharp/; revision=22239
This commit is contained in:
parent
b17f91170f
commit
d1367eb515
3 changed files with 168 additions and 115 deletions
|
@ -1,3 +1,8 @@
|
||||||
|
2004-01-18 Mike Kestner <mkestner@ximian.com>
|
||||||
|
|
||||||
|
* generator/Field.cs : refactored code from StructBase
|
||||||
|
* generator/StructBase.cs : spin off Field class
|
||||||
|
|
||||||
2004-01-18 Mike Kestner <mkestner@ximian.com>
|
2004-01-18 Mike Kestner <mkestner@ximian.com>
|
||||||
|
|
||||||
* generator/SymbolTable.cs : mangle parms named readonly
|
* generator/SymbolTable.cs : mangle parms named readonly
|
||||||
|
|
150
generator/Field.cs
Normal file
150
generator/Field.cs
Normal file
|
@ -0,0 +1,150 @@
|
||||||
|
// GtkSharp.Generation.Field.cs - The Field generation Class.
|
||||||
|
//
|
||||||
|
// Author: Mike Kestner <mkestner@ximian.com>
|
||||||
|
//
|
||||||
|
// (c) 2004 Novell, Inc.
|
||||||
|
|
||||||
|
namespace GtkSharp.Generation {
|
||||||
|
|
||||||
|
using System;
|
||||||
|
using System.IO;
|
||||||
|
using System.Xml;
|
||||||
|
|
||||||
|
public class Field {
|
||||||
|
|
||||||
|
public static int bitfields;
|
||||||
|
|
||||||
|
XmlElement elem;
|
||||||
|
|
||||||
|
public Field (XmlElement elem)
|
||||||
|
{
|
||||||
|
this.elem = elem;
|
||||||
|
}
|
||||||
|
|
||||||
|
public string CSType {
|
||||||
|
get {
|
||||||
|
string type = SymbolTable.Table.GetCSType (CType);
|
||||||
|
if (IsArray)
|
||||||
|
// FIXME
|
||||||
|
type = "IntPtr";
|
||||||
|
else if (IsBit)
|
||||||
|
type = "uint";
|
||||||
|
else if ((IsPointer || SymbolTable.Table.IsOpaque (CType)) && type != "string")
|
||||||
|
type = "IntPtr";
|
||||||
|
else if (SymbolTable.Table.IsCallback (CType))
|
||||||
|
type = "IntPtr";
|
||||||
|
|
||||||
|
return type;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
public string CType {
|
||||||
|
get {
|
||||||
|
return elem.GetAttribute ("type");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
public bool IsArray {
|
||||||
|
get {
|
||||||
|
return elem.HasAttribute("array_len");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
public bool IsBit {
|
||||||
|
get {
|
||||||
|
return (elem.HasAttribute("bits") && (elem.GetAttribute("bits") == "1"));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
public bool IsPadding {
|
||||||
|
get {
|
||||||
|
string c_name = elem.GetAttribute ("cname");
|
||||||
|
return (c_name.StartsWith ("dummy"));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
public bool IsPointer {
|
||||||
|
get {
|
||||||
|
return (CType.EndsWith ("*") || CType.EndsWith ("pointer"));
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
public string Name {
|
||||||
|
get {
|
||||||
|
string result = "";
|
||||||
|
if ((IsPointer || SymbolTable.Table.IsOpaque (CType)) && CSType != "string")
|
||||||
|
result = "_";
|
||||||
|
|
||||||
|
if (IsBit)
|
||||||
|
result = String.Format ("_bitfield{0}", bitfields++);
|
||||||
|
else
|
||||||
|
result += SymbolTable.Table.MangleName (elem.GetAttribute ("cname"));
|
||||||
|
|
||||||
|
return result;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
public string Protection {
|
||||||
|
get {
|
||||||
|
if (IsArray)
|
||||||
|
// FIXME
|
||||||
|
return "private";
|
||||||
|
else if (IsBit || IsPadding || SymbolTable.Table.IsCallback (CType))
|
||||||
|
return "private";
|
||||||
|
else if ((IsPointer || SymbolTable.Table.IsOpaque (CType)) && CSType != "string")
|
||||||
|
return "private";
|
||||||
|
else
|
||||||
|
return "public";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
public bool Generate (StreamWriter sw)
|
||||||
|
{
|
||||||
|
if (CSType == "") {
|
||||||
|
Console.WriteLine ("Field has unknown Type {0}", CType);
|
||||||
|
Statistics.ThrottledCount++;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
SymbolTable table = SymbolTable.Table;
|
||||||
|
|
||||||
|
// FIXME
|
||||||
|
if (IsArray)
|
||||||
|
Console.WriteLine ("warning: array field {0} probably incorrectly generated", Name);
|
||||||
|
sw.WriteLine ("\t\t{0} {1} {2};", Protection, CSType, table.MangleName (Name));
|
||||||
|
|
||||||
|
|
||||||
|
string wrapped = table.GetCSType (CType);
|
||||||
|
string wrapped_name = SymbolTable.Table.MangleName (elem.GetAttribute ("cname"));
|
||||||
|
if (table.IsObject (CType)) {
|
||||||
|
sw.WriteLine ();
|
||||||
|
sw.WriteLine ("\t\tpublic " + wrapped + " " + wrapped_name + " {");
|
||||||
|
sw.WriteLine ("\t\t\tget { ");
|
||||||
|
sw.WriteLine ("\t\t\t\t" + wrapped + " ret = " + table.FromNativeReturn(CType, Name) + ";");
|
||||||
|
sw.WriteLine ("\t\t\t\treturn ret;");
|
||||||
|
sw.WriteLine ("\t\t\t}");
|
||||||
|
sw.WriteLine ("\t\t\tset { " + Name + " = " + table.CallByName (CType, "value") + "; }");
|
||||||
|
sw.WriteLine ("\t\t}");
|
||||||
|
} else if (table.IsOpaque (CType)) {
|
||||||
|
sw.WriteLine ();
|
||||||
|
sw.WriteLine ("\t\tpublic " + wrapped + " " + wrapped_name + " {");
|
||||||
|
sw.WriteLine ("\t\t\tget { ");
|
||||||
|
sw.WriteLine ("\t\t\t\t" + wrapped + " ret = " + table.FromNativeReturn(CType, Name) + ";");
|
||||||
|
sw.WriteLine ("\t\t\t\tif (ret == null) ret = new " + wrapped + "(" + Name + ");");
|
||||||
|
sw.WriteLine ("\t\t\t\treturn ret;");
|
||||||
|
sw.WriteLine ("\t\t\t}");
|
||||||
|
|
||||||
|
sw.WriteLine ("\t\t\tset { " + Name + " = " + table.CallByName (CType, "value") + "; }");
|
||||||
|
sw.WriteLine ("\t\t}");
|
||||||
|
} else if (IsPointer && (table.IsStruct (CType) || table.IsBoxed (CType))) {
|
||||||
|
sw.WriteLine ();
|
||||||
|
sw.WriteLine ("\t\tpublic " + wrapped + " " + wrapped_name + " {");
|
||||||
|
sw.WriteLine ("\t\t\tget { return " + table.FromNativeReturn (CType, Name) + "; }");
|
||||||
|
sw.WriteLine ("\t\t}");
|
||||||
|
}
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
|
@ -15,7 +15,6 @@ namespace GtkSharp.Generation {
|
||||||
public class StructBase : ClassBase {
|
public class StructBase : ClassBase {
|
||||||
|
|
||||||
ArrayList fields = new ArrayList ();
|
ArrayList fields = new ArrayList ();
|
||||||
uint bitfields;
|
|
||||||
|
|
||||||
public StructBase (XmlElement ns, XmlElement elem) : base (ns, elem)
|
public StructBase (XmlElement ns, XmlElement elem) : base (ns, elem)
|
||||||
{
|
{
|
||||||
|
@ -43,168 +42,67 @@ namespace GtkSharp.Generation {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
public override String MarshalType {
|
public override string MarshalType {
|
||||||
get
|
get
|
||||||
{
|
{
|
||||||
return "ref " + QualifiedName;
|
return "ref " + QualifiedName;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
public override String MarshalReturnType {
|
public override string MarshalReturnType {
|
||||||
get
|
get
|
||||||
{
|
{
|
||||||
return "IntPtr";
|
return "IntPtr";
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
public override String CallByName (String var_name)
|
public override string CallByName (string var_name)
|
||||||
{
|
{
|
||||||
return "ref " + var_name;
|
return "ref " + var_name;
|
||||||
}
|
}
|
||||||
|
|
||||||
public override String CallByName ()
|
public override string CallByName ()
|
||||||
{
|
{
|
||||||
return "ref this";
|
return "ref this";
|
||||||
}
|
}
|
||||||
|
|
||||||
public override String AssignToName {
|
public override string AssignToName {
|
||||||
get { return "raw"; }
|
get { return "raw"; }
|
||||||
}
|
}
|
||||||
|
|
||||||
public override String FromNative(String var)
|
public override string FromNative(string var)
|
||||||
{
|
{
|
||||||
return var;
|
return var;
|
||||||
}
|
}
|
||||||
|
|
||||||
public override String FromNativeReturn(String var)
|
public override string FromNativeReturn(string var)
|
||||||
{
|
{
|
||||||
return QualifiedName + ".New (" + var + ")";
|
return QualifiedName + ".New (" + var + ")";
|
||||||
}
|
}
|
||||||
|
|
||||||
public override String ToNativeReturn(String var)
|
public override string ToNativeReturn(string var)
|
||||||
{
|
{
|
||||||
// FIXME
|
// FIXME
|
||||||
return var;
|
return var;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool IsBit (XmlElement field)
|
|
||||||
{
|
|
||||||
return (field.HasAttribute("bits") && (field.GetAttribute("bits") == "1"));
|
|
||||||
}
|
|
||||||
|
|
||||||
bool IsPointer (XmlElement field)
|
|
||||||
{
|
|
||||||
string c_type = field.GetAttribute("type");
|
|
||||||
return (c_type.EndsWith ("*") || c_type.EndsWith ("pointer"));
|
|
||||||
}
|
|
||||||
|
|
||||||
bool IsPadding (XmlElement field)
|
|
||||||
{
|
|
||||||
string c_name = field.GetAttribute ("cname");
|
|
||||||
return (c_name.StartsWith ("dummy"));
|
|
||||||
}
|
|
||||||
|
|
||||||
protected void GenFields (StreamWriter sw)
|
protected void GenFields (StreamWriter sw)
|
||||||
{
|
{
|
||||||
bitfields = 0;
|
Field.bitfields = 0;
|
||||||
bool need_field = true;
|
bool need_field = true;
|
||||||
foreach (XmlElement field in fields) {
|
foreach (XmlElement field_elem in fields) {
|
||||||
if (IsBit (field)) {
|
Field field = new Field (field_elem);
|
||||||
|
if (field.IsBit) {
|
||||||
if (need_field)
|
if (need_field)
|
||||||
need_field = false;
|
need_field = false;
|
||||||
else
|
else
|
||||||
continue;
|
continue;
|
||||||
} else
|
} else
|
||||||
need_field = true;
|
need_field = true;
|
||||||
GenField (field, sw);
|
field.Generate (sw);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
protected bool GetFieldInfo (XmlElement field, out string c_type, out string type, out string name, out string protection)
|
|
||||||
{
|
|
||||||
name = "";
|
|
||||||
protection = "";
|
|
||||||
c_type = field.GetAttribute ("type");
|
|
||||||
type = SymbolTable.Table.GetCSType (c_type);
|
|
||||||
if (IsBit (field)) {
|
|
||||||
type = "uint";
|
|
||||||
protection = "private";
|
|
||||||
} else if ((IsPointer (field) || SymbolTable.Table.IsOpaque (c_type)) && type != "string") {
|
|
||||||
type = "IntPtr";
|
|
||||||
name = "_";
|
|
||||||
protection = "private";
|
|
||||||
} else if (SymbolTable.Table.IsCallback (c_type)) {
|
|
||||||
type = "IntPtr";
|
|
||||||
protection = "private";
|
|
||||||
} else if (IsPadding (field)) {
|
|
||||||
protection = "private";
|
|
||||||
} else {
|
|
||||||
if (type == "") {
|
|
||||||
Console.WriteLine ("Field has unknown Type {0}", c_type);
|
|
||||||
Statistics.ThrottledCount++;
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
|
|
||||||
protection = "public";
|
|
||||||
}
|
|
||||||
|
|
||||||
// FIXME: marshalling not implemented here in mono
|
|
||||||
if (field.HasAttribute("array_len")) {
|
|
||||||
type = "IntPtr";
|
|
||||||
protection = "private";
|
|
||||||
}
|
|
||||||
|
|
||||||
if (IsBit (field))
|
|
||||||
name = String.Format ("_bitfield{0}", bitfields++);
|
|
||||||
else
|
|
||||||
name += SymbolTable.Table.MangleName (field.GetAttribute ("cname"));
|
|
||||||
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
protected bool GenField (XmlElement field, StreamWriter sw)
|
|
||||||
{
|
|
||||||
string c_type, type, name, protection;
|
|
||||||
if (!GetFieldInfo (field, out c_type, out type, out name, out protection))
|
|
||||||
return false;
|
|
||||||
sw.WriteLine ("\t\t{0} {1} {2};", protection, type, SymbolTable.Table.MangleName (name));
|
|
||||||
|
|
||||||
if (field.HasAttribute("array_len"))
|
|
||||||
Console.WriteLine ("warning: array field {0}.{1} probably incorrectly generated", QualifiedName, name);
|
|
||||||
SymbolTable table = SymbolTable.Table;
|
|
||||||
|
|
||||||
string wrapped = table.GetCSType (c_type);
|
|
||||||
string wrapped_name = SymbolTable.Table.MangleName (field.GetAttribute ("cname"));
|
|
||||||
if (table.IsObject (c_type)) {
|
|
||||||
sw.WriteLine ();
|
|
||||||
sw.WriteLine ("\t\tpublic " + wrapped + " " + wrapped_name + " {");
|
|
||||||
sw.WriteLine ("\t\t\tget { ");
|
|
||||||
sw.WriteLine ("\t\t\t\t" + wrapped + " ret = " + table.FromNativeReturn(c_type, name) + ";");
|
|
||||||
sw.WriteLine ("\t\t\t\treturn ret;");
|
|
||||||
sw.WriteLine ("\t\t\t}");
|
|
||||||
sw.WriteLine ("\t\t\tset { " + name + " = " + table.CallByName (c_type, "value") + "; }");
|
|
||||||
sw.WriteLine ("\t\t}");
|
|
||||||
} else if (table.IsOpaque (c_type)) {
|
|
||||||
sw.WriteLine ();
|
|
||||||
sw.WriteLine ("\t\tpublic " + wrapped + " " + wrapped_name + " {");
|
|
||||||
sw.WriteLine ("\t\t\tget { ");
|
|
||||||
sw.WriteLine ("\t\t\t\t" + wrapped + " ret = " + table.FromNativeReturn(c_type, name) + ";");
|
|
||||||
sw.WriteLine ("\t\t\t\tif (ret == null) ret = new " + wrapped + "(" + name + ");");
|
|
||||||
sw.WriteLine ("\t\t\t\treturn ret;");
|
|
||||||
sw.WriteLine ("\t\t\t}");
|
|
||||||
|
|
||||||
sw.WriteLine ("\t\t\tset { " + name + " = " + table.CallByName (c_type, "value") + "; }");
|
|
||||||
sw.WriteLine ("\t\t}");
|
|
||||||
} else if (IsPointer (field) && (table.IsStruct (c_type) || table.IsBoxed (c_type))) {
|
|
||||||
sw.WriteLine ();
|
|
||||||
sw.WriteLine ("\t\tpublic " + wrapped + " " + wrapped_name + " {");
|
|
||||||
sw.WriteLine ("\t\t\tget { return " + table.FromNativeReturn (c_type, name) + "; }");
|
|
||||||
sw.WriteLine ("\t\t}");
|
|
||||||
}
|
|
||||||
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
public virtual void Generate (GenerationInfo gen_info)
|
public virtual void Generate (GenerationInfo gen_info)
|
||||||
{
|
{
|
||||||
bool need_close = false;
|
bool need_close = false;
|
||||||
|
|
Loading…
Add table
Reference in a new issue