1 # converted to .tcl by html2tcl.tcl
47 <html xmlns="http://www.w3.org/TR/REC-html40">
49 <title>OpenOCD debugger</title>
50 <meta charset="utf-8" content="text/html" http-equiv="Content-Type"/>
51 <link type="text/css" rel="stylesheet" href="menuweb.css"/>
56 set upload_filename /ram/upload
59 <body style="margin:0px;">
60 <div style="width:974px;height:85px;">
61 <div style="float:left;position:relative;left:32px;width:478px;">
66 <div style="float:left;position:relative;height:26px; width:278px;left:122px;background-image:url('menu_cuts/top_right.png');">
67 <div style="position:relative;left:15px;top:4px;" class="textlight">
69 append buffer [capture version]
74 <table style="padding:0px;border-collapse:collapse;">
76 <td style="width:33px;">
77 <div style="width:20px;height:510px;">
81 <td style="vertical-align:top;height:100%;width:140px;padding:0px;">
82 <table style="padding:0px;border-collapse:collapse;height:100%;width:140px;">
83 <tr style="height:59px;">
87 <td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;">
88 <div style="position:relative;left:10px;top:10px;font-weight:bold;">
89 <a href="openocd.tcl" style="">Run Command</a>
94 <td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab_selected.png');background-repeat: no-repeat;">
95 <div style="position:relative;left:10px;top:10px;font-weight:bold;">
96 <a href="guiupload.tcl" style="font-weight: bold;">Upload File</a>
101 <td style="width:140px;height:35px;background-image:url('menu_cuts/v_1.png')"/>
104 <td style="width:140px;background-image:url('menu_cuts/v_2_tile.png')"/>
107 <td style="width:140px;height:140px;background-image:url('menu_cuts/v_3.png')"/>
111 <td style="vertical-align:top;padding:0px;height:100%">
112 <table style="padding:0px;border-collapse:collapse;height:100%;">
115 <table style="padding:0px;border-collapse:collapse;">
117 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;">
118 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">
119 <a href="index.tcl">Config Target</a>
122 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;">
123 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">
124 <a href="flashinfo.tcl">Flash</a>
127 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;">
128 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">
129 <a href="browsemem.tcl">Memory</a>
132 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1_selected.png');background-repeat: no-repeat;">
133 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">
134 <a href="openocd.tcl" style="font-weight: bold;">OpenOCD</a>
142 <td style="height:30px;width:535px;background-image:url('menu_cuts/center_top.png');background-repeat: no-repeat;background-position:top right;" colspan="6">
143 <div style="width:500px;background-color:#ffffff;height:100%;">
149 <td style="background-color:#ffffff;text-indent:30px;height:40px;" colspan="6">
153 <tr style="height:100%;">
154 <td style="background-color:#ffffff;padding-left:30px;padding-right:30px;width=535px;height:100%;" colspan="6">
158 set form_filename [formfetch form_filename];
159 set form_action [formfetch form_action];
160 #set form_filecontent [formfetch form_filecontent];
162 append buffer {<form enctype="multipart/form-data" action="guiupload.tcl" method="post">}
164 if {[string compare $form_action "Upload"]==0} {
165 if {[catch {writeform form_filecontent $form_filename} result]==0} {
166 append buffer [encode $result]
168 append buffer Wrote $form_filename
172 append buffer {<table style="padding:0px;border-collapse:collapse;"><tr><td class="formtext">Filename on OpenOCD machine</td><td><input type="text" name="form_filename"></td></tr>}
173 append buffer {<td class="formtext">File to upload</td><td><input type="file" name="form_filecontent"></td></tr></table>}
174 append buffer {<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>}
175 append buffer {<input type="submit" name="form_action" value="Upload" ><br> }
176 append buffer {</form>}
186 set toggle_details [formfetch toggle_details]
187 if {[string length $toggle_details]==0} {
190 set show_details [load_var show_details]
191 if {[string length $show_details]==0} {
194 if {$toggle_details==1} {
195 set show_details [expr 1-$show_details]
196 save_var show_details $show_details
199 if {[string length $console]!=0} {
202 <tr style="height:100%;">
203 <td style="height:100%;background-color:red;" colspan="6">
204 <table style="padding:0px;border-collapse:collapse;background-color:#ffffff;width:100%" class="textgray">
205 <td style="width:25px;"> </td>
208 if {$show_details==1} {
210 append buffer {td style="background-color:#dddddd;padding-left:5px;padding-right:5px;padding-top:3px;padding-bottom:3px;"}
214 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;"}
219 <a class="openocd" href="guiupload.tcl?toggle_details=1">
222 if {$show_details==1} {
223 append buffer "Hide details"
226 append buffer {<div style="position:relative;top:7px;text-align:center;">}
227 append buffer "Show details"
228 append buffer {</div>}
235 if {$show_details==1} {
236 append buffer $console
239 append buffer {</td>}
241 if {$show_details!=1} {
242 append buffer {<td> </td>}
246 <td style="width:25px;"> </td>
256 <td style="height:30px;background-image:url('menu_cuts/center_bottom.png');background-repeat: no-repeat;background-position:top right;" colspan="6">
257 <div style="width:500px;background-color:#ffffff;height:100%;">
264 <td style="width:6px;"/>
265 <td style="width:245px;height:100%">
266 <table style="padding:0px;border-collapse:collapse;height:100%;">
268 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab2_selected.png');background-repeat: no-repeat;">
269 <div style="position:relative;top:7px;;font-weight:bold;text-align:center;width:100px;" class="textgray">
279 <td style="height:10px;width:245px;background-image:url('menu_cuts/right_top_small.png');" colspan="3"/>
282 <td style="background-color:#d8d7d7;width:245px;padding-left:10px;padding-buttom:10px;line-height:17px;" colspan="3">
283 <a target="_blank" href="http://openocd.berlios.de/doc/openocd.pdf">OpenOCD Manual</a>
288 <td style="background-color:#d8d7d7;height:15px;" colspan="3"/>
292 <table style="padding:0px;border-collapse:collapse;">
293 <td style="background-color:#d8d7d7;width:10px;height:1px"/>
294 <td style="background-color:#999999;width:225px; height:1px;"/>
295 <td style="background-color:#d8d7d7;width:10px;height:1px"/>
300 <td style="background-color:#d8d7d7;height:15px;" colspan="3"/>
302 <tr style="height:100%;">
303 <td style="height:100%;background-color:#d8d7d7;padding-left:10px;padding-right:10px;" colspan="3" class="textgray"/>
306 <td style="height:30px;background-image:url('menu_cuts/right_bottom.png');" colspan="3">
334 write_chunked $buffer