tests/Tests/Invoice.hs

   1 {-# LANGUAGE OverloadedLists #-}
   2 {-# LANGUAGE OverloadedStrings #-}
   3
   4 module Tests.Invoice where
   5
   6 import Data.List qualified as List
   7 import Data.Map.Strict qualified as Map
   8 import Data.Text.Lazy qualified as Text.Lazy
   9 import Data.Time.Clock qualified as Time
  10 import Data.Time.LocalTime qualified as Time
  11 import Literate.Accounting.Math
  12 import Literate.Document qualified as Doc
  13 import Literate.Document.HTML qualified as HTML
  14 import Literate.Invoice.HTML qualified as HTML
  15 import Literate.Invoice.Invoice
  16 import Literate.Prelude
  17 import Test.Syd
  18 import Tests.Organization qualified
  19 import Tests.Utils.Tests
  20 import Text.Blaze.Renderer.Text qualified as Blaze.Text
  21 import Text.Blaze.Renderer.Utf8 qualified as Blaze
  22 import Prelude (undefined, (*))
  23
  24 spec :: HasCallStack => Spec
  25 spec =
  26   -- aroundAll readDicts do
  27   describe "Invoice" do
  28     forM_ (invoices & Map.toList) \(invId, inv) -> do
  29       let idS = invId & Doc.toInline & HTML.toHtml & Blaze.Text.renderMarkup & Text.Lazy.unpack
  30       outPath <- goldenPath idS "html"
  31       it idS do
  32         goldenByteStringBuilderFile outPath do
  33           HTML.htmlIO (invId, inv) <&> Blaze.renderMarkupBuilder
  34
  35 ngipkgsLog :: [InvoiceLog]
  36 ngipkgsLog =
  37   [ InvoiceLog
  38       { invoiceLogDate = "2025-11-06"
  39       , invoiceLogDuration = 0.5
  40       , invoiceLogAction = ["organization"]
  41       , invoiceLogScope = ["NGIpkgs"]
  42       , invoiceLogReferences = ["https://meet.google.com/hii-druc-tjp"]
  43       , invoiceLogDescription = "first meeting"
  44       }
  45   , InvoiceLog
  46       { invoiceLogDate = "2025-11-06"
  47       , invoiceLogDuration = 4
  48       , invoiceLogAction = ["development"]
  49       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
  50       , invoiceLogReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
  51       , invoiceLogDescription = "focus on the hardest part first"
  52       }
  53   , InvoiceLog
  54       { invoiceLogDate = "2025-11-07"
  55       , invoiceLogDuration = 8
  56       , invoiceLogAction = ["development"]
  57       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
  58       , invoiceLogReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
  59       , invoiceLogDescription = "continuing to package Bonfire deps"
  60       }
  61   , InvoiceLog
  62       { invoiceLogDate = "2025-11-08"
  63       , invoiceLogDuration = 0.1
  64       , invoiceLogAction = ["development"]
  65       , invoiceLogScope = ["Nixpkgs", "opencv"]
  66       , invoiceLogReferences = ["https://github.com/NixOS/nixpkgs/pull/459592"]
  67       , invoiceLogDescription = "fix opencv in nixpkgs"
  68       }
  69   , InvoiceLog
  70       { invoiceLogDate = "2025-11-09"
  71       , invoiceLogDuration = 8
  72       , invoiceLogAction = ["development"]
  73       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
  74       , invoiceLogReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
  75       , invoiceLogDescription = "continue to fix deps"
  76       }
  77   , InvoiceLog
  78       { invoiceLogDate = "2025-11-09"
  79       , invoiceLogDuration = 4
  80       , invoiceLogAction = ["development"]
  81       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
  82       , invoiceLogReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
  83       , invoiceLogDescription = "continue to fix deps"
  84       }
  85   , InvoiceLog
  86       { invoiceLogDate = "2025-11-11"
  87       , invoiceLogDuration = 6
  88       , invoiceLogAction = ["development"]
  89       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
  90       , invoiceLogReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
  91       , invoiceLogDescription = "continue to fix deps"
  92       }
  93   , InvoiceLog
  94       { invoiceLogDate = "2025-11-12"
  95       , invoiceLogDuration = 4
  96       , invoiceLogAction = ["development"]
  97       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
  98       , invoiceLogReferences = ["https://github.com/ju1m/bonfire-app/commits/nix"]
  99       , invoiceLogDescription = "continue to fix deps"
 100       }
 101   , InvoiceLog
 102       { invoiceLogDate = "2025-11-14"
 103       , invoiceLogDuration = 5
 104       , invoiceLogAction = ["development"]
 105       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 106       , invoiceLogReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1812"]
 107       , invoiceLogDescription = "continue to fix deps and move into ngipkgs"
 108       }
 109   , InvoiceLog
 110       { invoiceLogDate = "2025-11-14"
 111       , invoiceLogDuration = 1
 112       , invoiceLogAction = ["organization"]
 113       , invoiceLogScope = ["NGIpkgs"]
 114       , invoiceLogReferences = ["https://www.notion.so/nixos-foundation/Nix-NGI-weekly-review-34-2ab59d49e1be80939503c655b009e934"]
 115       , invoiceLogDescription = "weekly meeting"
 116       }
 117   , InvoiceLog
 118       { invoiceLogDate = "2025-11-15"
 119       , invoiceLogDuration = 6
 120       , invoiceLogAction = ["development"]
 121       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 122       , invoiceLogReferences = []
 123       , invoiceLogDescription = "finish to build Bonfire and start to fix runtime bugs"
 124       }
 125   , InvoiceLog
 126       { invoiceLogDate = "2025-11-16"
 127       , invoiceLogDuration = 4
 128       , invoiceLogAction = ["development"]
 129       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 130       , invoiceLogReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1812#issuecomment-3537609170"]
 131       , invoiceLogDescription = "workaround and contribute upstream"
 132       }
 133   , InvoiceLog
 134       { invoiceLogDate = "2025-11-17"
 135       , invoiceLogDuration = 8
 136       , invoiceLogAction = ["development"]
 137       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 138       , invoiceLogReferences = []
 139       , invoiceLogDescription = "add updateScript and fix opencv"
 140       }
 141   , InvoiceLog
 142       { invoiceLogDate = "2025-11-19"
 143       , invoiceLogDuration = 8
 144       , invoiceLogAction = ["development"]
 145       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 146       , invoiceLogReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1812#issuecomment-3554376221"]
 147       , invoiceLogDescription = "continue to fix startup crashes"
 148       }
 149   , InvoiceLog
 150       { invoiceLogDate = "2025-11-21"
 151       , invoiceLogDuration = 4
 152       , invoiceLogAction = ["development"]
 153       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 154       , invoiceLogReferences = []
 155       , invoiceLogDescription = "begin to package yarn assets. Upstream likes convoluted code and fake libraries."
 156       }
 157   , InvoiceLog
 158       { invoiceLogDate = "2025-11-21"
 159       , invoiceLogDuration = 1
 160       , invoiceLogAction = ["organization"]
 161       , invoiceLogScope = ["NGIpkgs"]
 162       , invoiceLogReferences = []
 163       , invoiceLogDescription = "weekly meeting"
 164       }
 165   , InvoiceLog
 166       { invoiceLogDate = "2025-11-21"
 167       , invoiceLogDuration = 4
 168       , invoiceLogAction = ["development"]
 169       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 170       , invoiceLogReferences = []
 171       , invoiceLogDescription = "continue to package assets"
 172       }
 173   , InvoiceLog
 174       { invoiceLogDate = "2025-11-23"
 175       , invoiceLogDuration = 4
 176       , invoiceLogAction = ["development"]
 177       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 178       , invoiceLogReferences = []
 179       , invoiceLogDescription = "continue to package assets and try to get Bonfire to work"
 180       }
 181   , InvoiceLog
 182       { invoiceLogDate = "2025-11-24"
 183       , invoiceLogDuration = 10
 184       , invoiceLogAction = ["development"]
 185       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 186       , invoiceLogReferences = ["https://github.com/surface-ui/surface/issues/762#issuecomment-3577030748"]
 187       , invoiceLogDescription = "continue to solve problems with bonfire packaging"
 188       }
 189   , InvoiceLog
 190       { invoiceLogDate = "2025-11-27"
 191       , invoiceLogDuration = 8
 192       , invoiceLogAction = ["development"]
 193       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 194       , invoiceLogReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1812#issuecomment-3584319056"]
 195       , invoiceLogDescription = "successfully auto-update and build bonfire"
 196       }
 197   , InvoiceLog
 198       { invoiceLogDate = "2025-11-28"
 199       , invoiceLogDuration = 1
 200       , invoiceLogAction = ["organization"]
 201       , invoiceLogScope = ["NGIpkgs"]
 202       , invoiceLogReferences = ["https://www.notion.so/nixos-foundation/Nix-NGI-weekly-review-36-2b959d49e1be80fa823cd4d83581fda5#2b959d49e1be80fc85eed38c9a9dca86"]
 203       , invoiceLogDescription = "weekly meeting"
 204       }
 205   , InvoiceLog
 206       { invoiceLogDate = "2025-11-29"
 207       , invoiceLogDuration = 5
 208       , invoiceLogAction = ["development"]
 209       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 210       , invoiceLogReferences = []
 211       , invoiceLogDescription = "begin the service module"
 212       }
 213   , InvoiceLog
 214       { invoiceLogDate = "2025-12-02"
 215       , invoiceLogDuration = 4
 216       , invoiceLogAction = ["development"]
 217       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 218       , invoiceLogReferences = []
 219       , invoiceLogDescription = "continue the service module"
 220       }
 221   , InvoiceLog
 222       { invoiceLogDate = "2025-12-03"
 223       , invoiceLogDuration = 8
 224       , invoiceLogAction = ["development"]
 225       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 226       , invoiceLogReferences = []
 227       , invoiceLogDescription = "first working service module"
 228       }
 229   , InvoiceLog
 230       { invoiceLogDate = "2025-12-04"
 231       , invoiceLogDuration = 5
 232       , invoiceLogAction = ["development"]
 233       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 234       , invoiceLogReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1871"]
 235       , invoiceLogDescription = "improve service module"
 236       }
 237   , InvoiceLog
 238       { invoiceLogDate = "2025-12-05"
 239       , invoiceLogDuration = 1
 240       , invoiceLogAction = ["organization"]
 241       , invoiceLogScope = ["NGIpkgs"]
 242       , invoiceLogReferences = ["https://www.notion.so/nixos-foundation/Nix-NGI-weekly-review-36-2b959d49e1be80fa823cd4d83581fda5"]
 243       , invoiceLogDescription = "weekly meeting"
 244       }
 245   , InvoiceLog
 246       { invoiceLogDate = "2025-12-05"
 247       , invoiceLogDuration = 0.5
 248       , invoiceLogAction = ["documentation"]
 249       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 250       , invoiceLogReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1954"]
 251       , invoiceLogDescription = "meeting"
 252       }
 253   , InvoiceLog
 254       { invoiceLogDate = "2025-12-06"
 255       , invoiceLogDuration = 2
 256       , invoiceLogAction = ["documentation"]
 257       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 258       , invoiceLogReferences = []
 259       , invoiceLogDescription = "prepare wednesday meeting"
 260       }
 261   , InvoiceLog
 262       { invoiceLogDate = "2025-12-07"
 263       , invoiceLogDuration = 4
 264       , invoiceLogAction = ["documentation"]
 265       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 266       , invoiceLogReferences = []
 267       , invoiceLogDescription = "prepare demo for wednesday meeting"
 268       }
 269   , InvoiceLog
 270       { invoiceLogDate = "2025-12-08"
 271       , invoiceLogDuration = 4
 272       , invoiceLogAction = ["documentation"]
 273       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 274       , invoiceLogReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1891"]
 275       , invoiceLogDescription = "prepare demo for wednesday meeting"
 276       }
 277   , InvoiceLog
 278       { invoiceLogDate = "2025-12-09"
 279       , invoiceLogDuration = 4
 280       , invoiceLogAction = ["documentation"]
 281       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 282       , invoiceLogReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1891"]
 283       , invoiceLogDescription = "continue to document"
 284       }
 285   , InvoiceLog
 286       { invoiceLogDate = "2025-12-10"
 287       , invoiceLogDuration = 2
 288       , invoiceLogAction = ["review"]
 289       , invoiceLogScope = ["NGIpkgs"]
 290       , invoiceLogReferences = ["https://www.notion.so/nixos-foundation/Nix-NGI-best-practices-for-NixOS-modules-implementation-2c559d49e1be80a8a499f21abb203d6f"]
 291       , invoiceLogDescription = "visio on “best practices”"
 292       }
 293   , InvoiceLog
 294       { invoiceLogDate = "2025-12-12"
 295       , invoiceLogDuration = 1
 296       , invoiceLogAction = ["organization"]
 297       , invoiceLogScope = ["NGIpkgs"]
 298       , invoiceLogReferences = []
 299       , invoiceLogDescription = "weekly visio meeting"
 300       }
 301   , InvoiceLog
 302       { invoiceLogDate = "2025-12-11"
 303       , invoiceLogDuration = 8
 304       , invoiceLogAction = ["documentation"]
 305       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 306       , invoiceLogReferences = []
 307       , invoiceLogDescription = "continue to document"
 308       }
 309   , InvoiceLog
 310       { invoiceLogDate = "2025-12-12"
 311       , invoiceLogDuration = 4
 312       , invoiceLogAction = ["documentation"]
 313       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 314       , invoiceLogReferences = []
 315       , invoiceLogDescription = "continue to document"
 316       }
 317   , InvoiceLog
 318       { invoiceLogDate = "2025-12-13"
 319       , invoiceLogDuration = 2
 320       , invoiceLogAction = ["documentation"]
 321       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 322       , invoiceLogReferences = []
 323       , invoiceLogDescription =
 324           [ "setup sphinx like "
 325           , Doc.InlineLink
 326               { Doc.inlineLinkTarget = "https://nix.dev"
 327               , Doc.inlineLinkText = "nix.dev"
 328               }
 329           , " for the manuals"
 330           ]
 331       }
 332   , InvoiceLog
 333       { invoiceLogDate = "2025-12-13"
 334       , invoiceLogDuration = 5
 335       , invoiceLogAction = ["development"]
 336       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 337       , invoiceLogReferences = ["https://github.com/bonfire-networks/bonfire-app/issues/1670#issuecomment-3650762914"]
 338       , invoiceLogDescription = "update to latest; overcoming new bugs introduced by upstream"
 339       }
 340   , InvoiceLog
 341       { invoiceLogDate = "2025-12-15"
 342       , invoiceLogDuration = 4
 343       , invoiceLogAction = ["development"]
 344       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 345       , invoiceLogReferences = []
 346       , invoiceLogDescription = "improving the update script and still overcoming upstream bugs"
 347       }
 348   , InvoiceLog
 349       { invoiceLogDate = "2025-12-16"
 350       , invoiceLogDuration = 3
 351       , invoiceLogAction = ["development"]
 352       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 353       , invoiceLogReferences = []
 354       , invoiceLogDescription = "overcoming bugs, again"
 355       }
 356   , InvoiceLog
 357       { invoiceLogDate = "2025-12-16"
 358       , invoiceLogDuration = 2
 359       , invoiceLogAction = ["review"]
 360       , invoiceLogScope = ["NGIpkgs"]
 361       , invoiceLogReferences = []
 362       , invoiceLogDescription = "visio to review PRs"
 363       }
 364   , InvoiceLog
 365       { invoiceLogDate = "2025-12-16"
 366       , invoiceLogDuration = 2
 367       , invoiceLogAction = ["review"]
 368       , invoiceLogScope = ["NGIpkgs"]
 369       , invoiceLogReferences = []
 370       , invoiceLogDescription = "visio to review PRs"
 371       }
 372   , InvoiceLog
 373       { invoiceLogDate = "2025-12-17"
 374       , invoiceLogDuration = 1.5
 375       , invoiceLogAction = ["review"]
 376       , invoiceLogScope = ["NGIpkgs"]
 377       , invoiceLogReferences = []
 378       , invoiceLogDescription = "visio to review PRs"
 379       }
 380   , InvoiceLog
 381       { invoiceLogDate = "2025-12-18"
 382       , invoiceLogDuration = 1
 383       , invoiceLogAction = ["review"]
 384       , invoiceLogScope = ["NGIpkgs", "dnsvizor"]
 385       , invoiceLogReferences = []
 386       , invoiceLogDescription = "review linj’s PR"
 387       }
 388   , InvoiceLog
 389       { invoiceLogDate = "2025-12-19"
 390       , invoiceLogDuration = 1.5
 391       , invoiceLogAction = ["organization"]
 392       , invoiceLogScope = ["NGIpkgs"]
 393       , invoiceLogReferences = []
 394       , invoiceLogDescription = "weekly meeting"
 395       }
 396   , InvoiceLog
 397       { invoiceLogDate = "2025-12-21"
 398       , invoiceLogDuration = 4
 399       , invoiceLogAction = ["development"]
 400       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 401       , invoiceLogReferences = []
 402       , invoiceLogDescription =
 403           [ "fix bug using "
 404           , "__structuredAttrs" & Doc.InlineCode
 405           ]
 406       }
 407   , InvoiceLog
 408       { invoiceLogDate = "2025-12-23"
 409       , invoiceLogDuration = 4
 410       , invoiceLogAction = ["documentation"]
 411       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 412       , invoiceLogReferences = []
 413       , invoiceLogDescription = "improve building the manuals"
 414       }
 415   , InvoiceLog
 416       { invoiceLogDate = "2025-12-23"
 417       , invoiceLogDuration = 2
 418       , invoiceLogAction = ["development"]
 419       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 420       , invoiceLogReferences = []
 421       , invoiceLogDescription = "address reviewers’ concerns"
 422       }
 423   , InvoiceLog
 424       { invoiceLogDate = "2025-12-24"
 425       , invoiceLogDuration = 4
 426       , invoiceLogAction = ["development"]
 427       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 428       , invoiceLogReferences = []
 429       , invoiceLogDescription = "update bonfire and report issues upstream"
 430       }
 431   , InvoiceLog
 432       { invoiceLogDate = "2025-12-24"
 433       , invoiceLogDuration = 4
 434       , invoiceLogAction = ["documentation"]
 435       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 436       , invoiceLogReferences = []
 437       , invoiceLogDescription = "document"
 438       }
 439   , InvoiceLog
 440       { invoiceLogDate = "2025-12-24"
 441       , invoiceLogDuration = 2
 442       , invoiceLogAction = ["development"]
 443       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 444       , invoiceLogReferences = []
 445       , invoiceLogDescription = "update bonfire to fix bugs"
 446       }
 447   , InvoiceLog
 448       { invoiceLogDate = "2025-12-25"
 449       , invoiceLogDuration = 2
 450       , invoiceLogAction = ["documentation"]
 451       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 452       , invoiceLogReferences = []
 453       , invoiceLogDescription = "document"
 454       }
 455   , InvoiceLog
 456       { invoiceLogDate = "2025-12-25"
 457       , invoiceLogDuration = 6
 458       , invoiceLogAction = ["development"]
 459       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 460       , invoiceLogReferences = ["https://github.com/bonfire-networks/bonfire-app/issues/1698#issuecomment-3692147409"]
 461       , invoiceLogDescription = "update and fix bugs"
 462       }
 463   , InvoiceLog
 464       { invoiceLogDate = "2025-12-26"
 465       , invoiceLogDuration = 1
 466       , invoiceLogAction = ["development"]
 467       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 468       , invoiceLogReferences = []
 469       , invoiceLogDescription = "update to fix bugs"
 470       }
 471   , InvoiceLog
 472       { invoiceLogDate = "2025-12-28"
 473       , invoiceLogDuration = 6
 474       , invoiceLogAction = ["documentation"]
 475       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 476       , invoiceLogReferences = []
 477       , invoiceLogDescription = "document"
 478       }
 479   , InvoiceLog
 480       { invoiceLogDate = "2025-12-29"
 481       , invoiceLogDuration = 2
 482       , invoiceLogAction = ["development"]
 483       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 484       , invoiceLogReferences = []
 485       , invoiceLogDescription = "add more tests"
 486       }
 487   , InvoiceLog
 488       { invoiceLogDate = "2025-12-29"
 489       , invoiceLogDuration = 0.5
 490       , invoiceLogAction = ["review"]
 491       , invoiceLogScope = ["NGIpkgs", "Funkwhale"]
 492       , invoiceLogReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1707#discussion_r2651644145"]
 493       , invoiceLogDescription = ""
 494       }
 495   , InvoiceLog
 496       { invoiceLogDate = "2025-12-30"
 497       , invoiceLogDuration = 4
 498       , invoiceLogAction = ["development"]
 499       , invoiceLogScope = ["NGIpkgs", "Beam"]
 500       , invoiceLogReferences = []
 501       , invoiceLogDescription = "improve buildMix & mixRelease"
 502       }
 503   , InvoiceLog
 504       { invoiceLogDate = "2026-01-01"
 505       , invoiceLogDuration = 4
 506       , invoiceLogAction = ["development"]
 507       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 508       , invoiceLogReferences = []
 509       , invoiceLogDescription = "support other flavours"
 510       }
 511   , InvoiceLog
 512       { invoiceLogDate = "2026-01-03"
 513       , invoiceLogDuration = 2
 514       , invoiceLogAction = ["development"]
 515       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 516       , invoiceLogReferences = []
 517       , invoiceLogDescription = "support other flavours"
 518       }
 519   , InvoiceLog
 520       { invoiceLogDate = "2026-01-04"
 521       , invoiceLogDuration = 2
 522       , invoiceLogAction = ["development"]
 523       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 524       , invoiceLogReferences = []
 525       , invoiceLogDescription = "provide upstream with reproducers"
 526       }
 527   , InvoiceLog
 528       { invoiceLogDate = "2026-01-05"
 529       , invoiceLogDuration = 2
 530       , invoiceLogAction = ["development"]
 531       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 532       , invoiceLogReferences = []
 533       , invoiceLogDescription = "update to latest version"
 534       }
 535   , InvoiceLog
 536       { invoiceLogDate = "2026-01-07"
 537       , invoiceLogDuration = 5
 538       , invoiceLogAction = ["development"]
 539       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 540       , invoiceLogReferences = []
 541       , invoiceLogDescription = "fix updating"
 542       }
 543   , InvoiceLog
 544       { invoiceLogDate = "2026-01-07"
 545       , invoiceLogDuration = 1
 546       , invoiceLogAction = ["documentation"]
 547       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 548       , invoiceLogReferences = ["https://github.com/ngi-nix/ngipkgs/pull/1891"]
 549       , invoiceLogDescription = "address reviewer’s comment"
 550       }
 551   , InvoiceLog
 552       { invoiceLogDate = "2026-01-09"
 553       , invoiceLogDuration = 2
 554       , invoiceLogAction = ["documentation"]
 555       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 556       , invoiceLogReferences = []
 557       , invoiceLogDescription = "address reviewer’s comments"
 558       }
 559   , InvoiceLog
 560       { invoiceLogDate = "2026-01-09"
 561       , invoiceLogDuration = 2
 562       , invoiceLogAction = ["development"]
 563       , invoiceLogScope = ["NGIpkgs", "Bonfire"]
 564       , invoiceLogReferences = ["https://github.com/bonfire-networks/bonfire-app/issues/1730"]
 565       , invoiceLogDescription = "answer upstream’s questions"
 566       }
 567   , InvoiceLog
 568       { invoiceLogDate = "2026-01-11"
 569       , invoiceLogDuration = 5
 570       , invoiceLogAction = ["development"]
 571       , invoiceLogScope = ["NGIpkgs", "dnsvizor"]
 572       , invoiceLogReferences = []
 573       , invoiceLogDescription = "replace hillingar"
 574       }
 575   , InvoiceLog
 576       { invoiceLogDate = "2026-01-09"
 577       , invoiceLogDuration = 2
 578       , invoiceLogAction = ["organization"]
 579       , invoiceLogScope = ["NGIpkgs"]
 580       , invoiceLogReferences = []
 581       , invoiceLogDescription = "weekly meeting"
 582       }
 583   , InvoiceLog
 584       { invoiceLogDate = "2026-01-12"
 585       , invoiceLogDuration = 5
 586       , invoiceLogAction = ["development"]
 587       , invoiceLogScope = ["NGIpkgs", "dnsvizor"]
 588       , invoiceLogReferences = ["https://github.com/ju1m/ngipkgs/commits/dnsvizor/"]
 589       , invoiceLogDescription = "remove IFD"
 590       }
 591   , InvoiceLog
 592       { invoiceLogDate = "2026-01-12"
 593       , invoiceLogDuration = 6
 594       , invoiceLogAction = ["documentation"]
 595       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 596       , invoiceLogReferences = []
 597       , invoiceLogDescription = "render options"
 598       }
 599   , InvoiceLog
 600       { invoiceLogDate = "2026-01-13"
 601       , invoiceLogDuration = 1
 602       , invoiceLogAction = ["documentation"]
 603       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 604       , invoiceLogReferences = []
 605       , invoiceLogDescription = "update"
 606       }
 607   , InvoiceLog
 608       { invoiceLogDate = "2026-01-16"
 609       , invoiceLogDuration = 2
 610       , invoiceLogAction = ["organization"]
 611       , invoiceLogScope = ["NGIpkgs"]
 612       , invoiceLogReferences = []
 613       , invoiceLogDescription = "weekly meeting"
 614       }
 615   , InvoiceLog
 616       { invoiceLogDate = "2026-01-19"
 617       , invoiceLogDuration = 2
 618       , invoiceLogAction = ["documentation"]
 619       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 620       , invoiceLogReferences = []
 621       , invoiceLogDescription = "split into several PDF"
 622       }
 623   , InvoiceLog
 624       { invoiceLogDate = "2026-01-22"
 625       , invoiceLogDuration = 2
 626       , invoiceLogAction = ["development"]
 627       , invoiceLogScope = ["NGIpkgs", "Manuals"]
 628       , invoiceLogReferences = ["https://github.com/ngi-nix/ngipkgs/pull/2010"]
 629       , invoiceLogDescription = "address reviewers’ concerns"
 630       }
 631   ]
 632
 633 invoiceRateNGIpkgs =
 634   [ ["organization"] := 31.25
 635   , ["development"] := 31.25
 636   , ["review"] := 31.25
 637   ]
 638
 639 invoices :: Invoices
 640 invoices =
 641   traceShowId
 642     [ InvoiceId
 643         { invoiceIdRecipient = Tests.Organization.nixosFoundationNGITeam
 644         , invoiceIdType = InvoiceTypeSale
 645         , invoiceIdCount = 1
 646         }
 647         := let invoiceEmittedOn = "2026-01-22"
 648            in invoice
 649                 { invoiceOrders = ["Contract n°2025-24"]
 650                 , invoiceEmittedOn
 651                 , invoicePaymentDueBefore = invoiceEmittedOn & Time.addLocalTime (31 * Time.nominalDay)
 652                 , invoiceIssuer = Tests.Organization.julmInfo
 653                 , invoiceRecipient = Tests.Organization.nixosFoundationNGITeam
 654                 , invoiceRates = invoiceRateNGIpkgs
 655                 , invoiceMentions =
 656                     [ InvoiceMentionTVANonApplicable
 657                     , InvoiceMentionIndemnitéForfaitaire
 658                     , InvoiceMentionIndemnitéTaux (12.15 :: Amount 100 (UnitName "%"))
 659                     ]
 660                 , invoiceLogs =
 661                     ngipkgsLog
 662                       & List.filter \inv ->
 663                         and $
 664                           list
 665                             [ inv & invoiceLogDate & (>= "2025-11-06")
 666                             , inv & invoiceLogDate & (<= "2025-12-22")
 667                             , inv & invoiceLogScope & (/= ["NGIpkgs", "Manuals"])
 668                             ]
 669                 }
 670     , InvoiceId
 671         { invoiceIdRecipient = Tests.Organization.nixosFoundationNGITeam
 672         , invoiceIdType = InvoiceTypeSale
 673         , invoiceIdCount = 2
 674         }
 675         := let invoiceEmittedOn = "2026-01-22"
 676            in invoice
 677                 { invoiceOrders = ["contract n°2026-FixMe"]
 678                 , invoiceEmittedOn
 679                 , invoicePaymentDueBefore = invoiceEmittedOn & Time.addLocalTime (31 * Time.nominalDay)
 680                 , invoiceIssuer = Tests.Organization.julmInfo
 681                 , invoiceRecipient = Tests.Organization.nixosFoundationNGITeam
 682                 , invoiceRates = invoiceRateNGIpkgs
 683                 , invoiceMentions =
 684                     [ InvoiceMentionTVANonApplicable
 685                     , InvoiceMentionIndemnitéForfaitaire
 686                     , InvoiceMentionIndemnitéTaux (12.15 :: Amount 100 (UnitName "%"))
 687                     ]
 688                 , invoiceLogs =
 689                     ngipkgsLog
 690                       & List.filter \inv ->
 691                         and $
 692                           [ inv & invoiceLogDate & (>= "2025-12-23")
 693                           , inv & invoiceLogDate & (<= "2026-12-31")
 694                           , not $
 695                               and $
 696                                 [ inv & invoiceLogScope & (/= ["NGIpkgs", "Manuals"])
 697                                 , inv & invoiceLogDate & (<= "2026-01-21")
 698                                 ]
 699                                   & list
 700                           ]
 701                             & list
 702                 }
 703     ]
 704     & Map.fromListWith undefined