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