122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
|
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
|
+
+
+
+
+
+
+
|
if {[info exists outfile]} {
set build_log_url "${base_url}/${filename}.log"
if {[file exists $outfile]} {
set status "Complete"
set terminal 1
set url "${base_url}/$filename"
if {[info exists buildinfo(sdkfilename)]} {
set sdk_url "${base_url}/$buildinfo(sdkfilename)"
}
} elseif {[file exists "${outfile}.buildfail"]} {
set status "Failed"
set terminal 1
} else {
set status "Building"
}
}
if {$resultFormat in {json dict}} {
set terminalBoolean [lindex {false true} $terminal]
set resultsDict [dict create \
status [string tolower $status] \
terminal $terminalBoolean \
]
if {[string tolower $status] eq "complete"} {
dict set resultsDict kit_url $url
if {[info exists sdk_url]} {
dict set resultsDict kit_sdk_url $sdk_url
}
}
if {[string tolower $status] in {complete building failed}} {
dict set resultsDict build_log_url $build_log_url
catch {
dict set resultsDict tcl_version $buildinfo(tcl_version)
}
catch {
|