clearpurgeablefiles.command

#!/bin/bash
# Copy and paste this into the terminal if you cant run it directly

startspace=$(($(df -m / | awk 'int($4){print $4}') * 1024 * 1024 / 1000000000))
filepath=~/Desktop/ClearPurgeableSpace

clear
printf 'Hi there!\n\n' && sleep 1
printf 'We will now force the OS to purge all purgeable files.\n' && sleep 3
printf 'This could take a few minutes, depending on the speed of your disk. \n\n' && sleep 3
printf 'To be safe, save any open documents and quit running applications now.\n\n' && sleep 3
printf 'Once your disk is nearly full, you might see the following dialog box:\n\"Your Disk space is critically low.\"\n\n' && sleep 3
printf 'This is normal.\n\n' && sleep 3
printf 'You currently have '$startspace' GB of available space.\n\n' && sleep 1
printf 'If you need to interrupt this process, press: control+c\n\n' && sleep 3
printf 'Creating folder "ClearPurgeableSpace" on desktop... \t'
mkdir -p $filepath
printf 'Done\n' && printf 'Creating temporary large files... \t'

filesize=0
if [ -f $filepath'/largefile4G' ]; then
	filesize=$(wc -c $filepath'/largefile4G' | awk '{print $1}')
fi	
if [ $filesize -lt 4000000000 ]; then
	mkfile 4G $filepath'/largefile4G'
fi

filesize=0
if [ -f $filepath'/largefile500M' ]; then
	filesize=$(wc -c $filepath'/largefile500M' | awk '{print $1}')
fi
if [ $filesize -lt 500000000 ]; then 
	mkfile 500M $filepath'/largefile500M'
fi

filesize=0
if [ -f $filepath'/largefile100M' ]; then
	filesize=$(wc -c $filepath'/largefile100M' | awk '{print $1}')
fi
if [ $filesize -lt 100000000 ]; then
	mkfile 100M $filepath'/largefile100M'
fi

printf 'Done\n\n' && printf 'Now filling up available space... \n\n'
diskspace=$(($(df -m / | awk 'int($4){print $4}') * 1024 * 1024 / 1000000))
diskspace_new=0

while [ 0 ]
do
	if [ $diskspace_new -gt $diskspace ]; then
		printf '\nApprox '$(($diskspace_new - $diskspace))' MB of purgeable space was just cleared! Continuing...\n\n'
	fi
	diskspace=$(($(df -m / | awk 'int($4){print $4}') * 1024 * 1024 / 1000000))
	printf $diskspace' MB remaining, please wait...\n'
	current_milliseconds=$(perl -MTime::HiRes -e 'printf("%.0f\n",Time::HiRes::time()*1000)')
	if [ 8000 -lt $diskspace ]; then
		cp $filepath'/largefile4G'{,"-$current_milliseconds"} && sleep 0.001 && waiting=0
	elif [ 2000 -lt $diskspace ]; then
		cp $filepath'/largefile500M'{,"-$current_milliseconds"} && sleep 0.001 && waiting=0
	elif [ 800 -lt $diskspace ]; then
		cp $filepath'/largefile100M'{,"-$current_milliseconds"} && sleep 0.001 && waiting=0
	elif [ 500 -lt $diskspace ]; then
		cp $filepath'/largefile100M'{,"-$current_milliseconds"} && sleep 0.001 && waiting=1
	elif [ $waiting -eq 1 ]; then
		printf '\nPausing for 5 seconds to give OS time to purge, please wait...\n\n' && sleep 5 && waiting=2
	elif [ $waiting -eq 2 ]; then
		printf '\nPausing for 10 seconds to give OS time to purge, please wait...\n\n' && sleep 10 && waiting=3
	elif [ $waiting -eq 3 ]; then
		printf '\nPausing for 30 seconds to give OS time to purge, please wait...\n\n' && sleep 30 && waiting=4
	else break
	fi
	diskspace_new=$(($(df -m / | awk 'int($4){print $4}') * 1024 * 1024 / 1000000))
	lastfilename=$(find $filepath -type f -name "*$current_milliseconds")
	lastfilesize=$(wc -c $lastfilename | awk '{print $1}')
	if [ $lastfilesize -lt 30000000 ]; then
		printf '\nThere is no more space left.\n\n' && break
	fi
done

printf '\nPurging complete.\n\nClearing temporary files...\n'
rm -R $filepath

printf 'All done! Your disk space has been reclaimed.\n\n'

endspace=$(($(df -m / | awk 'int($4){print $4}') * 1024 * 1024 / 1000000000))
printf 'You just recovered '$(($endspace - $startspace))' GB!\n\n' && sleep 2
printf 'You now have '$endspace' GB of free space.\n\n' && sleep 2
printf 'Goodbye!\n\n\n\n\n';