Enable building and running on Mono/Mac

Author: mhutch

src/WebJobs.Script.WebHost/App_Start/WebHostResolver.cs

@@ -153,14 +153,10 @@ private static ScriptHostConfiguration CreateScriptHostConfiguration(WebHostSett
             // If running on Azure Web App, derive the host ID from the default subdomain
             // Otherwise, derive it from machine name and folder name
             string hostId = _settingsManager.AzureWebsiteDefaultSubdomain;
+
             if (string.IsNullOrEmpty(hostId))
             {
-                var sanitizedPath = Path.GetFileName(Environment.CurrentDirectory)
-                    .Where(char.IsLetterOrDigit)
-                    .Aggregate(new StringBuilder(), (b, c) => b.Append(c))
-                    .ToString();
-
-                hostId = $"{Environment.MachineName}-{sanitizedPath}";
+                hostId = MakeValidHostId($"{Environment.MachineName}-{Path.GetFileName(Environment.CurrentDirectory)}");
             }
 
             if (!String.IsNullOrEmpty(hostId))
@@ -181,6 +177,51 @@ private static ScriptHostConfiguration CreateScriptHostConfiguration(WebHostSett
             return scriptHostConfig;
         }
 
+        private static string MakeValidHostId(string id)
+        {
+            var sb = new StringBuilder();
+
+            //filter for valid characters
+            foreach (var c in id)
+            {
+                if (c == '-')
+                {
+                    //dashes are valid
+                    //but it cannot start with one
+                    //nor can it have consecutive dashes
+                    if (sb.Length != 0 && sb[sb.Length - 1] != '-')
+                    {
+                        sb.Append(c);
+                    }
+                }
+                else if (char.IsDigit(c))
+                {
+                    //digits are valid
+                    sb.Append(c);
+                }
+                else if (char.IsLetter(c))
+                {
+                    //letters are valid but must be lowercase
+                    sb.Append(char.ToLowerInvariant(c));
+                }
+            }
+
+            //it cannot end with a dash
+            if (sb.Length > 0 && sb[sb.Length - 1] == '-')
+            {
+                sb.Length -= 1;
+            }
+
+            //length cannot exceed 32
+            const int MaximumHostIdLength = 32;
+            if (sb.Length > MaximumHostIdLength)
+            {
+                sb.Length = MaximumHostIdLength;
+            }
+
+            return sb.ToString();
+        }
+
         private static void InitializeFileSystem(string scriptPath)
         {
             if (ScriptSettingsManager.Instance.IsAzureEnvironment)

src/WebJobs.Script.WebHost/Global.asax.cs

@@ -22,7 +22,6 @@ protected void Application_Start()
         protected void Application_Error(object sender, EventArgs e)
         {
             // TODO: Log any unhandled exceptions
-            Exception ex = Server.GetLastError();
         }
 
         protected void Application_End(object sender, EventArgs e)

src/WebJobs.Script.WebHost/Properties/Resources.resx

@@ -183,7 +183,7 @@
   </data>
   <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
   <data name="Homepage" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Home.html;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
+    <value>../Home.html;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
   </data>
   <data name="HostSecretsSchemaV0" xml:space="preserve">
     <value>{

src/WebJobs.Script.WebHost/WebJobs.Script.WebHost.csproj

@@ -46,6 +46,9 @@
     <ErrorReport>prompt</ErrorReport>
     <WarningLevel>4</WarningLevel>
   </PropertyGroup>
+  <PropertyGroup Condition="'$(OS)'=='Unix'">
+    <DefineConstants>$(DefineConstants);MONO</DefineConstants>
+  </PropertyGroup>
   <ItemGroup>
     <Reference Include="Autofac, Version=4.2.1.0, Culture=neutral, PublicKeyToken=17863af14b0044da, processorArchitecture=MSIL">
       <HintPath>..\..\packages\Autofac.4.2.1\lib\net45\Autofac.dll</HintPath>

src/WebJobs.Script.WebHost/WebScriptHostExceptionHandler.cs

@@ -48,7 +48,9 @@ public async Task OnTimeoutExceptionAsync(ExceptionDispatchInfo exceptionInfo, T
 
             // We can't wait on this as it may cause a deadlock if the timeout was fired
             // by a Listener that cannot stop until it has completed.
-            Task ignoreTask = _manager.StopAsync();
+#pragma warning disable 4014
+            _manager.StopAsync();
+#pragma warning restore 4014
 
             // Give the manager and all running tasks some time to shut down gracefully.
             await Task.Delay(timeoutGracePeriod);
@@ -69,4 +71,4 @@ private void LogErrorAndFlush(string message, Exception exception)
             _manager.Instance.TraceWriter.Flush();
         }
     }
-}
+}

src/WebJobs.Script.WebHost/WebScriptHostManager.cs

