added polling worker as a background service to the web project

Author: foderking

.gitignore

@@ -6,4 +6,4 @@ riderModule.iml
 settings.json
 .vs
 .idea
-ComicVineAPI.sln.DotSettings.user
+*.sln.DotSettings.user

ComicVine.API/ComicVine.API.csproj

@@ -27,6 +27,7 @@
     <ItemGroup>
       <ProjectReference Include="..\VinePlus.Core\VinePlus.Core.fsproj" />
       <ProjectReference Include="..\VinePlus.Database\VinePlus.Database.csproj" />
+      <ProjectReference Include="..\VinePlus.Polling\VinePlus.Polling.fsproj" />
     </ItemGroup>
 
     <ItemGroup>

ComicVine.API/Program.cs

@@ -7,15 +7,18 @@
 // using ComicVine.API.Database;
 using Comicvine.Core;
 using Comicvine.Database;
+using Comicvine.Polling;
 using Microsoft.EntityFrameworkCore;
 
 var builder = WebApplication.CreateBuilder(args);
 
 // Add services to the container.
+AppContext.SetSwitch("Npgsql.EnableLegacyTimestampBehavior", true); // https://stackoverflow.com/questions/69961449/net6-and-datetime-problem-cannot-write-datetime-with-kind-utc-to-postgresql-ty
 
 builder.Services.AddControllers().AddJsonOptions( 
     x => x.JsonSerializerOptions.Converters.Add(new JsonStringEnumConverter())
 );
+builder.Services.AddHostedService<PollingWorker>(); // adds the pollng background service
 // Learn more about configuring Swagger/OpenAPI at https://aka.ms/aspnetcore/swashbuckle
 builder.Services.AddEndpointsApiExplorer();
 builder.Services.AddSwaggerGen(

ComicVine.API/appsettings.json

@@ -2,7 +2,8 @@
   "Logging": {
     "LogLevel": {
       "Default": "Information",
-      "Microsoft.AspNetCore": "Warning"
+      "Microsoft.AspNetCore": "Information",
+      "Microsoft.EntityFrameworkCore.Database.Command": "Warning"
     }
   },
   "AllowedHosts": "*"

VinePlus.Polling/Worker.fs VinePlus.Polling/PollingWorker.fsVinePlus.Polling/Worker.fs renamed to VinePlus.Polling/PollingWorker.fs

@@ -33,7 +33,7 @@ with
     this.New.AddRange(other.New)
     this.Update.AddRange(other.Update)
 
-type Worker(logger: ILogger<Worker>, scopeFactory: IServiceScopeFactory) =
+type PollingWorker(logger: ILogger<PollingWorker>, scopeFactory: IServiceScopeFactory) =
   inherit BackgroundService()
   // implements comparison for posts
   let postComparer =
@@ -317,7 +317,7 @@ type Worker(logger: ILogger<Worker>, scopeFactory: IServiceScopeFactory) =
     task {
       // scoping stuff for injection database context: https://pgroene.wordpress.com/2018/07/12/injecting-a-scoped-service-into-ihostedservice/
       use scope = scopeFactory.CreateScope()
-      use timer = new PeriodicTimer(TimeSpan.FromMinutes(1))
+      use timer = new PeriodicTimer(TimeSpan.FromMinutes(5))
 
       let dbCtx =
         scope.ServiceProvider.GetRequiredService<ComicvineContext>()

VinePlus.Polling/Program.fs

@@ -14,7 +14,7 @@ module Program =
         Host
             .CreateDefaultBuilder(args)
             .ConfigureServices(fun hostContext services ->
-                services.AddHostedService<Worker>()
+                services.AddHostedService<PollingWorker>()
                 |> ignore
                 services.RegisterDataServices(hostContext.Configuration) // IConfiguration for worker service in hostContext.Configuration
                 |> ignore

VinePlus.Polling/VinePlus.Polling.fsproj

@@ -4,11 +4,12 @@
         <TargetFramework>net6.0</TargetFramework>
         <UserSecretsId>dotnet-Comicvine.Polling-67BD27B0-78C0-4AA6-AEBC-404AE3B9AC07</UserSecretsId>
         <RootNamespace>Comicvine.Polling</RootNamespace>
+<!--        <ServerGarbageCollection>true</ServerGarbageCollection>-->
     </PropertyGroup>
 
 
     <ItemGroup>
-        <Compile Include="Worker.fs" />
+        <Compile Include="PollingWorker.fs" />
         <Compile Include="Program.fs" />
     </ItemGroup>