1 files changed, 59 insertions, 0 deletions
diff --git a/src/VBox/Storage/testcase/tstVDDiscard.vd b/src/VBox/Storage/testcase/tstVDDiscard.vd
new file mode 100644
index 00000000..1fd7ea37
--- /dev/null
+++ b/src/VBox/Storage/testcase/tstVDDiscard.vd
@@ -0,0 +1,59 @@
+/* $Id: tstVDDiscard.vd $ */
+/**
+ * Storage: Testcase for discarding data in a disk.
+ */
+
+/*
+ * Copyright (C) 2011-2020 Oracle Corporation
+ *
+ * This file is part of VirtualBox Open Source Edition (OSE), as
+ * available from http://www.virtualbox.org. This file is free software;
+ * you can redistribute it and/or modify it under the terms of the GNU
+ * General Public License (GPL) as published by the Free Software
+ * Foundation, in version 2 as it comes in the "COPYING" file of the
+ * VirtualBox OSE distribution. VirtualBox OSE is distributed in the
+ * hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
+ */
+
+void main()
+{
+    /* Init I/O RNG for generating random data for writes. */
+    iorngcreate(10M, "manual", 1234567890);
+
+    print("Testing VDI");
+
+    /* Create disk containers, read verification is on. */
+    createdisk("disk", true /* fVerify */);
+    /* Create the disk. */
+    create("disk", "base", "tstCompact.vdi", "dynamic", "VDI", 2G, false /* fIgnoreFlush */, false);
+    /* Fill the disk with random data */
+    io("disk", false, 1, "seq", 64K, 0, 200M, 200M, 100, "none");
+    /* Read the data to verify it once. */
+    io("disk", false, 1, "seq", 64K, 0, 200M, 200M,   0, "none");
+    close("disk", "single", false);
+
+    open("disk", "tstCompact.vdi", "VDI", true, false, false, true, false, false);
+    printfilesize("disk", 0);
+    discard("disk", true, "6,0M,512K,1M,512K,2M,512K,3M,512K,4M,512K,5M,512K");
+    discard("disk", true, "6,6M,512K,7M,512K,8M,512K,9M,512K,10M,512K,11M,512K");
+    discard("disk", true, "1,512K,512K");
+    discard("disk", false, "1,1024K,64K");
+    printfilesize("disk", 0);
+
+    print("Discard whole block");
+    discard("disk", true, "1,20M,1M");
+    printfilesize("disk", 0);
+
+    print("Split Discard");
+    discard("disk", true, "1,21M,512K");
+    printfilesize("disk", 0);
+    discard("disk", true, "1,22016K,512K");
+    printfilesize("disk", 0);
+
+    /* Cleanup */
+    close("disk", "single", true);
+    destroydisk("disk");
+
+    /* Destroy RNG and pattern */
+    iorngdestroy();
+}