# HG changeset patch
# User igor@chub.in
# Date 1216762886 -10800
# Node ID 51a232faeb27b01ce4c0a3c0c8a6131bb6efaee7
# Parent  e939c147dcdd988e37077c0023710b419970527a
Ссылки в блоках на wiki на команды

Если кликнуть на команду в wiki,
попадёшь на соответствующую команду
в журнале.
Пока что не поддерживаются
многостраничные журналы

diff -r e939c147dcdd -r 51a232faeb27 l3-cgi-lite
--- a/l3-cgi-lite	Tue Jul 22 00:16:20 2008 +0300
+++ b/l3-cgi-lite	Wed Jul 23 00:41:26 2008 +0300
@@ -38,7 +38,19 @@
 my $frontend_css = $l3config::Config{"frontend_css"} ;
 
 my $filter=$ENV{QUERY_STRING};
-if ($filter !~ /filter=/) {
+if ($filter =~ /page=([^&]*)/ ) {
+    open(PAGE_NAME, "grep $1 $real_path/sessions-index | tail -1 | sed 's^-<.*^^; s^/[^/]*\$^^'| ");
+    my $page_name;
+    $page_name=<PAGE_NAME>;
+    chomp $page_name;
+    my $id="";
+    if ($filter =~ /id=([^&]*)/) {
+        $id="#$1";
+    }
+    print "Status: 302 Moved\nLocation: http://xgu.ru/l3/$page_name$id\n\n";
+    exit(0);
+}
+elsif ($filter !~ /filter=/) {
 #    $filter="";
 }
 else {
diff -r e939c147dcdd -r 51a232faeb27 l3pre.php
--- a/l3pre.php	Tue Jul 22 00:16:20 2008 +0300
+++ b/l3pre.php	Wed Jul 23 00:41:26 2008 +0300
@@ -7,9 +7,21 @@
 }
 
 function renderLiLaLoPRE( $input ) {
-    $input = preg_replace('/[^\n]*l3: local_session_id[^\n]*[\n]/', '', $input);
-    $input = preg_replace('/((..:..:...)(#[^\n]*))/', '$2<b><a href="http://xgu.ru/">$3</a></b>', $input);
-    return "<pre>$input</pre>";
+    preg_match('/[^\n]*l3: local_session_id=([0-9-]*)[^\n]*[\n]/', $input, $matches);
+    $session_id=$matches[1];
+    preg_match('/([0-9]*)-([0-9]*)/', $session_id, $matches);
+    $session_start_time = intval($matches[2]);
+    $hour=intval(date('G', $session_start_time));
+    $min=intval(date('i', $session_start_time));
+    $sec=intval(date('s', $session_start_time));
+    $input = preg_replace('/[^\n]*l3: local_session_id=([0-9-]*)[^\n]*[\n]/', '', $input);
+    $input = preg_replace('/((..):(..):(...)(#[^\n]*))/e', 
+                          '\'$2:$3:$4<b><a href="http://xgu.ru/l3?page='.$session_id.'&id='
+                             .'\'.strval($session_start_time+3600*(intval("$2")-$hour)+60*(intval("$3")-$min)+1*(intval("$4")-$sec)).\''
+                             .'">$5</a></b>\'', 
+                          $input);
+#                             .strval($session_start_time+3600*(intval($2)-$hour)+60*(intval($3)-$min)+(intval($4)-$sec))
+    return "<pre>$hour:$min:$sec $input</pre>";
 }
 
 ?>