975 lines
39 KiB
C#
975 lines
39 KiB
C#
using System;
|
|
using System.Collections.Generic;
|
|
using System.IO;
|
|
using System.Linq;
|
|
using System.Linq.Expressions;
|
|
using System.Reflection;
|
|
using System.Threading.Tasks;
|
|
using System.Xml.Linq;
|
|
|
|
namespace HomoIconize
|
|
{
|
|
static class Program
|
|
{
|
|
static void Main(string[] args)
|
|
{
|
|
Console.WriteLine("Auto-homoiconizer for Qbservable[Ex]");
|
|
Console.WriteLine("------------------------------------");
|
|
Console.WriteLine();
|
|
|
|
var uri = new Uri(Assembly.GetEntryAssembly().CodeBase);
|
|
|
|
var root = Path.Combine(Path.GetDirectoryName(uri.LocalPath), @"..\..\..\..\Source");
|
|
if (!Directory.Exists(root))
|
|
{
|
|
Console.WriteLine("Error: Could not find directory \"" + root + "\"");
|
|
return;
|
|
}
|
|
|
|
Process(root,
|
|
"System.Reactive.Linq",
|
|
"System.Reactive.Providers",
|
|
@"Reactive\Linq\Qbservable.Generated.cs",
|
|
"System.Reactive.Linq.Observable", "Qbservable", true);
|
|
Console.WriteLine();
|
|
|
|
Process(root,
|
|
"System.Reactive.Experimental",
|
|
"System.Reactive.Experimental",
|
|
@"Reactive\Linq\QbservableEx.Generated.cs",
|
|
"System.Reactive.Linq.ObservableEx", "QbservableEx");
|
|
Console.WriteLine();
|
|
|
|
Process(root,
|
|
"System.Reactive.Observable.Aliases",
|
|
"System.Reactive.Observable.Aliases",
|
|
"Qbservable.Aliases.Generated.cs",
|
|
"System.Reactive.Observable.Aliases.Observable", "QbservableAliases",
|
|
includeAsync: false, createAliases: true);
|
|
Console.WriteLine();
|
|
|
|
Console.WriteLine("Processing complete, press enter to continue.");
|
|
Console.ReadLine();
|
|
}
|
|
|
|
static void Process(string root, string sourceAssembly, string targetAssembly, string targetFile, string sourceTypeName, string targetTypeName, bool includeAsync = false, bool createAliases = false)
|
|
{
|
|
var rxRoot = Path.Combine(root, sourceAssembly);
|
|
if (!Directory.Exists(rxRoot))
|
|
{
|
|
Console.WriteLine("Error: Could not find directory \"" + rxRoot + "\"");
|
|
return;
|
|
}
|
|
|
|
var qbRoot = Path.Combine(root, targetAssembly);
|
|
if (!Directory.Exists(qbRoot))
|
|
{
|
|
Console.WriteLine("Error: Could not find directory \"" + qbRoot + "\"");
|
|
return;
|
|
}
|
|
|
|
var dll = Path.Combine(rxRoot, @"..\bin\debug40\" + sourceAssembly + ".dll");
|
|
if (!File.Exists(dll))
|
|
{
|
|
Console.WriteLine("Error: Could not find file \"" + dll + "\"");
|
|
return;
|
|
}
|
|
|
|
var xml = Path.Combine(rxRoot, @"..\bin\debug40\" + sourceAssembly + ".xml");
|
|
if (!File.Exists(xml))
|
|
{
|
|
Console.WriteLine("Error: Could not find file \"" + xml + "\"");
|
|
return;
|
|
}
|
|
|
|
var qbsgen = Path.Combine(qbRoot, targetFile);
|
|
if (!File.Exists(qbsgen))
|
|
{
|
|
Console.WriteLine("Error: Could not find file \"" + qbsgen + "\"");
|
|
return;
|
|
}
|
|
|
|
Generate(dll, xml, qbsgen, sourceTypeName, targetTypeName, includeAsync, createAliases);
|
|
}
|
|
|
|
// Prototype interface to break dependencies. Only used for ToString2 ultimately.
|
|
interface IQbservable<T>
|
|
{
|
|
}
|
|
|
|
static void Generate(string input, string xml, string output, string sourceTypeName, string targetTypeName, bool includeAsync, bool createAliases)
|
|
{
|
|
var docs = XDocument.Load(xml).Root.Element("members").Elements("member").ToDictionary(m => m.Attribute("name").Value, m => m);
|
|
|
|
Console.WriteLine("Loading {0}...", input);
|
|
|
|
var asm = Assembly.LoadFrom(input);
|
|
var t = asm.GetType(sourceTypeName);
|
|
_qbs = typeof(IQbservable<>); //asm.GetType("System.Reactive.Linq.IQbservable`1");
|
|
|
|
Console.WriteLine("Checking {0}...", output);
|
|
var attr = File.GetAttributes(output);
|
|
if ((attr & FileAttributes.ReadOnly) == FileAttributes.ReadOnly)
|
|
{
|
|
Console.Write("Attempting to check out generated files... ");
|
|
|
|
try
|
|
{
|
|
System.Diagnostics.Process.Start("tf.exe", "edit \"" + output + "\"").WaitForExit();
|
|
}
|
|
catch { /* no comment */ }
|
|
|
|
attr = File.GetAttributes(output);
|
|
|
|
if ((attr & FileAttributes.ReadOnly) == FileAttributes.ReadOnly)
|
|
{
|
|
Console.WriteLine("Failed.");
|
|
|
|
Console.ForegroundColor = ConsoleColor.Yellow;
|
|
Console.WriteLine("Making file writable. DON'T FORGET TO INCLUDE IN CHECK-IN!");
|
|
Console.ResetColor();
|
|
|
|
File.SetAttributes(output, attr & ~FileAttributes.ReadOnly);
|
|
}
|
|
else
|
|
{
|
|
Console.WriteLine("Succeeded.");
|
|
}
|
|
}
|
|
|
|
Console.WriteLine("Deleting {0}...", output);
|
|
File.Delete(output);
|
|
|
|
Console.WriteLine("Creating {0}...", output);
|
|
using (var fs = File.OpenWrite(output))
|
|
{
|
|
using (Out = new StreamWriter(fs))
|
|
{
|
|
Generate(t, docs, targetTypeName, includeAsync, createAliases);
|
|
}
|
|
}
|
|
}
|
|
|
|
static Type _qbs;
|
|
|
|
static void Generate(Type t, IDictionary<string, XElement> docs, string typeName, bool includeAsync, bool createAliases)
|
|
{
|
|
WriteLine(
|
|
@"/*
|
|
* WARNING: Auto-generated file (" + DateTime.Now + @")
|
|
* Run Rx's auto-homoiconizer tool to generate this file (in the HomoIcon directory).
|
|
*/
|
|
");
|
|
WriteLine(
|
|
@"#pragma warning disable 1591
|
|
");
|
|
WriteLine(
|
|
@"#if !NO_EXPRESSIONS
|
|
");
|
|
|
|
WriteLine(
|
|
@"using System;
|
|
using System.Reactive.Concurrency;
|
|
using System.Collections.Generic;
|
|
using System.Reactive.Joins;
|
|
using System.Linq;
|
|
using System.Linq.Expressions;
|
|
using System.Reflection;
|
|
using System.Threading;
|
|
using System.Reactive;
|
|
using System.Reactive.Subjects;
|
|
#if !NO_TPL
|
|
using System.Threading.Tasks;
|
|
#endif
|
|
#if !NO_REMOTING
|
|
using System.Runtime.Remoting.Lifetime;
|
|
#endif
|
|
");
|
|
WriteLine(
|
|
@"namespace System.Reactive.Linq
|
|
{");
|
|
|
|
Indent();
|
|
|
|
WriteLine(
|
|
@"public static partial class " + typeName + @"
|
|
{");
|
|
|
|
Indent();
|
|
|
|
var except = new[] { "ToAsync", "FromAsyncPattern", "And", "Then", "GetEnumerator", "get_Provider", "Wait", "ForEach", "ForEachAsync", "GetAwaiter", "First", "FirstOrDefault", "Last", "LastOrDefault", "Single", "SingleOrDefault", "Subscribe", "AsQbservable", "AsObservable", "ToEvent", "ToEventPattern" };
|
|
|
|
foreach (var m in t.GetMethods(BindingFlags.Public | BindingFlags.Static).OrderBy(m => m.Name).ThenBy(m => !m.IsGenericMethod ? "" : string.Join(",", m.GetGenericArguments().Select(p => p.Name))).ThenBy(m => string.Join(",", m.GetParameters().Select(p => p.Name + ":" + p.ParameterType.FullName))).Where(m => !except.Contains(m.Name)))
|
|
{
|
|
var docName = ToDocName(m);
|
|
var xmlDoc = default(XElement);
|
|
if (!docs.TryGetValue(docName, out xmlDoc))
|
|
{
|
|
Console.ForegroundColor = ConsoleColor.Yellow;
|
|
Console.WriteLine("Missing XML documentation for {0}", docName);
|
|
Console.ResetColor();
|
|
}
|
|
|
|
var p = m.GetParameters();
|
|
if (m.Name == "When" && p.Length == 1 && p.Single().ParameterType.ToString().Contains("Plan"))
|
|
continue;
|
|
|
|
var funky = from pi in p
|
|
let pt = pi.ParameterType
|
|
where pt.IsGenericType
|
|
let ptgtd = pt.GetGenericTypeDefinition()
|
|
where ptgtd.Name.StartsWith("Func")
|
|
where ptgtd.GetGenericArguments().Count() > 5
|
|
select pi;
|
|
|
|
var isLargeArity = funky.Any();
|
|
|
|
var hasTask = p.Any(pa => ContainsTask(pa.ParameterType));
|
|
|
|
var ret = m.ReturnType;
|
|
if (ret.IsGenericType)
|
|
{
|
|
var d = ret.GetGenericTypeDefinition();
|
|
if (d.Name.StartsWith("IConnectableObservable") || d.Name.StartsWith("ListObservable"))
|
|
continue;
|
|
if (d != typeof(IObservable<>) && d != typeof(IEnumerable<>))
|
|
throw new InvalidOperationException("Invalid return type for " + m.Name);
|
|
}
|
|
else
|
|
throw new InvalidOperationException("Invalid return type for " + m.Name);
|
|
|
|
ret = ret.Iconize();
|
|
|
|
var hasProvider = true;
|
|
if (p.Length > 0)
|
|
{
|
|
var f = p.First();
|
|
if (f.ParameterType.IsGenericType)
|
|
{
|
|
var d = f.ParameterType.GetGenericTypeDefinition();
|
|
if (d == typeof(IObservable<>)) // Check - e.g. Amb || d == typeof(IEnumerable<>))
|
|
hasProvider = false;
|
|
}
|
|
}
|
|
|
|
var nulls = new List<string>();
|
|
var pars = new List<string>();
|
|
var parNames = new List<string>();
|
|
var ptps = new List<string>();
|
|
var args = new List<string>();
|
|
|
|
var firstArg = hasProvider ? "IQbservableProvider" : p.First().ParameterType.Iconize().ToString2();
|
|
var firstName = hasProvider ? "provider" : p.First().Name;
|
|
pars.Add("this " + firstArg + " " + firstName);
|
|
ptps.Add(firstArg);
|
|
if (!hasProvider)
|
|
args.Add(firstName + ".Expression");
|
|
else
|
|
args.Add("Expression.Constant(provider, typeof(IQbservableProvider))");
|
|
nulls.Add(firstName);
|
|
parNames.Add(firstName);
|
|
|
|
var rem = hasProvider ? p : p.Skip(1);
|
|
var isCreateAsync = false;
|
|
foreach (var q in rem)
|
|
{
|
|
var pt = q.ParameterType;
|
|
if (pt.Name.StartsWith("Func") || pt.Name.StartsWith("Action"))
|
|
{
|
|
if (pt.Name.StartsWith("Func") && pt.GetGenericArguments().Last().Name.StartsWith("Task"))
|
|
{
|
|
isCreateAsync = true;
|
|
}
|
|
pt = typeof(Expression<>).MakeGenericType(pt);
|
|
args.Add(q.Name);
|
|
}
|
|
else
|
|
{
|
|
var isObs = new Func<Type, bool>(tt => tt.IsGenericType && tt.GetGenericTypeDefinition() == typeof(IObservable<>));
|
|
var isEnm = new Func<Type, bool>(tt => tt.IsGenericType && tt.GetGenericTypeDefinition() == typeof(IEnumerable<>));
|
|
if (isObs(pt) || pt.IsArray && isObs(pt.GetElementType()) || isEnm(pt) || pt.IsArray && isEnm(pt.GetElementType()))
|
|
args.Add("GetSourceExpression(" + q.Name + ")");
|
|
else
|
|
args.Add("Expression.Constant(" + q.Name + ", typeof(" + pt.ToString2() + "))");
|
|
}
|
|
|
|
var pts = pt.ToString2();
|
|
var par = pts + " " + q.Name;
|
|
if (q.IsDefined(typeof(ParamArrayAttribute), false))
|
|
par = "params " + par;
|
|
pars.Add(par);
|
|
ptps.Add(pts);
|
|
parNames.Add(q.Name);
|
|
|
|
if (!q.ParameterType.IsValueType && !q.ParameterType.IsGenericParameter)
|
|
nulls.Add(q.Name);
|
|
}
|
|
|
|
var factory = hasProvider ? "provider" : p.First().Name + ".Provider";
|
|
var requiresQueryProvider = ret.GetGenericTypeDefinition() == typeof(IQueryable<>);
|
|
if (requiresQueryProvider)
|
|
factory = "((IQueryProvider)" + factory + ")";
|
|
|
|
var genArgs = m.GetGenericArguments().Select(a => a.ToString2()).ToList();
|
|
var g = genArgs.Count > 0 ? "<" + string.Join(", ", genArgs) + ">" : "";
|
|
var name = m.Name;
|
|
if (name == "ToEnumerable")
|
|
name = "ToQueryable";
|
|
|
|
var isExp = m.GetCustomAttributes(true).Where(a => a.GetType().Name.Equals("ExperimentalAttribute")).Any();
|
|
if (isExp)
|
|
WriteLine("#if !STABLE", true);
|
|
|
|
var obsolete = m.GetCustomAttributes(typeof(ObsoleteAttribute), false).Cast<ObsoleteAttribute>().SingleOrDefault();
|
|
|
|
var poundIf = false;
|
|
if (name == "ObserveOn" || name == "SubscribeOn")
|
|
{
|
|
if (p.Last().ParameterType.Name == "DispatcherScheduler")
|
|
{
|
|
WriteLine("#if !MONO", true);
|
|
poundIf = true;
|
|
}
|
|
if (p.Last().ParameterType.Name == "ControlScheduler")
|
|
{
|
|
WriteLine("#if DESKTOPCLR", true);
|
|
poundIf = true;
|
|
}
|
|
}
|
|
if (name == "ObserveOnDispatcher" || name == "SubscribeOnDispatcher")
|
|
{
|
|
WriteLine("#if !MONO", true);
|
|
poundIf = true;
|
|
}
|
|
if (isCreateAsync || hasTask)
|
|
{
|
|
WriteLine("#if !NO_TPL", true);
|
|
poundIf = true;
|
|
}
|
|
//if (name == "Remotable")
|
|
//{
|
|
// WriteLine("#if DESKTOPCLR", true);
|
|
// poundIf = true;
|
|
// if (nulls.Contains("lease"))
|
|
// nulls.Remove("lease");
|
|
//}
|
|
if (isLargeArity)
|
|
{
|
|
WriteLine("#if !NO_LARGEARITY", true);
|
|
}
|
|
|
|
var isFep = m.Name == "FromEventPattern";
|
|
var isGenFep = isFep && m.GetGenericArguments().Any(a => a.Name == "TEventArgs");
|
|
var isNonGenFep = isFep && !isGenFep;
|
|
|
|
for (var r = 0; r < (isNonGenFep ? 2 : 1); r++)
|
|
{
|
|
var retStr = ret.ToString2();
|
|
|
|
if (isNonGenFep)
|
|
{
|
|
if (r == 0)
|
|
{
|
|
WriteLine("#if !NO_EVENTARGS_CONSTRAINT", true);
|
|
}
|
|
else if (r == 1)
|
|
{
|
|
WriteLine("#else", true);
|
|
retStr = retStr.Replace("EventPattern<EventArgs>", "EventPattern<object>");
|
|
}
|
|
}
|
|
|
|
if (xmlDoc != null)
|
|
{
|
|
foreach (var docLine in xmlDoc.Element("summary").ToString().Split('\n'))
|
|
WriteLine("/// " + docLine.TrimStart().TrimEnd('\r'));
|
|
|
|
if (hasProvider)
|
|
WriteLine("/// <param name=\"provider\">Query provider used to construct the IQbservable<T> data source.</param>");
|
|
|
|
foreach (var docLine in xmlDoc.Elements().Where(e => e.Name != "summary").SelectMany(e => e.ToString().Split('\n')))
|
|
WriteLine("/// " + docLine.TrimStart().TrimEnd('\r'));
|
|
|
|
if (requiresQueryProvider)
|
|
WriteLine("/// <remarks>This operator requires the source's <see cref=\"IQbservableProvider\"/> object (see <see cref=\"IQbservable.Provider\"/>) to implement <see cref=\"IQueryProvider\"/>.</remarks>");
|
|
}
|
|
|
|
if (isExp)
|
|
WriteLine("[Experimental]");
|
|
|
|
if (obsolete != null)
|
|
WriteLine("[Obsolete(\"" + obsolete.Message + "\")]");
|
|
|
|
WriteLine("public static " + retStr + " " + name + g + "(" + string.Join(", ", pars) + ")");
|
|
if (isGenFep)
|
|
{
|
|
WriteLine("#if !NO_EVENTARGS_CONSTRAINT", true);
|
|
Indent();
|
|
WriteLine("where TEventArgs : EventArgs");
|
|
Outdent();
|
|
WriteLine("#endif", true);
|
|
}
|
|
else
|
|
{
|
|
var genCons = (from a in m.GetGenericArguments()
|
|
from c in a.GetGenericParameterConstraints()
|
|
select new { a, c })
|
|
.ToList();
|
|
|
|
if (genCons.Count > 0)
|
|
{
|
|
Indent();
|
|
foreach (var gc in genCons)
|
|
WriteLine("where " + gc.a.Name + " : " + gc.c.Name);
|
|
Outdent();
|
|
}
|
|
}
|
|
|
|
if (createAliases)
|
|
{
|
|
string underlying = "";
|
|
|
|
switch (name)
|
|
{
|
|
case "Map":
|
|
underlying = "Select";
|
|
break;
|
|
case "FlatMap":
|
|
underlying = "SelectMany";
|
|
break;
|
|
case "Filter":
|
|
underlying = "Where";
|
|
break;
|
|
}
|
|
|
|
WriteLine("{");
|
|
Indent();
|
|
WriteLine("return Qbservable." + underlying + g + "(" + string.Join(", ", parNames) + ");");
|
|
Outdent();
|
|
WriteLine("}");
|
|
continue;
|
|
}
|
|
|
|
WriteLine("{");
|
|
Indent();
|
|
foreach (var n in nulls)
|
|
{
|
|
WriteLine("if (" + n + " == null)");
|
|
Indent();
|
|
WriteLine("throw new ArgumentNullException(\"" + n + "\");");
|
|
Outdent();
|
|
}
|
|
WriteLine("");
|
|
|
|
var gArg = ret.GetGenericArguments().Single().ToString2();
|
|
if (isNonGenFep && r == 1)
|
|
{
|
|
gArg = gArg.Replace("EventPattern<EventArgs>", "EventPattern<object>");
|
|
}
|
|
|
|
WriteLine("return " + factory + ".CreateQuery<" + gArg + ">(");
|
|
Indent();
|
|
WriteLine("Expression.Call(");
|
|
Indent();
|
|
WriteLine("null,");
|
|
var cma = args.Count > 0 ? "," : "";
|
|
WriteLine("#if CRIPPLED_REFLECTION", true);
|
|
WriteLine("InfoOf(() => " + typeName + "." + name + g + "(" + string.Join(", ", ptps.Select(pt => "default(" + pt + ")")) + "))" + cma);
|
|
WriteLine("#else", true);
|
|
if (!m.IsGenericMethod)
|
|
WriteLine("(MethodInfo)MethodInfo.GetCurrentMethod()" + cma);
|
|
else
|
|
WriteLine("((MethodInfo)MethodInfo.GetCurrentMethod()).MakeGenericMethod(" + string.Join(", ", m.GetGenericArguments().Select(ga => "typeof(" + ga.Name + ")").ToArray()) + ")" + cma);
|
|
WriteLine("#endif", true);
|
|
for (int j = 0; j < args.Count; j++)
|
|
WriteLine(args[j] + (j < args.Count - 1 ? "," : ""));
|
|
Outdent();
|
|
WriteLine(")");
|
|
Outdent();
|
|
WriteLine(");");
|
|
Outdent();
|
|
WriteLine("}");
|
|
|
|
if (isNonGenFep && r == 1)
|
|
WriteLine("#endif", true);
|
|
}
|
|
|
|
if (poundIf)
|
|
WriteLine("#endif", true);
|
|
if (isExp)
|
|
WriteLine("#endif", true);
|
|
if (isLargeArity)
|
|
WriteLine("#endif", true);
|
|
WriteLine("");
|
|
}
|
|
|
|
if (includeAsync)
|
|
{
|
|
GenerateAsync(docs, typeName);
|
|
}
|
|
|
|
Outdent();
|
|
|
|
WriteLine(
|
|
@"}");
|
|
|
|
Outdent();
|
|
|
|
WriteLine(
|
|
@"}
|
|
");
|
|
WriteLine(
|
|
@"#endif
|
|
");
|
|
WriteLine(
|
|
@"#pragma warning restore 1591
|
|
");
|
|
|
|
}
|
|
|
|
static bool ContainsTask(Type t)
|
|
{
|
|
if (t == typeof(Task))
|
|
return true;
|
|
|
|
if (t.IsGenericType)
|
|
{
|
|
if (t.GetGenericTypeDefinition() == typeof(Task<>))
|
|
return true;
|
|
|
|
return t.GetGenericArguments().Any(ContainsTask);
|
|
}
|
|
|
|
if (t.IsArray)
|
|
return ContainsTask(t.GetElementType());
|
|
|
|
return false;
|
|
}
|
|
|
|
static void GenerateAsync(IDictionary<string, XElement> docs, string typeName)
|
|
{
|
|
foreach (var ret in new[] { "Unit", "TResult" })
|
|
{
|
|
for (int i = 0; i <= 16; i++)
|
|
{
|
|
if (i == 5)
|
|
WriteLine("#if !NO_LARGEARITY", true);
|
|
|
|
foreach (var withScheduler in new[] { false, true })
|
|
{
|
|
var genArgs = default(string[]);
|
|
var lamPars = default(string[]);
|
|
if (i == 0)
|
|
{
|
|
genArgs = new string[0];
|
|
lamPars = new string[0];
|
|
}
|
|
//else if (i == 1)
|
|
//{
|
|
// genArgs = new[] { "TSource" };
|
|
// lamPars = new[] { "t" };
|
|
//}
|
|
else
|
|
{
|
|
genArgs = Enumerable.Range(1, i).Select(j => "TArg" + j).ToArray();
|
|
lamPars = Enumerable.Range(1, i).Select(j => "t" + j).ToArray();
|
|
}
|
|
|
|
var fParam = ret == "Unit" ? "action" : "function";
|
|
var gConst = ret == "Unit" ? "Action" : "Func";
|
|
|
|
var retType = "Func<" + string.Join(", ", genArgs.Concat(new[] { "IQbservable<" + ret + ">" }).ToArray()) + ">";
|
|
|
|
if (ret != "Unit")
|
|
genArgs = genArgs.Concat(new[] { "TResult" }).ToArray();
|
|
|
|
var docName = "M:System.Reactive.Linq.Observable.ToAsync";
|
|
if (genArgs.Length > 0)
|
|
docName += "``" + genArgs.Length;
|
|
|
|
var docArg = ret == "Unit" ? "System.Action" : "System.Func";
|
|
if (genArgs.Length > 0)
|
|
docArg += "{" + string.Join(",", Enumerable.Range(0, genArgs.Length).Select(j => "``" + j)) + "}";
|
|
|
|
docName += "(" + docArg + (withScheduler ? ",System.Reactive.Concurrency.IScheduler" : "") + ")";
|
|
|
|
var xmlDoc = default(XElement);
|
|
if (!docs.TryGetValue(docName, out xmlDoc))
|
|
{
|
|
Console.ForegroundColor = ConsoleColor.Yellow;
|
|
Console.WriteLine("Missing XML documentation for {0}", docName);
|
|
Console.ResetColor();
|
|
}
|
|
|
|
var actType = "Expression<" + gConst + (genArgs.Length > 0 ? "<" + string.Join(", ", genArgs) + ">" : "") + ">";
|
|
|
|
var genArgss = genArgs.Length > 0 ? "<" + string.Join(", ", genArgs) + ">" : "";
|
|
|
|
if (xmlDoc != null)
|
|
{
|
|
foreach (var docLine in xmlDoc.Element("summary").ToString().Split('\n'))
|
|
WriteLine("/// " + docLine.TrimStart().TrimEnd('\r'));
|
|
|
|
WriteLine("/// <param name=\"provider\">Query provider used to construct the IQbservable<T> data source.</param>");
|
|
|
|
foreach (var docLine in xmlDoc.Elements().Where(e => e.Name != "summary").SelectMany(e => e.ToString().Split('\n')))
|
|
WriteLine("/// " + docLine.TrimStart().TrimEnd('\r'));
|
|
}
|
|
|
|
WriteLine("public static " + retType + " ToAsync" + genArgss + "(this IQbservableProvider provider, " + actType + " " + fParam + (withScheduler ? ", IScheduler scheduler" : "") + ")");
|
|
WriteLine("{");
|
|
|
|
Indent();
|
|
|
|
WriteLine("if (provider == null)");
|
|
Indent();
|
|
WriteLine("throw new ArgumentNullException(\"provider\");");
|
|
Outdent();
|
|
|
|
WriteLine("if (" + fParam + " == null)");
|
|
Indent();
|
|
WriteLine("throw new ArgumentNullException(\"" + fParam + "\");");
|
|
Outdent();
|
|
|
|
if (withScheduler)
|
|
{
|
|
WriteLine("if (scheduler == null)");
|
|
Indent();
|
|
WriteLine("throw new ArgumentNullException(\"scheduler\");");
|
|
Outdent();
|
|
}
|
|
|
|
WriteLine("");
|
|
WriteLine("#if CRIPPLED_REFLECTION", true);
|
|
var aprs = new List<string> { "IQbservableProvider", actType };
|
|
if (withScheduler)
|
|
aprs.Add("IScheduler");
|
|
WriteLine("var m = InfoOf(() => " + typeName + ".ToAsync" + genArgss + "(" + string.Join(", ", aprs.Select(pt => "default(" + pt + ")")) + "));");
|
|
WriteLine("#else", true);
|
|
if (genArgs.Length == 0)
|
|
WriteLine("var m = (MethodInfo)MethodInfo.GetCurrentMethod();");
|
|
else
|
|
WriteLine("var m = ((MethodInfo)MethodInfo.GetCurrentMethod()).MakeGenericMethod(" + string.Join(", ", genArgs.Select(a => "typeof(" + a + ")").ToArray()) + ");");
|
|
WriteLine("#endif", true);
|
|
|
|
WriteLine("return (" + string.Join(", ", lamPars) + ") => provider.CreateQuery<" + ret + ">(");
|
|
Indent();
|
|
WriteLine("Expression.Invoke(");
|
|
Indent();
|
|
WriteLine("Expression.Call(");
|
|
Indent();
|
|
WriteLine("null,");
|
|
WriteLine("m,");
|
|
WriteLine("Expression.Constant(provider, typeof(IQbservableProvider)),");
|
|
WriteLine(fParam + (withScheduler ? "," : ""));
|
|
if (withScheduler)
|
|
WriteLine("Expression.Constant(scheduler, typeof(IScheduler))");
|
|
Outdent();
|
|
WriteLine(")" + (lamPars.Length > 0 ? "," : ""));
|
|
var k = 0;
|
|
foreach (var e in genArgs.Zip(lamPars, (g, l) => new { g, l }))
|
|
{
|
|
WriteLine("Expression.Constant(" + e.l + ", typeof(" + e.g + "))" + (k < i - 1 ? "," : ""));
|
|
k++;
|
|
}
|
|
Outdent();
|
|
WriteLine(")");
|
|
Outdent();
|
|
WriteLine(");");
|
|
|
|
Outdent();
|
|
|
|
WriteLine("}");
|
|
WriteLine("");
|
|
}
|
|
|
|
if (i == 16)
|
|
WriteLine("#endif", true);
|
|
}
|
|
}
|
|
|
|
WriteLine("");
|
|
|
|
foreach (var ret in new[] { "Unit", "TResult" })
|
|
{
|
|
for (int i = 0; i < 15; i++)
|
|
{
|
|
if (i == 3)
|
|
WriteLine("#if !NO_LARGEARITY", true);
|
|
|
|
var genArgs = default(string[]);
|
|
var lamPars = default(string[]);
|
|
if (i == 0)
|
|
{
|
|
genArgs = new string[0];
|
|
lamPars = new string[0];
|
|
}
|
|
else
|
|
{
|
|
genArgs = Enumerable.Range(1, i).Select(j => "TArg" + j).ToArray();
|
|
lamPars = Enumerable.Range(1, i).Select(j => "t" + j).ToArray();
|
|
}
|
|
|
|
var fParam = ret == "Unit" ? "action" : "function";
|
|
|
|
var retType = "Func<" + string.Join(", ", genArgs.Concat(new[] { "IQbservable<" + ret + ">" }).ToArray()) + ">";
|
|
|
|
var begType = "Expression<Func<" + string.Join(", ", genArgs.Concat(new[] { "AsyncCallback", "object", "IAsyncResult" }).ToArray()) + ">>";
|
|
var endType = ret == "Unit" ? "Expression<Action<IAsyncResult>>" : "Expression<Func<IAsyncResult, TResult>>";
|
|
|
|
if (ret != "Unit")
|
|
genArgs = genArgs.Concat(new[] { "TResult" }).ToArray();
|
|
|
|
var docName = "M:System.Reactive.Linq.Observable.FromAsyncPattern";
|
|
if (genArgs.Length > 0)
|
|
docName += "``" + genArgs.Length;
|
|
|
|
if (ret == "Unit")
|
|
{
|
|
var docArgB = "System.Func{" + string.Join(",", Enumerable.Range(0, genArgs.Length).Select(j => "``" + j)) + (genArgs.Length > 0 ? "," : "") + "System.AsyncCallback,System.Object,System.IAsyncResult}";
|
|
var docArgE = "System.Action{System.IAsyncResult}";
|
|
docName += "(" + docArgB + "," + docArgE + ")";
|
|
}
|
|
else
|
|
{
|
|
var docArgB = "System.Func{" + string.Join(",", Enumerable.Range(0, genArgs.Length - 1).Select(j => "``" + j)) + (genArgs.Length > 1 ? "," : "") + "System.AsyncCallback,System.Object,System.IAsyncResult}";
|
|
var docArgE = "System.Func{System.IAsyncResult,``" + (genArgs.Length - 1) + "}";
|
|
docName += "(" + docArgB + "," + docArgE + ")";
|
|
}
|
|
|
|
var xmlDoc = default(XElement);
|
|
if (!docs.TryGetValue(docName, out xmlDoc))
|
|
{
|
|
Console.ForegroundColor = ConsoleColor.Yellow;
|
|
Console.WriteLine("Missing XML documentation for {0}", docName);
|
|
Console.ResetColor();
|
|
}
|
|
|
|
var genArgss = genArgs.Length > 0 ? "<" + string.Join(", ", genArgs) + ">" : "";
|
|
|
|
if (xmlDoc != null)
|
|
{
|
|
foreach (var docLine in xmlDoc.Element("summary").ToString().Split('\n'))
|
|
WriteLine("/// " + docLine.TrimStart().TrimEnd('\r'));
|
|
|
|
WriteLine("/// <param name=\"provider\">Query provider used to construct the IQbservable<T> data source.</param>");
|
|
|
|
foreach (var docLine in xmlDoc.Elements().Where(e => e.Name != "summary").SelectMany(e => e.ToString().Split('\n')))
|
|
WriteLine("/// " + docLine.TrimStart().TrimEnd('\r'));
|
|
}
|
|
|
|
WriteLine("#if PREFERASYNC", true);
|
|
WriteLine("[Obsolete(Constants_Linq.USE_TASK_FROMASYNCPATTERN)]");
|
|
WriteLine("#endif", true);
|
|
|
|
WriteLine("public static " + retType + " FromAsyncPattern" + genArgss + "(this IQbservableProvider provider, " + begType + " begin, " + endType + "end)");
|
|
WriteLine("{");
|
|
|
|
Indent();
|
|
|
|
WriteLine("if (provider == null)");
|
|
Indent();
|
|
WriteLine("throw new ArgumentNullException(\"provider\");");
|
|
Outdent();
|
|
|
|
WriteLine("if (begin == null)");
|
|
Indent();
|
|
WriteLine("throw new ArgumentNullException(\"begin\");");
|
|
Outdent();
|
|
|
|
WriteLine("if (end == null)");
|
|
Indent();
|
|
WriteLine("throw new ArgumentNullException(\"end\");");
|
|
Outdent();
|
|
|
|
WriteLine("");
|
|
|
|
WriteLine("#if CRIPPLED_REFLECTION", true);
|
|
var aprs = new List<string> { "IQbservableProvider", begType, endType };
|
|
WriteLine("var m = InfoOf(() => " + typeName + ".FromAsyncPattern" + genArgss + "(" + string.Join(", ", aprs.Select(pt => "default(" + pt + ")")) + "));");
|
|
WriteLine("#else", true);
|
|
if (genArgs.Length == 0)
|
|
WriteLine("var m = (MethodInfo)MethodInfo.GetCurrentMethod();");
|
|
else
|
|
WriteLine("var m = ((MethodInfo)MethodInfo.GetCurrentMethod()).MakeGenericMethod(" + string.Join(", ", genArgs.Select(a => "typeof(" + a + ")").ToArray()) + ");");
|
|
WriteLine("#endif", true);
|
|
|
|
WriteLine("return (" + string.Join(", ", lamPars) + ") => provider.CreateQuery<" + ret + ">(");
|
|
Indent();
|
|
WriteLine("Expression.Invoke(");
|
|
Indent();
|
|
WriteLine("Expression.Call(");
|
|
Indent();
|
|
WriteLine("null,");
|
|
WriteLine("m,");
|
|
WriteLine("Expression.Constant(provider, typeof(IQbservableProvider)),");
|
|
WriteLine("begin,");
|
|
WriteLine("end");
|
|
Outdent();
|
|
WriteLine(")" + (lamPars.Length > 0 ? "," : ""));
|
|
var k = 0;
|
|
foreach (var e in genArgs.Zip(lamPars, (g, l) => new { g, l }))
|
|
{
|
|
WriteLine("Expression.Constant(" + e.l + ", typeof(" + e.g + "))" + (k < i - 1 ? "," : ""));
|
|
k++;
|
|
}
|
|
Outdent();
|
|
WriteLine(")");
|
|
Outdent();
|
|
WriteLine(");");
|
|
|
|
Outdent();
|
|
|
|
WriteLine("}");
|
|
WriteLine("");
|
|
|
|
if (i == 14)
|
|
WriteLine("#endif", true);
|
|
}
|
|
}
|
|
}
|
|
|
|
static TextWriter Out { get; set; }
|
|
static int _indent;
|
|
|
|
static void WriteLine(string s, bool noIndent = false)
|
|
{
|
|
foreach (var t in s.Split('\n'))
|
|
Out.WriteLine((noIndent ? "" : new string(' ', _indent * 4)) + t.TrimEnd('\r'));
|
|
}
|
|
|
|
static void Indent()
|
|
{
|
|
_indent++;
|
|
}
|
|
|
|
static void Outdent()
|
|
{
|
|
_indent--;
|
|
}
|
|
|
|
static Type Iconize(this Type type)
|
|
{
|
|
if (type.IsGenericType && !type.IsGenericTypeDefinition)
|
|
{
|
|
var g = type.GetGenericTypeDefinition();
|
|
if (g == typeof(IObservable<>))
|
|
{
|
|
return _qbs.MakeGenericType(type.GetGenericArguments());
|
|
}
|
|
else if (g == typeof(IEnumerable<>))
|
|
{
|
|
return typeof(IQueryable<>).MakeGenericType(type.GetGenericArguments());
|
|
}
|
|
}
|
|
|
|
return type;
|
|
}
|
|
|
|
static string ToString2(this Type type)
|
|
{
|
|
if (type == typeof(int))
|
|
return "int";
|
|
else if (type == typeof(uint))
|
|
return "uint";
|
|
else if (type == typeof(long))
|
|
return "long";
|
|
else if (type == typeof(ulong))
|
|
return "ulong";
|
|
else if (type == typeof(float))
|
|
return "float";
|
|
else if (type == typeof(double))
|
|
return "double";
|
|
else if (type == typeof(byte))
|
|
return "byte";
|
|
else if (type == typeof(sbyte))
|
|
return "sbyte";
|
|
else if (type == typeof(bool))
|
|
return "bool";
|
|
else if (type == typeof(short))
|
|
return "short";
|
|
else if (type == typeof(ushort))
|
|
return "ushort";
|
|
else if (type == typeof(string))
|
|
return "string";
|
|
else if (type == typeof(object))
|
|
return "object";
|
|
else if (type == typeof(void))
|
|
return "void";
|
|
else if (type == typeof(decimal))
|
|
return "decimal";
|
|
|
|
if (type.IsArray)
|
|
return type.GetElementType().ToString2() + "[" + new string(',', type.GetArrayRank() - 1) + "]";
|
|
|
|
if (type.IsGenericType)
|
|
{
|
|
if (!type.IsGenericTypeDefinition)
|
|
{
|
|
var g = type.GetGenericTypeDefinition();
|
|
if (g == typeof(Nullable<>))
|
|
return type.GetGenericArguments()[0].ToString2() + "?";
|
|
else
|
|
return g.ToString2() + "<" + string.Join(", ", type.GetGenericArguments().Select(t => t.ToString2()).ToArray()) + ">";
|
|
}
|
|
else
|
|
{
|
|
var s = type.Name;
|
|
return s.Substring(0, s.LastIndexOf('`'));
|
|
}
|
|
}
|
|
|
|
return type.Name;
|
|
}
|
|
|
|
static string ToDocName(MethodInfo method)
|
|
{
|
|
var name = "M:" + ToDocName(method.DeclaringType) + "." + method.Name;
|
|
|
|
var genArgs = new Type[0];
|
|
|
|
if (method.IsGenericMethod)
|
|
{
|
|
genArgs = method.GetGenericArguments();
|
|
name += "``" + genArgs.Length;
|
|
}
|
|
|
|
var pars = method.GetParameters();
|
|
if (pars.Length > 0)
|
|
{
|
|
name += "(" + string.Join(",", method.GetParameters().Select(p => ToDocName(p.ParameterType, genArgs))) + ")";
|
|
}
|
|
|
|
return name;
|
|
}
|
|
|
|
static string ToDocName(Type t, params Type[] genArgs)
|
|
{
|
|
var i = Array.IndexOf(genArgs, t);
|
|
if (i >= 0)
|
|
return "``" + i;
|
|
|
|
if (t.IsArray)
|
|
{
|
|
return ToDocName(t.GetElementType(), genArgs) + "[]";
|
|
}
|
|
|
|
if (t.IsGenericType)
|
|
{
|
|
var def = t.GetGenericTypeDefinition();
|
|
var name = def.FullName.Substring(0, def.FullName.LastIndexOf("`"));
|
|
|
|
var args = t.GetGenericArguments();
|
|
|
|
name += "{" + string.Join(",", args.Select(a => ToDocName(a, genArgs))) + "}";
|
|
|
|
return name;
|
|
}
|
|
else
|
|
{
|
|
return t.FullName;
|
|
}
|
|
}
|
|
}
|
|
}
|