windowsweep 1.0.1 → 1.2.0

package/modules/globals_audit.ps1

@@ -0,0 +1,236 @@
+# globals_audit.ps1 - section 22: globally installed packages, read-only.
+# Lists what npm, pnpm, yarn, bun and deno installed globally, flags the ones nothing has referenced for
+# N+ days, and prints the exact uninstall command. It NEVER removes anything, in any mode: several of these
+# roots (nvm4w, AppData\npm, pnpm\global, .bun, .deno\bin) are protected subtrees by design.
+
+# Never proposed as a candidate: the tool itself and the package managers everything else depends on.
+$Script:WS_GLOBAL_KEEP = @('npm', 'corepack', 'pnpm', 'yarn', 'windowsweep')
+
+function Get-GlobalPackageRoots {
+  <# .SYNOPSIS Existing global install roots, one row per manager. Style: node_modules (packages) | bin (shims). #>
+  $P = $Script:P
+  $rows = @()
+  $npmRoot = ''
+  if (Test-CommandPresent 'npm') {
+    try {
+      $out = & npm root -g 2>$null
+      $line = ($out | Select-Object -Last 1)
+      if ($line) { $npmRoot = $line.Trim() }
+    } catch { $null = $_ }
+  }
+  if (-not $npmRoot) { $npmRoot = Join-Path $P.A 'npm\node_modules' }
+  $fixed = @(
+    @('npm', $npmRoot, 'node_modules'),
+    @('yarn', "$($P.L)\Yarn\Data\global\node_modules", 'node_modules'),
+    @('bun', "$($P.U)\.bun\install\global\node_modules", 'node_modules'),
+    @('deno', "$($P.U)\.deno\bin", 'bin')
+  )
+  foreach ($f in $fixed) {
+    if (Test-DirPresent $f[1]) { $rows += [pscustomobject]@{ Manager = $f[0]; Root = (Get-FullPath $f[1]); Style = $f[2] } }
+  }
+  # Version-managed and store-style roots are globs: one root per installed Node version / pnpm version.
+  $globs = @()
+  $globs += @(@('npm', "$($P.A)\nvm\v*\node_modules"))
+  if ($env:NVM_HOME) { $globs += @(@('npm', (Join-Path $env:NVM_HOME 'v*\node_modules'))) }
+  $globs += @(@('pnpm', "$($P.L)\pnpm\global\*\node_modules"))
+  foreach ($g in $globs) {
+    $hits = @()
+    try { $hits = @(Get-Item -Path $g[1] -Force -ErrorAction SilentlyContinue | Where-Object { $_ -is [IO.DirectoryInfo] } | ForEach-Object { $_.FullName }) } catch { $hits = @() }
+    foreach ($h in $hits) { $rows += [pscustomobject]@{ Manager = $g[0]; Root = (Get-FullPath $h); Style = 'node_modules' } }
+  }
+  $seen = New-Object System.Collections.Generic.HashSet[string]([StringComparer]::OrdinalIgnoreCase)
+  return @($rows | Where-Object { $seen.Add($_.Root) })
+}
+
+function Get-PackageBinNames {
+  <# .SYNOPSIS Command names a package.json 'bin' field installs: a string means one bin named after the package. #>
+  param([object] $Manifest, [string] $Name)
+  $out = @()
+  if ($null -eq $Manifest) { return $out }
+  $bin = $Manifest.bin
+  if ($null -eq $bin) { return $out }
+  if ($bin -is [string]) { return @(($Name -split '/')[-1]) }
+  foreach ($p in $bin.PSObject.Properties) { $out += $p.Name }
+  return $out
+}
+
+function Get-GlobalPackages {
+  <# .SYNOPSIS Packages under one global root. Reads each package.json (top level only) - never walks a global tree. #>
+  param([pscustomobject] $RootRow)
+  $rows = @()
+  if ($RootRow.Style -eq 'bin') {
+    foreach ($e in (Get-ChildEntries $RootRow.Root)) {
+      if ($e -is [IO.DirectoryInfo]) { continue }
+      if ($e.Extension -eq '.cmd') { continue }
+      $idle = [int][math]::Floor(([datetime]::UtcNow - (Get-NewestTimestampUtc $e)).TotalDays)
+      $rows += [pscustomobject]@{ Manager = $RootRow.Manager; Name = [IO.Path]::GetFileNameWithoutExtension($e.Name)
+        Version = ''; Path = (Remove-LongPrefix $e.FullName); Bytes = [long]$e.Length; Idle = $idle
+        Bins = @([IO.Path]::GetFileNameWithoutExtension($e.Name)) }
+    }
+    return $rows
+  }
+  $dirs = @()
+  foreach ($e in (Get-ChildEntries $RootRow.Root)) {
+    if (-not ($e -is [IO.DirectoryInfo]) -or (Test-ReparsePoint $e)) { continue }
+    if ($e.Name -eq '.bin') { continue }
+    if ($e.Name.StartsWith('@')) {
+      foreach ($s in (Get-ChildEntries (Remove-LongPrefix $e.FullName))) {
+        if ($s -is [IO.DirectoryInfo]) { $dirs += [pscustomobject]@{ Name = ($e.Name + '/' + $s.Name); Dir = (Remove-LongPrefix $s.FullName) } }
+      }
+      continue
+    }
+    $dirs += [pscustomobject]@{ Name = $e.Name; Dir = (Remove-LongPrefix $e.FullName) }
+  }
+  foreach ($d in $dirs) {
+    $manifest = $null
+    $mf = Join-Path $d.Dir 'package.json'
+    if (Test-PathPresent $mf) { try { $manifest = @(Read-JsonFile $mf)[0] } catch { $manifest = $null } }
+    $version = ''
+    if ($manifest -and $manifest.version) { $version = [string]$manifest.version }
+    # The newest of the package's own top-level entries: a global node_modules is far too big to walk.
+    $newest = [datetime]::MinValue
+    foreach ($c in (Get-ChildEntries $d.Dir)) { $t = Get-NewestTimestampUtc $c; if ($t -gt $newest) { $newest = $t } }
+    if ($newest -eq [datetime]::MinValue) { $newest = [datetime]::UtcNow }
+    $rows += [pscustomobject]@{ Manager = $RootRow.Manager; Name = $d.Name; Version = $version; Path = $d.Dir
+      Bytes = [long](Get-DirectoryBytes $d.Dir); Idle = [int][math]::Floor(([datetime]::UtcNow - $newest).TotalDays)
+      Bins = @(Get-PackageBinNames -Manifest $manifest -Name $d.Name) }
+  }
+  return $rows
+}
+
+function Get-ProjectPackageIndex {
+  <# .SYNOPSIS What the project roots reference: dependency names, script text and local .bin command names.
+     Only manifests touched inside the idle window count - an ancient project does not keep a global alive. #>
+  param([string[]] $Roots, [int] $Days, [int] $MaxDepth = 4, [int] $MaxFiles = 2000)
+  $names = New-Object System.Collections.Generic.HashSet[string]([StringComparer]::OrdinalIgnoreCase)
+  $bins = New-Object System.Collections.Generic.HashSet[string]([StringComparer]::OrdinalIgnoreCase)
+  $script = New-Object System.Text.StringBuilder
+  $seen = 0
+  foreach ($root in $Roots) {
+    $stack = New-Object System.Collections.Generic.Stack[object]
+    $stack.Push(@($root, 0))
+    while ($stack.Count -gt 0 -and $seen -lt $MaxFiles) {
+      $item = $stack.Pop()
+      $dir = [string]$item[0]; $depth = [int]$item[1]
+      foreach ($e in (Get-ChildEntries $dir)) {
+        if (Test-ReparsePoint $e) { continue }
+        if ($e -is [IO.DirectoryInfo]) {
+          if ($e.Name -eq 'node_modules') {
+            foreach ($b in (Get-ChildEntries (Join-Path (Remove-LongPrefix $e.FullName) '.bin'))) { $null = $bins.Add([IO.Path]::GetFileNameWithoutExtension($b.Name)) }
+            continue
+          }
+          if ($Script:WS_NEVER_ENTER -contains $e.Name -or $e.Name.StartsWith('.')) { continue }
+          if ($depth -lt $MaxDepth) { $stack.Push(@((Remove-LongPrefix $e.FullName), $depth + 1)) }
+          continue
+        }
+        if ($e.Name -ne 'package.json') { continue }
+        $seen++
+        if ([int][math]::Floor(([datetime]::UtcNow - (Get-NewestTimestampUtc $e)).TotalDays) -ge $Days) { continue }
+        $m = $null
+        try { $m = @(Read-JsonFile (Remove-LongPrefix $e.FullName))[0] } catch { $m = $null }
+        if ($null -eq $m) { continue }
+        foreach ($field in @('dependencies', 'devDependencies', 'peerDependencies', 'optionalDependencies')) {
+          if ($m.$field) { foreach ($p in $m.$field.PSObject.Properties) { $null = $names.Add($p.Name) } }
+        }
+        if ($m.scripts -and $script.Length -lt 200000) {
+          foreach ($p in $m.scripts.PSObject.Properties) { $null = $script.Append(' ').Append([string]$p.Value) }
+        }
+      }
+    }
+  }
+  return [pscustomobject]@{ Names = $names; Bins = $bins; ScriptText = $script.ToString().ToLowerInvariant(); Scanned = $seen }
+}
+
+function Get-GlobalPackageVerdict {
+  <# .SYNOPSIS Pure verdict for one global package: keep | candidate, plus whether a project shadows its command.
+     Candidate needs all three: idle past the window, never referenced, and not a package manager we protect. #>
+  param([pscustomobject] $Package, [pscustomobject] $Index, [int] $Days)
+  $short = ($Package.Name -split '/')[-1]
+  $shadowed = $false
+  foreach ($b in @($Package.Bins)) { if ($Index.Bins.Contains($b)) { $shadowed = $true } }
+  if ($Script:WS_GLOBAL_KEEP -contains $short -or $Script:WS_GLOBAL_KEEP -contains $Package.Name) {
+    return [pscustomobject]@{ Verdict = 'keep'; Reason = 'package manager / this tool'; Shadowed = $shadowed }
+  }
+  if ($Index.Names.Contains($Package.Name)) { return [pscustomobject]@{ Verdict = 'keep'; Reason = 'a recent project depends on it'; Shadowed = $shadowed } }
+  foreach ($b in @($Package.Bins)) {
+    if ($b -and $Index.ScriptText.Contains($b.ToLowerInvariant())) { return [pscustomobject]@{ Verdict = 'keep'; Reason = "a recent project script runs '$b'"; Shadowed = $shadowed } }
+  }
+  if ($Package.Idle -lt $Days) { return [pscustomobject]@{ Verdict = 'keep'; Reason = "touched $($Package.Idle) days ago"; Shadowed = $shadowed } }
+  return [pscustomobject]@{ Verdict = 'candidate'; Reason = "nothing referenced it and it is $($Package.Idle) days old"; Shadowed = $shadowed }
+}
+
+function Get-GlobalUninstallCommand {
+  <# .SYNOPSIS The exact command that removes one global package for its manager. #>
+  param([string] $Manager, [string] $Name)
+  switch ($Manager) {
+    'npm' { return "npm uninstall -g $Name" }
+    'pnpm' { return "pnpm remove -g $Name" }
+    'yarn' { return "yarn global remove $Name" }
+    'bun' { return "bun remove -g $Name" }
+    'deno' { return "deno uninstall $Name" }
+    default { return "# remove $Name manually" }
+  }
+}
+
+function Get-Targets22 {
+  <# .SYNOPSIS Informational rows only. Section 22 declares NO deletable target: these roots are protected. #>
+  $t = @()
+  foreach ($r in (Get-GlobalPackageRoots)) { $t += (New-Target 22 "$($r.Manager) global root" $r.Root -Kind cmd -Note 'read-only audit; this section never deletes') }
+  if ($t.Count -eq 0) { $t += (New-Target 22 'global package roots' '(none detected)' -Kind cmd -Note 'read-only audit; this section never deletes') }
+  return $t
+}
+
+function Invoke-Section22 {
+  $ws = $Script:WS
+  Write-SectionIntro @(
+    'What npm, pnpm, yarn, bun and deno installed globally, and which of those nothing has referenced lately.',
+    "A package is a candidate only when it is $($ws.Days)+ days old AND no project touched recently names it.",
+    'This section never uninstalls anything - it prints the command and leaves the decision to you.'
+  )
+  $roots = @(Get-GlobalPackageRoots)
+  if ($roots.Count -eq 0) { Write-Info 'no global package roots found'; return }
+  Write-Info ('roots: ' + (($roots | ForEach-Object { "$($_.Manager) -> $($_.Root)" }) -join '   '))
+  $packages = @()
+  foreach ($r in $roots) { $packages += @(Get-GlobalPackages -RootRow $r) }
+  if ($packages.Count -eq 0) { Write-Info 'no globally installed packages found'; return }
+  $projectRoots = @(Get-ProjectScanRoots)
+  $index = Get-ProjectPackageIndex -Roots $projectRoots -Days $ws.Days
+  Write-Note "checked $($index.Scanned) project manifest(s) under: $($projectRoots -join '  ')"
+  $lines = @("global packages audit - $(Get-Date -Format 'yyyy-MM-dd HH:mm') - idle window $($ws.Days) days", '')
+  $kept = @(); $cand = @()
+  foreach ($p in ($packages | Sort-Object Bytes -Descending)) {
+    $v = Get-GlobalPackageVerdict -Package $p -Index $index -Days $ws.Days
+    $row = [pscustomobject]@{ Package = $p; Verdict = $v }
+    if ($v.Verdict -eq 'candidate') { $cand += $row } else { $kept += $row }
+  }
+  Write-Section 'Kept'
+  Write-UiLine ("  {0,-34} {1,-10} {2,10} {3,6}  {4}" -f 'PACKAGE', 'VERSION', 'SIZE', 'IDLE', 'WHY') 'White'
+  foreach ($r in $kept) {
+    $line = "  {0,-34} {1,-10} {2,10} {3,5}d  {4}" -f $r.Package.Name, $r.Package.Version, (Format-Bytes $r.Package.Bytes), $r.Package.Idle, $r.Verdict.Reason
+    Write-UiLine $line 'Gray'; $lines += ('kept      ' + $line.Trim())
+  }
+  Write-Section 'Candidates - nothing recent referenced these'
+  if ($cand.Count -eq 0) { Write-Info 'none' } else {
+    Write-UiLine ("  {0,-34} {1,-10} {2,10} {3,6}  {4}" -f 'PACKAGE', 'VERSION', 'SIZE', 'IDLE', 'NOTE') 'White'
+    $total = [long]0
+    foreach ($r in $cand) {
+      $note = ''
+      if ($r.Verdict.Shadowed) { $note = 'a project installs this command locally' }
+      $line = "  {0,-34} {1,-10} {2,10} {3,5}d  {4}" -f $r.Package.Name, $r.Package.Version, (Format-Bytes $r.Package.Bytes), $r.Package.Idle, $note
+      Write-UiLine $line 'Yellow'; $lines += ('candidate ' + $line.Trim())
+      $total += $r.Package.Bytes
+    }
+    Write-Info ('candidates hold ' + (Format-Bytes $total))
+    Write-Section 'Remove them yourself with'
+    $lines += ''; $lines += 'uninstall commands:'
+    foreach ($r in $cand) {
+      $cmd = Get-GlobalUninstallCommand -Manager $r.Package.Manager -Name $r.Package.Name
+      Write-Plain "  $cmd"; $lines += "  $cmd"
+    }
+    Write-Note 'windowsweep does not run these: a global package can be a command you rely on rarely.'
+  }
+  if (-not $ws.NoReport) {
+    $out = Join-Path $ws.ReportsDir ('global-packages-' + $ws.Stamp + '.txt')
+    try { [IO.File]::WriteAllLines($out, $lines); Write-Note "list saved: $out" } catch { $null = $_ }
+  }
+}

