Author: Neil Madden <[email protected]>
State: Final
Type: Project
Vote: Done
Created: 23-Mar-2004
Post-History:
Tcl-Version: 8.5
Tcl-Ticket: 958222
Abstract
This TIP proposing adding a new namespace subcommand, unknown, which would register a per-namespace procedure for dealing with unknown commands.
Rationale
There is an occassional need within Tcl scripts to change the way in which command names are resolved, for instance when implementing language constructs such as object systems or lexically-scoped commands. Many of these issues are addressed by the newly-accepted namespace path command [229]. However, there are still a few situations where more customized behaviour is required. For instance, implementing custom per-namespace command auto-loading, or to use auto-expansion of leading word as in TOOT http://wiki.tcl.tk/11543 . Currently, the only way to perform such customized command resolution behaviour is to override the global ::unknown proc to install your custom handler. There are several drawbacks with this mechanism.
Firstly, it is difficult to override the global ::unknown proc if you are writing a package, as good style dictates that you shouldn't override commands outside your package namespace without being explicitly asked to do so.
Secondly, as Tcl searches for a hard-coded fallback procedure name (::unknown), in order to override it's functionality you have to rename it and then install your own replacement - and the new version becomes the default fallback behaviour for the entire application. In the case of implementing custom auto-loading behaviour, you may only want to override the behaviour for your namespace, and not for the entire interpreter. Currently, the only way to do this is to define a new ::unknown procedure which does pattern matching on the command name it is passed.
Finally, if a package does override the ::unknown procedure it has to be careful to save the old handler, and then invoke it for commands which it is not interested in. This is an error-prone approach, and results in a cascade of procedure calls, often with each one only interested in a subset of the commands being searched for.
Related TIPs
There have been two previous attempts at modifying Tcl's command resolution process. [52] proposed that the search order be changed to traverse the complete namespace hierachy from most specific namespace to the most general (the global namespace). This TIP was withdrawn as it was not backwards compatible. [142] proposed a global variable which would hold a namespace search path. This TIP was also withdrawn as it does not allow different namespaces to have different search paths. [229] proposed the namespace path command as a way of specifying a per-namespace search path for command resolution. This TIP was accepted, and provides a good general mechanism for custom command resolution. The current TIP is complementary to [229] and can be used to handle cases where more flexible behaviour is required.
Proposed Change
This TIP proposes that the handling of unknown commands be done on a per-namespace basis through the introduction of an unknown subcommand of the namespace command.
namespace unknown ?commandPrefix?
The subcommand would accept either zero or one argument(s), and is similar in interface to the interp bgerror command added by [221]. If no arguments are given, the command returns the handler for the current namespace. The optional argument commandPrefix is a command (strictly a prefix list consisting of a command and optional arguments) to execute if normal command lookup from the current namespace fails. The command will be concatenated with the full invocation line of the command being searched for (i.e. the command name and all arguments), and evaluated in the scope of the current namespace. The first word in the list given must be a command name which must be able to be resolved without resorting to the unknown mechanism (i.e. it must either be a command in the current or global namespace, or be fully-qualified). If this cannot be done, a stock error message will be generated referring to the original unknown command (and not the missing handler) - this is how Tcl currently behaves if no ::unknown procedure exists.
The command resolution procedure would be altered from this:
Lookup command in current namespace.
If that fails, use path supplied by namespace path.
If that fails, lookup command in global namespace.
If that fails, call global ::unknown procedure.
to this:
Lookup command in current namespace.
If that fails, use path supplied by namespace path.
If that fails, lookup command in global namespace.
If that fails, call the unknown handler for the namespace in which the unknown command was invoked.
Note that this TIP does not change (or allow changing) the default command resolution procedure - the current, namespace path, and global namespaces are always searched before the unknown handler is called. This is so that resolution of the unknown handler itself can be performed, and so that the handler can be implemented without resorting to fully qualifying every command in it (e.g. having to use ::set).
It also should be noted that the unknown handler that is called is for the namespace that invoked the unknown command, rather than the namespace which is the target of the call. There are a number of reasons for this decision: Firstly, there is no guarantee that the target namespace actually exists (this might be a reason why the command was not found). In that case, there would be no target namespace unknown handler, and we would be forced to fallback on the global default. Secondly, the mechanism is designed mainly for namespace authors who wish to implement some custom behaviour that affects the operation of their own code, e.g., custom auto-loading of missing commands, or more sophisticated command lookup procedures, etc. This suggests that the responsibility for dealing with unknown commands should fall on the originating namespace, rather than being placed on arbitrary other namespaces. It is believed that this is the most sensible, and the most predictable, behaviour for an unknown command mechanism. In addition, with the introduction of namespace ensemble [112] there now exists a flexible mechanism for handling the opposite behaviour, allowing the target namespace to handle requests for unknown commands (e.g., forwarding requests). The author of the present TIP considers this to be the right division of responsibility, as ensembles should become the default mechanism for accessing public operations of external namespaces, and also an ensemble command can be guaranteed that the target namespace does indeed exist.
The default unknown handler for the global namespace is a handler called ::unknown. The default handler for other namespaces calls the global unknown handler. This means that by default, we have exactly the same mechanism that exists currently in Tcl. In order to change the mechanism for an individual namespace, you may register a new unknown handler for that namespace. When no handler is registered for a namespace, then a call to namespace unknown will return an empty string (for non-global namespaces) or ::unknown for the global namespace. This is so that a distinction can be made between namespaces which have no handler set, and namespaces which have had an unknown handler called ::unknown deliberately registered for them. With this scheme it is possible to set a global per-interpreter unknown command handler by setting the unknown handler for the global namespace. This can then be overridden on a per-namespace basis, if required.
The calling of unknown handlers registered with namespace unknown would be identical to the current calling of the ::unknown procedure - the handler will be called with the command name and all of its arguments, as it was originally invoked. The handler should be a valid Tcl list representing a command and possible initial arguments. For instance, a single handler proc could be used for several namespaces with the namespace passed as an argument:
proc handleunknown {ns cmd args} { ... }
namespace eval foo { namespace unknown [list ::handleunknown ::foo] }
namespace eval bar { namespace unknown [list ::handleunknown ::bar] }
Setting the unknown handler to {} (an empty list) restores the default handler (::unknown for global namespace, global unknown handler for all other namespaces).
C API
Additionally, this TIP proposes adding two new public functions to the Tcl C-API to expose this functionality at the C-level. The proposed new functions are:
Tcl_Obj *Tcl_GetNamespaceUnknownHandler(Tcl_Interp *interp,
Tcl_Namespace *nsPtr);
Returns the current unknown command handler registered for the given namespace, or NULL if none is.
int Tcl_SetNamespaceUnknownHandler(Tcl_Interp *interp,
Tcl_Namespace *nsPtr,
Tcl_Obj *handlerPtr);
Sets the unknown command handler for the namespace, or resets it to the default if handlerPtr is NULL or an empty list.
Consequences
As a final note, there is a useful side-effect to always resolving the unknown handler itself in the current namespace, in that an unknown handler can be registered for the global namespace which is not fully qualified, and it will be resolved relative to the namespace in which an unknown command is invoked. To illustrate:
# Set global unknown handler to unqualified name
namespace unknown unknown
namespace eval foo { proc unknown {args} { puts "FOO" } }
proc unknown {args} { puts "GLOBAL" }
bar ;# prints GLOBAL
namespace eval foo { bar } ;# prints FOO
namespace eval other { bar } ;# prints GLOBAL
Reference Implementation
A reference implementation is available attached to Patch 958222 on the Tcl project at SourceForge http://sf.net/tracker/?func=detail&aid=958222&group_id=10894&atid=310894 .
The current patch is called tip181-4.patch
Copyright
This document has been placed in the public domain.