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