From 989bfa9d7bed08fbdddf99caecf63fa80f436d8c Mon Sep 17 00:00:00 2001
From: martin <martin>
Date: Wed, 7 Aug 2002 08:26:48 +0000
Subject: [PATCH] get_real_size() for translating text to byte sizes (eg 2M)

---
 lib/moodlelib.php | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

diff --git a/lib/moodlelib.php b/lib/moodlelib.php
index 3c501466d6..5008942406 100644
--- a/lib/moodlelib.php
+++ b/lib/moodlelib.php
@@ -1280,6 +1280,25 @@ function get_directory_list( $rootdir ) {
     return $dirs;
 }
 
+function get_real_size($size=0) {
+// Converts numbers like 10M into bytes
+    if (!$size) {
+        return 0; 
+    }
+    $scan['MB'] = 1048576;
+    $scan['M'] = 1048576;
+    $scan['KB'] = 1024;
+    $scan['K'] = 1024;
+
+    while (list($key) = each($scan)) {
+        if ((strlen($size)>strlen($key))&&(substr($size, strlen($size) - strlen($key))==$key)) {
+            $size = substr($size, 0, strlen($size) - strlen($key)) * $scan[$key];
+            break;
+        }
+    }
+    return $size;
+}
+
 function clean_filename($string) {
     $string = eregi_replace("\.\.", "", $string);
     $string = eregi_replace("[^([:alnum:]|\.)]", "_", $string);
-- 
2.39.5