projects / webpac2 / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
design
[webpac2] / web / browse.cgi
diff --git a/web/browse.cgi b/web/browse.cgi
index 916d946..bc9340f 100755 (executable)
--- a/web/browse.cgi
+++ b/web/browse.cgi
@@ -18,7 +18,9 @@ my $abs_path = abs_path($0);
 $abs_path =~ s#/[^/]*$#/../#;
 
 my $db_path = $abs_path . '/db/';
-my $template_file = 'html_ffzg.tt';
+my $template_path = "$abs_path/conf/output/tt";
+opendir(my $dir, $template_path) || die "can't open template path $template_path: $!";
+my @templates = grep { /\.tt$/i } readdir($dir);
 my $css_file = 'user.css';
 
 my $iconv_utf8 = new Text::Iconv('ISO-8859-2', 'UTF-8');
@@ -31,7 +33,7 @@ my $db = new WebPAC::DB(
 );
 
 my $out = new WebPAC::Output::TT(
-       include_path => "$abs_path/conf/output/tt",
+       include_path => $template_path,
        filters => { foo => sub { shift } },
 );
 
@@ -39,6 +41,7 @@ my $q = new CGI::Simple;
 my $self = $q->url( '-path_info'=>1, '-query'=>0, '-full'=>0 );
 
 my $rec = $q->param('rec') || 1;
+my $template_filename = $q->param('template') || $templates[0];
 
 print $q->header( -charset    => 'utf-8' );
 
@@ -72,18 +75,35 @@ sub get_file_in_html($) {
        return $content;
 }
 
+sub template_list_html($) {
+       my $current = shift || die;
+
+       my $html = qq{ Template\n<ul> };
+
+       foreach my $t (sort @templates) {
+               if ($t eq $current) {
+                       $html .= qq{ <li><b>$t</b></li> };
+               } else {
+                       $html .= qq{ <li><a href="#" onClick="load_template('$t'); return false;">$t</a></li> };
+               }
+       }
+
+       $html .= qq{ </ul> };
+       return $html;
+}
+
 ##----
 
 if ($q->path_info =~ m#xml#) {
 
-       my @ds = $db->load_ds($rec);
+       my $ds = $db->load_ds($rec);
 
-       if (@ds && $#ds > 0) {
+       if ($ds) {
                print qq{<response>
 <action type='html' target='div_record' errorCode='' errorMessage='' >
                }, $iconv_utf8->convert( $out->apply(
-                       template => $template_file,
-                       data => \@ds,
+                       template => $template_filename,
+                       data => $ds,
                ) ), qq{
 
 </action>
@@ -115,9 +135,20 @@ if ($q->path_info =~ m#xml#) {
                exit;
        }
 
+} elsif ($q->path_info =~ m#template_list#) {
+
+               print qq{<response>
+<action type='html' target='div_template_list' errorCode='' errorMessage='' >
+<div>} . template_list_html($template_filename) . qq{</div>
+</action>
+</response>
+               };
+
+               exit;
+
 } elsif ($q->path_info =~ m#template#) {
 
-               my $template_path = $out->{'include_path'} . '/' . $template_file;
+               my $template_path = $out->{'include_path'} . '/' . $template_filename;
 
                if ($q->param('save_template')) {
 
@@ -125,7 +156,7 @@ if ($q->path_info =~ m#xml#) {
 
                        print qq{<response>
 <action type='html' target='div_template_status' errorCode='' errorMessage='' >
-<tt>$template_file</tt> saved
+<tt>$template_filename</tt> saved
 </action>
 <action type='js'>
 <!--
@@ -158,12 +189,13 @@ $tmpl
 -->
 &nbsp;&nbsp;<span id="div_template_status" style="color: #808080;">idle</span>
 
-<input type='hidden' value='hidden post value' name='hidValue' />
+<input type="hidden" name="template" value="$template_filename" />
 
 </form>
 </action>
 <action type='js'>
 <!--
+iwfOpacity('div_template', 100);
 iwfHideGentlyDelay('div_template_status', 2, 2000, 1);
 -->
 </action>
@@ -227,6 +259,9 @@ iwfLog('loaded CSS template');
                exit;
 
 } else {
+
+       my $template_list_html = template_list_html($template_filename);
+
        print <<"_END_OF_HEAD_";
 <html>
 <head>
@@ -243,6 +278,7 @@ iwfLog('loaded CSS template');
 
 var rec = $rec ;
 var url = '$self';
+var template_filename = '$template_filename';
 
 var css_rnd = 0;
 
@@ -258,7 +294,7 @@ function load_rec(nr) {
                iwfShow('a_left_arr', 1);
        }
        update_status(nr+'...');
-       iwfRequest( url+'/xml/?rec='+nr, 'div_record' );
+       iwfRequest( url+'/xml/?template='+template_filename+'&rec='+nr, 'div_record' );
        iwfOpacity('div_record', 30);
 }
 
@@ -293,6 +329,18 @@ function edit_css() {
        return false;
 }
 
+function load_template(name) {
+       iwfLog('changing template to '+name);
+       iwfOpacity('div_template', 30);
+       template_filename = name;
+       // load template editor
+       iwfRequest( url+'/template/?template='+template_filename, 'div_template' );
+       load_rec(rec);
+
+       // refresh template list
+       iwfRequest( url+'/template_list/?template='+template_filename, 'div_template_list' );
+}
+
 function init_page() {
        iwfLog('div_css = ' + iwfX('div_css') + ':' + iwfY('div_css'));
        iwfLog('div_template = ' + iwfX('div_template') + ':' + iwfY('div_template'));
@@ -302,10 +350,9 @@ function init_page() {
 
        iwfLog('div_css = ' + iwfX('div_css') + ':' + iwfY('div_css'));
 
-       load_rec(rec);
+       // load template editor and record
+       load_template(template_filename);
 
-       // load template editor
-       iwfRequest( url+'/template/', 'div_template' );
        // load css editor
        iwfRequest( url+'/css/', 'div_css' );
 }
@@ -319,7 +366,6 @@ function init_page() {
 </div>
 
 db_path = <tt>$db_path</tt><br/>
-template = <tt>$template_file</tt><br/>
 css = <tt>$css_file</tt>
 
 <div style="background: #e0e0e0; padding: 0.5em; display: block;">
@@ -332,13 +378,20 @@ css = <tt>$css_file</tt>
 
 </div>
 
+
+<div id="div_template_list" style="display: inline; border: 2px solid #ffcc88; float: right; z-index: 10;">
+$template_list_html
+</div>
+
 <div>
 
-<div style="display: block;">
+<div style="border: 2px solid #ffff80;">
+
 Editor
 <a id="a_template" href="#" onClick="return edit_template();">template</a>
 <a id="a_css" href="#" onClick="return edit_css();">css</a>
 
+
 <div id="div_template">
 <span style="color: #808080;"> no template loaded yet. </span>
 </div>
Unnamed repository; edit this file 'description' to name the repository.