ab2f05fa77
* configure.in : remove atk/glue/Makefile * atk/Makefile.am : comment out subdirs for now * atk/makefile.win32 : don't build glue * */glue/Makefile.am : remove generated.c from sources * */glue/makefile.win32 : remove generated.c from sources * generator/ObjectGen.cs : disable vm glue generation for now. svn path=/trunk/gtk-sharp/; revision=24850
320 lines
8.8 KiB
C#
320 lines
8.8 KiB
C#
// GtkSharp.Generation.ObjectGen.cs - The Object Generatable.
|
|
//
|
|
// Author: Mike Kestner <mkestner@ximian.com>
|
|
//
|
|
// (c) 2001-2003 Mike Kestner and Ximian Inc.
|
|
// (c) 2004 Novell, Inc.
|
|
|
|
namespace GtkSharp.Generation {
|
|
|
|
using System;
|
|
using System.Collections;
|
|
using System.IO;
|
|
using System.Text;
|
|
using System.Xml;
|
|
|
|
public class ObjectGen : ClassBase, IGeneratable {
|
|
|
|
private ArrayList strings = new ArrayList();
|
|
private ArrayList vm_nodes = new ArrayList();
|
|
private static Hashtable dirs = new Hashtable ();
|
|
|
|
public ObjectGen (XmlElement ns, XmlElement elem) : base (ns, elem)
|
|
{
|
|
foreach (XmlNode node in elem.ChildNodes) {
|
|
|
|
if (!(node is XmlElement)) continue;
|
|
XmlElement member = (XmlElement) node;
|
|
|
|
switch (node.Name) {
|
|
case "field":
|
|
case "callback":
|
|
Statistics.IgnoreCount++;
|
|
break;
|
|
|
|
case "virtual_method":
|
|
Statistics.IgnoreCount++;
|
|
break;
|
|
|
|
case "static-string":
|
|
strings.Add (node);
|
|
break;
|
|
|
|
default:
|
|
if (!IsNodeNameHandled (node.Name))
|
|
Console.WriteLine ("Unexpected node " + node.Name + " in " + CName);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
private class DirectoryInfo {
|
|
public string assembly_name;
|
|
public Hashtable objects;
|
|
|
|
public DirectoryInfo (string assembly_name) {
|
|
this.assembly_name = assembly_name;
|
|
objects = new Hashtable ();
|
|
}
|
|
}
|
|
|
|
private static DirectoryInfo GetDirectoryInfo (string dir, string assembly_name)
|
|
{
|
|
DirectoryInfo result;
|
|
|
|
if (dirs.ContainsKey (dir)) {
|
|
result = dirs [dir] as DirectoryInfo;
|
|
if (result.assembly_name != assembly_name) {
|
|
Console.WriteLine ("Can't put multiple assemblies in one directory.");
|
|
return null;
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
result = new DirectoryInfo (assembly_name);
|
|
dirs.Add (dir, result);
|
|
|
|
return result;
|
|
}
|
|
|
|
public void Generate ()
|
|
{
|
|
GenerationInfo gen_info = new GenerationInfo (NSElem);
|
|
Generate (gen_info);
|
|
}
|
|
|
|
public void Generate (GenerationInfo gen_info)
|
|
{
|
|
DirectoryInfo di = GetDirectoryInfo (gen_info.Dir, gen_info.AssemblyName);
|
|
di.objects.Add (CName, QualifiedName);
|
|
|
|
StreamWriter sw = gen_info.Writer = gen_info.OpenStream (Name);
|
|
|
|
sw.WriteLine ("namespace " + NS + " {");
|
|
sw.WriteLine ();
|
|
sw.WriteLine ("\tusing System;");
|
|
sw.WriteLine ("\tusing System.Collections;");
|
|
sw.WriteLine ("\tusing System.Runtime.InteropServices;");
|
|
sw.WriteLine ();
|
|
|
|
SymbolTable table = SymbolTable.Table;
|
|
|
|
sw.WriteLine ("#region Autogenerated code");
|
|
sw.Write ("\tpublic class " + Name);
|
|
string cs_parent = table.GetCSType(Elem.GetAttribute("parent"));
|
|
if (cs_parent != "")
|
|
sw.Write (" : " + cs_parent);
|
|
if (interfaces != null) {
|
|
foreach (string iface in interfaces) {
|
|
if (Parent != null && Parent.Implements (iface))
|
|
continue;
|
|
sw.Write (", " + table.GetCSType (iface));
|
|
}
|
|
}
|
|
sw.WriteLine (" {");
|
|
sw.WriteLine ();
|
|
|
|
GenCtors (gen_info);
|
|
GenProperties (gen_info);
|
|
|
|
bool has_sigs = (sigs != null && sigs.Count > 0);
|
|
if (!has_sigs && interfaces != null) {
|
|
foreach (string iface in interfaces) {
|
|
ClassBase igen = table.GetClassGen (iface);
|
|
if (igen != null && igen.Signals != null) {
|
|
has_sigs = true;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (has_sigs && Elem.HasAttribute("parent")) {
|
|
GenSignals (gen_info, null);
|
|
}
|
|
|
|
if (vm_nodes.Count > 0) {
|
|
if (gen_info.GlueEnabled) {
|
|
GenVirtualMethods (gen_info);
|
|
} else {
|
|
Statistics.VMIgnored = true;
|
|
Statistics.ThrottledCount += vm_nodes.Count;
|
|
}
|
|
}
|
|
|
|
GenMethods (gen_info, null, null);
|
|
|
|
if (interfaces != null) {
|
|
Hashtable all_methods = new Hashtable ();
|
|
Hashtable collisions = new Hashtable ();
|
|
foreach (string iface in interfaces) {
|
|
ClassBase igen = table.GetClassGen (iface);
|
|
foreach (Method m in igen.Methods.Values) {
|
|
if (all_methods.Contains (m.Name))
|
|
collisions[m.Name] = true;
|
|
else
|
|
all_methods[m.Name] = true;
|
|
}
|
|
}
|
|
|
|
foreach (string iface in interfaces) {
|
|
if (Parent != null && Parent.Implements (iface))
|
|
continue;
|
|
ClassBase igen = table.GetClassGen (iface);
|
|
igen.GenMethods (gen_info, collisions, this);
|
|
igen.GenSignals (gen_info, this);
|
|
}
|
|
}
|
|
|
|
foreach (XmlElement str in strings) {
|
|
sw.Write ("\t\tpublic static string " + str.GetAttribute ("name"));
|
|
sw.WriteLine (" {\n\t\t\t get { return \"" + str.GetAttribute ("value") + "\"; }\n\t\t}");
|
|
}
|
|
|
|
sw.WriteLine ("#endregion");
|
|
AppendCustom (sw, gen_info.CustomDir);
|
|
|
|
sw.WriteLine ("\t}");
|
|
sw.WriteLine ("}");
|
|
|
|
sw.Close ();
|
|
gen_info.Writer = null;
|
|
Statistics.ObjectCount++;
|
|
}
|
|
|
|
protected override void GenCtors (GenerationInfo gen_info)
|
|
{
|
|
if (!Elem.HasAttribute("parent"))
|
|
return;
|
|
|
|
gen_info.Writer.WriteLine("\t\t~" + Name + "()");
|
|
gen_info.Writer.WriteLine("\t\t{");
|
|
gen_info.Writer.WriteLine("\t\t\tDispose();");
|
|
gen_info.Writer.WriteLine("\t\t}");
|
|
gen_info.Writer.WriteLine();
|
|
gen_info.Writer.WriteLine("\t\tprotected " + Name + "(GLib.GType gtype) : base(gtype) {}");
|
|
gen_info.Writer.WriteLine("\t\tpublic " + Name + "(IntPtr raw) : base(raw) {}");
|
|
gen_info.Writer.WriteLine();
|
|
|
|
base.GenCtors (gen_info);
|
|
}
|
|
|
|
private void GenVMGlue (GenerationInfo gen_info, XmlElement elem)
|
|
{
|
|
StreamWriter sw = gen_info.GlueWriter;
|
|
|
|
string vm_name = elem.GetAttribute ("cname");
|
|
string method = gen_info.GluelibName + "_" + NS + Name + "_override_" + vm_name;
|
|
sw.WriteLine ();
|
|
sw.WriteLine ("void " + method + " (GType type, gpointer cb);");
|
|
sw.WriteLine ();
|
|
sw.WriteLine ("void");
|
|
sw.WriteLine (method + " (GType type, gpointer cb)");
|
|
sw.WriteLine ("{");
|
|
sw.WriteLine ("\t{0} *klass = ({0} *) g_type_class_peek (type);", NS + Name + "Class");
|
|
sw.WriteLine ("\tklass->" + vm_name + " = cb;");
|
|
sw.WriteLine ("}");
|
|
}
|
|
|
|
static bool vmhdrs_needed = true;
|
|
|
|
private void GenVirtualMethods (GenerationInfo gen_info)
|
|
{
|
|
if (vmhdrs_needed) {
|
|
gen_info.GlueWriter.WriteLine ("#include <glib-object.h>");
|
|
gen_info.GlueWriter.WriteLine ("#include \"vmglueheaders.h\"");
|
|
gen_info.GlueWriter.WriteLine ();
|
|
vmhdrs_needed = false;
|
|
}
|
|
|
|
foreach (XmlElement elem in vm_nodes) {
|
|
GenVMGlue (gen_info, elem);
|
|
}
|
|
}
|
|
|
|
/* Keep this in sync with the one in glib/ObjectManager.cs */
|
|
private static string GetExpected (string cname)
|
|
{
|
|
StringBuilder expected = new StringBuilder ();
|
|
string ns = "";
|
|
bool needs_dot = true;
|
|
for (int i = 0; i < cname.Length; i++)
|
|
{
|
|
if (needs_dot && i > 0 && Char.IsUpper (cname[i])) {
|
|
if (expected.Length == 1 && expected[0] == 'G') {
|
|
ns = "glib";
|
|
expected = new StringBuilder ("GLib.");
|
|
} else {
|
|
ns = expected.ToString ().ToLower ();
|
|
expected.Append ('.');
|
|
}
|
|
needs_dot = false;
|
|
}
|
|
expected.Append (cname[i]);
|
|
}
|
|
expected.AppendFormat (",{0}-sharp", ns);
|
|
|
|
return expected.ToString ();
|
|
}
|
|
|
|
private static bool NeedsMap (Hashtable objs, string assembly_name)
|
|
{
|
|
foreach (string key in objs.Keys)
|
|
if (GetExpected (key) != ((string) objs[key] + "," + assembly_name))
|
|
return true;
|
|
|
|
return false;
|
|
}
|
|
|
|
private static string Studlify (string name)
|
|
{
|
|
string result = "";
|
|
|
|
string[] subs = name.Split ('-');
|
|
foreach (string sub in subs)
|
|
result += Char.ToUpper (sub[0]) + sub.Substring (1);
|
|
|
|
return result;
|
|
}
|
|
|
|
public static void GenerateMappers ()
|
|
{
|
|
foreach (string dir in dirs.Keys) {
|
|
|
|
DirectoryInfo di = dirs[dir] as DirectoryInfo;
|
|
|
|
if (!NeedsMap (di.objects, di.assembly_name))
|
|
continue;
|
|
|
|
GenerationInfo gen_info = new GenerationInfo (dir, di.assembly_name);
|
|
|
|
GenerateMapper (di, gen_info);
|
|
}
|
|
}
|
|
|
|
private static void GenerateMapper (DirectoryInfo dir_info, GenerationInfo gen_info)
|
|
{
|
|
StreamWriter sw = gen_info.OpenStream ("ObjectManager");
|
|
|
|
sw.WriteLine ("namespace GtkSharp." + Studlify (dir_info.assembly_name) + " {");
|
|
sw.WriteLine ();
|
|
sw.WriteLine ("\tpublic class ObjectManager {");
|
|
sw.WriteLine ();
|
|
sw.WriteLine ("\t\t// Call this method from the appropriate module init function.");
|
|
sw.WriteLine ("\t\tpublic static void Initialize ()");
|
|
sw.WriteLine ("\t\t{");
|
|
|
|
Console.WriteLine ("Generating mappers");
|
|
foreach (string key in dir_info.objects.Keys) {
|
|
if (GetExpected(key) != ((string) dir_info.objects[key] + "," + dir_info.assembly_name))
|
|
sw.WriteLine ("\t\t\tGtkSharp.ObjectManager.RegisterType(\"" + key + "\", \"" + dir_info.objects [key] + "," + dir_info.assembly_name + "\");");
|
|
}
|
|
|
|
sw.WriteLine ("\t\t}");
|
|
sw.WriteLine ("\t}");
|
|
sw.WriteLine ("}");
|
|
sw.Close ();
|
|
}
|
|
}
|
|
}
|
|
|