git.sur5r.net Git - openocd/blob - src/server/httpd/upgrade.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 \r
  34                 \r
  35 \r
  36 \r
  37                 \r
  38 \r
  39 \r
  40                 \r
  41 \r
  42                 \r
  43 \r
  44 \r
  45                 \r
  46 \r
  47 \r
  48 \r
  49                 \r
  50 \r
  51                 \r
  52                 \r
  53                 \r
  54                 \r
  55                 \r
  56                 \r
  57 \r
  58                 <html xmlns="http://www.w3.org/TR/REC-html40">\r
  59 <head>\r
  60 <title>Zylin ZY1000 JTAG debugger</title>\r
  61 <meta charset="utf-8" content="text/html" http-equiv="Content-Type"/>\r
  62 <link type="text/css" rel="stylesheet" href="menuweb.css"/>\r
  63 </head>\r
  64 }\r
  65 \r
  66                                 set console ""\r
  67                                 set upload_filename /ram/upload\r
  68                         \r
  69 append buffer {\r
  70 <body style="margin:0px;">\r
  71 <div style="width:974px;height:85px;">\r
  72 <div style="float:left;position:relative;left:32px;width:478px;">\r
  73 <a href="/">\r
  74 <img src="menu_cuts/logo_top.png" style="border:0px;"/>\r
  75 </a>\r
  76 </div>\r
  77 <div style="float:left;position:relative;height:26px; width:278px;left:122px;background-image:url('menu_cuts/top_right.png');">\r
  78 <div style="position:relative;left:15px;top:4px;" class="textlight">\r
  79 }\r
  80 append buffer [capture version]\r
  81 append buffer {\r
  82 </div>\r
  83 </div>\r
  84 </div>\r
  85 <table style="padding:0px;border-collapse:collapse;">\r
  86 <tr>\r
  87 <td style="width:33px;">\r
  88 <div style="width:20px;height:510px;">\r
  89                                                                 &nbsp;\r
  90                                                         </div>\r
  91 </td>\r
  92 <td style="vertical-align:top;height:100%;width:140px;padding:0px;">\r
  93 <table style="padding:0px;border-collapse:collapse;height:100%;width:140px;">\r
  94 <tr style="height:59px;">\r
  95 <td/>\r
  96 </tr>\r
  97 <tr>\r
  98 <td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;">\r
  99 <div style="position:relative;left:10px;top:10px;font-weight:bold;">\r
 100 <a href="zy1000.tcl" style="">Set IP Address</a>\r
 101 </div>\r
 102 </td>\r
 103 </tr>\r
 104 <tr>\r
 105 <td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab_selected.png');background-repeat: no-repeat;">\r
 106 <div style="position:relative;left:10px;top:10px;font-weight:bold;">\r
 107 <a href="upgrade.tcl" style="font-weight: bold;">ZY1000 Firmware</a>\r
 108 </div>\r
 109 </td>\r
 110 </tr>\r
 111 <tr>\r
 112 <td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;">\r
 113 <div style="position:relative;left:10px;top:10px;font-weight:bold;">\r
 114 <a href="editfile.tcl" style="">Edit File</a>\r
 115 </div>\r
 116 </td>\r
 117 </tr>\r
 118 <tr>\r
 119 <td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;">\r
 120 <div style="position:relative;left:10px;top:10px;font-weight:bold;">\r
 121 <a href="support.tcl" style="">Support Request</a>\r
 122 </div>\r
 123 </td>\r
 124 </tr>\r
 125 <tr>\r
 126 <td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;">\r
 127 <div style="position:relative;left:10px;top:10px;font-weight:bold;">\r
 128 <a href="log.tcl#tail" style="">View Tail of Log</a>\r
 129 </div>\r
 130 </td>\r
 131 </tr>\r
 132 <tr>\r
 133 <td style="width:140px;height:35px;background-image:url('menu_cuts/v_1.png')"/>\r
 134 </tr>\r
 135 <tr>\r
 136 <td style="width:140px;background-image:url('menu_cuts/v_2_tile.png')"/>\r
 137 </tr>\r
 138 <tr>\r
 139 <td style="width:140px;height:140px;background-image:url('menu_cuts/v_3.png')"/>\r
 140 </tr>\r
 141 </table>\r
 142 </td>\r
 143 <td style="vertical-align:top;padding:0px;height:100%">\r
 144 <table style="padding:0px;border-collapse:collapse;height:100%;">\r
 145 <tr>\r
 146 <td>\r
 147 <table style="padding:0px;border-collapse:collapse;">\r
 148 <tr>\r
 149 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;">\r
 150 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">\r
 151 <a href="/ram/cgi/index.tcl">Config Target</a>\r
 152 </div>\r
 153 </td>\r
 154 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;">\r
 155 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">\r
 156 <a href="/ram/cgi/flashinfo.tcl">Flash</a>\r
 157 </div>\r
 158 </td>\r
 159 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;">\r
 160 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">\r
 161 <a href="/ram/cgi/browsemem.tcl">Memory</a>\r
 162 </div>\r
 163 </td>\r
 164 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;">\r
 165 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">\r
 166 <a href="/ram/cgi/openocd.tcl">OpenOCD</a>\r
 167 </div>\r
 168 </td>\r
 169 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1_selected.png');background-repeat: no-repeat;">\r
 170 <div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;">\r
 171 <a href="/ram/cgi/zy1000.tcl" style="font-weight: bold;">Setup ZY1000</a>\r
 172 </div>\r
 173 </td>\r
 174 </tr>\r
 175 </table>\r
 176 </td>\r
 177 </tr>\r
 178 <tr>\r
 179 <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
 180 <div style="width:500px;background-color:#ffffff;height:100%;">\r
 181                                                                                         &nbsp;\r
 182                                                                                 </div>\r
 183 </td>\r
 184 </tr>\r
 185 <tr>\r
 186 <td style="background-color:#ffffff;text-indent:30px;height:40px;" colspan="6">\r
 187 <H1>Upgrade ZY1000 Firmware</H1>\r
 188 </td>\r
 189 </tr>\r
 190 <tr style="height:100%;">\r
 191 <td style="background-color:#ffffff;padding-left:30px;padding-right:30px;width=535px;height:100%;" colspan="6">\r
 192                         \r
 193                         }\r
 194 \r
 195                                 set form_action [formfetch form_action];\r
 196                                 set form_filecontent [formfetch form_filecontent];\r
 197                                 \r
 198                                 append buffer {<form enctype="multipart/form-data" action="upgrade.tcl" method="post">}\r
 199                                 if {[string compare $form_action "Upload"]==0} {\r
 200                                         \r
 201                                         if [string match ZylinPhiFirmware* $form_filecontent]==1 {\r
 202                                                 set form_filename /config/firmware.phi \r
 203                                                 puts "Writing firmware to $form_filename"\r
 204                                                 set fp [aio.open $form_filename w];\r
 205                                                 $fp puts -nonewline $form_filecontent\r
 206                                                 $fp close\r
 207                                                 puts "Done writing firmware to $form_filename"\r
 208                                                 append buffer "<br><div style='font-size:14px;'>Upgraded Zylin JTAG, rebooting (wait ca. 30 seconds)...</div><br>"\r
 209                                                 reboot\r
 210                                         } else {\r
 211                                                 append buffer "<br>Not a valid Zylin JTAG firmware file.<br>"\r
 212                                         }\r
 213                                 } elseif {[string compare $form_action "Restore factory settings"]==0} {\r
 214                                         proc rmdir { dir } {\r
 215                                                 set entries {}\r
 216                                                 catch {set entries [ls $dir]} err\r
 217                                                 foreach { entry } $entries {\r
 218                                                         rmdir $dir/$entry\r
 219                                                         rm $dir/$entry\r
 220                                                 }\r
 221                                         }                               \r
 222                                         rmdir /config/settings\r
 223                                         reboot\r
 224                                         append buffer "Restoring factory settings (wait ca. 30 seconds)...<br>"\r
 225                                 } else {\r
 226                                         append buffer {<div style="font-size:14px;">Upgrade Zylin JTAG firmware + reboot. </div><p>}\r
 227                                         append buffer {<input type="file" name="form_filecontent"> <br>}\r
 228                                         append buffer {<table><tr><td style="height:15px;width:535px;">&nbsp</td></tr><tr><td style="height:1px;width:535px;background-color:#a2c5d1;"></td></tr><tr><td style="height:15px;width:535px;">&nbsp</td></tr></table>}\r
 229                                         append buffer {<input type="submit" name="form_action" value="Upload" ><br> }\r
 230                                         append buffer {<input type="submit" name="form_action" value="Restore factory settings" ><br> }\r
 231                                         append buffer {</form> }\r
 232                                 }\r
 233                         \r
 234 append buffer {\r
 235                         \r
 236                         </td>\r
 237 </tr>\r
 238 }\r
 239 \r
 240                                                                         \r
 241                                                                         set toggle_details [formfetch toggle_details]\r
 242                                                                         if {[string length $toggle_details]==0} {\r
 243                                                                                 set toggle_details 0\r
 244                                                                         }\r
 245                                                                         set show_details [load_var show_details]\r
 246                                                                         if {[string length $show_details]==0} {\r
 247                                                                                 set show_details 0\r
 248                                                                         }\r
 249                                                                         if {$toggle_details==1} {\r
 250                                                                                 set show_details [expr 1-$show_details]\r
 251                                                                                 save_var show_details $show_details\r
 252                                                                         }\r
 253                                                                         \r
 254                                                                         if {[string length $console]!=0} {\r
 255                                                                                 \r
 256 append buffer {\r
 257 <tr style="height:100%;">\r
 258 <td style="height:100%;background-color:red;" colspan="6">\r
 259 <table style="padding:0px;border-collapse:collapse;background-color:#ffffff;width:100%" class="textgray">\r
 260 <td style="width:25px;">&nbsp;</td>\r
 261 }\r
 262 \r
 263                                                                                                                 if {$show_details==1} {\r
 264                                                                                                                         append buffer <\r
 265                                                                                                                         append buffer {td style="background-color:#dddddd;padding-left:5px;padding-right:5px;padding-top:3px;padding-bottom:3px;"}\r
 266                                                                                                                         append buffer >\r
 267                                                                                                                 } else {\r
 268                                                                                                                         append buffer <\r
 269                                                                                                                         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
 270                                                                                                                         append buffer >\r
 271                                                                                                                 }\r
 272                                                                                                         \r
 273 append buffer {\r
 274 <a class="openocd" href="/ram/cgi/upgrade.tcl?toggle_details=1">\r
 275 }\r
 276 \r
 277                                                                                                                         if {$show_details==1} {\r
 278                                                                                                                                 append buffer "Hide details"\r
 279                                                                                                                                 append buffer <br/>\r
 280                                                                                                                         } else {\r
 281                                                                                                                                 append buffer {<div style="position:relative;top:7px;text-align:center;">}\r
 282                                                                                                                                 append buffer "Show details"\r
 283                                                                                                                                 append buffer {</div>}\r
 284                                                                                                                         }\r
 285                                                                                                                         \r
 286 append buffer {\r
 287 </a>\r
 288 }\r
 289 \r
 290                                                                                                                         if {$show_details==1} {\r
 291                                                                                                                                 append buffer $console\r
 292                                                                                                                         }\r
 293                                                                                                                 \r
 294 append buffer {</td>}\r
 295 \r
 296                                                                                                                 if {$show_details!=1} {\r
 297                                                                                                                         append buffer {<td>&nbsp;</td>}\r
 298                                                                                                                 }\r
 299                                                                                                          \r
 300 append buffer {\r
 301 <td style="width:25px;">&nbsp;</td>\r
 302 </table>\r
 303 </td>\r
 304 </tr>\r
 305 }\r
 306 \r
 307                                                                          }\r
 308                                                                 \r
 309 append buffer {\r
 310 <tr>\r
 311 <td style="height:30px;background-image:url('menu_cuts/center_bottom.png');background-repeat: no-repeat;background-position:top right;" colspan="6">\r
 312 <div style="width:500px;background-color:#ffffff;height:100%;">\r
 313                                                                                         &nbsp;\r
 314                                                                                 </div>\r
 315 </td>\r
 316 </tr>\r
 317 </table>\r
 318 </td>\r
 319 <td style="width:6px;"/>\r
 320 <td style="width:245px;height:100%">\r
 321 <table style="padding:0px;border-collapse:collapse;height:100%;">\r
 322 <tr>\r
 323 <td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab2_selected.png');background-repeat: no-repeat;">\r
 324 <div style="position:relative;top:7px;;font-weight:bold;text-align:center;width:100px;" class="textgray">\r
 325                                                                                     Documentation\r
 326                                                                                  </div>\r
 327 </td>\r
 328 <td width="40px">\r
 329                                                                                 &nbsp;\r
 330                                                                         </td>\r
 331 <td/>\r
 332 </tr>\r
 333 <tr>\r
 334 <td style="height:10px;width:245px;background-image:url('menu_cuts/right_top_small.png');" colspan="3"/>\r
 335 </tr>\r
 336 <tr>\r
 337 <td style="background-color:#d8d7d7;width:245px;padding-left:10px;padding-buttom:10px;line-height:17px;" colspan="3">\r
 338 <a target="_blank" href="http://www.zylin.com/zy1000/ZY1000_Quick_Start_Guide.pdf">Quick Start Manual</a>\r
 339 <br/>\r
 340 <a target="_blank" href="http://www.zylin.com/zy1000/openocd.pdf">OpenOCD Manual</a>\r
 341 <br/>\r
 342 <a target="_blank" href="http://www.zylin.com/zy1000_contact.html">Contact Zylin AS</a>\r
 343 </td>\r
 344 </tr>\r
 345 <tr>\r
 346 <td style="background-color:#d8d7d7;height:15px;" colspan="3"/>\r
 347 </tr>\r
 348 <tr>\r
 349 <td colspan="3">\r
 350 <table style="padding:0px;border-collapse:collapse;">\r
 351 <td style="background-color:#d8d7d7;width:10px;height:1px"/>\r
 352 <td style="background-color:#999999;width:225px; height:1px;"/>\r
 353 <td style="background-color:#d8d7d7;width:10px;height:1px"/>\r
 354 </table>\r
 355 </td>\r
 356 </tr>\r
 357 <tr>\r
 358 <td style="background-color:#d8d7d7;height:15px;" colspan="3"/>\r
 359 </tr>\r
 360 <tr style="height:100%;">\r
 361 <td style="height:100%;background-color:#d8d7d7;padding-left:10px;padding-right:10px;" colspan="3" class="textgray">    \r
 362                                 \r
 363                                         Upload new firmware file to ZY1000, verify that it is a valid ZY1000 firmware\r
 364                                         file, and upgrade flash.\r
 365                                         <p/>\r
 366                                         Restore factory settings restores all factory settings except the TCP/IP settings.\r
 367                                         <p/>\r
 368                                         The current version of the firmware is visible at the top of the web page.\r
 369                                         <p/>\r
 370                                         ZY1000 firmware can also be upgraded using serial port YModem upload.\r
 371                                         <p/>\r
 372                                         Check for new firmware at <a target="_blank" href="http://www.zylin.com/zy1000.html">http://www.zylin.com/zy1000.html<a> \r
 373                                   \r
 374                         </td>\r
 375 </tr>\r
 376 <tr>\r
 377 <td style="height:30px;background-image:url('menu_cuts/right_bottom.png');" colspan="3">\r
 378                                                                                 &nbsp;\r
 379                                                                         </td>\r
 380 </tr>\r
 381 </table>\r
 382 </td>\r
 383 </tr>\r
 384 <tr>\r
 385 <td/>\r
 386 <td>\r
 387 <img border="0" src="menu_cuts/logo_bottom.png"/>\r
 388 </td>\r
 389 </tr>\r
 390 </table>\r
 391 </body>\r
 392 </html>\r
 393                 \r
 394 \r
 395                 \r
 396 \r
 397 \r
 398                 \r
 399 \r
 400 \r
 401 \r
 402                 \r
 403 \r
 404                 \r
 405 \r
 406 \r
 407                 \r
 408 \r
 409 \r
 410                 \r
 411         \r
 412         \r
 413 }\r
 414 \r
 415 start_chunked "html"\r
 416 write_chunked $buffer\r
 417 end_chunked\r
 418 \r