@@ -142,7 +142,12 @@ public void Initialize()
                     {
                         if (!_webHostSettings.IsSelfHost)
                         {
+                            // FIXME: Mono does not yet support HostingEnvironment.QueueBackgroundWorkItem
+#if MONO
+                            Task.Run(() => WarmUp(_webHostSettings));
+#else
                             HostingEnvironment.QueueBackgroundWorkItem((ct) => WarmUp(_webHostSettings));
+#endif
                         }
                         else
                         {
@@ -156,7 +161,12 @@ public void Initialize()
                 {
                     if (!_webHostSettings.IsSelfHost)
                     {
+                        // FIXME: This behaves a little differently on Mono as it does not handle cancellation
+#if MONO
+                        Task.Run(() => RunAndBlock());
+#else
                         HostingEnvironment.QueueBackgroundWorkItem((ct) => RunAndBlock(ct));
+#endif
                     }
                     else
                     {

src/WebJobs.Script/Description/DotNet/CSharp/CSharpCompilation.cs

@@ -96,7 +96,14 @@ public Assembly EmitAndLoad(CancellationToken cancellationToken)
                 {
                     var compilationWithAnalyzers = _compilation.WithAnalyzers(GetAnalyzers());
                     var diagnostics = compilationWithAnalyzers.GetAnalyzerDiagnosticsAsync().Result;
-                    var emitResult = compilationWithAnalyzers.Compilation.Emit(assemblyStream, pdbStream, cancellationToken: cancellationToken);
+                    var emitOptions = new EmitOptions().WithDebugInformationFormat(
+#if WINDOWS
+                        DebugInformationFormat.Pdb
+#else
+                        DebugInformationFormat.PortablePdb
+#endif
+                    );
+                    var emitResult = compilationWithAnalyzers.Compilation.Emit(assemblyStream, pdbStream, options: emitOptions, cancellationToken: cancellationToken);
 
                     diagnostics = diagnostics.AddRange(emitResult.Diagnostics);
 

src/WebJobs.Script/Description/DotNet/FSharp/FSharpCompilationService.cs

@@ -83,13 +83,13 @@ public ICompilation GetFunctionCompilation(FunctionMetadata functionMetadata)
 
             var assemblyName = FunctionAssemblyLoader.GetAssemblyNameFromMetadata(functionMetadata, Guid.NewGuid().ToString());
             var assemblyFileName = Path.Combine(scriptPath, assemblyName + ".dll");
-            var pdbName = Path.ChangeExtension(assemblyFileName, "pdb");
+            var pdbName = Path.ChangeExtension(assemblyFileName, PlatformHelper.IsMono ? "dll.mdb" : "pdb");
 
             try
             {
                 var scriptFileBuilder = new StringBuilder();
 
-                // Write an adjusted version of the script file, prefixing some 'open' decarations
+                // Write an adjusted version of the script file, prefixing some 'open' declarations
                 foreach (string import in script.Options.Imports)
                 {
                     scriptFileBuilder.AppendLine("open " + import);
@@ -129,6 +129,13 @@ public ICompilation GetFunctionCompilation(FunctionMetadata functionMetadata)
                     otherFlags.Add("--tailcalls-");
                 }
 
+                if (PlatformHelper.IsMono)
+                {
+                    var monoDir = Path.GetDirectoryName(typeof(string).Assembly.Location);
+                    var facadesDir = Path.Combine(monoDir, "Facades");
+                    otherFlags.Add("--lib:" + facadesDir);
+                }
+
                 // If we have a private assembly folder, make sure the compiler uses it to resolve dependencies
                 string privateAssembliesFolder = Path.Combine(Path.GetDirectoryName(functionMetadata.ScriptFile), DotNetConstants.PrivateAssembliesFolderName);
                 if (Directory.Exists(privateAssembliesFolder))

src/WebJobs.Script/Host/ScriptHost.cs

@@ -54,7 +54,9 @@ protected ScriptHost(ScriptHostConfiguration scriptConfig)
         {
             ScriptConfig = scriptConfig;
             FunctionErrors = new Dictionary<string, Collection<string>>(StringComparer.OrdinalIgnoreCase);
+#if FEATURE_NODE
             NodeFunctionInvoker.UnhandledException += OnUnhandledException;
+#endif
             TraceWriter = ScriptConfig.TraceWriter;
         }
 
@@ -397,14 +399,16 @@ private void RestartHost()
             // signal host restart
             _restartEvent.Set();
 
+#if FEATURE_NODE
             // whenever we're restarting the host, we want to let the Node
             // invoker know so it can clear the require cache, etc.
             NodeFunctionInvoker.OnHostRestart();
+#endif
         }
 
-        /// <summary>
-        /// Whenever the debug marker file changes we update our debug timeout
-        /// </summary>
+            /// <summary>
+            /// Whenever the debug marker file changes we update our debug timeout
+            /// </summary>
         private void OnDebugModeFileChanged(object sender, FileSystemEventArgs e)
         {
             LastDebugNotify = DateTime.UtcNow;
@@ -819,9 +823,13 @@ private Collection<FunctionDescriptor> GetFunctionDescriptors()
             var descriptorProviders = new List<FunctionDescriptorProvider>()
                 {
                     new ScriptFunctionDescriptorProvider(this, ScriptConfig),
+#if FEATURE_NODE
                     new NodeFunctionDescriptorProvider(this, ScriptConfig),
+#endif
                     new DotNetFunctionDescriptorProvider(this, ScriptConfig),
+#if FEATURE_POWERSHELL
                     new PowerShellFunctionDescriptorProvider(this, ScriptConfig)
+#endif
                 };
 
             return GetFunctionDescriptors(functions, descriptorProviders);
@@ -1174,7 +1182,9 @@ protected override void Dispose(bool disposing)
                 _restartEvent.Dispose();
                 (TraceWriter as IDisposable)?.Dispose();
 
+#if FEATURE_NODE
                 NodeFunctionInvoker.UnhandledException -= OnUnhandledException;
+#endif
             }
         }
     }

src/WebJobs.Script/Host/ScriptHostManager.cs

@@ -147,7 +147,9 @@ public bool CanInvoke()
                     // Orphan the current host instance. We're stopping it, so it won't listen for any new functions
                     // it will finish any currently executing functions and then clean itself up.
                     // Spin around and create a new host instance.
-                    Task taskIgnore = Orphan(newInstance);
+#pragma warning disable 4014
+                    Orphan(newInstance);
+#pragma warning restore 4014
                 }
                 catch (Exception ex)
                 {