# converted to .tcl by html2tcl.tcl set buffer "" append buffer { OpenOCD debugger } set console "" set upload_filename /ram/upload append buffer {
OpenOCD
} append buffer [capture version] append buffer {
 
} set toggle_details [formfetch toggle_details] if {[string length $toggle_details]==0} { set toggle_details 0 } set show_details [load_var show_details] if {[string length $show_details]==0} { set show_details 0 } if {$toggle_details==1} { set show_details [expr 1-$show_details] save_var show_details $show_details } if {[string length $console]!=0} { append buffer { } } append buffer {
 

Upload File

} set form_filename [formfetch form_filename]; set form_action [formfetch form_action]; #set form_filecontent [formfetch form_filecontent]; append buffer {
} append buffer
if {[string compare $form_action "Upload"]==0} { if {[catch {writeform form_filecontent $form_filename} result]==0} { append buffer [encode $result] } else { append buffer Wrote $form_filename } } append buffer {} append buffer {
Filename on OpenOCD machine
File to upload
} append buffer {
 
 
} append buffer {
} append buffer {
} append buffer {
} if {$show_details==1} { append buffer < append buffer {td style="background-color:#dddddd;padding-left:5px;padding-right:5px;padding-top:3px;padding-bottom:3px;"} append buffer > } else { append buffer < 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;"} append buffer > } append buffer { } if {$show_details==1} { append buffer "Hide details" append buffer
} else { append buffer {
} append buffer "Show details" append buffer {
} } append buffer {
} if {$show_details==1} { append buffer $console } append buffer {} if {$show_details!=1} { append buffer {} } append buffer {
   
 
Documentation
 
OpenOCD Manual
 
} start_chunked "html" write_chunked $buffer end_chunked