Check-in [0b8d107e14]
Overview
Comment:Updated to incldue a description once building has started
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:0b8d107e1473c145486508e35f853326314575ae
User & Date: rkeene on 2014-07-23 04:38:39
Other Links: manifest | tags
Context
2014-07-23
04:59
Moved description check-in: 0478a7f8f6 user: rkeene tags: trunk
04:38
Updated to incldue a description once building has started check-in: 0b8d107e14 user: rkeene tags: trunk
01:34
Updated to define a path to Tclkit check-in: 99ac6273b2 user: rkeene tags: trunk
Changes

Modified build/web/building.cgi from [f8abb77a8c] to [2572ff68c9].

    28     28   
    29     29   		set outfile [file join $workdir $filename]
    30     30   		set logfile "${outfile}.log"
    31     31   	} else {
    32     32   		set status "Queued"
    33     33   	}
    34     34   }
           35  +
           36  +if {[info exists buildinfo]} {
           37  +	set description "Tcl $buildinfo(tcl_version)"
           38  +	append description ", KitCreator $buildinfo(kitcreator_version)"
           39  +	append description ", Platform $buildinfo(platform)"
           40  +
           41  +	foreach {option value} $buildinfo(options) {
           42  +		switch -- $option {
           43  +			"kitdll" {
           44  +				if {$value} {
           45  +					append description ", Built as a Library"
           46  +				}
           47  +			}
           48  +			"threaded" {
           49  +				if {$value} {
           50  +					append description ", Threaded"
           51  +				} else {
           52  +					append description ", Unthreaded"
           53  +				}
           54  +			}
           55  +			"debug" {
           56  +				if {$value} {
           57  +					append description ", With Symbols"
           58  +				}
           59  +			}
           60  +			"storage" {
           61  +				switch -- $value {
           62  +					"mk4" {
           63  +						append description ", Metakit-based"
           64  +					}
           65  +					"zip" {
           66  +						append description ", Zip-kit"
           67  +					}
           68  +					"cvfs" {
           69  +						append description ", Static Storage"
           70  +					}
           71  +				}
           72  +			}
           73  +		}
           74  +	}
           75  +
           76  +	if {[llength $buildinfo(packages)] > 0} {
           77  +		append description ", Packages: [join $buildinfo(packages) {, }]"
           78  +	} else {
           79  +		append description ", No packages"
           80  +	}
           81  +}
    35     82   
    36     83   if {[info exists outfile]} {
    37     84   	if {[file exists $outfile]} {
    38     85   		set status "Complete"
    39     86   		set terminal 1
    40     87   
    41     88   		set url "http://kitcreator.rkeene.org/kits/$key/$filename"
................................................................................
    60    107   puts ""
    61    108   puts "<html>"
    62    109   puts "\t<head>"
    63    110   puts "\t\t<title>KitCreator, Web Interface</title>"
    64    111   puts "\t</head>"
    65    112   puts "\t<body>"
    66    113   puts "\t\t<h1>KitCreator Web Interface</h1>"
    67         -puts "\t\t<p><b>Status:</b> $status</p>"
          114  +if {[info exists description]} {
          115  +	puts "\t\t<p><b>Description:</b> $description"
          116  +}
          117  +puts "\t\t<p><b>Status:</b> $status"
    68    118   if {[info exists url]} {
    69         -	puts "\t\t<p><b>URL:</b> <a href=\"$url\">$url</a></p>"
          119  +	puts "\t\t<p><b>URL:</b> <a href=\"$url\">$url</a>"
    70    120   }
    71    121   if {[info exists logfile]} {
    72    122   	catch {
    73    123   		set fd [open $logfile]
    74    124   		set logdata [read $fd]
    75    125   		close $fd
    76    126   
    77    127   
    78         -		puts "\t\t<p><b>Log:</b><pre>\n$logdata</pre></p>"
          128  +		puts "\t\t<p><b>Log:</b><pre>\n$logdata</pre>"
    79    129   	}
    80    130   }
    81    131   puts "\t</body>"
    82    132   puts "</html>"