diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..719b403 --- /dev/null +++ b/.gitignore @@ -0,0 +1,355 @@ +## Repo-specific things + +# Build results +[._][Aa]rtifacts/ +[._][Bb]uild/ +[._]gen-*.props +[._]gen-*.targets + +# Tools install directory +[._][Tt]ools + +# Build tools directory +[._][Bb]uild[Tt]ools + +## Ignore Visual Studio temporary files, build results, and +## files generated by popular Visual Studio add-ons. +## +## Get latest from https://github.com/github/gitignore/blob/master/VisualStudio.gitignore + +# User-specific files +*.rsuser +*.suo +*.user +*.userosscache +*.sln.docstates + +# User-specific files (MonoDevelop/Xamarin Studio) +*.userprefs + +# Build results +[Dd]ebug/ +[Dd]ebugPublic/ +[Rr]elease/ +[Rr]eleases/ +x64/ +x86/ +[Aa][Rr][Mm]/ +[Aa][Rr][Mm]64/ +bld/ +[Bb]in/ +[Oo]bj/ +[Ll]og/ + +# Visual Studio 2015/2017 cache/options directory +.vs/ +# Uncomment if you have tasks that create the project's static files in wwwroot +#wwwroot/ + +# Visual Studio 2017 auto generated files +Generated\ Files/ + +# MSTest test Results +[Tt]est[Rr]esult*/ +[Bb]uild[Ll]og.* + +# NUNIT +*.VisualState.xml +TestResult.xml + +# Build Results of an ATL Project +[Dd]ebugPS/ +[Rr]eleasePS/ +dlldata.c + +# Benchmark Results +BenchmarkDotNet.Artifacts/ + +# .NET Core +project.lock.json +project.fragment.lock.json +artifacts/ + +# StyleCop +StyleCopReport.xml + +# Files built by Visual Studio +*_i.c +*_p.c +*_h.h +*.ilk +*.meta +*.obj +*.iobj +*.pch +*.pdb +*.ipdb +*.pgc +*.pgd +*.rsp +*.sbr +*.tlb +*.tli +*.tlh +*.tmp +*.tmp_proj +*_wpftmp.csproj +*.log +*.vspscc +*.vssscc +.builds +*.pidb +*.svclog +*.scc + +# Chutzpah Test files +_Chutzpah* + +# Visual C++ cache files +ipch/ +*.aps +*.ncb +*.opendb +*.opensdf +*.sdf +*.cachefile +*.VC.db +*.VC.VC.opendb + +# Visual Studio profiler +*.psess +*.vsp +*.vspx +*.sap + +# Visual Studio Trace Files +*.e2e + +# TFS 2012 Local Workspace +$tf/ + +# Guidance Automation Toolkit +*.gpState + +# ReSharper is a .NET coding add-in +_ReSharper*/ +*.[Rr]e[Ss]harper +*.DotSettings.user + +# JustCode is a .NET coding add-in +.JustCode + +# TeamCity is a build add-in +_TeamCity* + +# DotCover is a Code Coverage Tool +*.dotCover + +# AxoCover is a Code Coverage Tool +.axoCover/* +!.axoCover/settings.json + +# Visual Studio code coverage results +*.coverage +*.coveragexml + +# NCrunch +_NCrunch_* +.*crunch*.local.xml +nCrunchTemp_* + +# MightyMoose +*.mm.* +AutoTest.Net/ + +# Web workbench (sass) +.sass-cache/ + +# Installshield output folder +[Ee]xpress/ + +# DocProject is a documentation generator add-in +DocProject/buildhelp/ +DocProject/Help/*.HxT +DocProject/Help/*.HxC +DocProject/Help/*.hhc +DocProject/Help/*.hhk +DocProject/Help/*.hhp +DocProject/Help/Html2 +DocProject/Help/html + +# Click-Once directory +publish/ + +# Publish Web Output +*.[Pp]ublish.xml +*.azurePubxml +# Note: Comment the next line if you want to checkin your web deploy settings, +# but database connection strings (with potential passwords) will be unencrypted +*.pubxml +*.publishproj + +# Microsoft Azure Web App publish settings. Comment the next line if you want to +# checkin your Azure Web App publish settings, but sensitive information contained +# in these scripts will be unencrypted +PublishScripts/ + +# NuGet Packages +*.nupkg +# The packages folder can be ignored because of Package Restore +**/[Pp]ackages/* +# except build/, which is used as an MSBuild target. +!**/[Pp]ackages/build/ +# Uncomment if necessary however generally it will be regenerated when needed +#!**/[Pp]ackages/repositories.config +# NuGet v3's project.json files produces more ignorable files +*.nuget.props +*.nuget.targets + +# Microsoft Azure Build Output +csx/ +*.build.csdef + +# Microsoft Azure Emulator +ecf/ +rcf/ + +# Windows Store app package directories and files +AppPackages/ +BundleArtifacts/ +Package.StoreAssociation.xml +_pkginfo.txt +*.appx + +# Visual Studio cache files +# files ending in .cache can be ignored +*.[Cc]ache +# but keep track of directories ending in .cache +!?*.[Cc]ache/ + +# Others +ClientBin/ +~$* +*~ +*.dbmdl +*.dbproj.schemaview +*.jfm +*.pfx +*.publishsettings +orleans.codegen.cs + +# Including strong name files can present a security risk +# (https://github.com/github/gitignore/pull/2483#issue-259490424) +#*.snk + +# Since there are multiple workflows, uncomment next line to ignore bower_components +# (https://github.com/github/gitignore/pull/1529#issuecomment-104372622) +#bower_components/ +# ASP.NET Core default setup: bower directory is configured as wwwroot/lib/ and bower restore is true +**/wwwroot/lib/ + +# RIA/Silverlight projects +Generated_Code/ + +# Backup & report files from converting an old project file +# to a newer Visual Studio version. Backup files are not needed, +# because we have git ;-) +_UpgradeReport_Files/ +Backup*/ +UpgradeLog*.XML +UpgradeLog*.htm +ServiceFabricBackup/ +*.rptproj.bak + +# SQL Server files +*.mdf +*.ldf +*.ndf + +# Business Intelligence projects +*.rdl.data +*.bim.layout +*.bim_*.settings +*.rptproj.rsuser + +# Microsoft Fakes +FakesAssemblies/ + +# GhostDoc plugin setting file +*.GhostDoc.xml + +# Node.js Tools for Visual Studio +.ntvs_analysis.dat +node_modules/ + +# Visual Studio 6 build log +*.plg + +# Visual Studio 6 workspace options file +*.opt + +# Visual Studio 6 auto-generated workspace file (contains which files were open etc.) +*.vbw + +# Visual Studio LightSwitch build output +**/*.HTMLClient/GeneratedArtifacts +**/*.DesktopClient/GeneratedArtifacts +**/*.DesktopClient/ModelManifest.xml +**/*.Server/GeneratedArtifacts +**/*.Server/ModelManifest.xml +_Pvt_Extensions + +# Paket dependency manager +.paket/paket.exe +paket-files/ + +# FAKE - F# Make +.fake/ + +# JetBrains Rider +.idea/ +*.sln.iml + +# CodeRush personal settings +.cr/personal + +# Python Tools for Visual Studio (PTVS) +__pycache__/ +*.pyc + +# Cake - Uncomment if you are using it +# tools/** +# !tools/packages.config + +# Tabs Studio +*.tss + +# Telerik's JustMock configuration file +*.jmconfig + +# BizTalk build output +*.btp.cs +*.btm.cs +*.odx.cs +*.xsd.cs + +# OpenCover UI analysis results +OpenCover/ + +# Azure Stream Analytics local run output +ASALocalRun/ + +# MSBuild Binary and Structured Log +*.binlog + +# NVidia Nsight GPU debugger configuration file +*.nvuser + +# MFractors (Xamarin productivity tool) working folder +.mfractor/ + +# Local History for Visual Studio +.localhistory/ + +# BeatPulse healthcheck temp database +healthchecksdb \ No newline at end of file diff --git a/README.md b/README.md new file mode 100644 index 0000000..32664e7 --- /dev/null +++ b/README.md @@ -0,0 +1,31 @@ +# RAMMap Cleanup + +AutoHotKey automation for RAMMap. + +## Installation + +TODO: Describe the installation process + +## Usage + +TODO: Write usage instructions + +## Contributing + +1. Fork it! +2. Create your feature branch: `git checkout -b my-new-feature` +3. Commit your changes: `git commit -am 'Add some feature'` +4. Push to the branch: `git push origin my-new-feature` +5. Submit a pull request :D + +## History + +TODO: Write history + +## Credits + +TODO: Write credits + +## License + +TODO: Write license \ No newline at end of file diff --git a/build.cmd b/build.cmd new file mode 100644 index 0000000..f9469a4 --- /dev/null +++ b/build.cmd @@ -0,0 +1,3 @@ +@if not defined _echo @echo off +powershell -NoProfile -ExecutionPolicy Unrestricted -Command "& """%~dpn0.ps1""" %*" +exit /b %ERRORLEVEL% \ No newline at end of file diff --git a/build.ps1 b/build.ps1 new file mode 100644 index 0000000..369a1a9 --- /dev/null +++ b/build.ps1 @@ -0,0 +1,101 @@ +#!/usr/bin/env pwsh + +[CmdletBinding()] +param( + [Parameter()] + [switch] $DownloadRamMap, + + [Parameter()] + [switch] $CompileExecutable, + + [Parameter()] + [switch] $Force +) + +Set-StrictMode -Version Latest +$ErrorActionPreference = 'Stop' +[Net.ServicePointManager]::SecurityProtocol = [Net.SecurityProtocolType]::Tls12 + +# Import modules +try { Import-Module SmartLogging } catch { Install-Module SmartLogging -Scope CurrentUser -Force; Import-Module SmartLogging } +try { Import-Module Execution } catch { Install-Module Execution -Scope CurrentUser -Force; Import-Module Execution } + +Set-ScriptArgs $MyInvocation.BoundParameters $MyInvocation.UnboundArguments + +# Invoke-SelfElevation + +function Get-FileFromUrl([string] $name, [string] $url) { + Log info "Download '$name' from '$url'..." + + $fileName = [System.IO.FileInfo]::new($url).Name + $downloadedFile = Join-Path $env:TEMP $fileName + + Invoke-WebRequest -Uri $url -Method Get -OutFile $downloadedFile -UseBasicParsing + + Log trace "Saved to '$downloadedFile'." + return $downloadedFile +} + +function New-DirectoryIfNotExists([string] $directory) { + if (-not (Test-Path $directory -PathType Container)) { + Log trace "Directory '$directory' not exists. Create it..." + New-Item -Path $directory -ItemType Directory -Force:$Force.IsPresent > $null + } +} + +try { + # Code goes here + + $outputDir = Join-Path $PSScriptRoot '_build' + + if ($DownloadRamMap) { + $ramMapDownloadUrl = 'https://live.sysinternals.com/RAMMap.exe' + $ramMapFileName = [System.IO.FileInfo]::new($ramMapDownloadUrl).Name + New-DirectoryIfNotExists $outputDir + + $ramMapDestination = Join-Path $outputDir $ramMapFileName + if ((Test-Path -Path $ramMapDestination) -and -not $Force.IsPresent) { + Log info "'$ramMapDestination' already exists." + } else { + $ramMapFile = Get-FileFromUrl -name 'RAMMap' -url $ramMapDownloadUrl + Move-Item -Path $ramMapFile -Destination $ramMapDestination -Force:$Force.IsPresent + Log info "Download complete: '$ramMapDestination'" + } + } + + if ($CompileExecutable) { + $ahkDownloadUrl = 'https://www.autohotkey.com/download/ahk.zip' + $ahkPath = Join-Path $outputDir 'ahk' + New-DirectoryIfNotExists $ahkPath + + $ahkCompilerFile = Join-Path $ahkPath 'Compiler/Ahk2Exe.exe' + $ahkBinaryFileName = if ([Environment]::Is64BitOperatingSystem) { 'Unicode 64-bit.bin' } else { 'Unicode 32-bit.bin' } + $ahkBinaryFile = Join-Path $ahkPath "Compiler/$ahkBinaryFileName" + + if ((Test-Path -Path $ahkCompilerFile) -and (Test-Path -Path $ahkBinaryFile) -and -not $Force.IsPresent) { + Log info 'AutoHotKey compiler already exists.' + } else { + $ahkFile = Get-FileFromUrl -name 'AutoHotKey' -url $ahkDownloadUrl + Expand-Archive -Path $ahkFile -DestinationPath $ahkPath -Force:$Force.IsPresent + Log info "Download complete: '$ahkPath'" + } + + $ahkSrcFile = Join-Path $PSScriptRoot 'src/rammap-cleanup.ahk' + $ahkSrcFileNameWithoutExtension = [System.IO.Path]::GetFileNameWithoutExtension($ahkSrcFile) + $exeFile = Join-Path $outputDir "$ahkSrcFileNameWithoutExtension.exe" + + Start-NativeExecution $ahkCompilerFile /in "$ahkSrcFile" /out "$exeFile" /bin $ahkBinaryFile /mpress 1 /cp 65001 + + Log info "Compilation complete: '$exeFile'" + } + + Log info "Successfully" + Exit-WithAndWaitOnExplorer 0 +} catch { + Log error "Something went wrong: $_" + Log trace "Exception: $($_.Exception)" + Log trace "StackTrace: $($_.ScriptStackTrace)" + Exit-WithAndWaitOnExplorer 1 +} finally { + # Cleanup goes here +} \ No newline at end of file diff --git a/clean.cmd b/clean.cmd new file mode 100644 index 0000000..f7916d6 --- /dev/null +++ b/clean.cmd @@ -0,0 +1,3 @@ +@if not defined _echo @echo off +rmdir /S /Q _build +exit /b %ERRORLEVEL% \ No newline at end of file diff --git a/src/rammap-cleanup.ahk b/src/rammap-cleanup.ahk new file mode 100644 index 0000000..daa1746 --- /dev/null +++ b/src/rammap-cleanup.ahk @@ -0,0 +1,168 @@ +#NoTrayIcon + +SetTitleMatchMode RegEx + +GetRamMapExe() { + If (A_Args.Length() > 0) { + ramMapFilePath := A_Args[1] + } + Else { + ramMapFilePath := A_ScriptDir . "/RAMMap.exe" + } + + If (!FileExist(ramMapFilePath)) { + MsgBox, RAMMap.exe could not be found. + ExitApp, -1 + } + + return ramMapFilePath +} + +RunRamMap() { + ramMapExe := GetRamMapExe() + Run, %ramMapExe% +} + +GetRamMapTitle() { + return "RamMap.*www\.sysinternals\.com" +} + +ActivateRamMapWindow(winTitle) { + WinActivate, % winTitle + Sleep 25 +} + +EmptyWorkingSets() { + ActivateRamMapWindow(GetRamMapTitle()) + SendInput, {Alt down} + Sleep, 25 + SendInput, e + Sleep, 25 + SendInput, {Alt up} + Sleep, 25 + SendInput, w +} + +EmptySystemWorkingSet() { + ActivateRamMapWindow(GetRamMapTitle()) + SendInput, {Alt down} + Sleep, 25 + SendInput, e + Sleep, 25 + SendInput, {Alt up} + Sleep, 25 + SendInput, s +} + +EmptyModifiedPageList() { + ActivateRamMapWindow(GetRamMapTitle()) + SendInput, {Alt down} + Sleep, 25 + SendInput, e + Sleep, 25 + SendInput, {Alt up} + Sleep, 25 + SendInput, m +} + +EmptyStandbyList() { + ActivateRamMapWindow(GetRamMapTitle()) + SendInput, {Alt down} + Sleep, 25 + SendInput, e + Sleep, 25 + SendInput, {Alt up} + Sleep, 25 + SendInput, t +} + +EmptyPriority0StandbyList() { + ActivateRamMapWindow(GetRamMapTitle()) + SendInput, {Alt down} + Sleep, 25 + SendInput, e + Sleep, 25 + SendInput, {Alt up} + Sleep, 25 + SendInput, l +} + +Refresh() { + ActivateRamMapWindow(GetRamMapTitle()) + SendInput, {F5} +} + +CloseRamMap() { + ActivateRamMapWindow(GetRamMapTitle()) + SendInput, {Alt down} + Sleep, 25 + SendInput, f + Sleep, 25 + SendInput, {Alt up} + Sleep, 25 + SendInput, x +} + +GetCurrentTabIndex(winTitle) { + ActivateRamMapWindow(winTitle) + ControlGet, currentTab, Tab,, SysTabControl321, % winTitle + return (currentTab - 1) +} + +SetCurrentTabIndex(winTitle, index) { + ActivateRamMapWindow(winTitle) + SendMessage, 0x1330, index,, SysTabControl321, % winTitle + Sleep, 0 + SendMessage, 0x130C, index,, SysTabControl321, % winTitle + Sleep, 250 +} + +WaitUntilFinished() { + ramMapTitle := GetRamMapTitle() + + SetCurrentTabIndex(ramMapTitle, 0) + + Loop + { + currentTabIndex := GetCurrentTabIndex(ramMapTitle) + + SetCurrentTabIndex(ramMapTitle, (currentTabIndex + 1)) + newTabIndex := GetCurrentTabIndex(ramMapTitle) + + If (newTabIndex = (currentTabIndex + 1)) { + SetCurrentTabIndex(ramMapTitle, 0) + Break + } + + Sleep, 250 + } +} + +RunRamMap() +WinWaitActive, GetRamMapTitle(),, 10 +If (!WinExist(GetRamMapTitle())) { + MsgBox, RAMMap can not be started. + ExitApp, -1 +} + +WaitUntilFinished() + +EmptyWorkingSets() +WaitUntilFinished() + +EmptySystemWorkingSet() +WaitUntilFinished() + +EmptyModifiedPageList() +WaitUntilFinished() + +EmptyStandbyList() +WaitUntilFinished() + +EmptyPriority0StandbyList() +WaitUntilFinished() + +CloseRamMap() +WinWaitClose, GetRamMapTitle(),, 5 + +SetTitleMatchMode 1 \ No newline at end of file