package/modules/health.ps1

@@ -1,101 +1,101 @@
-# health.ps1 - section 0: read-only system health report.
-
-function Get-Targets00 { return @() }
-
-function Get-HiberfilInfo {
-  $p = Join-Path $Script:P.SD '\hiberfil.sys'
-  $size = [long]0
-  # Get-Item cannot open the hibernation file without elevation, but FileInfo reads its size from the directory entry.
-  try { $f = New-Object IO.FileInfo($p); if ($f.Exists) { $size = [long]$f.Length } } catch { $size = 0 }
-  $state = 'unknown'
-  try {
-    $a = (& powercfg.exe /a 2>$null) -join ' '
-    if ($a -match 'Hibernate' -and $a -notmatch 'Hibernation has not been enabled') { $state = 'available' } else { $state = 'off' }
-  } catch { $null = $_ }
-  return [pscustomobject]@{ Path = $p; Bytes = $size; State = $state }
-}
-
-function Get-DiskImageFiles {
-  <# .SYNOPSIS Docker Desktop / WSL virtual disks (they grow but never shrink on their own). #>
-  $L = $Script:P.L
-  $out = @()
-  foreach ($root in @((Join-Path $L 'Docker\wsl'), (Join-Path $L 'Packages'))) {
-    if (-not (Test-DirPresent $root)) { continue }
-    try { $out += Get-ChildItem -LiteralPath $root -Recurse -Filter '*.vhdx' -File -Depth 4 -ErrorAction SilentlyContinue } catch { $null = $_ }
-  }
-  return $out
-}
-
-function Get-BlockingApps {
-  <# .SYNOPSIS Running apps whose caches this tool skips while they run. #>
-  $map = [ordered]@{ chrome = 'Chrome'; msedge = 'Edge'; brave = 'Brave'; firefox = 'Firefox'; vivaldi = 'Vivaldi'; opera = 'Opera'; Code = 'VS Code'; Cursor = 'Cursor'; Windsurf = 'Windsurf'; Discord = 'Discord'; slack = 'Slack'; 'ms-teams' = 'Teams'; Zoom = 'Zoom'; Spotify = 'Spotify'; Postman = 'Postman'; Figma = 'Figma'; Notion = 'Notion' }
-  $out = @()
-  foreach ($k in $map.Keys) { if (Test-ProcessRunning @($k)) { $out += $map[$k] } }
-  return $out
-}
-
-function Invoke-Section00 {
-  $ws = $Script:WS
-  Write-SectionIntro @('Read-only snapshot of the machine: nothing is changed here.')
-  try {
-    $os = Get-CimInstance Win32_OperatingSystem -ErrorAction Stop
-    Write-Kv 'Windows:' "$($os.Caption) $($os.Version) (build $($os.BuildNumber))"
-    $up = (Get-Date) - $os.LastBootUpTime
-    Write-Kv 'Uptime:' ("{0}d {1}h {2}m" -f $up.Days, $up.Hours, $up.Minutes)
-    Write-Kv 'RAM:' ("{0} total, {1} free" -f (Format-Bytes ($os.TotalVisibleMemorySize * 1KB)), (Format-Bytes ($os.FreePhysicalMemory * 1KB)))
-  } catch { Write-Kv 'Windows:' $ws.OsCaption }
-  Write-Kv 'PowerShell:' "$($PSVersionTable.PSVersion) ($($PSVersionTable.PSEdition))"
-  $adm = 'no'
-  if ($ws.IsAdmin) { $adm = 'yes' } elseif (Test-CanElevate) { $adm = 'no (your account can elevate: --elevate)' } else { $adm = 'no (standard user; admin sections need an administrator)' }
-  Write-Kv 'Elevated:' $adm
-  $dev = 'not decided yet'
-  if ($null -ne $ws.Developer) { if ($ws.Developer) { $dev = "on ($($ws.DeveloperSource))" } else { $dev = "off ($($ws.DeveloperSource))" } }
-  Write-Kv 'Developer mode:' $dev
-  $hints = @(Get-ToolchainHints)
-  if ($hints.Count -gt 0) { Write-Kv 'Dev tooling found:' ($hints -join ', ') }
-  Write-UiLine '' 'Gray'
-  Show-DriveTable
-  try {
-    $sys = New-Object IO.DriveInfo($Script:P.SD)
-    $pct = 100.0 * $sys.AvailableFreeSpace / $sys.TotalSize
-    if ($sys.AvailableFreeSpace -lt 10GB -or $pct -lt 10) { Write-Warn ("system drive has only {0} free ({1:N1}%) - Windows slows down badly below ~10%; this run should help" -f (Format-Bytes $sys.AvailableFreeSpace), $pct) }
-  } catch { $null = $_ }
-  Write-UiLine '' 'Gray'
-  $h = Get-HiberfilInfo
-  if ($h.Bytes -gt 0) { Write-Kv 'hiberfil.sys:' ("{0} (hibernation {1}) - section 15 can shrink or remove it (admin)" -f (Format-Bytes $h.Bytes), $h.State) } else { Write-Kv 'hiberfil.sys:' 'absent (hibernation off)' }
-  try {
-    foreach ($pf in (Get-CimInstance Win32_PageFileUsage -ErrorAction Stop)) { Write-Kv 'pagefile:' ("{0}  {1} allocated" -f $pf.Name, (Format-Bytes ($pf.AllocatedBaseSize * 1MB))) }
-  } catch { $null = $_ }
-  foreach ($img in (Get-DiskImageFiles)) { Write-Kv 'disk image:' ("{0}  {1} (section 20 compacts it, admin)" -f $img.FullName, (Format-Bytes $img.Length)) }
-  if (Test-CommandPresent 'wsl.exe') {
-    try {
-      $raw = & wsl.exe --list --verbose 2>$null
-      $txt = (($raw | ForEach-Object { [string]$_ }) -join "`n") -replace "`0", ''
-      $lines = @($txt -split "`n" | ForEach-Object { $_.Trim() } | Where-Object { $_ -and $_ -notmatch '^NAME' })
-      if ($lines.Count -gt 0) { Write-Kv 'WSL distros:' (($lines | ForEach-Object { ($_ -replace '\s+', ' ') }) -join ' | ') }
-    } catch { $null = $_ }
-  }
-  Write-UiLine '' 'Gray'
-  try { $n = @(Get-CimInstance Win32_StartupCommand -ErrorAction Stop).Count; Write-Kv 'Startup items:' "$n (review in Task Manager > Startup; this tool does not change them)" } catch { $null = $_ }
-  try {
-    $ss = (Get-ItemProperty 'HKCU:\Software\Microsoft\Windows\CurrentVersion\StorageSense\Parameters\StoragePolicy' -ErrorAction Stop).'01'
-    $ssText = 'off'
-    if ($ss -eq 1) { $ssText = 'on' }
-    Write-Kv 'Storage Sense:' $ssText
-  } catch { $null = $_ }
-  try {
-    $la = (& fsutil.exe behavior query disablelastaccess 2>$null) -join ' '
-    if ($la -match '=\s*(\d)') {
-      $v = [int]$Matches[1]
-      $laText = 'disabled - idle age uses write/creation times (the safe reading)'
-      if ($v -eq 1 -or $v -eq 3) { $laText = 'enabled - last-access times are reliable' }
-      Write-Kv 'Last-access tracking:' $laText
-    }
-  } catch { $null = $_ }
-  $blocking = @(Get-BlockingApps)
-  if ($blocking.Count -gt 0) {
-    Write-UiLine '' 'Gray'
-    Write-Warn ("running now, their caches will be skipped until closed: " + ($blocking -join ', '))
-  }
-  Add-Freed 0
-}
+# health.ps1 - section 0: read-only system health report.
+
+function Get-Targets00 { return @() }
+
+function Get-HiberfilInfo {
+  $p = Join-Path $Script:P.SD '\hiberfil.sys'
+  $size = [long]0
+  # Get-Item cannot open the hibernation file without elevation, but FileInfo reads its size from the directory entry.
+  try { $f = New-Object IO.FileInfo($p); if ($f.Exists) { $size = [long]$f.Length } } catch { $size = 0 }
+  $state = 'unknown'
+  try {
+    $a = (& powercfg.exe /a 2>$null) -join ' '
+    if ($a -match 'Hibernate' -and $a -notmatch 'Hibernation has not been enabled') { $state = 'available' } else { $state = 'off' }
+  } catch { $null = $_ }
+  return [pscustomobject]@{ Path = $p; Bytes = $size; State = $state }
+}
+
+function Get-DiskImageFiles {
+  <# .SYNOPSIS Docker Desktop / WSL virtual disks (they grow but never shrink on their own). #>
+  $L = $Script:P.L
+  $out = @()
+  foreach ($root in @((Join-Path $L 'Docker\wsl'), (Join-Path $L 'Packages'))) {
+    if (-not (Test-DirPresent $root)) { continue }
+    try { $out += Get-ChildItem -LiteralPath $root -Recurse -Filter '*.vhdx' -File -Depth 4 -ErrorAction SilentlyContinue } catch { $null = $_ }
+  }
+  return $out
+}
+
+function Get-BlockingApps {
+  <# .SYNOPSIS Running apps whose caches this tool skips while they run. #>
+  $map = [ordered]@{ chrome = 'Chrome'; msedge = 'Edge'; brave = 'Brave'; firefox = 'Firefox'; vivaldi = 'Vivaldi'; opera = 'Opera'; Code = 'VS Code'; Cursor = 'Cursor'; Windsurf = 'Windsurf'; Discord = 'Discord'; slack = 'Slack'; 'ms-teams' = 'Teams'; Zoom = 'Zoom'; Spotify = 'Spotify'; Postman = 'Postman'; Figma = 'Figma'; Notion = 'Notion' }
+  $out = @()
+  foreach ($k in $map.Keys) { if (Test-ProcessRunning @($k)) { $out += $map[$k] } }
+  return $out
+}
+
+function Invoke-Section00 {
+  $ws = $Script:WS
+  Write-SectionIntro @('Read-only snapshot of the machine: nothing is changed here.')
+  try {
+    $os = Get-CimInstance Win32_OperatingSystem -ErrorAction Stop
+    Write-Kv 'Windows:' "$($os.Caption) $($os.Version) (build $($os.BuildNumber))"
+    $up = (Get-Date) - $os.LastBootUpTime
+    Write-Kv 'Uptime:' ("{0}d {1}h {2}m" -f $up.Days, $up.Hours, $up.Minutes)
+    Write-Kv 'RAM:' ("{0} total, {1} free" -f (Format-Bytes ($os.TotalVisibleMemorySize * 1KB)), (Format-Bytes ($os.FreePhysicalMemory * 1KB)))
+  } catch { Write-Kv 'Windows:' $ws.OsCaption }
+  Write-Kv 'PowerShell:' "$($PSVersionTable.PSVersion) ($($PSVersionTable.PSEdition))"
+  $adm = 'no'
+  if ($ws.IsAdmin) { $adm = 'yes' } elseif (Test-CanElevate) { $adm = 'no (your account can elevate: --elevate)' } else { $adm = 'no (standard user; admin sections need an administrator)' }
+  Write-Kv 'Elevated:' $adm
+  $dev = 'not decided yet'
+  if ($null -ne $ws.Developer) { if ($ws.Developer) { $dev = "on ($($ws.DeveloperSource))" } else { $dev = "off ($($ws.DeveloperSource))" } }
+  Write-Kv 'Developer mode:' $dev
+  $hints = @(Get-ToolchainHints)
+  if ($hints.Count -gt 0) { Write-Kv 'Dev tooling found:' ($hints -join ', ') }
+  Write-UiLine '' 'Gray'
+  Show-DriveTable
+  try {
+    $sys = New-Object IO.DriveInfo($Script:P.SD)
+    $pct = 100.0 * $sys.AvailableFreeSpace / $sys.TotalSize
+    if ($sys.AvailableFreeSpace -lt 10GB -or $pct -lt 10) { Write-Warn ("system drive has only {0} free ({1:N1}%) - the sections below list what can be reclaimed" -f (Format-Bytes $sys.AvailableFreeSpace), $pct) }
+  } catch { $null = $_ }
+  Write-UiLine '' 'Gray'
+  $h = Get-HiberfilInfo
+  if ($h.Bytes -gt 0) { Write-Kv 'hiberfil.sys:' ("{0} (hibernation {1}) - section 15 can shrink or remove it (admin)" -f (Format-Bytes $h.Bytes), $h.State) } else { Write-Kv 'hiberfil.sys:' 'absent (hibernation off)' }
+  try {
+    foreach ($pf in (Get-CimInstance Win32_PageFileUsage -ErrorAction Stop)) { Write-Kv 'pagefile:' ("{0}  {1} allocated" -f $pf.Name, (Format-Bytes ($pf.AllocatedBaseSize * 1MB))) }
+  } catch { $null = $_ }
+  foreach ($img in (Get-DiskImageFiles)) { Write-Kv 'disk image:' ("{0}  {1} (section 20 compacts it, admin)" -f $img.FullName, (Format-Bytes $img.Length)) }
+  if (Test-CommandPresent 'wsl.exe') {
+    try {
+      $raw = & wsl.exe --list --verbose 2>$null
+      $txt = (($raw | ForEach-Object { [string]$_ }) -join "`n") -replace "`0", ''
+      $lines = @($txt -split "`n" | ForEach-Object { $_.Trim() } | Where-Object { $_ -and $_ -notmatch '^NAME' })
+      if ($lines.Count -gt 0) { Write-Kv 'WSL distros:' (($lines | ForEach-Object { ($_ -replace '\s+', ' ') }) -join ' | ') }
+    } catch { $null = $_ }
+  }
+  Write-UiLine '' 'Gray'
+  try { $n = @(Get-CimInstance Win32_StartupCommand -ErrorAction Stop).Count; Write-Kv 'Startup items:' "$n (section 25 lists them all; change them in Task Manager > Startup - this tool never does)" } catch { $null = $_ }
+  try {
+    $ss = (Get-ItemProperty 'HKCU:\Software\Microsoft\Windows\CurrentVersion\StorageSense\Parameters\StoragePolicy' -ErrorAction Stop).'01'
+    $ssText = 'off'
+    if ($ss -eq 1) { $ssText = 'on' }
+    Write-Kv 'Storage Sense:' $ssText
+  } catch { $null = $_ }
+  try {
+    $la = (& fsutil.exe behavior query disablelastaccess 2>$null) -join ' '
+    if ($la -match '=\s*(\d)') {
+      $v = [int]$Matches[1]
+      $laText = 'disabled - idle age uses write/creation times (keeps more)'
+      if ($v -eq 1 -or $v -eq 3) { $laText = 'enabled - last-access times are reliable' }
+      Write-Kv 'Last-access tracking:' $laText
+    }
+  } catch { $null = $_ }
+  $blocking = @(Get-BlockingApps)
+  if ($blocking.Count -gt 0) {
+    Write-UiLine '' 'Gray'
+    Write-Warn ("running now, their caches will be skipped until closed: " + ($blocking -join ', '))
+  }
+  Add-Freed 0
+}

