From a2962c4b43dd1771376bc9578bedd466f018764c Mon Sep 17 00:00:00 2001
From: Avijeet <am388488@gmail.com>
Date: Tue, 14 Jun 2022 13:07:07 +0530
Subject: [PATCH] GLK: SCOTT: Implement blocksFree

---
 engines/glk/scott/disk_image.cpp | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/engines/glk/scott/disk_image.cpp b/engines/glk/scott/disk_image.cpp
index 7dc311d01d8..dee34e16d0f 100644
--- a/engines/glk/scott/disk_image.cpp
+++ b/engines/glk/scott/disk_image.cpp
@@ -666,7 +666,14 @@ int diRawnameFromName(byte *rawname, const char *name) {
 
 /* count number of free blocks */
 int blocksFree(DiskImage* di) {
-	return 0;
+	int blocks = 0;
+
+	for (int track = 1; track <= diTracks(di->_type); ++track) {
+		if (track != di->_dir._track) {
+			blocks += diTrackBlocksFree(di, track);
+		}
+	}
+	return blocks;
 }
 
 /* return write interleave */