From 8fb8c26b6d07d2aadf9cf85bda159c815996be89 Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Mon, 1 Sep 2014 22:21:42 +0200
Subject: Add an 'optimiseStore' remote procedure call.

---
 src/libstore/optimise-store.cc | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

(limited to 'src/libstore/optimise-store.cc')

diff --git a/src/libstore/optimise-store.cc b/src/libstore/optimise-store.cc
index 208d9688ed98..dd18d66fa008 100644
--- a/src/libstore/optimise-store.cc
+++ b/src/libstore/optimise-store.cc
@@ -225,6 +225,22 @@ void LocalStore::optimiseStore(OptimiseStats & stats)
     }
 }
 
+static string showBytes(unsigned long long bytes)
+{
+    return (format("%.2f MiB") % (bytes / (1024.0 * 1024.0))).str();
+}
+
+void LocalStore::optimiseStore()
+{
+    OptimiseStats stats;
+
+    optimiseStore(stats);
+
+    printMsg(lvlError,
+        format("%1% freed by hard-linking %2% files")
+        % showBytes(stats.bytesFreed)
+        % stats.filesLinked);
+}
 
 void LocalStore::optimisePath(const Path & path)
 {
-- 
cgit 1.4.1