gstreamer/sources/custom/DynamicSignal.cs
andy.green@datapath.co.uk 10f0476c9f Fix for pointer arithmetic error in DynamicSignal.cs
Marshal.ReadIntPtr offset property is in byte.

https://bugzilla.gnome.org/show_bug.cgi?id=796497
2018-06-05 09:48:36 -04:00

462 lines
13 KiB
C#

// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public
// License as published by the Free Software Foundation; either
// version 2.1 of the License, or (at your option) any later version.
//
// This library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
// Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public
// License along with this library; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
//
//
// Copyright (C) 2006 Novell Inc.
// Copyright (C) 2009 Sebastian Dröge <sebastian.droege@collabora.co.uk>
// Copyright (C) 2013 Stephan Sundermann <stephansundermann@gmail.com>
//
// This class implements functions to bind callbacks to GObject signals
// dynamically and to emit signals dynamically.
//
//
using GLib;
using System;
using System.Reflection;
using System.Runtime.InteropServices;
using System.Collections;
namespace Gst
{
[UnmanagedFunctionPointer(CallingConvention.Cdecl)]
delegate void GClosureMarshal (IntPtr closure, ref GLib.Value retval, uint argc, IntPtr argsPtr,
IntPtr invocation_hint, IntPtr data);
public delegate void SignalHandler (object o, SignalArgs args);
public static class DynamicSignal
{
private static readonly int gvalue_struct_size = Marshal.SizeOf (typeof(GLib.Value));
class ObjectSignalKey
{
object o;
string signal_name;
public ObjectSignalKey (object o, string name)
{
this.o = o;
signal_name = name;
}
public override bool Equals (object o)
{
if (o is ObjectSignalKey) {
ObjectSignalKey k = (ObjectSignalKey)o;
return k.o.Equals (this.o) && signal_name.Equals (k.signal_name);
}
return base.Equals (o);
}
public override int GetHashCode ()
{
return o.GetHashCode () ^ signal_name.GetHashCode ();
}
}
class SignalInfo : IDisposable
{
uint handlerId;
IntPtr closure;
Delegate registeredHandler;
Type argsType;
GCHandle gch;
public IntPtr Closure {
get {
return closure;
}
set {
closure = value;
}
}
public uint HandlerId {
get {
return handlerId;
}
set {
handlerId = value;
}
}
public Delegate RegisteredHandler {
get {
return registeredHandler;
}
set {
registeredHandler = value;
}
}
public Type ArgsType {
get {
return argsType;
}
set {
argsType = value;
}
}
public SignalInfo (uint handlerId, IntPtr closure, Delegate registeredHandler, GCHandle gch)
{
this.handlerId = handlerId;
this.closure = closure;
this.registeredHandler = registeredHandler;
this.gch = gch;
if (!IsValidDelegate (registeredHandler))
throw new Exception ("Invalid delegate");
MethodInfo mi = registeredHandler.Method;
ParameterInfo[] parms = mi.GetParameters ();
this.argsType = parms [1].ParameterType;
}
public void UpdateArgsType (Delegate d)
{
if (!IsCompatibleDelegate (d))
throw new Exception ("Incompatible delegate");
MethodInfo mi = d.Method;
ParameterInfo[] parms = mi.GetParameters ();
Type t1 = parms [1].ParameterType;
Type t2 = argsType;
if (t1 == t2)
return;
if (t1.IsSubclassOf (t2))
argsType = t1;
else if (t2.IsSubclassOf (t1))
argsType = t2;
else
throw new Exception ("Incompatible delegate");
}
public bool IsCompatibleDelegate (Delegate d)
{
if (!IsValidDelegate (d))
return false;
MethodInfo mi = d.Method;
ParameterInfo[] parms = mi.GetParameters ();
if (parms [1].ParameterType != this.argsType &&
!parms [1].ParameterType.IsSubclassOf (this.argsType) &&
!this.argsType.IsSubclassOf (parms [1].ParameterType))
return false;
return true;
}
public void Dispose ()
{
registeredHandler = null;
gch.Free ();
GC.SuppressFinalize (this);
}
public static bool IsValidDelegate (Delegate d)
{
MethodInfo mi = d.Method;
if (mi.ReturnType != typeof(void))
return false;
ParameterInfo[] parms = mi.GetParameters ();
if (parms.Length != 2)
return false;
if (parms [1].ParameterType != typeof(GLib.SignalArgs) &&
!parms [1].ParameterType.IsSubclassOf (typeof(GLib.SignalArgs)))
return false;
return true;
}
}
static Hashtable SignalHandlers = new Hashtable ();
static GClosureMarshal marshalHandler = new GClosureMarshal (OnMarshal);
public static void Connect (GLib.Object o, string name, SignalHandler handler)
{
Connect (o, name, false, (Delegate)handler);
}
public static void Connect (GLib.Object o, string name,
bool after, SignalHandler handler)
{
Connect (o, name, after, (Delegate)handler);
}
public static void Connect (GLib.Object o, string name, Delegate handler)
{
Connect (o, name, false, handler);
}
public static void Connect (GLib.Object o, string name,
bool after, Delegate handler)
{
Delegate newHandler;
ObjectSignalKey k = new ObjectSignalKey (o, name);
if (!SignalInfo.IsValidDelegate (handler))
throw new Exception ("Invalid delegate");
if (SignalHandlers [k] != null) {
SignalInfo si = (SignalInfo)SignalHandlers [k];
if (!si.IsCompatibleDelegate (handler))
throw new Exception ("Incompatible delegate");
newHandler = Delegate.Combine (si.RegisteredHandler, handler);
si.UpdateArgsType (handler);
si.RegisteredHandler = newHandler;
} else {
if (!SignalInfo.IsValidDelegate (handler))
throw new Exception ("Invalid delegate");
// Let's allocate 64bytes for the GClosure, it should be more than necessary.
IntPtr closure = g_closure_new_simple (64, IntPtr.Zero);
GCHandle gch = GCHandle.Alloc (k);
g_closure_set_meta_marshal (closure, (IntPtr)gch, marshalHandler);
uint signalId = g_signal_connect_closure (o.Handle, name, closure, after);
SignalHandlers.Add (k, new SignalInfo (signalId, closure, handler, gch));
}
}
public static void Disconnect (GLib.Object o, string name, Delegate handler)
{
ObjectSignalKey k = new ObjectSignalKey (o, name);
if (SignalHandlers [k] != null) {
SignalInfo si = (SignalInfo)SignalHandlers [k];
Delegate newHandler = Delegate.Remove (si.RegisteredHandler, handler);
if (newHandler == null || handler == null) {
g_signal_handler_disconnect (o.Handle, si.HandlerId);
SignalHandlers.Remove (k);
si.Dispose ();
} else {
si.RegisteredHandler = newHandler;
}
}
}
static void OnMarshal (IntPtr closure, ref GLib.Value retval, uint argc, IntPtr argsPtr,
IntPtr ihint, IntPtr data)
{
object[] args = new object[argc - 1];
object o = ((GLib.Value)Marshal.PtrToStructure (argsPtr, typeof(GLib.Value))).Val;
for (int i = 1; i < argc; i++) {
IntPtr struct_ptr = (IntPtr)((long)argsPtr + (i * gvalue_struct_size));
GLib.Value argument = (GLib.Value)Marshal.PtrToStructure (struct_ptr, typeof(GLib.Value));
args [i - 1] = argument.Val;
}
if (data == IntPtr.Zero) {
Console.Error.WriteLine ("No available data");
return;
}
ObjectSignalKey k = (ObjectSignalKey)((GCHandle)data).Target;
if (k != null) {
SignalInfo si = (SignalInfo)SignalHandlers [k];
GLib.SignalArgs arg = (GLib.SignalArgs)Activator.CreateInstance (si.ArgsType);
arg.Args = args;
si.RegisteredHandler.DynamicInvoke (new object[] { o, arg });
if (arg.RetVal != null) {
retval.Val = arg.RetVal;
}
}
}
[DllImport ("libgobject-2.0-0.dll", CallingConvention = CallingConvention.Cdecl)]
static extern IntPtr g_closure_new_simple (int size, IntPtr data);
[DllImport ("libgobject-2.0-0.dll", CallingConvention = CallingConvention.Cdecl)]
static extern uint g_signal_connect_closure (IntPtr instance,
string name, IntPtr closure, bool after);
[DllImport ("libgobject-2.0-0.dll", CallingConvention = CallingConvention.Cdecl)]
static extern void g_closure_set_meta_marshal (IntPtr closure, IntPtr data, GClosureMarshal marshal);
class GTypeSignalKey
{
GType type;
string signal_name;
public GTypeSignalKey (GType type, string name)
{
this.type = type;
signal_name = name;
}
public override bool Equals (object o)
{
if (o is GTypeSignalKey) {
GTypeSignalKey k = (GTypeSignalKey)o;
return k.type.Equals (this.type) && signal_name.Equals (k.signal_name);
}
return base.Equals (o);
}
public override int GetHashCode ()
{
return type.GetHashCode () ^ signal_name.GetHashCode ();
}
}
struct SignalQuery
{
public uint signal_id;
public string signal_name;
public GType itype;
public uint signal_flags;
public GType return_type;
public uint n_params;
public Type[] param_types;
}
static Hashtable SignalEmitInfo = new Hashtable ();
public static object Emit (GLib.Object o, string name, params object[] parameters)
{
SignalQuery query;
GType gtype = o.NativeType;
IntPtr type = gtype.Val;
string signal_name, signal_detail;
uint signal_detail_quark = 0;
int colon;
colon = name.LastIndexOf ("::");
if (colon == -1) {
signal_name = name;
signal_detail = String.Empty;
} else {
signal_name = name.Substring (0, colon);
signal_detail = name.Substring (colon + 2);
}
GTypeSignalKey key = new GTypeSignalKey (gtype, signal_name);
if (SignalEmitInfo [key] == null) {
IntPtr native_string = GLib.Marshaller.StringToPtrGStrdup (signal_name);
uint signal_id = g_signal_lookup (native_string, type);
GLib.Marshaller.Free (native_string);
if (signal_id == 0)
throw new NotSupportedException (String.Format ("{0} has no signal of name {1}", o, name));
GSignalQuery q = new GSignalQuery ();
g_signal_query (signal_id, ref q);
if (q.signal_id == 0)
throw new NotSupportedException (String.Format ("{0} couldn't be queried for signal with name {1}", o, name));
query = new SignalQuery ();
query.signal_id = signal_id;
query.signal_name = GLib.Marshaller.Utf8PtrToString (q.signal_name);
query.itype = new GType (q.itype);
query.signal_flags = q.signal_flags;
query.return_type = new GType (q.return_type);
query.n_params = q.n_params;
query.param_types = new Type[q.n_params];
for (int i = 0; i < query.n_params; i++) {
IntPtr t = Marshal.ReadIntPtr (q.param_types, i * IntPtr.Size);
GType g = new GType (t);
query.param_types [i] = (Type)g;
}
SignalEmitInfo.Add (key, query);
}
query = (SignalQuery)SignalEmitInfo [key];
GLib.Value[] signal_parameters = new GLib.Value[query.n_params + 1];
signal_parameters [0] = new GLib.Value (o);
if (parameters.Length != query.n_params)
throw new ApplicationException (String.Format ("Invalid number of parameters: expected {0}, got {1}", query.n_params, parameters.Length));
for (int i = 0; i < query.n_params; i++) {
Type expected_type = (Type)query.param_types [i];
Type given_type = parameters [i].GetType ();
if (expected_type != given_type && !given_type.IsSubclassOf (given_type))
throw new ApplicationException (String.Format ("Invalid parameter type: expected {0}, got {1}", expected_type, given_type));
signal_parameters [i + 1] = new GLib.Value (parameters [i]);
}
GLib.Value return_value = new GLib.Value ();
if (query.return_type != GType.Invalid && query.return_type != GType.None)
return_value.Init (query.return_type);
if (signal_detail != String.Empty) {
IntPtr native_string = GLib.Marshaller.StringToPtrGStrdup (signal_detail);
signal_detail_quark = g_quark_from_string (native_string);
GLib.Marshaller.Free (native_string);
}
g_signal_emitv (signal_parameters, query.signal_id, signal_detail_quark, ref return_value);
foreach (GLib.Value v in signal_parameters)
v.Dispose ();
object ret = (query.return_type != GType.Invalid && query.return_type != GType.None) ? return_value.Val : null;
if (ret != null)
return_value.Dispose ();
return ret;
}
[DllImport ("libgobject-2.0-0.dll", CallingConvention = CallingConvention.Cdecl)]
static extern int g_signal_handler_disconnect (IntPtr o, uint handler_id);
[DllImport ("libgobject-2.0-0.dll", CallingConvention = CallingConvention.Cdecl)]
static extern uint g_signal_lookup (IntPtr name, IntPtr itype);
[DllImport ("libglib-2.0-0.dll", CallingConvention = CallingConvention.Cdecl)]
static extern uint g_quark_from_string (IntPtr str);
[DllImport ("libgobject-2.0-0.dll", CallingConvention = CallingConvention.Cdecl)]
static extern void g_signal_emitv (GLib.Value[] parameters, uint signal_id, uint detail, ref GLib.Value return_value);
[StructLayout (LayoutKind.Sequential)]
struct GSignalQuery
{
public uint signal_id;
public IntPtr signal_name;
public IntPtr itype;
public uint signal_flags;
public IntPtr return_type;
public uint n_params;
public IntPtr param_types;
}
[DllImport ("libgobject-2.0-0.dll", CallingConvention = CallingConvention.Cdecl)]
static extern void g_signal_query (uint signal_id, ref GSignalQuery query);
}
}