]> git.sur5r.net Git - openocd/blob - src/server/httpd/flashinfo.tcl
httpd wip
[openocd] / src / server / httpd / flashinfo.tcl
1 # converted to .tcl by html2tcl.tcl\r
2 set buffer ""\r
3 append buffer {\r
4         \r
5         \r
6 \r
7                 \r
8                 \r
9                 \r
10 \r
11 \r
12                 \r
13 \r
14 \r
15 \r
16                 \r
17 \r
18                 \r
19                 <html xmlns="http://www.w3.org/TR/REC-html40">\r
20 <head>\r
21 <title>OpenOCD debugger</title>\r
22 <meta charset="utf-8" content="text/html" http-equiv="Content-Type"/>\r
23 <link type="text/css" rel="stylesheet" href="menuweb.css"/>\r
24 </head>\r
25 }\r
26 \r
27                                 set console ""\r
28                                 set upload_filename /ram/upload\r
29                         \r
30 append buffer {\r
31 <body style="margin:0px;">\r
32 <div style="width:974px;height:85px;">\r
33 <div style="float:left;position:relative;left:32px;width:478px;">\r
34 <a href="/">\r
35                                                         OpenOCD\r
36                                                 </a>\r
37 </div>\r
38 <div style="float:left;position:relative;height:26px; width:278px;left:122px;background-image:url('menu_cuts/top_right.png');">\r
39 <div style="position:relative;left:15px;top:4px;" class="textlight">\r
40 }\r
41 append buffer [capture version]\r
42 append buffer {\r
43 </div>\r
44 </div>\r
45 </div>\r
46 <table style="padding:0px;border-collapse:collapse;">\r
47 <tr>\r
48 <td style="width:33px;">\r
49 <div style="width:20px;height:510px;">\r
50                                                                 &nbsp;\r
51                                                         </div>\r
52 </td>\r
53 <td style="vertical-align:top;height:100%;width:140px;padding:0px;">\r
54 <table style="padding:0px;border-collapse:collapse;height:100%;width:140px;">\r
55 <tr style="height:59px;">\r
56 <td/>\r
57 </tr>\r
58 <tr>\r
59 <td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab_selected.png');background-repeat: no-repeat;">\r
60 <div style="position:relative;left:10px;top:10px;font-weight:bold;">\r
61 <a href="flashinfo.tcl" style="font-weight: bold;">Info</a>\r
62 </div>\r
63 </td>\r
64 </tr>\r
65 <tr>\r
66 <td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;">\r
67 <div style="position:relative;left:10px;top:10px;font-weight:bold;">\r
68 <a href="erase.tcl" style="">Erase</a>\r
69 </div>\r
70 </td>\r
71 </tr>\r
72 <tr>\r
73 <td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;">\r
74 <div style="position:relative;left:10px;top:10px;font-weight:bold;">\r
75 <a href="flash.tcl" style="">Program / Verify</a>\r
76 </div>\r
77 </td>\r
78 </tr>\r
79 <tr>\r
80 <td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;">\r
81 <div style="position:relative;left:10px;top:10px;font-weight:bold;">\r
82 <a href="production.tcl" style="">Production</a>\r
83 </div>\r
84 </td>\r
85 </tr>\r
86 <tr>\r
87 <td style="width:140px;height:35px;background-image:url('menu_cuts/v_1.png')"/>\r
88 </tr>\r
89 <tr>\r
90 <td style="width:140px;background-image:url('menu_cuts/v_2_tile.png')"/>\r
91 </tr>\r
92 <tr>\r
93 <td style="width:140px;height:140px;background-image:url('menu_cuts/v_3.png')"/>\r
94 </tr>\r
95 </table>\r
96 </td>\r
97 <td style="vertical-align:top;padding:0px;height:100%">\r
98 <table style="padding:0px;border-collapse:collapse;height:100%;">\r
99 <tr>\r
100 <td>\r
101 <table style="padding:0px;border-collapse:collapse;">\r
102 <tr>\r
103 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;">\r
104 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">\r
105 <a href="index.tcl">Config Target</a>\r
106 </div>\r
107 </td>\r
108 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1_selected.png');background-repeat: no-repeat;">\r
109 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">\r
110 <a href="flashinfo.tcl" style="font-weight: bold;">Flash</a>\r
111 </div>\r
112 </td>\r
113 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;">\r
114 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">\r
115 <a href="browsemem.tcl">Memory</a>\r
116 </div>\r
117 </td>\r
118 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;">\r
119 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">\r
120 <a href="openocd.tcl">OpenOCD</a>\r
121 </div>\r
122 </td>\r
123 </tr>\r
124 </table>\r
125 </td>\r
126 </tr>\r
127 <tr>\r
128 <td style="height:30px;width:535px;background-image:url('menu_cuts/center_top.png');background-repeat: no-repeat;background-position:top right;" colspan="6">\r
129 <div style="width:500px;background-color:#ffffff;height:100%;">\r
130                                                                                         &nbsp;\r
131                                                                                 </div>\r
132 </td>\r
133 </tr>\r
134 <tr>\r
135 <td style="background-color:#ffffff;text-indent:30px;height:40px;" colspan="6">\r
136 <H1>Flash Information</H1>\r
137 </td>\r
138 </tr>\r
139 <tr style="height:100%;">\r
140 <td style="background-color:#ffffff;padding-left:30px;padding-right:30px;width=535px;height:100%;" colspan="6">\r
141 \r
142                         <div style="font-size:14px;">Configured flash banks:</div>\r
143                         <p>                     \r
144                         <code style="white-space: nowrap;">\r
145                                 }\r
146 \r
147                                         set flash_return [ocd_flash_banks]\r
148                                         if {[llength $flash_return]!=0} {\r
149                                                 append buffer [encode [flash banks]]\r
150                                         \r
151                                                 set form_action [formfetch form_action]\r
152                                                 if {[string compare $form_action "Reset CPU and probe flash"]==0} {\r
153                                                         append console [encode [capture_catch "reset init"]]\r
154                                                         append buffer [encode [capture_catch "flash probe 0"]]\r
155                                                         append buffer [encode [capture_catch "flash info 0"]]\r
156                                                 }\r
157                                         } else {\r
158                                                 append buffer "No flash bank configured."\r
159                                         }\r
160                                 \r
161 append buffer {\r
162                                 <p>\r
163                                 <form action="flashinfo.tcl" method="post"> \r
164                                         <input type="submit" name="form_action" value="Reset CPU and probe flash">\r
165                                 </form>\r
166                                 }\r
167 \r
168                                         foreach a [ocd_flash_banks] {\r
169                                                 append buffer "Flash bank at [format "0x%08x size 0x%08x" $a(base) $a(size)]: "\r
170                                                 \r
171 append buffer {\r
172                                                         <form action="downloadmem.tcl" method="post"> \r
173                                                                 <input type="hidden" name="form_address" value="}\r
174 append buffer [format "0x%08x" $a(base)]\r
175 append buffer {">\r
176                                                                 <input type="hidden" name="form_length" value="}\r
177 append buffer [format "0x%08x" $a(size)]\r
178 append buffer {">\r
179                 \r
180                                                                 <input type="submit" value="Download" name="form_action">\r
181                                                                 <br>\r
182                                                         </form>\r
183                                                 }\r
184 \r
185                                         }\r
186                                 \r
187 append buffer {\r
188                         </code>\r
189                         \r
190 \r
191                         </td>\r
192 </tr>\r
193 }\r
194 \r
195                                                                         \r
196                                                                         set toggle_details [formfetch toggle_details]\r
197                                                                         if {[string length $toggle_details]==0} {\r
198                                                                                 set toggle_details 0\r
199                                                                         }\r
200                                                                         set show_details [load_var show_details]\r
201                                                                         if {[string length $show_details]==0} {\r
202                                                                                 set show_details 0\r
203                                                                         }\r
204                                                                         if {$toggle_details==1} {\r
205                                                                                 set show_details [expr 1-$show_details]\r
206                                                                                 save_var show_details $show_details\r
207                                                                         }\r
208                                                                         \r
209                                                                         if {[string length $console]!=0} {\r
210                                                                                 \r
211 append buffer {\r
212 <tr style="height:100%;">\r
213 <td style="height:100%;background-color:red;" colspan="6">\r
214 <table style="padding:0px;border-collapse:collapse;background-color:#ffffff;width:100%" class="textgray">\r
215 <td style="width:25px;">&nbsp;</td>\r
216 }\r
217 \r
218                                                                                                                 if {$show_details==1} {\r
219                                                                                                                         append buffer <\r
220                                                                                                                         append buffer {td style="background-color:#dddddd;padding-left:5px;padding-right:5px;padding-top:3px;padding-bottom:3px;"}\r
221                                                                                                                         append buffer >\r
222                                                                                                                 } else {\r
223                                                                                                                         append buffer <\r
224                                                                                                                         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;"}\r
225                                                                                                                         append buffer >\r
226                                                                                                                 }\r
227                                                                                                         \r
228 append buffer {\r
229 <a class="openocd" href="flashinfo.tcl?toggle_details=1">\r
230 }\r
231 \r
232                                                                                                                         if {$show_details==1} {\r
233                                                                                                                                 append buffer "Hide details"\r
234                                                                                                                                 append buffer <br/>\r
235                                                                                                                         } else {\r
236                                                                                                                                 append buffer {<div style="position:relative;top:7px;text-align:center;">}\r
237                                                                                                                                 append buffer "Show details"\r
238                                                                                                                                 append buffer {</div>}\r
239                                                                                                                         }\r
240                                                                                                                         \r
241 append buffer {\r
242 </a>\r
243 }\r
244 \r
245                                                                                                                         if {$show_details==1} {\r
246                                                                                                                                 append buffer $console\r
247                                                                                                                         }\r
248                                                                                                                 \r
249 append buffer {</td>}\r
250 \r
251                                                                                                                 if {$show_details!=1} {\r
252                                                                                                                         append buffer {<td>&nbsp;</td>}\r
253                                                                                                                 }\r
254                                                                                                          \r
255 append buffer {\r
256 <td style="width:25px;">&nbsp;</td>\r
257 </table>\r
258 </td>\r
259 </tr>\r
260 }\r
261 \r
262                                                                          }\r
263                                                                 \r
264 append buffer {\r
265 <tr>\r
266 <td style="height:30px;background-image:url('menu_cuts/center_bottom.png');background-repeat: no-repeat;background-position:top right;" colspan="6">\r
267 <div style="width:500px;background-color:#ffffff;height:100%;">\r
268                                                                                         &nbsp;\r
269                                                                                 </div>\r
270 </td>\r
271 </tr>\r
272 </table>\r
273 </td>\r
274 <td style="width:6px;"/>\r
275 <td style="width:245px;height:100%">\r
276 <table style="padding:0px;border-collapse:collapse;height:100%;">\r
277 <tr>\r
278 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab2_selected.png');background-repeat: no-repeat;">\r
279 <div style="position:relative;top:7px;;font-weight:bold;text-align:center;width:100px;" class="textgray">\r
280                                                                                     Documentation\r
281                                                                                  </div>\r
282 </td>\r
283 <td width="40px">\r
284                                                                                 &nbsp;\r
285                                                                         </td>\r
286 <td/>\r
287 </tr>\r
288 <tr>\r
289 <td style="height:10px;width:245px;background-image:url('menu_cuts/right_top_small.png');" colspan="3"/>\r
290 </tr>\r
291 <tr>\r
292 <td style="background-color:#d8d7d7;width:245px;padding-left:10px;padding-buttom:10px;line-height:17px;" colspan="3">\r
293 <a target="_blank" href="http://openocd.berlios.de/doc/openocd.pdf">OpenOCD Manual</a>\r
294 <br/>\r
295 </td>\r
296 </tr>\r
297 <tr>\r
298 <td style="background-color:#d8d7d7;height:15px;" colspan="3"/>\r
299 </tr>\r
300 <tr>\r
301 <td colspan="3">\r
302 <table style="padding:0px;border-collapse:collapse;">\r
303 <td style="background-color:#d8d7d7;width:10px;height:1px"/>\r
304 <td style="background-color:#999999;width:225px; height:1px;"/>\r
305 <td style="background-color:#d8d7d7;width:10px;height:1px"/>\r
306 </table>\r
307 </td>\r
308 </tr>\r
309 <tr>\r
310 <td style="background-color:#d8d7d7;height:15px;" colspan="3"/>\r
311 </tr>\r
312 <tr style="height:100%;">\r
313 <td style="height:100%;background-color:#d8d7d7;padding-left:10px;padding-right:10px;" colspan="3" class="textgray">\r
314                                 \r
315                                 <p>Here you will find information about the flash chips that you have\r
316                                 in your configuration.<p/>\r
317                                 <p><b>Reset CPU and probe flash</b> - This will reset the CPU and show\r
318                                 you more detailed information about your flash. This includes information about\r
319                                 the different sectors in the flash, and the flash driver used.</p>\r
320                                 \r
321                         </td>\r
322 </tr>\r
323 <tr>\r
324 <td style="height:30px;background-image:url('menu_cuts/right_bottom.png');" colspan="3">\r
325                                                                                 &nbsp;\r
326                                                                         </td>\r
327 </tr>\r
328 </table>\r
329 </td>\r
330 </tr>\r
331 </table>\r
332 </body>\r
333 </html>\r
334 \r
335                 \r
336 \r
337 \r
338 \r
339 \r
340                 \r
341 \r
342 \r
343 \r
344                 \r
345 \r
346 \r
347                 \r
348 \r
349 \r
350                 \r
351 \r
352                 \r
353 \r
354 \r
355                 \r
356 \r
357 \r
358 \r
359                 \r
360 \r
361                 \r
362                 \r
363                 \r
364                 \r
365 \r
366 \r
367                 \r
368 \r
369 \r
370                 \r
371 \r
372 \r
373                 \r
374 \r
375 \r
376                 \r
377         \r
378         \r
379 }\r
380 \r
381 start_chunked "html"\r
382 write_chunked $buffer\r
383 end_chunked\r
384 \r