Using paper more

<#
Watches Pictures\Sketches and rebuilds the PureRef board whenever images are added.
Register once with Task Scheduler to run at logon (see bottom of file).
#>

$SketchesDir = Join-Path $env:USERPROFILE "Pictures\Sketches"
$OutputPur   = Join-Path $SketchesDir "Sketches.pur"
$OutputPng   = Join-Path $SketchesDir "Sketches.png"
$LogFile     = Join-Path $env:LOCALAPPDATA "sketches-pureref\sketches-pureref.log"
$PureRef     = "C:\Program Files\PureRef\PureRef.exe"
$Exts        = @('.jpg', '.jpeg', '.png', '.webp')

function Write-Log([string]$msg) {
    $dir = Split-Path $LogFile
    if (-not (Test-Path $dir)) { New-Item -ItemType Directory -Path $dir -Force | Out-Null }
    "[$( Get-Date -Format 'yyyy-MM-dd HH:mm:ss' )] $msg" | Add-Content -LiteralPath $LogFile
}

function Invoke-Rebuild {
    Write-Log "Starting board rebuild..."
    Start-Sleep -Seconds 5   # let any rapid batch of images land before scanning

    $images = Get-ChildItem -LiteralPath $SketchesDir -File |
        Where-Object { $Exts -contains $_.Extension.ToLower() -and $_.FullName -ne $OutputPng } |
        Sort-Object Name

    if (-not $images) { Write-Log "No images found, skipping."; return }

    $imageList = ($images.FullName | ForEach-Object { $_ -replace ',', ',,' }) -join ','
    Write-Log "Found $($images.Count) image(s). Building board..."

    $prArgs = @(
        '-c', 'clearScene',
        '-c', "load;$imageList",
        '-c', "save;$OutputPur",
        '-c', "exportScene;$OutputPng",
        '-c', 'exit'
    )
    $outTmp = [IO.Path]::GetTempFileName()
    $errTmp = [IO.Path]::GetTempFileName()
    Start-Process -FilePath $PureRef -ArgumentList $prArgs -WindowStyle Minimized -Wait `
        -RedirectStandardOutput $outTmp -RedirectStandardError $errTmp
    Get-Content -LiteralPath $outTmp, $errTmp -ErrorAction SilentlyContinue | Add-Content -LiteralPath $LogFile
    Remove-Item -LiteralPath $outTmp, $errTmp -ErrorAction SilentlyContinue

    Write-Log "Done. Saved: $OutputPur and $OutputPng"
}

if (-not (Test-Path $SketchesDir)) { New-Item -ItemType Directory -Path $SketchesDir -Force | Out-Null }
Write-Log "Watcher started. Monitoring: $SketchesDir"

$watcher = New-Object System.IO.FileSystemWatcher $SketchesDir
$watcher.Filter = '*'

while ($true) {
    $change = $watcher.WaitForChanged([System.IO.WatcherChangeTypes]::Created, 60000)
    if (-not $change.TimedOut -and $Exts -contains [IO.Path]::GetExtension($change.Name).ToLower()) {
        Invoke-Rebuild
    }
}

#!/usr/bin/env python3
"""Watches ~/Pictures/Sketches and rebuilds the PureRef board whenever images are added."""

import subprocess
import sys
import time
from datetime import datetime
from pathlib import Path

SKETCHES_DIR = Path.home() / "Pictures/Sketches"
OUTPUT_PUR = SKETCHES_DIR / "Sketches.pur"
OUTPUT_PNG = SKETCHES_DIR / "Sketches.png"
LOGFILE = Path.home() / ".local/share/sketches-pureref.log"
EXTS = {".jpg", ".jpeg", ".png", ".webp"}


def log(msg: str) -> None:
    with LOGFILE.open("a") as f:
        f.write(f"[{datetime.now():%Y-%m-%d %H:%M:%S}] {msg}\n")


log("Starting board rebuild...")

# Brief pause so any rapidly-added batch of images all land before we scan
time.sleep(5)

images = sorted(
    p for p in SKETCHES_DIR.iterdir()
    if p.is_file() and p.suffix.lower() in EXTS and p != OUTPUT_PNG
)

if not images:
    log("No images found, skipping.")
    sys.exit(0)

# Comma-separated path list; PureRef escapes literal commas as double-comma
image_list = ",".join(str(p).replace(",", ",,") for p in images)

log(f"Found {len(images)} image(s). Building board...")

with LOGFILE.open("a") as logf:
    subprocess.run(
        [
            "xvfb-run", "--auto-servernum",
            "--server-args=-screen 0 1280x800x24",
            "/usr/bin/PureRef",
            "-c", "clearScene",
            "-c", f"load;{image_list}",
            "-c", f"save;{OUTPUT_PUR}",
            "-c", f"exportScene;{OUTPUT_PNG}",
            "-c", "exit",
        ],
        stdout=logf, stderr=subprocess.STDOUT, check=True,
    )

log(f"Done. Saved: {OUTPUT_PUR} and {OUTPUT_PNG}")