From: ntfreak at B. <nt...@ma...> - 2008-12-23 13:52:22
|
Author: ntfreak Date: 2008-12-23 13:52:14 +0100 (Tue, 23 Dec 2008) New Revision: 1273 Modified: trunk/src/server/httpd/Stylizer.class trunk/src/server/httpd/Stylizer.java trunk/src/server/httpd/browsemem.tcl trunk/src/server/httpd/build.sh trunk/src/server/httpd/downloadmem.tcl trunk/src/server/httpd/editconfigs.tcl trunk/src/server/httpd/editfile.tcl trunk/src/server/httpd/erase.tcl trunk/src/server/httpd/flash.tcl trunk/src/server/httpd/flashinfo.tcl trunk/src/server/httpd/guiupload.tcl trunk/src/server/httpd/html2tcl.sh trunk/src/server/httpd/httpd.tcl trunk/src/server/httpd/index.tcl trunk/src/server/httpd/log.tcl trunk/src/server/httpd/menu.xml trunk/src/server/httpd/menu.xsl trunk/src/server/httpd/menu_cuts/center_bottom.png trunk/src/server/httpd/menu_cuts/center_top.png trunk/src/server/httpd/menu_cuts/h_tab1.png trunk/src/server/httpd/menu_cuts/h_tab1_selected.png trunk/src/server/httpd/menu_cuts/h_tab2.png trunk/src/server/httpd/menu_cuts/h_tab2_selected.png trunk/src/server/httpd/menu_cuts/h_tab_free.png trunk/src/server/httpd/menu_cuts/logo_bottom.png trunk/src/server/httpd/menu_cuts/logo_top.png trunk/src/server/httpd/menu_cuts/right_bottom.png trunk/src/server/httpd/menu_cuts/right_top.png trunk/src/server/httpd/menu_cuts/right_top_small.png trunk/src/server/httpd/menu_cuts/top_right.png trunk/src/server/httpd/menu_cuts/v_1.png trunk/src/server/httpd/menu_cuts/v_2_tile.png trunk/src/server/httpd/menu_cuts/v_3.png trunk/src/server/httpd/menu_cuts/v_tab.png trunk/src/server/httpd/menu_cuts/v_tab_selected.png trunk/src/server/httpd/menuweb.css trunk/src/server/httpd/openocd.tcl trunk/src/server/httpd/preconfig.tcl trunk/src/server/httpd/production.tcl trunk/src/server/httpd/readme.txt trunk/src/server/httpd/reload.tcl trunk/src/server/httpd/run.tcl trunk/src/server/httpd/support.tcl trunk/src/server/httpd/targets.tcl trunk/src/server/httpd/terminal.tcl trunk/src/server/httpd/upgrade.tcl Log: - add missing svn props from r1270 commit - change mime-type for png files to image/png Property changes on: trunk/src/server/httpd/Stylizer.class ___________________________________________________________________ Name: svn:executable + * Property changes on: trunk/src/server/httpd/Stylizer.java ___________________________________________________________________ Name: svn:executable + * Modified: trunk/src/server/httpd/browsemem.tcl =================================================================== --- trunk/src/server/httpd/browsemem.tcl 2008-12-23 08:52:02 UTC (rev 1272) +++ trunk/src/server/httpd/browsemem.tcl 2008-12-23 12:52:14 UTC (rev 1273) @@ -1,454 +1,454 @@ -# 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="browsemem.tcl" style="font-weight: bold;">Browse / Edit</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="downloadmem.tcl" style="">Download</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_selected.png');background-repeat: no-repeat;"> -<div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"> -<a href="browsemem.tcl" style="font-weight: bold;">Memory</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="openocd.tcl">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>Browse / Edit Memory</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_address [formfetch form_address] - set form_length [formfetch form_length] - set form_type [formfetch form_type] - set form_action [formfetch form_action] - set form_value [formfetch form_value] - - if {[string compare $form_length ""]==0} { - set form_length 0 - } - if {$form_length<=0} { - set form_length 0x80 - } - if {$form_length>0x1000} { - set form_length 0x1000 - } - - if {[string compare $form_type ""]==0} { - set form_type mdw - } - - if {[string compare $form_type "mdw"]==0} { - set wordsize 4 - set modify_cmd mww - } - if {[string compare $form_type "mdh"]==0} { - set wordsize 2 - set modify_cmd mwh - } - if {[string compare $form_type "mdb"]==0} { - set wordsize 1 - set modify_cmd mwb - } - - - - - if {[string compare $form_address ""]!=0} { - if {[string compare $form_action "Previous"]==0} { - # Kludge! Work around problems parsing hex in Jim Tcl expressions - incr form_address ; set form_address [expr $form_address-1] - if {$form_address-$form_length>0} { - set form_address "0x[tohex [expr $form_address-$form_length]]" - } else { - set form_address "0x0" - } - } - if {[string compare $form_action "Next"]==0} { - # Kludge! Work around problems parsing hex in Jim Tcl expressions - incr form_address ; set form_address [expr $form_address-1] - set form_address "0x[tohex [expr $form_address+$form_length]]" - } - if {[string compare $form_action "Modify"]==0} { - append console [capture_catch "$modify_cmd $form_address $form_value"] - } - if {[string compare $form_action "Fill"]==0} { - append console [capture_catch "$modify_cmd $form_address $form_value $form_length"] - } - } - - - -append buffer { - - <form action="browsemem.tcl" method="post"> - <table> - <tr><td class="formtext">Address</td><td><input type="text" name="form_address" value="} -append buffer $form_address -append buffer {"></td></tr> - <tr><td class="formtext">Length</td><td><input type="text" name="form_length" value="} -append buffer "0x[tohex $form_length]" -append buffer {"></td></tr> - <tr><td class="formtext">Value</td><td><input type="text" name="form_value" value="} -append buffer $form_value -append buffer {"></td> - <td class="buttonspacesmall"> </td><td><input type="submit" name="form_action" value="Modify"></td> - <td class="buttonspacesmall"> </td><td><input type="submit" name="form_action" value="Fill"></td></tr> - <tr><td class="formtext">Type</td><td style="padding-top:1px;"> - <select name="form_type"> - <option - } -if {[string compare $form_type "mdb"]==0} { append buffer {selected="selected"} } -append buffer { value ="mdb">8 bit - </option> - <option - } -if {[string compare $form_type "mdh"]==0} { append buffer {selected="selected"} } -append buffer { value ="mdh">16 bit - </option> - <option - } -if {[string compare $form_type "mdw"]==0} { append buffer {selected="selected"} } -append buffer {value ="mdw">32 bit - </option> - </select> - - </td></tr> - </table> - <table> - <tr><td style="height:15px;width:535px;"> </td></tr> - <tr><td style="height:1px;width:535px;background-color:#a2c5d1;"></td></tr> - <tr><td style="height:15px;width:535px;"> </td></tr> - </table> - - <table><tr> - <td><input type="submit" name="form_action" value="Refresh"></td> - <td class="buttonspacesmall"> </td><td><input type="submit" name="form_action" value="Previous" ></td> - <td class="buttonspacesmall"> </td><td><input type="submit" name="form_action" value="Next" ></td> - </tr></table> - <br> - - </form> - <p> - <div class="fontbigger">Memory:</div><p> - <code style="white-space: nowrap; font-size:11px;font:courier new;"> - } - - if {[string compare $form_address ""]!=0} { - append console [encode [capture_catch halt]] - append buffer [encode [capture_catch "$form_type $form_address [expr $form_length]"]] - } - -append buffer { - </code> - - - - - - </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="browsemem.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>Browse and edit target memory.<br> - Length is in bytes, maximum 4096 bytes.</p> - <p>An error message is shown when trying to browse or edit memory which cases a CPU fault.</p> - <p>CPU will be halted if required.</p> - <p><b>Modify</b> - Will modify only one byte, half-word or word starting at Address.</p> - <p><b>Fill</b> - Will fill the specified region with the specified value.</p> - <p><b>Refresh</b> - Display the content of the specified memory area.</p> - - </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 - +# 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="browsemem.tcl" style="font-weight: bold;">Browse / Edit</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="downloadmem.tcl" style="">Download</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_selected.png');background-repeat: no-repeat;"> +<div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"> +<a href="browsemem.tcl" style="font-weight: bold;">Memory</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="openocd.tcl">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>Browse / Edit Memory</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_address [formfetch form_address] + set form_length [formfetch form_length] + set form_type [formfetch form_type] + set form_action [formfetch form_action] + set form_value [formfetch form_value] + + if {[string compare $form_length ""]==0} { + set form_length 0 + } + if {$form_length<=0} { + set form_length 0x80 + } + if {$form_length>0x1000} { + set form_length 0x1000 + } + + if {[string compare $form_type ""]==0} { + set form_type mdw + } + + if {[string compare $form_type "mdw"]==0} { + set wordsize 4 + set modify_cmd mww + } + if {[string compare $form_type "mdh"]==0} { + set wordsize 2 + set modify_cmd mwh + } + if {[string compare $form_type "mdb"]==0} { + set wordsize 1 + set modify_cmd mwb + } + + + + + if {[string compare $form_address ""]!=0} { + if {[string compare $form_action "Previous"]==0} { + # Kludge! Work around problems parsing hex in Jim Tcl expressions + incr form_address ; set form_address [expr $form_address-1] + if {$form_address-$form_length>0} { + set form_address "0x[tohex [expr $form_address-$form_length]]" + } else { + set form_address "0x0" + } + } + if {[string compare $form_action "Next"]==0} { + # Kludge! Work around problems parsing hex in Jim Tcl expressions + incr form_address ; set form_address [expr $form_address-1] + set form_address "0x[tohex [expr $form_address+$form_length]]" + } + if {[string compare $form_action "Modify"]==0} { + append console [capture_catch "$modify_cmd $form_address $form_value"] + } + if {[string compare $form_action "Fill"]==0} { + append console [capture_catch "$modify_cmd $form_address $form_value $form_length"] + } + } + + + +append buffer { + + <form action="browsemem.tcl" method="post"> + <table> + <tr><td class="formtext">Address</td><td><input type="text" name="form_address" value="} +append buffer $form_address +append buffer {"></td></tr> + <tr><td class="formtext">Length</td><td><input type="text" name="form_length" value="} +append buffer "0x[tohex $form_length]" +append buffer {"></td></tr> + <tr><td class="formtext">Value</td><td><input type="text" name="form_value" value="} +append buffer $form_value +append buffer {"></td> + <td class="buttonspacesmall"> </td><td><input type="submit" name="form_action" value="Modify"></td> + <td class="buttonspacesmall"> </td><td><input type="submit" name="form_action" value="Fill"></td></tr> + <tr><td class="formtext">Type</td><td style="padding-top:1px;"> + <select name="form_type"> + <option + } +if {[string compare $form_type "mdb"]==0} { append buffer {selected="selected"} } +append buffer { value ="mdb">8 bit + </option> + <option + } +if {[string compare $form_type "mdh"]==0} { append buffer {selected="selected"} } +append buffer { value ="mdh">16 bit + </option> + <option + } +if {[string compare $form_type "mdw"]==0} { append buffer {selected="selected"} } +append buffer {value ="mdw">32 bit + </option> + </select> + + </td></tr> + </table> + <table> + <tr><td style="height:15px;width:535px;"> </td></tr> + <tr><td style="height:1px;width:535px;background-color:#a2c5d1;"></td></tr> + <tr><td style="height:15px;width:535px;"> </td></tr> + </table> + + <table><tr> + <td><input type="submit" name="form_action" value="Refresh"></td> + <td class="buttonspacesmall"> </td><td><input type="submit" name="form_action" value="Previous" ></td> + <td class="buttonspacesmall"> </td><td><input type="submit" name="form_action" value="Next" ></td> + </tr></table> + <br> + + </form> + <p> + <div class="fontbigger">Memory:</div><p> + <code style="white-space: nowrap; font-size:11px;font:courier new;"> + } + + if {[string compare $form_address ""]!=0} { + append console [encode [capture_catch halt]] + append buffer [encode [capture_catch "$form_type $form_address [expr $form_length]"]] + } + +append buffer { + </code> + + + + + + </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="browsemem.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>Browse and edit target memory.<br> + Length is in bytes, maximum 4096 bytes.</p> + <p>An error message is shown when trying to browse or edit memory which cases a CPU fault.</p> + <p>CPU will be halted if required.</p> + <p><b>Modify</b> - Will modify only one byte, half-word or word starting at Address.</p> + <p><b>Fill</b> - Will fill the specified region with the specified value.</p> + <p><b>Refresh</b> - Display the content of the specified memory area.</p> + + </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 + Property changes on: trunk/src/server/httpd/browsemem.tcl ___________________________________________________________________ Name: svn:eol-style + native Property changes on: trunk/src/server/httpd/build.sh ___________________________________________________________________ Name: svn:executable + * Name: svn:eol-style + LF Modified: trunk/src/server/httpd/downloadmem.tcl =================================================================== --- trunk/src/server/httpd/downloadmem.tcl 2008-12-23 08:52:02 UTC (rev 1272) +++ trunk/src/server/httpd/downloadmem.tcl 2008-12-23 12:52:14 UTC (rev 1273) @@ -1,366 +1,366 @@ -# 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.png');background-repeat: no-repeat;"> -<div style="position:relative;left:10px;top:10px;font-weight:bold;"> -<a href="browsemem.tcl" style="">Browse / Edit</a> -</div> -</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="downloadmem.tcl" style="font-weight: bold;">Download</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_selected.png');background-repeat: no-repeat;"> -<div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"> -<a href="browsemem.tcl" style="font-weight: bold;">Memory</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="openocd.tcl">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>Download Memory Range</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_address [formfetch form_address] - set form_length [formfetch form_length] - set form_action [formfetch form_action] - -append buffer { - <form action="downloadmem.tcl" method="post"> - <table> - <tr><td class="formtext">Address</td><td><input type="text" name="form_address" value="} -append buffer $form_address -append buffer {"></td></tr> - <tr><td class="formtext">Length</td><td><input type="text" name="form_length" value="} -append buffer $form_length -append buffer {"></td></tr> - </td></tr> - </table> - - <table> - <tr><td style="height:15px;width:535px;"> </td></tr> - <tr><td style="height:1px;width:535px;background-color:#a2c5d1;"></td></tr> - <tr><td style="height:15px;width:535px;"> </td></tr> - </table> - - <input type="submit" value="Download" name="form_action"> - - - </form> - } - - if {[string compare $form_action "Download"]==0} { - append console [encode [capture_catch "reset init"]] - append console [encode [capture_catch "dump_image /tmp/dump.bin $form_address $form_length"]] - -append buffer { - <form action="../dump.bin" target="_blank"> - <input type="submit" name="form_action" value="Save downloaded memory"> - </form> - } - - } - - -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="downloadmem.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"> - - Download memory from target. <br> - <b>Note</b> that download memory can take - a long time(potentially minutes for megabytes at low JTAG clk speeds). - <p/> - Once the memory is downloaded a link is available on the page to download - the file to your PC. - - </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 - +# 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.png');background-repeat: no-repeat;"> +<div style="position:relative;left:10px;top:10px;font-weight:bold;"> +<a href="browsemem.tcl" style="">Browse / Edit</a> +</div> +</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="downloadmem.tcl" style="font-weight: bold;">Download</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_selected.png');background-repeat: no-repeat;"> +<div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"> +<a href="browsemem.tcl" style="font-weight: bold;">Memory</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="openocd.tcl">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>Download Memory Range</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_address [formfetch form_address] + set form_length [formfetch form_length] + set form_action [formfetch form_action] + +append buffer { + <form action="downloadmem.tcl" method="post"> + <table> + <tr><td class="formtext">Address</td><td><input type="text" name="form_address" value="} +append buffer $form_address +append buffer {"></td></tr> + <tr><td class="formtext">Length</td><td><input type="text" name="form_length" value="} +append buffer $form_length +append buffer {"></td></tr> + </td></tr> + </table> + + <table> + <tr><td style="height:15px;width:535px;"> </td></tr> + <tr><td style="height:1px;width:535px;background-color:#a2c5d1;"></td></tr> + <tr><td style="height:15px;width:535px;"> </td></tr> + </table> + + <input type="submit" value="Download" name="form_action"> + + + </form> + } + + if {[string compare $form_action "Download"]==0} { + append console [encode [capture_catch "reset init"]] + append console [encode [capture_catch "dump_image /tmp/dump.bin $form_address $form_length"]] + +append buffer { + <form action="../dump.bin" target="_blank"> + <input type="submit" name="form_action" value="Save downloaded memory"> + </form> + } + + } + + +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="downloadmem.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"> + + Download memory from target. <br> + <b>Note</b> that download memory can take + a long time(potentially minutes for megabytes at low JTAG clk speeds). + <p/> + Once the memory is downloaded a link is available on the page to download + the file to your PC. + + </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 + Property changes on: trunk/src/server/httpd/downloadmem.tcl ___________________________________________________________________ Name: svn:eol-style + native Modified: trunk/src/server/httpd/editconfigs.tcl =================================================================== --- trunk/src/server/httpd/editconfigs.tcl 2008-12-23 08:52:02 UTC (rev 1272) +++ trunk/src/server/httpd/editconfigs.tcl 2008-12-23 12:52:14 UTC (rev 1273) @@ -1,462 +1,462 @@ -# converted to .tcl by html2tcl.tcl -set buffer "" -append buffer { - - - - - - - - - - <html xmlns="http://www.w3.org/TR/REC-html40"> -<head> -<title>Zylin ZY1000 JTAG 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="/"> -<img src="menu_cuts/logo_top.png" style="border:0px;"/> -</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.png');background-repeat: no-repeat;"> -<div style="position:relative;left:10px;top:10px;font-weight:bold;"> -<a href="index.tcl" style="">Target Status</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="preconfig.tcl" style="">Select Target Config</a> -</div> -</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="editconfigs.tcl" style="font-weight: bold;">Edit Configurations</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="reload.tcl" style="">Reload Config Scripts</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_selected.png');background-repeat: no-repeat;"> -<div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"> -<a href="index.tcl" style="font-weight: bold;">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.png');background-repeat: no-repeat;"> -<div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"> -<a href="openocd.tcl">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>Edit Target Configurations</H1> -</td> -</tr> -<tr style="height:100%;"> -<td style="background-color:#ffffff;padding-left:30px;padding-right:30px;width=535px;height:100%;" colspan="6"> - <form action="editconfigs.tcl" method="post"> - } - - set form_edittext [formfetch form_edittext] - set form_action [formfetch form_action] - set form_filename [formfetch form_filename] - set form_selected [formfetch form_selected] - - if {[string compare $form_action "Load"]==0} { - set form_filename $form_selected - } - - if {[string compare $form_action "Delete"]==0} { - capture_catch "rm /config/settings/$form_selected" - } - - if {[string compare $form_action "Save"]==0} { - save_var $form_filename [from_textarea $form_edittext] - append buffer "Wrote file $form_filename<br>" - } - - set form_edittext "" - - # load original or script saved on disk. - if {[string compare $form_action "Show default"]==0} { - set form_edittext [load_file "/rom/$form_selected"] - set form_filename $form_selected - } else { - set form_edittext [load_config $form_filename] - } - - set form_edittext_subst [to_textarea $form_edittext] - - - proc prepend { val list } { - set res "" - foreach value $list { - set t $val - append t $value - lappend res $t - } - return $res - } - - set files [prepend target/ [ls /rom/target]] - set files [lunion $files [prepend event/ [ls /config/settings/event]]] - set files [lunion $files [prepend target/ [ls /config/settings/target]]] - set files [lsort $files] - - -append buffer { - <table style="padding:0px;border-collapse:collapse;"><tr> - <td style="padding-top:1px;"><select name="form_selected"> - } - - set foundTarget 0 - foreach i $files { - -append buffer { - <option - } - - if {[string compare $form_filename $i]==0} { - set foundTarget 1 - append buffer {selected="selected"} - } - -append buffer { - value="} -append buffer $i -append buffer {">} -append buffer $i -append buffer {</option> - } - - } - if {$foundTarget==0} { - -append buffer { - <option selected="selected" value="">Select target config</option> - } - - } - -append buffer { - </select></td> - <td class="buttonspacesmall"> </td> - <td><input type="submit" value="Load" name="form_action"></td> - <td class="buttonspacesmall"> </td> - <td><input type="submit" value="Show default" name="form_action"></td> - <td class="buttonspacesmall"> </td> - <td><input type="submit" value="Delete" name="form_action"></td> - </tr></table> - <textarea style="overflow:auto;" rows="21" cols="65" name="form_edittext" wrap="off">} -append buffer $form_edittext_subst -append buffer {</textarea> - <table style="padding:0px;border-collapse:collapse;"><tr> - } - - append buffer {<td class="formtext">File</td><td><input type="text" name="form_filename" } "\n" - append buffer "value=\"$form_filename\" ></td>\n" - append buffer {<td class="buttonspacesmall"> </td><td><input type="submit" value="Save" name="form_action"></td><br>} "\n" - append buffer {</tr></table>} "\n" - -append buffer { - </form> - </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="editconfigs.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://www.zylin.com/zy1000/ZY1000_Quick_S... [truncated message content] |