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