Changeset 1470

Timestamp:

12/17/07 02:48:21 (8 months ago)

Author:

rho

Message:

Path #213, admin can view error log inside elggadmin

Signed-off: Rolando Espinoza La fuente <rho@prosoftpeople.com>

Files:

• devel/mod/elggadmin/lib.php (modified) (3 diffs)
• devel/mod/elggadmin/lib/elggadmin.inc.php (modified) (5 diffs)

devel/mod/elggadmin/lib.php

@@ -17 +17 @@
-
-        elggadmin_add_rule('mod/elggadmin/?$', 'elggadmin_page');
-
-
+|logs
+|logs
-
-        elggadmin_add_function('elggadmin_page_before', 'elggadmin_actions');
@@ -53 +53 @@
-        // submenu options
-        pages_submenu_add('elggadmin', __gettext('Configuration manager'), get_url(null, 'elggadmin::'));
-
-
+
+
+
-
-        sidebar_add(50, 'sidebar-'.elggadmin_currentpage(), elggadmin_sidebar());
@@ -84 +85 @@
-            $url = get_url(null, 'elggadmin::') . '/frontpage';
-            break;
+        case 'elggadmin::logs':
+            $url = get_url(null, 'elggadmin::') . '/logs';
+            break;
+
-    }
-

devel/mod/elggadmin/lib/elggadmin.inc.php

@@ -30 +30 @@
-        $page = elggadmin_page_frontpage();
-        elggadmin_currentpage('frontpage');
+    } elseif ($page_name == 'logs') {
+        $page = elggadmin_page_logs();
+        elggadmin_currentpage('logs');
-    } else {
-        $page = elggadmin_page_config();
@@ -212 +215 @@
-}
-
+function elggadmin_page_logs() {
+    global $CFG;
+
+    $action = optional_param('action');
+    if ($action == 'elggadmin:logs:clear') {
+        elggadmin_writefile($CFG->dataroot.'errors.log',"");
+        header_redirect(get_url(null,'elggadmin::logs'), __gettext('Error log cleared'));
+    }
+
+    $logs = elggadmin_tailfile($CFG->dataroot.'errors.log', 50);
+
+    $clear = '» ' . pages_html_a(get_url_query(1, 'elggadmin::logs', 'action=elggadmin:logs:clear'), __gettext('Clear error log'));
+
+    $page = new StdClass;
+    $page->title = __gettext('Error log');
+    $page->body = pages_html_wrap('p', $clear);
+    $page->body .= pages_html_wrap('textarea', $logs, array('wrap'=>'off', 'readonly'=>'readonly'));
+
+    return $page;
+}
+
-function elggadmin_page_theme() {
-    $page = new StdClass;
@@ -436 +460 @@
-}
-
-
+, $attrs=null
-    $output = '';
+    $_attrs = array('name' => $tplname, 'style' => 'width:95%;height:300px;margin:0px 10px 20px 10px;');
+
-    if (is_string($title)) {
-        $output .= pages_html_wrap('h2', $title);
@@ -446 +472 @@
-    }
-
-
+
+
+
+
+
-
-    return $output;
@@ -498 +528 @@
-}
-
+function elggadmin_tailfile($file, $lines=20) {
+    if ($fp = @fopen($file, 'r')) {
+        $pos = -1;
+        $t = ' ';
+        $content = '';
+
+        if ($lines < 0) {
+            $lines = 20;
+        }
+
+        while ($lines > 0) {
+            if (!fseek($fp, $pos, SEEK_END)) {
+                $t = fgetc($fp);
+                $pos--;
+                if ($t == "\n") {
+                    $lines--;
+                }
+                $content = $t . $content;
+            } else {
+                rewind($fp);
+                $lines--;
+            }
+        }
+
+        @fclose($fp);
+        return $content;
+    } else {
+        return null;
+    }
+}
+
-?>