Overview
| Comment: | Pickup upstream changes to the Eagle Common Tools Package. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
0cacadaddc34ee823878a8f3d536a2bd |
| User & Date: | mistachkin on 2017-06-28 03:21:01 |
| Other Links: | manifest | tags |
Context
|
2017-06-29
| ||
| 21:38 | Make downloading the Package Signing Keys more robust by adding support for mirror URIs. check-in: 4736fe9200 user: mistachkin tags: trunk | |
|
2017-06-28
| ||
| 03:21 | Pickup upstream changes to the Eagle Common Tools Package. check-in: 0cacadaddc user: mistachkin tags: trunk | |
|
2017-06-16
| ||
| 17:56 | Add 'common.tcl' file to the deployment tool. check-in: 0fdd81ab35 user: mistachkin tags: trunk | |
Changes
Modified client/1.0/neutral/common.tcl from [5730b66350] to [3398d77383].
| ︙ | ︙ | |||
160 161 162 163 164 165 166 |
# designed to emit a message to the HTTP client log. The string
# argument is the content of the message to emit. If the string
# argument is an empty string, nothing is written.
#
proc pageLog { string } {
if {[string length $string] > 0} then {
catch {
| > | | 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 |
# designed to emit a message to the HTTP client log. The string
# argument is the content of the message to emit. If the string
# argument is an empty string, nothing is written.
#
proc pageLog { string } {
if {[string length $string] > 0} then {
catch {
tclLog [appendArgs \
[pid] " : " [clock seconds] " : http : " $string]
}
}
}
#
# NOTE: This procedure was stolen from the "getEagle.tcl" script. It is
# designed to emit a progress indicator while an HTTP request is
|
| ︙ | ︙ | |||
314 315 316 317 318 319 320 321 322 323 324 325 326 327 |
set token [eval ::http::geturl [list $uri] $args]
#
# NOTE: Grab the HTTP response code and data now as they are needed
# in almost all cases.
#
set code [::http::ncode $token]; set data [::http::data $token]
#
# NOTE: Check the HTTP response code, in order to follow any HTTP
# redirect responses.
#
switch -glob -- $code {
100 -
| > > > > > > > > > > > > > | 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 |
set token [eval ::http::geturl [list $uri] $args]
#
# NOTE: Grab the HTTP response code and data now as they are needed
# in almost all cases.
#
set code [::http::ncode $token]; set data [::http::data $token]
#
# NOTE: If the HTTP response code is an empty string that may
# indicate a serious bug in the tls (or http) package for
# this platform. So far, this issue has only been seen
# with the tls 1.6.1 package that shipped with macOS.
#
if {[string length $code] == 0} then {
error [appendArgs \
"received empty HTTP response code for URL \"" $uri \
"\", the \"tls\" (and/or \"http\") package(s) may be " \
"broken for this platform"]
}
#
# NOTE: Check the HTTP response code, in order to follow any HTTP
# redirect responses.
#
switch -glob -- $code {
100 -
|
| ︙ | ︙ |
Modified client/1.0/neutral/common.tcl.asc from [1a0afd7481] to [89e1456290].
1 2 3 4 | -----BEGIN PGP SIGNATURE----- Version: GnuPG v2 Comment: Eagle Package Repository | | | | | | | | | | | | | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | -----BEGIN PGP SIGNATURE----- Version: GnuPG v2 Comment: Eagle Package Repository iQIcBAABCAAGBQJZUyBQAAoJEFAslq9JXcLZ4I8QAJpIEuvMdWeYrQlXutuLmLmW DmhQUs7XvpCDkXm2ldyU+6X7LvH3M/QzqcvAfbBvRYhLtLqsD0Vo8g9km7PNkz8w pBaVtI0af7C3Fa92vfJT9qnxVrHmhNIS4kQq7FWdEh/HOajsP9umXbD2dr/sLqfm UZCKOi7kCS2JdbPTLw2AC3Sb5x/Jl5LTptjxjCrTj+fRyHTzg6xIxGgrN0/sdq7S ATH14YuGfI4R11sTqWpoMI31wPn1XNkrXTbDSrgfAIlCGApauElWIjfGTRrsFZpA buzgpwWwcWcRvE0AzeLONW6HVryXgKt6caAVQG2j/KnTCPeQ5Xo/g5yeEl+sU+96 MzGZweSHIG7N8BpZlqH1BQo6GNu+pQo90pPJlR0s2XT5NTIYPORKQBbAJs9+BWf7 SdJ7Fbzuh9sgN2ZbcHFo5ScHMPZJGrjbX2pSsuqVIZ+PCSHRp5NYzDZNMTwK/jFP /Ln2taIKHwDpZYA2pH0zHMgyez8H9/guNMUmaRfZAF0A+gVfLNMTvUDE77ebeVQ1 uSMUxduqI9iwEwMC/bCZ0r6JRzC2AttGmxPgAdC4D/YgZhGGQs2a0cuyyJyESuYK KmGR/uKs2pkeGGUPE4TF5rzchEL0aoZckzvqx5+vfFzefarDN9zs8ruEj3pLwquv YaWsC2SK6589k/87lFY+ =9Nm0 -----END PGP SIGNATURE----- |