Joe Mistachkin$Revision: 1.8 $

This TIP will allow all applications to perform a controlled shutdown (or do nothing) in the event that Tcl_Exit() is called.

For most applications written in C that use Tcl, calling the runtime exit() function is normally a reasonable way to shutdown the application. Unfortunately, this is not always the case. Applications written in other languages (and very complex C applications) may have very specific application shutdown requirements. This is especially true in multi-threaded environments. The problem is further compounded by extensions that use Tcl_Exit.

There are distinct advantages to using this method instead of using normal exit handlers in some cases. The normal exit handler cannot defer (or in an emergency, prevent) the application shutdown because Tcl_Finalize() has already been called. From the perspective of the exit handler, we have no way of knowing what other exit handlers have been called and/or their subsystems destroyed. In addition, even if it could somehow cause Tcl_Finalize() to defer the application shutdown, some or all of the other exit handlers may have already been executed, which would leave the application in an inconsistent state. This relatively simple change allows the programmer to get control very early during the application shutdown process.

First, this TIP proposes a new Tcl API function called Tcl_SetExitProc() or something similar. This function accepts a Tcl_ExitProc pointer and returns a Tcl_ExitProc pointer. The return value is the old exit proc pointer. Second, the Tcl_Exit() Tcl API function would be modified to allow for the handler to be called. Third, the documentation for Tcl_Exit() would be updated to include Tcl_SetExitProc() and a warning that any custom exit proc should NOT return.

VGNsX0V4aXRQcm9jICo=VGNsX1NldEV4aXRQcm9jKHByb2MpICAgIFRjbF9FeGl0UHJvYyAqcHJvYzsgLyogbmV3IGV4aXQgaGFuZGxlciBmb3IgYXBwIG9yIE5VTEwgKi8=ew==ICAgIFRjbF9FeGl0UHJvYyAqcHJldkV4aXRQcm9jOyAvKiByZXR1cm4gcHJldiBleGl0IGhhbmRsZXIgdG8gY2FsbGVyICovICAgIFRjbF9NdXRleExvY2soJmV4aXRNdXRleCk7ICAgIHByZXZFeGl0UHJvYyA9IGFwcEV4aXRQdHI7IC8qIGdldCBvbGQgYXBwIGV4aXQgcHRyICovICAgIGFwcEV4aXRQdHIgPSBwcm9jOyAvKiBzZXQgbmV3IGFwcCBleGl0IHB0ciAqLw==ICAgIFRjbF9NdXRleFVubG9jaygmZXhpdE11dGV4KTs=ICAgIHJldHVybiBwcmV2RXhpdFByb2M7fQ==

dm9pZA==VGNsX0V4aXQoc3RhdHVzKQ==ICAgIGludCBzdGF0dXM7CQkJLyogRXhpdCBzdGF0dXMgZm9yIGFwcGxpY2F0aW9uOyAgdHlwaWNhbGx5CQkJCSAqIDAgZm9yIG5vcm1hbCByZXR1cm4sIDEgZm9yIGVycm9yIHJldHVybi4gKi8=ew==ICAgIFRjbF9FeGl0UHJvYyAqY3VycmVudEFwcEV4aXRQdHI7ICAgIFRjbF9NdXRleExvY2soJmV4aXRNdXRleCk7ICAgIGN1cnJlbnRBcHBFeGl0UHRyID0gYXBwRXhpdFB0cjs=ICAgIFRjbF9NdXRleFVubG9jaygmZXhpdE11dGV4KTs=ICAgIGlmIChjdXJyZW50QXBwRXhpdFB0cikgew==ICAgICAgLyoqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqLw==ICAgICAgLyogV0FSTklORzogVGhpcyBjb2RlIFNIT1VMRCBOT1QgcmV0dXJuLCBhcyB0aGVyZSBpcyBjb2RlICAqLw==ICAgICAgLyogICAgICAgICAgdGhhdCBkZXBlbmRzIG9uIFRjbF9FeGl0IG5ldmVyIHJldHVybmluZy4gICAgICAqLw==ICAgICAgLyoqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqLw==ICAgICAgY3VycmVudEFwcEV4aXRQdHIoKENsaWVudERhdGEpIHN0YXR1cyk7ICAgIH0gZWxzZSB7ICAgICAgVGNsX0ZpbmFsaXplKCk7ICAgICAgVGNscEV4aXQoc3RhdHVzKTs=ICAgIH0=ICAgIFRjbF9QYW5pYyAoImV4aXRQcm9jIHJldHVybmVkISIpOw==fQ==

dm9pZCBNeUFwcEV4aXRQcm9jKENsaWVudERhdGEgY2xpZW50RGF0YSk=ew==ICAvKiAjMS4gUGVyZm9ybSBhcHBsaWNhdGlvbiBzcGVjaWZpYyBzaHV0ZG93biBjb2RlLi4uICAgICovICAvKiAjMi4gV2FpdCBmb3Igb3RoZXIgdGhyZWFkcyB0byBncmFjZWZ1bGx5IHNodXRkb3duLi4uICovICBleGl0KDApOw==ICByZXR1cm47IC8qIFdlIHNob3VsZCBuZXZlciBnZXQgaGVyZS4gKi8=fQ==IC4uLiBzb21ldGltZSBkdXJpbmcgYXBwbGljYXRpb24gaW5pdGlhbGl6YXRpb24gLi4uIC8qIGZyb20gdGhpcyBwb2ludCBvbiBNeUFwcEV4aXRQcm9jIHdpbGwgaGFuZGxlIFRjbF9FeGl0IHJlcXVlc3RzICovIFRjbF9TZXRFeGl0UHJvYyhNeUFwcEV4aXRQcm9jKTs=IC4uLiBvcHRpb25hbGx5LCBzb21ldGltZSBsYXRlciAuLi4=IC8qIGZyb20gdGhpcyBwb2ludCBvbiB0aGUgb2xkIChkZWZhdWx0KSBoYW5kbGluZyB3aWxsIGJlIHVzZWQgKi8=IFRjbF9TZXRFeGl0UHJvYyhOVUxMKTs=

A patch that implements everything suggested in this TIP is available at the URL:

There is no change for current users of the Tcl_Exit() function, including the [exit] command, if Tcl_SetExitProc() is never called explicitly by the application.

This document is hereby placed in the public domain.