package/modules/installed_programs.ps1

@@ -0,0 +1,118 @@
+# installed_programs.ps1 - section 24: installed programs nothing has modified for N+ days. Report only.
+#
+# It NEVER runs an uninstaller, in any mode. Windows keeps no reliable "last launched" record, so the number
+# reported is "not modified", derived from the files under InstallLocation - never described as "unused".
+
+function Get-WingetIdMap {
+  <# .SYNOPSIS One winget call, parsed once: normalised program name -> package id. Empty when winget is absent. #>
+  $map = @{}
+  if (-not (Test-CommandPresent 'winget')) { return $map }
+  $lines = @()
+  try { $lines = @(& winget list --disable-interactivity 2>$null) } catch { return $map }
+  foreach ($line in $lines) {
+    $text = [string]$line
+    # "Name   Id   Version   Source" with runs of spaces between columns; ids never contain a space.
+    if ($text -notmatch '^(.+?)\s\s+([^\s]+)\s\s+') { continue }
+    $name = ConvertTo-MatchToken $Matches[1]
+    $id = $Matches[2]
+    if ($name.Length -lt 3 -or $id -eq 'Id') { continue }
+    if (-not $map.ContainsKey($name)) { $map[$name] = $id }
+  }
+  return $map
+}
+
+function Get-InstallLocationIdleDays {
+  <# .SYNOPSIS Days since the newest LAST-WRITE at depth <= 2 under an install folder, or -1 when unknowable.
+     Deliberately NOT Get-NewestTimestampUtc, which the cleanup sections use: that takes the newest of write,
+     access and creation, and last-access is live on this machine - measured 2026-09-04, every install folder
+     read as 0 days idle that way (Git, Gpg4win, RustDesk, Malwarebytes all 0d) while last-write gave 120d,
+     203d, 163d and 148d. This section asks "not modified", so last-write is the matching question. #>
+  param([string] $Location, [int] $MaxEntries = 4000)
+  if ([string]::IsNullOrWhiteSpace($Location)) { return -1 }
+  $root = Get-FullPath ($Location.Trim().Trim('"').TrimEnd('\'))
+  if (-not $root -or -not (Test-DirPresent $root)) { return -1 }
+  $newest = [datetime]::MinValue
+  $seen = 0
+  $stack = New-Object System.Collections.Generic.Stack[object]
+  $stack.Push(@($root, 0))
+  while ($stack.Count -gt 0 -and $seen -lt $MaxEntries) {
+    $item = $stack.Pop()
+    foreach ($e in (Get-ChildEntries ([string]$item[0]))) {
+      $seen++
+      if (Test-ReparsePoint $e) { continue }
+      if ($e -is [IO.DirectoryInfo]) {
+        if ([int]$item[1] -lt 2) { $stack.Push(@((Remove-LongPrefix $e.FullName), [int]$item[1] + 1)) }
+        continue
+      }
+      if ($e.LastWriteTimeUtc -gt $newest) { $newest = $e.LastWriteTimeUtc }
+    }
+  }
+  if ($newest -eq [datetime]::MinValue) { return -1 }
+  return [int][math]::Floor(([datetime]::UtcNow - $newest).TotalDays)
+}
+
+function Get-ProgramRemovalHint {
+  <# .SYNOPSIS The command that removes a program: winget when it knows it, otherwise its own UninstallString. #>
+  param([pscustomobject] $Row, [hashtable] $WingetMap)
+  $key = ConvertTo-MatchToken $Row.DisplayName
+  if ($WingetMap.ContainsKey($key)) { return "winget uninstall --id $($WingetMap[$key])" }
+  if ($Row.UninstallString) { return $Row.UninstallString }
+  return '(no uninstall command recorded - remove it from Settings > Apps)'
+}
+
+function Get-Targets24 {
+  <# .SYNOPSIS Informational only. Section 24 declares nothing deletable: Program Files is protected. #>
+  return @((New-Target 24 'Installed programs (registry)' 'HKLM + HKCU Uninstall hives' -Kind cmd -Note 'report only; this section never runs an uninstaller'))
+}
+
+function Invoke-Section24 {
+  $ws = $Script:WS
+  Write-SectionIntro @(
+    'Programs whose files nothing has modified for a long time, largest first, with the command that removes',
+    'each one. Windows keeps no reliable record of when a program last RAN, so this is "not modified", not',
+    '"not used" - check the list before acting. This section never runs an uninstaller.'
+  )
+  $rows = @(Get-InstalledProgramRows | Where-Object { $_.SystemComponent -ne 1 })
+  if ($rows.Count -eq 0) { Write-Warn 'no uninstall entries could be read'; return }
+  Write-Note "$($rows.Count) installed program(s) found; measuring the ones with an install folder"
+  $winget = Get-WingetIdMap
+  $scored = @()
+  foreach ($r in $rows) {
+    $idle = Get-InstallLocationIdleDays -Location $r.InstallLocation
+    if ($idle -lt $ws.Days) { continue }
+    $scored += [pscustomobject]@{ Row = $r; Idle = $idle; Bytes = ([long]$r.EstimatedSizeKb * 1024) }
+  }
+  $lines = @("installed programs not modified for $($ws.Days)+ days - $(Get-Date -Format 'yyyy-MM-dd HH:mm')", '')
+  if ($scored.Count -eq 0) {
+    Write-Info "no installed program has been untouched for $($ws.Days)+ days"
+  } else {
+    Write-UiLine ("  {0,-44} {1,-14} {2,10} {3,6}  {4}" -f 'PROGRAM', 'VERSION', 'SIZE', 'IDLE', 'PUBLISHER') 'White'
+    foreach ($s in ($scored | Sort-Object Bytes -Descending)) {
+      $size = 'unknown'
+      if ($s.Bytes -gt 0) { $size = Format-Bytes $s.Bytes }
+      $line = "  {0,-44} {1,-14} {2,10} {3,5}d  {4}" -f $s.Row.DisplayName, $s.Row.DisplayVersion, $size, $s.Idle, $s.Row.Publisher
+      Write-UiLine $line 'Gray'
+      $lines += $line.Trim()
+      $lines += ('    remove with: ' + (Get-ProgramRemovalHint -Row $s.Row -WingetMap $winget))
+    }
+    Write-Section 'Remove one yourself with'
+    foreach ($s in ($scored | Sort-Object Bytes -Descending | Select-Object -First 10)) {
+      Write-Plain ('  ' + (Get-ProgramRemovalHint -Row $s.Row -WingetMap $winget))
+    }
+  }
+  Write-Section 'Store apps (not system packages)'
+  $appx = @()
+  try { $appx = @(Get-AppxPackage -ErrorAction SilentlyContinue | Where-Object { -not $_.IsFramework -and $_.SignatureKind -ne 'System' }) } catch { $appx = @() }
+  if ($appx.Count -eq 0) { Write-Info 'none found' } else {
+    foreach ($a in ($appx | Sort-Object Name)) {
+      Write-UiLine ("  {0,-52} {1}" -f $a.Name, $a.Version) 'Gray'
+      $lines += ("store  {0}  {1}" -f $a.Name, $a.Version)
+      $lines += ('    remove with: Remove-AppxPackage -Package ' + $a.PackageFullName)
+    }
+    Write-Note 'remove one with:  Remove-AppxPackage -Package <PackageFullName>'
+  }
+  if (-not $ws.NoReport) {
+    $out = Join-Path $ws.ReportsDir ('installed-programs-' + $ws.Stamp + '.txt')
+    try { [IO.File]::WriteAllLines($out, $lines); Write-Note "list saved: $out" } catch { $null = $_ }
+  }
+}