Check-in [541903ae15]
Overview
SHA1:541903ae1524c65575ad4d5559e30bd6b827e403
Date: 2014-07-20 15:23:44
User: rkeene
Comment:Updated to include log if available
Timelines: family | ancestors | descendants | both | trunk
Downloads: Tarball | ZIP archive
Other Links: files | file ages | folders | manifest
Tags And Properties
Context
2014-07-20
15:56
[dea912723e] Added storage option and printing of build command (user: rkeene, tags: trunk)
15:23
[541903ae15] Updated to include log if available (user: rkeene, tags: trunk)
2014-07-19
07:32
[378b040608] Updated to cache trunk builds for a single day (user: rkeene, tags: trunk)
Changes

Modified build/web/building.cgi from [98cd8538ea] to [f8abb77a8c].

23
24
25
26
27
28
29

30
31
32
33
34
35
36
..
61
62
63
64
65
66
67
68










69
70
71
		set fd [open [file join $workdir buildinfo]]
		set buildinfo_list [gets $fd]
		close $fd
		array set buildinfo $buildinfo_list
		set filename $buildinfo(filename)

		set outfile [file join $workdir $filename]

	} else {
		set status "Queued"
	}
}

if {[info exists outfile]} {
	if {[file exists $outfile]} {
................................................................................
puts "\t<head>"
puts "\t\t<title>KitCreator, Web Interface</title>"
puts "\t</head>"
puts "\t<body>"
puts "\t\t<h1>KitCreator Web Interface</h1>"
puts "\t\t<p><b>Status:</b> $status</p>"
if {[info exists url]} {
puts "\t\t<p><b>URL:</b> <a href=\"$url\">$url</a></p>"










}
puts "\t</body>"
puts "</html>"







>







 







|
>
>
>
>
>
>
>
>
>
>



23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
..
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
		set fd [open [file join $workdir buildinfo]]
		set buildinfo_list [gets $fd]
		close $fd
		array set buildinfo $buildinfo_list
		set filename $buildinfo(filename)

		set outfile [file join $workdir $filename]
		set logfile "${outfile}.log"
	} else {
		set status "Queued"
	}
}

if {[info exists outfile]} {
	if {[file exists $outfile]} {
................................................................................
puts "\t<head>"
puts "\t\t<title>KitCreator, Web Interface</title>"
puts "\t</head>"
puts "\t<body>"
puts "\t\t<h1>KitCreator Web Interface</h1>"
puts "\t\t<p><b>Status:</b> $status</p>"
if {[info exists url]} {
	puts "\t\t<p><b>URL:</b> <a href=\"$url\">$url</a></p>"
}
if {[info exists logfile]} {
	catch {
		set fd [open $logfile]
		set logdata [read $fd]
		close $fd


		puts "\t\t<p><b>Log:</b><pre>\n$logdata</pre></p>"
	}
}
puts "\t</body>"
puts "</html>"