2002-11-10 10:03:51 +00:00
|
|
|
// GtkSharp.Generation.SignalHandler.cs - The SignalHandler marshaling Class.
|
|
|
|
//
|
2004-03-16 19:43:04 +00:00
|
|
|
// Author: Mike Kestner <mkestner@ximian.com>
|
2002-11-10 10:03:51 +00:00
|
|
|
//
|
2003-05-19 02:45:17 +00:00
|
|
|
// (c) 2002-2003 Mike Kestner
|
2004-03-16 19:43:04 +00:00
|
|
|
// (c) 2004 Novell, Inc.
|
2002-11-10 10:03:51 +00:00
|
|
|
|
|
|
|
namespace GtkSharp.Generation {
|
|
|
|
|
|
|
|
using System;
|
|
|
|
using System.Collections;
|
|
|
|
using System.IO;
|
|
|
|
using System.Xml;
|
|
|
|
|
|
|
|
public class SignalHandler {
|
|
|
|
|
2003-09-15 04:20:33 +00:00
|
|
|
XmlElement sig;
|
|
|
|
string ns;
|
|
|
|
string retval = "";
|
|
|
|
string s_ret = "";
|
|
|
|
string p_ret = "";
|
|
|
|
Parameters parms = null;
|
|
|
|
|
|
|
|
public SignalHandler (XmlElement sig, string ns)
|
|
|
|
{
|
|
|
|
this.sig = sig;
|
|
|
|
this.ns = ns;
|
|
|
|
XmlElement params_elem = sig["parameters"] as XmlElement;
|
|
|
|
if (params_elem != null)
|
|
|
|
parms = new Parameters (params_elem, ns);
|
|
|
|
}
|
|
|
|
|
|
|
|
public bool Validate ()
|
2002-11-10 10:03:51 +00:00
|
|
|
{
|
|
|
|
XmlElement ret_elem = sig["return-type"];
|
|
|
|
if (ret_elem == null) {
|
|
|
|
Console.Write("Missing return-type ");
|
2003-09-15 04:20:33 +00:00
|
|
|
return false;
|
2002-11-10 10:03:51 +00:00
|
|
|
}
|
|
|
|
|
2003-09-15 04:20:33 +00:00
|
|
|
retval = ret_elem.GetAttribute("type");
|
2002-11-10 10:03:51 +00:00
|
|
|
if (retval == "") {
|
|
|
|
Console.Write("Invalid return-type ");
|
2003-09-15 04:20:33 +00:00
|
|
|
return false;
|
2002-11-10 10:03:51 +00:00
|
|
|
}
|
|
|
|
|
2003-09-15 04:20:33 +00:00
|
|
|
s_ret = SymbolTable.Table.GetCSType(retval);
|
|
|
|
p_ret = SymbolTable.Table.GetMarshalReturnType(retval);
|
2002-11-10 10:03:51 +00:00
|
|
|
if ((s_ret == "") || (p_ret == "")) {
|
|
|
|
Console.Write("Funky type: " + retval);
|
2003-09-15 04:20:33 +00:00
|
|
|
return false;
|
2002-11-10 10:03:51 +00:00
|
|
|
}
|
|
|
|
|
2003-09-15 04:20:33 +00:00
|
|
|
if (parms == null || !parms.Validate ()) {
|
2002-11-10 10:03:51 +00:00
|
|
|
Console.Write("Missing parameters ");
|
2003-09-15 04:20:33 +00:00
|
|
|
return false;
|
2002-11-10 10:03:51 +00:00
|
|
|
}
|
|
|
|
|
2003-09-15 04:20:33 +00:00
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
|
|
|
private string ISig {
|
|
|
|
get {
|
|
|
|
string result = "";
|
|
|
|
for (int i = 0; i < parms.Count; i++) {
|
|
|
|
if (i > 0)
|
|
|
|
result += ", ";
|
|
|
|
|
|
|
|
result += (parms[i].MarshalType + " arg" + i);
|
2002-11-10 10:03:51 +00:00
|
|
|
}
|
2003-09-15 04:20:33 +00:00
|
|
|
return result;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
private string BaseName {
|
|
|
|
get {
|
|
|
|
string result = SymbolTable.Table.GetName (retval);
|
|
|
|
for (int i = 0; i < parms.Count; i++) {
|
|
|
|
if (parms[i].Generatable is ObjectGen || parms[i].Generatable is InterfaceGen) {
|
|
|
|
result += "Object";
|
|
|
|
} else {
|
|
|
|
result += SymbolTable.Table.GetName(parms[i].CType);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
}
|
2002-11-10 10:03:51 +00:00
|
|
|
|
2003-10-06 16:15:05 +00:00
|
|
|
public string CallbackName {
|
|
|
|
get {
|
|
|
|
return BaseName + "Callback";
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
public string DelegateName {
|
|
|
|
get {
|
|
|
|
return BaseName + "Delegate";
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2003-09-15 04:20:33 +00:00
|
|
|
public string Name {
|
|
|
|
get {
|
|
|
|
return BaseName + "Signal";
|
|
|
|
}
|
|
|
|
}
|
2002-11-10 10:03:51 +00:00
|
|
|
|
2003-10-06 16:15:05 +00:00
|
|
|
public void Generate (string implementor_ns, GenerationInfo gen_info)
|
2003-09-15 04:20:33 +00:00
|
|
|
{
|
|
|
|
SymbolTable table = SymbolTable.Table;
|
|
|
|
|
2003-10-06 16:15:05 +00:00
|
|
|
StreamWriter sw = gen_info.OpenStream (implementor_ns + "Sharp." + Name);
|
2002-11-10 10:03:51 +00:00
|
|
|
|
2003-09-15 04:20:33 +00:00
|
|
|
sw.WriteLine("namespace " + implementor_ns + "Sharp {");
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine();
|
|
|
|
sw.WriteLine("\tusing System;");
|
|
|
|
sw.WriteLine("\tusing System.Runtime.InteropServices;");
|
|
|
|
sw.WriteLine();
|
2003-05-08 04:44:13 +00:00
|
|
|
sw.Write("\tinternal delegate " + p_ret + " ");
|
2003-10-06 16:15:05 +00:00
|
|
|
sw.WriteLine(DelegateName + "(" + ISig + ", int key);");
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine();
|
2004-05-05 18:24:04 +00:00
|
|
|
sw.WriteLine("\tinternal class " + Name + " : GLib.SignalCallback {");
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine();
|
2003-10-06 16:15:05 +00:00
|
|
|
sw.WriteLine("\t\tprivate static " + DelegateName + " _Delegate;");
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine();
|
2003-02-19 06:23:36 +00:00
|
|
|
sw.Write("\t\tprivate static " + p_ret + " ");
|
2003-10-06 16:15:05 +00:00
|
|
|
sw.WriteLine(CallbackName + "(" + ISig + ", int key)");
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine("\t\t{");
|
|
|
|
sw.WriteLine("\t\t\tif (!_Instances.Contains(key))");
|
|
|
|
sw.WriteLine("\t\t\t\tthrow new Exception(\"Unexpected signal key \" + key);");
|
|
|
|
sw.WriteLine();
|
2003-10-06 16:15:05 +00:00
|
|
|
sw.WriteLine("\t\t\t" + Name + " inst = (" + Name + ") _Instances[key];");
|
2002-11-10 10:03:51 +00:00
|
|
|
if ((s_ret == "void") && (parms.Count == 1)) {
|
|
|
|
sw.WriteLine("\t\t\tEventHandler h = (EventHandler) inst._handler;");
|
|
|
|
sw.WriteLine("\t\t\th (inst._obj, new EventArgs ());");
|
|
|
|
sw.WriteLine("\t\t}");
|
|
|
|
sw.WriteLine();
|
|
|
|
} else {
|
2004-05-05 18:24:04 +00:00
|
|
|
sw.WriteLine("\t\t\tGLib.SignalArgs args = (GLib.SignalArgs) Activator.CreateInstance (inst._argstype);");
|
2002-11-10 10:03:51 +00:00
|
|
|
if (parms.Count > 1) {
|
|
|
|
sw.WriteLine("\t\t\targs.Args = new object[" + (parms.Count-1) + "];");
|
|
|
|
}
|
|
|
|
for (int idx=1; idx < parms.Count; idx++) {
|
2003-09-15 04:20:33 +00:00
|
|
|
string ctype = parms[idx].CType;
|
2003-05-19 02:45:17 +00:00
|
|
|
ClassBase wrapper = table.GetClassGen (ctype);
|
|
|
|
if ((wrapper != null && !(wrapper is StructBase)) || table.IsManuallyWrapped (ctype)) {
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine("\t\t\tif (arg{0} == IntPtr.Zero)", idx);
|
|
|
|
sw.WriteLine("\t\t\t\targs.Args[{0}] = null;", idx - 1);
|
|
|
|
sw.WriteLine("\t\t\telse {");
|
|
|
|
if (wrapper != null && wrapper is ObjectGen)
|
2003-08-19 04:52:25 +00:00
|
|
|
sw.WriteLine("\t\t\t\targs.Args[" + (idx-1) + "] = GLib.Object.GetObject(arg" + idx + ", false);");
|
2002-11-10 10:03:51 +00:00
|
|
|
else
|
2003-05-19 02:45:17 +00:00
|
|
|
sw.WriteLine("\t\t\t\targs.Args[" + (idx-1) + "] = " + table.FromNative (ctype, "arg" + idx) + ";");
|
|
|
|
if ((wrapper != null && (wrapper is OpaqueGen)) || table.IsManuallyWrapped (ctype)) {
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine("\t\t\t\tif (args.Args[" + (idx-1) + "] == null)");
|
2003-05-19 02:45:17 +00:00
|
|
|
sw.WriteLine("\t\t\t\t\targs.Args[{0}] = new {1}(arg{2});", idx-1, table.GetCSType (ctype), idx);
|
2002-11-10 10:03:51 +00:00
|
|
|
}
|
|
|
|
sw.WriteLine("\t\t\t}");
|
|
|
|
} else {
|
2003-05-19 02:45:17 +00:00
|
|
|
sw.WriteLine("\t\t\targs.Args[" + (idx-1) + "] = " + table.FromNative (ctype, "arg" + idx) + ";");
|
2002-11-10 10:03:51 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
sw.WriteLine("\t\t\tobject[] argv = new object[2];");
|
|
|
|
sw.WriteLine("\t\t\targv[0] = inst._obj;");
|
|
|
|
sw.WriteLine("\t\t\targv[1] = args;");
|
|
|
|
sw.WriteLine("\t\t\tinst._handler.DynamicInvoke(argv);");
|
|
|
|
if (retval != "void") {
|
|
|
|
sw.WriteLine ("\t\t\tif (args.RetVal == null)");
|
|
|
|
if (s_ret == "bool")
|
|
|
|
sw.WriteLine ("\t\t\t\treturn false;");
|
|
|
|
else
|
|
|
|
sw.WriteLine ("\t\t\t\tthrow new Exception(\"args.RetVal unset in callback\");");
|
|
|
|
|
2003-05-29 Rachel Hestilow <rachel@nullenvoid.com>
* gconf/Value.cs: Update to use new string marshalling.
* generator/StringGen.cs, ConstStringGen.cs: Added.
* generator/IGeneratable.cs: Add new method ToNativeReturn.
* generator/CallbackGen.cs: Implement ToNativeReturn. Call
ToNativeReturn for the return statement. Fix a couple of
places where s_ret was being used incorrectly for m_ret.
* generator/ClassGen.cs, EnumGen.cs, ManualGen.cs,
SimpleGen.cs, StructBase.cs: Implement ToNativeReturn.
* generator/SignalHandler.cs: Call ToNativeReturn for the
return statement, instead of CallByName.
* generator/SymbolTable.cs: Use StringGen for gchar, char,
and gunichar, and ConstStringGen for their const variants.
Add a new method wrapper for ToNativeReturn.
(Trim): Add a special-case for const strings so that the
const is not stripped. Otherwise there is no way of
resolving the const case.
* glade/XML.custom: Update to use new string marshalling.
* glib/Marshaller.cs: Added.
* glib/GException.cs, Markup.cs, ObjectManager.cs,
Value.cs: Update to use new string marshalling.
* glib/Object.cs: Remove old g_type_name DllImport
as it is no longer used.
* glue/fileselection.c (gtksharp_file_selection_get_fileop_entry):
Mark this as const return.
* gtk/ColorSelection.custom, FileSelection.custom,
SelectionData.custom: Update to use new string marshalling.
svn path=/trunk/gtk-sharp/; revision=15286
2003-06-10 18:09:47 +00:00
|
|
|
sw.WriteLine("\t\t\treturn (" + p_ret + ") " + table.ToNativeReturn (retval, "((" + s_ret + ")args.RetVal)") + ";");
|
2002-11-10 10:03:51 +00:00
|
|
|
}
|
|
|
|
sw.WriteLine("\t\t}");
|
|
|
|
sw.WriteLine();
|
|
|
|
}
|
2004-05-05 18:24:04 +00:00
|
|
|
sw.Write("\t\tpublic " + Name + "(GLib.Object obj, ");
|
2004-03-16 19:43:04 +00:00
|
|
|
sw.WriteLine("string name, Delegate eh, Type argstype, int connect_flags) : base(obj, eh, argstype)");
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine("\t\t{");
|
|
|
|
sw.WriteLine("\t\t\tif (_Delegate == null) {");
|
2003-10-06 16:15:05 +00:00
|
|
|
sw.WriteLine("\t\t\t\t_Delegate = new " + DelegateName + "(" + CallbackName + ");");
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine("\t\t\t}");
|
2004-05-05 18:24:04 +00:00
|
|
|
sw.WriteLine("\t\t\tConnect (name, _Delegate, connect_flags);");
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine("\t\t}");
|
|
|
|
sw.WriteLine();
|
2003-02-26 02:16:38 +00:00
|
|
|
sw.WriteLine("\t\tprotected override void Dispose (bool disposing)");
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine("\t\t{");
|
|
|
|
sw.WriteLine("\t\t\t_Instances.Remove(_key);");
|
2003-02-28 10:55:59 +00:00
|
|
|
sw.WriteLine("\t\t\tif(_Instances.Count == 0)");
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine("\t\t\t\t_Delegate = null;");
|
2003-02-28 10:55:59 +00:00
|
|
|
sw.WriteLine();
|
2004-05-05 18:24:04 +00:00
|
|
|
sw.WriteLine("\t\t\tDisconnect ();");
|
2003-02-28 10:55:59 +00:00
|
|
|
sw.WriteLine("\t\t\tbase.Dispose (disposing);");
|
2002-11-10 10:03:51 +00:00
|
|
|
sw.WriteLine("\t\t}");
|
|
|
|
sw.WriteLine("\t}");
|
|
|
|
sw.WriteLine("}");
|
|
|
|
sw.Close();
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|