Move SQLFiddle to a SQLite backend since we are going to host on Linux.

Author: rspeele

.gitignore

@@ -1,3 +1,6 @@
+## SQLFiddle output
+/demos/SQLFiddle/SQLFiddle.Website/sqlfiddle.db
+
 ## Ignore Visual Studio temporary files, build results, and
 ## files generated by popular Visual Studio add-ons.
 
@@ -254,3 +257,4 @@ paket-files/
 # Compiled python bytecode
 *.pyc
 /src/Rezoom.SQL.Provider/Properties/launchSettings.json
+

demos/SQLFiddle/SQLFiddle.Website/appsettings.json

@@ -7,6 +7,6 @@
   },
   "AllowedHosts": "*",
   "ConnectionStrings": {
-    "SQLFiddle": "Data Source=.\\SQLEXPRESS;Integrated Security=SSPI;Initial Catalog=SQLFiddle;TrustServerCertificate=true"
+    "SQLFiddle": "Data Source=sqlfiddle.db"
   }
 }

demos/SQLFiddle/SQLFiddle/Persistence.fs

@@ -31,8 +31,8 @@ let private sha1 (fiddleData :  FiddleInput) =
     hasher.Hash
 
 type SaveFiddleSQL = SQL<"""
-insert into Fiddles(SHA1, Backend, Model, Command)
-select @sha1, @backend, @model, @command
+insert into Fiddles(SHA1, CreatedUtc, Backend, Model, Command)
+select @sha1, @createdUtc, @backend, @model, @command
 where not exists(select null x from Fiddles where SHA1 = @sha1)
 """>
 
@@ -44,6 +44,7 @@ let saveFiddle fiddleData =
             SaveFiddleSQL.Command
                 ( fiddleData.Backend.ToString()
                 , fiddleData.Command
+                , DateTime.UtcNow
                 , fiddleData.Model
                 , sha1
                 )

demos/SQLFiddle/SQLFiddle/SQLFiddle.fsproj

@@ -24,8 +24,8 @@
     <PackageReference Include="FSharp.Core" Version="8.0.401" />
     <PackageReference Include="Rezoom" Version="1.4.0" />
     <!-- Wrapper meta-package: brings in Rezoom.SQL.Provider, Compiler, Mapping, and
-         Microsoft.Data.SqlClient as the TSQL runtime driver. -->
-    <PackageReference Include="Rezoom.SQL.Provider.TSQL" Version="0.13.0" />
+         Microsoft.Data.Sqlite as the SQLite runtime driver. -->
+    <PackageReference Include="Rezoom.SQL.Provider.SQLite" Version="0.13.0" />
   </ItemGroup>
 
 </Project>

demos/SQLFiddle/SQLFiddle/V1.model.sql

@@ -1,6 +1,6 @@
 create table Fiddles
 ( SHA1 binary(20) primary key
-, CreatedUtc datetime default(sysutcdatetime())
+, CreatedUtc datetime
 , Backend string(8)
 , Model string
 , Command string

demos/SQLFiddle/SQLFiddle/rzsql.json

@@ -1,4 +1,4 @@
 {
-  "backend": "tsql",
+  "backend": "sqlite",
   "connectionName": "SQLFiddle"
 }