Changeset 14299

Show
Ignore:
Timestamp:
10/12/06 23:26:49 (2 years ago)
Author:
andara
svk:copy_cache_prev:
21165
Message:

[runpugs]
-added info page, small change to front page

Location:
misc/runpugs
Files:
2 added
5 modified

Legend:

Unmodified
Added
Removed
  • misc/runpugs/README

    r14202 r14299  
    11============================================================================== 
    2 2006/10/10      Release of version 0.1.0 of runpugs/WebTerminal 
     22006/10/12      Release of version 0.1.0 of runpugs/WebTerminal 
    33============================================================================== 
    4  
    54 
    65NAME 
     
    2019    (data/runpugs.html). The latter calls the runpugs.cc stylesheet from 
    2120    htdocs/runpugs.css 
    22     -a server which handles the interactive pugs sessions and communicates with 
    23     the cgi script. The pugs sessions stay alive for some time (currently 30') if 
     21    -a server (bin/termserv.pl) which handles the interactive pugs sessions and communicates with 
     22    the cgi script. The pugs sessions stay alive for some time (currently 10') if 
    2423    left inactive. 
    2524 
  • misc/runpugs/TODO

    r14202 r14299  
    1 runpugs TODO 
     1runpugs version 0.1.0 TODO: 
    22 
    3 2006/10/10 
    4 -add command history 
    5 -make scrollbar jump to end of textarea 
    6 -refactor to make more generic 
    7 -let send() return reply and prompt separately 
    8 -add POD 
    9 -use async JavaScript for front-end 
     32006/10/12 
     4* Unicode: hack Net::Telnet so it handles Unicode 
     5* Refactor to make more generic 
     6    -prompt handling should be in cgi-bin/runpugs, not in Dispatcher.pm 
     7    -Various configuration variables should be in a Config.pm module,  
     8     and be overriden from the scripts. 
     9    -let Dispatcher::send() return reply and prompt separately 
     10* add POD 
     11* Add proper copyright & licensing info, in particular to Msg.pm 
     12* use async JavaScript for front-end? cfr. tryruby.hobix.com 
  • misc/runpugs/data/runpugs.html

    r14266 r14299  
    2222return true; 
    2323} 
    24  
    2524</script> 
    26  
    2725</head> 
    2826<body> 
    29 <!-- 
    30 <body onLoad="closing=true" onUnload="if (closing){alert(42); 
    31 window.open('feather.perl6.nl:8080/cgi-bin/runpugs?action=runpugs&sessionid='+document.terminal.sessionid.value+'&testing=1&cmd=pugs%3E%20%3Aq','newwin');}"> 
    32 --> 
    3327<div id="mainwindow"> 
    3428<h1>Run Perl6 now -- in your browser!</h1> 
    35 <p class="warning">Thank you for trying runpugs, a web terminal for pugs.<br> 
    36 * This is a test run, it might die unexpectedly!<br> 
    37 * pugs runs in safe mode<br> 
    38 * Unicode is not supported 
     29<p>This live web terminal runs the latest developement snapshot of 
     30the <a href="http://www.pugscode.org">pugs</a> interpreter for <a 
     31href="http://dev.perl.org/perl6/">Perl6</a>. For more information, read <a 
     32href="http://feather.perl6.nl/~andara/runpugs/">this</a>. 
    3933</p> 
    4034<form style="text-align: center" id="term" name="terminal" action="/cgi-bin/runpugs" method="POST">                   
  • misc/runpugs/htdocs/runpugs.css

    r14266 r14299  
    1 BODY {width:100%;margin-left:10%;margin-right:10%; margin-top: 10px; font-family: Verdana, Geneva, Arial, Helvetica, sans-serif; font-size: 12pt; line-height: normal; background-color:#FFFFFF;} 
     1BODY {width:100%;margin-left:10%;margin-right:10%; margin-top: 10px; font-family: Verdana, Geneva, Arial, Helvetica, sans-serif; font-size: 11pt; line-height: normal; background-color:#FFFFFF;} 
    22H1 {font-size: 24pt;  
    33    font-family: Georgia, Serif, Times;  
     
    99H2 { font-weight: bold; font-size: 12pt} 
    1010LABEL {font-weight: bold; } 
     11EM {font-weight: bold; 
     12    font-style: normal; 
     13    text-decoration:none;} 
     14TT {color: #204a87; 
     15font-weight: bold; 
     16} 
    1117.copyright {font-size: 9pt} 
    1218.warning { 
  • misc/runpugs/lib/WebTerminal/Server.pm

    r14271 r14299  
    7676                        ( my $id, my $ip, my $cmd ) = split( "\n", $msg, 3 ); 
    7777            $cmd=pack("U0C*", unpack("C*",$cmd)); 
    78             print "$id($ip): ",$cmd,"\n"; 
     78#            print "$id($ip): ",$cmd,"\n"; 
    7979                        my $lines = &termhandler( $id, $ip, $cmd ); 
    8080                        $conn->send_now("$id\n$lines"); 
     
    9393my $port=shift; 
    9494$SIG{USR1}=\&timeout; 
    95 #Proc::Daemon::Init; 
     95Proc::Daemon::Init; 
    9696# fork/exec by the book: 
    9797use Errno qw(EAGAIN);