Overview
| Comment: | Double check that we got a usable value at all from the verification callback |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | tls-1-7 |
| Files: | files | file ages | folders |
| SHA1: |
664badad675ea6c11b141dfbd7d34f0e |
| User & Date: | rkeene on 2016-12-02 18:58:31 |
| Other Links: | branch diff | manifest | tags |
Context
|
2016-12-02
| ||
| 19:00 | Minor casting to address compiler warnings check-in: e3b94c4a74 user: rkeene tags: tls-1-7 | |
| 18:58 | Double check that we got a usable value at all from the verification callback check-in: 664badad67 user: rkeene tags: tls-1-7 | |
| 18:55 | Fixed signed-ness issue with init script check-in: fa844b3fcc user: rkeene tags: tls-1-7 | |
Changes
Modified tls.c from [8652a6d576] to [95469d79b3].
| ︙ | ︙ | |||
315 316 317 318 319 320 321 |
/* It got an error - reject the certificate. */
Tcl_BackgroundError( statePtr->interp);
ok = 0;
} else {
result = Tcl_GetObjResult(statePtr->interp);
string = Tcl_GetStringFromObj(result, &length);
/* An empty result leaves verification unchanged. */
| | | 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 |
/* It got an error - reject the certificate. */
Tcl_BackgroundError( statePtr->interp);
ok = 0;
} else {
result = Tcl_GetObjResult(statePtr->interp);
string = Tcl_GetStringFromObj(result, &length);
/* An empty result leaves verification unchanged. */
if (string != NULL && length > 0) {
if (Tcl_GetIntFromObj(statePtr->interp, result, &ok) != TCL_OK) {
Tcl_BackgroundError(statePtr->interp);
ok = 0;
}
}
}
Tcl_DecrRefCount( cmdPtr);
|
| ︙ | ︙ |