C#: Stub generator support for function pointer types.

michaelnebel · michaelnebel · commit 9ae17f93da68 · 2022-08-12T13:01:15.000+02:00
diff --git a/csharp/ql/lib/semmle/code/csharp/Type.qll b/csharp/ql/lib/semmle/code/csharp/Type.qll
@@ -935,6 +935,16 @@ class VarArgsCallingConvention extends CallingConvention {
   override string toString() { result = "VarArgsCallingConvention" }
 }
 
+/**
+ * Unmanaged calling convention that indicates that the specifics
+ * are encoded as modopts.
+ */
+class UnmanagedCallingConvention extends CallingConvention {
+  UnmanagedCallingConvention() { this = MkCallingConvention(9) }
+
+  override string toString() { result = "UnmanagedCallingConvention" }
+}
+
 /**
  * A function pointer type, for example
  *
diff --git a/csharp/ql/src/Stubs/Stubs.qll b/csharp/ql/src/Stubs/Stubs.qll
@@ -513,12 +513,30 @@ private string stubClassName(Type t) {
                                   stubClassName(element), "," order by i
                                 ) + ")"
                         else
-                          if t instanceof ValueOrRefType
+                          if t instanceof FunctionPointerType
                           then
-                            result =
-                              stubQualifiedNamePrefix(t) + t.getUndecoratedName() +
-                                stubGenericArguments(t)
-                          else result = "<error>"
+                            exists(CallingConvention callconvention, string calltext |
+                              callconvention = t.(FunctionPointerType).getCallingConvention() and
+                              (
+                                if callconvention instanceof UnmanagedCallingConvention
+                                then calltext = "unmanaged"
+                                else calltext = ""
+                              ) and
+                              result =
+                                "delegate* " + calltext + "<" +
+                                  concat(int i, Parameter p |
+                                    p = t.(FunctionPointerType).getParameter(i)
+                                  |
+                                    stubClassName(p.getType()) + "," order by i
+                                  ) + stubClassName(t.(FunctionPointerType).getReturnType()) + ">"
+                            )
+                          else
+                            if t instanceof ValueOrRefType
+                            then
+                              result =
+                                stubQualifiedNamePrefix(t) + t.getUndecoratedName() +
+                                  stubGenericArguments(t)
+                            else result = "<error>"
 }
 
 language[monotonicAggregates]
