Overview
| Comment: | Updated to generate hash in a more future-proof way |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: | 67f2fd4d92341e7b3e22df924d5bbb82efc75648 |
| User & Date: | rkeene on 2014-07-19 07:14:48 |
| Other Links: | manifest | tags |
Context
|
2014-07-19
| ||
| 07:18 | Updated to explicitly disable threads if it was not selected check-in: f404c778a3 user: rkeene tags: trunk | |
| 07:14 | Updated to generate hash in a more future-proof way check-in: 67f2fd4d92 user: rkeene tags: trunk | |
| 07:09 | Minor wording update for web interface check-in: 7aefade0dd user: rkeene tags: trunk | |
Changes
Modified build/web/kitcreator.vfs/index.rvt from [206a55cec7] to [1cc2b39cd9].
128
129
130
131
132
133
134
135
136
137
138
139
140
141
...
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
|
close $secretfd
## Compute basic key
set key [list $secret $build_platform $cache_tcl_version $cache_kitcreator_version $build_packages]
## Update key with options in deterministic order
foreach option [lsort -dictionary [array names build_options]] {
lappend key [list "option:$option" $build_options($option)]
}
## Convert key to a user-consumable string via hashing
set key [string tolower [sha1::sha1 -hex $key]]
# Determine filename
................................................................................
<? foreach package [lsort -dictionary [array names packages]] { ?>
<input type="checkbox" name="option_package_<? puts -nonewline $package ?>" id="option_package_<? puts -nonewline $package ?>">Package: <? puts -nonewline $packages($package) ?><br>
<? } ?>
<input type="checkbox" name="option_threaded">Kit: Threaded<br>
<input type="checkbox" name="option_kitdll">Kit: Build Library (KitDLL)<br>
</td>
</tr>
<tr>
<td>Kit Icon:</td>
<td>
<input type="file" name="option_icon">
</td>
</tr>
<tr>
<td>Description:</td>
<td>
<input type="text" name="option_desc">
</td>
</tr>
</table>
<input type="submit" name="submit" value="Create">
</form>
</body>
</html><? } ?>
|
>
>
>
>
>
>
>
>
>
>
|
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
...
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
|
close $secretfd
## Compute basic key
set key [list $secret $build_platform $cache_tcl_version $cache_kitcreator_version $build_packages]
## Update key with options in deterministic order
foreach option [lsort -dictionary [array names build_options]] {
switch -- $option {
"threaded" - "kitdll" {
# For boolean options, skip them if they are not enabled
if {!$build_options($option)} {
continue
}
}
}
lappend key [list "option:$option" $build_options($option)]
}
## Convert key to a user-consumable string via hashing
set key [string tolower [sha1::sha1 -hex $key]]
# Determine filename
................................................................................
<? foreach package [lsort -dictionary [array names packages]] { ?>
<input type="checkbox" name="option_package_<? puts -nonewline $package ?>" id="option_package_<? puts -nonewline $package ?>">Package: <? puts -nonewline $packages($package) ?><br>
<? } ?>
<input type="checkbox" name="option_threaded">Kit: Threaded<br>
<input type="checkbox" name="option_kitdll">Kit: Build Library (KitDLL)<br>
</td>
</tr>
<!--
<tr>
<td>Kit Icon:</td>
<td>
<input type="file" name="option_icon">
</td>
</tr>
<tr>
<td>Description:</td>
<td>
<input type="text" name="option_desc">
</td>
</tr>
-->
</table>
<input type="submit" name="submit" value="Create">
</form>
</body>
</html><? } ?>
|