diff options
author | Øyvind Harboe <oyvind.harboe@zylin.com> | 2010-11-11 08:15:49 +0100 |
---|---|---|
committer | Øyvind Harboe <oyvind.harboe@zylin.com> | 2010-11-15 09:18:21 +0100 |
commit | fdae51287cf55a039f3401ed92151dbf518e4e7f (patch) | |
tree | 9a3bd5c3701da090b444b70770c941bdcce47058 /src/server/httpd/openocd.tcl | |
parent | 015bf559444edd9e7c524e951aad183fdaab9156 (diff) |
httpd: retire this server
this never panned out and there are enough mistakes in
the code that probably nobody used this.
Use the tcl server and implement a standalone http
app instead works fine.
Signed-off-by: Øyvind Harboe <oyvind.harboe@zylin.com>
Diffstat (limited to 'src/server/httpd/openocd.tcl')
-rw-r--r-- | src/server/httpd/openocd.tcl | 355 |
1 files changed, 0 insertions, 355 deletions
diff --git a/src/server/httpd/openocd.tcl b/src/server/httpd/openocd.tcl deleted file mode 100644 index 8607f185..00000000 --- a/src/server/httpd/openocd.tcl +++ /dev/null @@ -1,355 +0,0 @@ -# converted to .tcl by html2tcl.tcl -set buffer "" -append buffer { - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - <html xmlns="http://www.w3.org/TR/REC-html40"> -<head> -<title>OpenOCD debugger</title> -<meta charset="utf-8" content="text/html" http-equiv="Content-Type"/> -<link type="text/css" rel="stylesheet" href="menuweb.css"/> -</head> -} - - set console "" - set upload_filename /ram/upload - -append buffer { -<body style="margin:0px;"> -<div style="width:974px;height:85px;"> -<div style="float:left;position:relative;left:32px;width:478px;"> -<a href="/"> - OpenOCD - </a> -</div> -<div style="float:left;position:relative;height:26px; width:278px;left:122px;background-image:url('menu_cuts/top_right.png');"> -<div style="position:relative;left:15px;top:4px;" class="textlight"> -} -append buffer [capture version] -append buffer { -</div> -</div> -</div> -<table style="padding:0px;border-collapse:collapse;"> -<tr> -<td style="width:33px;"> -<div style="width:20px;height:510px;"> - - </div> -</td> -<td style="vertical-align:top;height:100%;width:140px;padding:0px;"> -<table style="padding:0px;border-collapse:collapse;height:100%;width:140px;"> -<tr style="height:59px;"> -<td/> -</tr> -<tr> -<td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab_selected.png');background-repeat: no-repeat;"> -<div style="position:relative;left:10px;top:10px;font-weight:bold;"> -<a href="openocd.tcl" style="font-weight: bold;">Run Command</a> -</div> -</td> -</tr> -<tr> -<td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;"> -<div style="position:relative;left:10px;top:10px;font-weight:bold;"> -<a href="guiupload.tcl" style="">Upload File</a> -</div> -</td> -</tr> -<tr> -<td style="width:140px;height:35px;background-image:url('menu_cuts/v_1.png')"/> -</tr> -<tr> -<td style="width:140px;background-image:url('menu_cuts/v_2_tile.png')"/> -</tr> -<tr> -<td style="width:140px;height:140px;background-image:url('menu_cuts/v_3.png')"/> -</tr> -</table> -</td> -<td style="vertical-align:top;padding:0px;height:100%"> -<table style="padding:0px;border-collapse:collapse;height:100%;"> -<tr> -<td> -<table style="padding:0px;border-collapse:collapse;"> -<tr> -<td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;"> -<div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"> -<a href="index.tcl">Config Target</a> -</div> -</td> -<td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;"> -<div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"> -<a href="flashinfo.tcl">Flash</a> -</div> -</td> -<td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;"> -<div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"> -<a href="browsemem.tcl">Memory</a> -</div> -</td> -<td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1_selected.png');background-repeat: no-repeat;"> -<div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"> -<a href="openocd.tcl" style="font-weight: bold;">OpenOCD</a> -</div> -</td> -</tr> -</table> -</td> -</tr> -<tr> -<td style="height:30px;width:535px;background-image:url('menu_cuts/center_top.png');background-repeat: no-repeat;background-position:top right;" colspan="6"> -<div style="width:500px;background-color:#ffffff;height:100%;"> - - </div> -</td> -</tr> -<tr> -<td style="background-color:#ffffff;text-indent:30px;height:40px;" colspan="6"> -<H1>Run Command</H1> -</td> -</tr> -<tr style="height:100%;"> -<td style="background-color:#ffffff;padding-left:30px;padding-right:30px;width=535px;height:100%;" colspan="6"> - - } - - set form_command [formfetch form_command] - - set form_edittext "" - if {[string length $form_command]>0} { - set form_edittext [capture_catch {eval $form_command}] - } - - append buffer {<form action="openocd.tcl" method="post">} "\n" - append buffer {Command<br>} - append buffer {<textarea style="overflow:auto;" rows="5" cols="65" name="form_command" wrap="off">} - append buffer [to_textarea $form_command] - append buffer {</textarea><br>} - append buffer {<input type="submit" value="Run" name="form_action" ><br>} - append buffer {<textarea style="overflow:auto;" rows="21" cols="65" name="form_edittext" readonly=1 wrap="off">} - append buffer [to_textarea $form_edittext] - append buffer {</textarea><br>} - - append buffer {</form>} "\n" - - -append buffer { - - </td> -</tr> -} - - - set toggle_details [formfetch toggle_details] - if {[string length $toggle_details]==0} { - set toggle_details 0 - } - set show_details [load_var show_details] - if {[string length $show_details]==0} { - set show_details 0 - } - if {$toggle_details==1} { - set show_details [expr 1-$show_details] - save_var show_details $show_details - } - - if {[string length $console]!=0} { - -append buffer { -<tr style="height:100%;"> -<td style="height:100%;background-color:red;" colspan="6"> -<table style="padding:0px;border-collapse:collapse;background-color:#ffffff;width:100%" class="textgray"> -<td style="width:25px;"> </td> -} - - if {$show_details==1} { - append buffer < - append buffer {td style="background-color:#dddddd;padding-left:5px;padding-right:5px;padding-top:3px;padding-bottom:3px;"} - append buffer > - } else { - append buffer < - append buffer {td style="background-image:url('menu_cuts/h_tab_free.png');width:110px;height:29px;background-repeat: no-repeat;background-position:top left;"} - append buffer > - } - -append buffer { -<a class="openocd" href="openocd.tcl?toggle_details=1"> -} - - if {$show_details==1} { - append buffer "Hide details" - append buffer <br/> - } else { - append buffer {<div style="position:relative;top:7px;text-align:center;">} - append buffer "Show details" - append buffer {</div>} - } - -append buffer { -</a> -} - - if {$show_details==1} { - append buffer $console - } - -append buffer {</td>} - - if {$show_details!=1} { - append buffer {<td> </td>} - } - -append buffer { -<td style="width:25px;"> </td> -</table> -</td> -</tr> -} - - } - -append buffer { -<tr> -<td style="height:30px;background-image:url('menu_cuts/center_bottom.png');background-repeat: no-repeat;background-position:top right;" colspan="6"> -<div style="width:500px;background-color:#ffffff;height:100%;"> - - </div> -</td> -</tr> -</table> -</td> -<td style="width:6px;"/> -<td style="width:245px;height:100%"> -<table style="padding:0px;border-collapse:collapse;height:100%;"> -<tr> -<td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab2_selected.png');background-repeat: no-repeat;"> -<div style="position:relative;top:7px;;font-weight:bold;text-align:center;width:100px;" class="textgray"> - Documentation - </div> -</td> -<td width="40px"> - - </td> -<td/> -</tr> -<tr> -<td style="height:10px;width:245px;background-image:url('menu_cuts/right_top_small.png');" colspan="3"/> -</tr> -<tr> -<td style="background-color:#d8d7d7;width:245px;padding-left:10px;padding-buttom:10px;line-height:17px;" colspan="3"> -<a target="_blank" href="http://openocd.berlios.de/doc/openocd.pdf">OpenOCD Manual</a> -<br/> -</td> -</tr> -<tr> -<td style="background-color:#d8d7d7;height:15px;" colspan="3"/> -</tr> -<tr> -<td colspan="3"> -<table style="padding:0px;border-collapse:collapse;"> -<td style="background-color:#d8d7d7;width:10px;height:1px"/> -<td style="background-color:#999999;width:225px; height:1px;"/> -<td style="background-color:#d8d7d7;width:10px;height:1px"/> -</table> -</td> -</tr> -<tr> -<td style="background-color:#d8d7d7;height:15px;" colspan="3"/> -</tr> -<tr style="height:100%;"> -<td style="height:100%;background-color:#d8d7d7;padding-left:10px;padding-right:10px;" colspan="3" class="textgray"> - - <p>Run tcl statement(s). Add "ocd_" prefix to OpenOCD commands otherwise - there will be no output, e.g. "reset init" use "ocd_reset init". - <p/> - <p><a href="/ram/log">Click here to download log</a>.</p> - <p>To download log you can also use commands like "wget http://} -append buffer [ip] -append buffer {/ram/log", or - point your web browser to said address.</p> - <p> - You can also execute tcl commands using curl from your developer PC: - </p> - <code> - curl --form form_command=ocd_version } -append buffer [ip] -append buffer {runtcl.tcl - </code> - - - </td> -</tr> -<tr> -<td style="height:30px;background-image:url('menu_cuts/right_bottom.png');" colspan="3"> - - </td> -</tr> -</table> -</td> -</tr> -</table> -</body> -</html> - - - - - - - - - - - - - - - - - - - -} - -start_chunked "html" -write_chunked $buffer -end_chunked - |