[25] | 1 | '\" |
---|
| 2 | '\" Copyright (c) 1995-1996 Sun Microsystems, Inc. |
---|
| 3 | '\" |
---|
| 4 | '\" See the file "license.terms" for information on usage and redistribution |
---|
| 5 | '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES. |
---|
| 6 | '\" |
---|
| 7 | '\" RCS: @(#) $Id: CrtSlave.3,v 1.20 2007/12/13 15:22:30 dgp Exp $ |
---|
| 8 | '\" |
---|
| 9 | .so man.macros |
---|
| 10 | .TH Tcl_CreateSlave 3 7.6 Tcl "Tcl Library Procedures" |
---|
| 11 | .BS |
---|
| 12 | .SH NAME |
---|
| 13 | Tcl_IsSafe, Tcl_MakeSafe, Tcl_CreateSlave, Tcl_GetSlave, Tcl_GetMaster, Tcl_GetInterpPath, Tcl_CreateAlias, Tcl_CreateAliasObj, Tcl_GetAlias, Tcl_GetAliasObj, Tcl_ExposeCommand, Tcl_HideCommand \- manage multiple Tcl interpreters, aliases and hidden commands |
---|
| 14 | .SH SYNOPSIS |
---|
| 15 | .nf |
---|
| 16 | \fB#include <tcl.h>\fR |
---|
| 17 | .sp |
---|
| 18 | int |
---|
| 19 | \fBTcl_IsSafe\fR(\fIinterp\fR) |
---|
| 20 | .sp |
---|
| 21 | int |
---|
| 22 | \fBTcl_MakeSafe\fR(\fIinterp\fR) |
---|
| 23 | .sp |
---|
| 24 | Tcl_Interp * |
---|
| 25 | \fBTcl_CreateSlave\fR(\fIinterp, slaveName, isSafe\fR) |
---|
| 26 | .sp |
---|
| 27 | Tcl_Interp * |
---|
| 28 | \fBTcl_GetSlave\fR(\fIinterp, slaveName\fR) |
---|
| 29 | .sp |
---|
| 30 | Tcl_Interp * |
---|
| 31 | \fBTcl_GetMaster\fR(\fIinterp\fR) |
---|
| 32 | .sp |
---|
| 33 | int |
---|
| 34 | \fBTcl_GetInterpPath\fR(\fIaskingInterp, slaveInterp\fR) |
---|
| 35 | .sp |
---|
| 36 | int |
---|
| 37 | \fBTcl_CreateAlias\fR(\fIslaveInterp, slaveCmd, targetInterp, targetCmd, |
---|
| 38 | argc, argv\fR) |
---|
| 39 | .sp |
---|
| 40 | int |
---|
| 41 | \fBTcl_CreateAliasObj\fR(\fIslaveInterp, slaveCmd, targetInterp, targetCmd, |
---|
| 42 | objc, objv\fR) |
---|
| 43 | .sp |
---|
| 44 | int |
---|
| 45 | \fBTcl_GetAlias\fR(\fIinterp, slaveCmd, targetInterpPtr, targetCmdPtr, |
---|
| 46 | argcPtr, argvPtr\fR) |
---|
| 47 | .sp |
---|
| 48 | int |
---|
| 49 | \fBTcl_GetAliasObj\fR(\fIinterp, slaveCmd, targetInterpPtr, targetCmdPtr, |
---|
| 50 | objcPtr, objvPtr\fR) |
---|
| 51 | .sp |
---|
| 52 | int |
---|
| 53 | \fBTcl_ExposeCommand\fR(\fIinterp, hiddenCmdName, cmdName\fR) |
---|
| 54 | .sp |
---|
| 55 | int |
---|
| 56 | \fBTcl_HideCommand\fR(\fIinterp, cmdName, hiddenCmdName\fR) |
---|
| 57 | .SH ARGUMENTS |
---|
| 58 | .AS "const char *const" **targetInterpPtr out |
---|
| 59 | .AP Tcl_Interp *interp in |
---|
| 60 | Interpreter in which to execute the specified command. |
---|
| 61 | .AP "const char" *slaveName in |
---|
| 62 | Name of slave interpreter to create or manipulate. |
---|
| 63 | .AP int isSafe in |
---|
| 64 | If non-zero, a |
---|
| 65 | .QW safe |
---|
| 66 | slave that is suitable for running untrusted code |
---|
| 67 | is created, otherwise a trusted slave is created. |
---|
| 68 | .AP Tcl_Interp *slaveInterp in |
---|
| 69 | Interpreter to use for creating the source command for an alias (see |
---|
| 70 | below). |
---|
| 71 | .AP "const char" *slaveCmd in |
---|
| 72 | Name of source command for alias. |
---|
| 73 | .AP Tcl_Interp *targetInterp in |
---|
| 74 | Interpreter that contains the target command for an alias. |
---|
| 75 | .AP "const char" *targetCmd in |
---|
| 76 | Name of target command for alias in \fItargetInterp\fR. |
---|
| 77 | .AP int argc in |
---|
| 78 | Count of additional arguments to pass to the alias command. |
---|
| 79 | .AP "const char *const" *argv in |
---|
| 80 | Vector of strings, the additional arguments to pass to the alias command. |
---|
| 81 | This storage is owned by the caller. |
---|
| 82 | .AP int objc in |
---|
| 83 | Count of additional object arguments to pass to the alias object command. |
---|
| 84 | .AP Tcl_Obj **objv in |
---|
| 85 | Vector of Tcl_Obj structures, the additional object arguments to pass to |
---|
| 86 | the alias object command. |
---|
| 87 | This storage is owned by the caller. |
---|
| 88 | .AP Tcl_Interp **targetInterpPtr in |
---|
| 89 | Pointer to location to store the address of the interpreter where a target |
---|
| 90 | command is defined for an alias. |
---|
| 91 | .AP "const char" **targetCmdPtr out |
---|
| 92 | Pointer to location to store the address of the name of the target command |
---|
| 93 | for an alias. |
---|
| 94 | .AP int *argcPtr out |
---|
| 95 | Pointer to location to store count of additional arguments to be passed to |
---|
| 96 | the alias. The location is in storage owned by the caller. |
---|
| 97 | .AP "const char" ***argvPtr out |
---|
| 98 | Pointer to location to store a vector of strings, the additional arguments |
---|
| 99 | to pass to an alias. The location is in storage owned by the caller, the |
---|
| 100 | vector of strings is owned by the called function. |
---|
| 101 | .AP int *objcPtr out |
---|
| 102 | Pointer to location to store count of additional object arguments to be |
---|
| 103 | passed to the alias. The location is in storage owned by the caller. |
---|
| 104 | .AP Tcl_Obj ***objvPtr out |
---|
| 105 | Pointer to location to store a vector of Tcl_Obj structures, the additional |
---|
| 106 | arguments to pass to an object alias command. The location is in storage |
---|
| 107 | owned by the caller, the vector of Tcl_Obj structures is owned by the |
---|
| 108 | called function. |
---|
| 109 | .AP "const char" *cmdName in |
---|
| 110 | Name of an exposed command to hide or create. |
---|
| 111 | .AP "const char" *hiddenCmdName in |
---|
| 112 | Name under which a hidden command is stored and with which it can be |
---|
| 113 | exposed or invoked. |
---|
| 114 | .BE |
---|
| 115 | |
---|
| 116 | .SH DESCRIPTION |
---|
| 117 | .PP |
---|
| 118 | These procedures are intended for access to the multiple interpreter |
---|
| 119 | facility from inside C programs. They enable managing multiple interpreters |
---|
| 120 | in a hierarchical relationship, and the management of aliases, commands |
---|
| 121 | that when invoked in one interpreter execute a command in another |
---|
| 122 | interpreter. The return value for those procedures that return an \fBint\fR |
---|
| 123 | is either \fBTCL_OK\fR or \fBTCL_ERROR\fR. If \fBTCL_ERROR\fR is returned |
---|
| 124 | then the \fBresult\fR field of the interpreter contains an error message. |
---|
| 125 | .PP |
---|
| 126 | \fBTcl_CreateSlave\fR creates a new interpreter as a slave of \fIinterp\fR. |
---|
| 127 | It also creates a slave command named \fIslaveName\fR in \fIinterp\fR which |
---|
| 128 | allows \fIinterp\fR to manipulate the new slave. |
---|
| 129 | If \fIisSafe\fR is zero, the command creates a trusted slave in which Tcl |
---|
| 130 | code has access to all the Tcl commands. |
---|
| 131 | If it is \fB1\fR, the command creates a |
---|
| 132 | .QW safe |
---|
| 133 | slave in which Tcl code has access only to set of Tcl commands defined as |
---|
| 134 | .QW "Safe Tcl" ; |
---|
| 135 | see the manual entry for the Tcl \fBinterp\fR command for details. |
---|
| 136 | If the creation of the new slave interpreter failed, \fBNULL\fR is returned. |
---|
| 137 | .PP |
---|
| 138 | \fBTcl_IsSafe\fR returns \fB1\fR if \fIinterp\fR is |
---|
| 139 | .QW safe |
---|
| 140 | (was created with the \fBTCL_SAFE_INTERPRETER\fR flag specified), |
---|
| 141 | \fB0\fR otherwise. |
---|
| 142 | .PP |
---|
| 143 | \fBTcl_MakeSafe\fR marks \fIinterp\fR as |
---|
| 144 | .QW safe , |
---|
| 145 | so that future |
---|
| 146 | calls to \fBTcl_IsSafe\fR will return 1. It also removes all known |
---|
| 147 | potentially-unsafe core functionality (both commands and variables) |
---|
| 148 | from \fIinterp\fR. However, it cannot know what parts of an extension |
---|
| 149 | or application are safe and does not make any attempt to remove those |
---|
| 150 | parts, so safety is not guaranteed after calling \fBTcl_MakeSafe\fR. |
---|
| 151 | Callers will want to take care with their use of \fBTcl_MakeSafe\fR |
---|
| 152 | to avoid false claims of safety. For many situations, \fBTcl_CreateSlave\fR |
---|
| 153 | may be a better choice, since it creates interpreters in a known-safe state. |
---|
| 154 | .PP |
---|
| 155 | \fBTcl_GetSlave\fR returns a pointer to a slave interpreter of |
---|
| 156 | \fIinterp\fR. The slave interpreter is identified by \fIslaveName\fR. |
---|
| 157 | If no such slave interpreter exists, \fBNULL\fR is returned. |
---|
| 158 | .PP |
---|
| 159 | \fBTcl_GetMaster\fR returns a pointer to the master interpreter of |
---|
| 160 | \fIinterp\fR. If \fIinterp\fR has no master (it is a |
---|
| 161 | top-level interpreter) then \fBNULL\fR is returned. |
---|
| 162 | .PP |
---|
| 163 | \fBTcl_GetInterpPath\fR sets the \fIresult\fR field in \fIaskingInterp\fR |
---|
| 164 | to the relative path between \fIaskingInterp\fR and \fIslaveInterp\fR; |
---|
| 165 | \fIslaveInterp\fR must be a slave of \fIaskingInterp\fR. If the computation |
---|
| 166 | of the relative path succeeds, \fBTCL_OK\fR is returned, else |
---|
| 167 | \fBTCL_ERROR\fR is returned and the \fIresult\fR field in |
---|
| 168 | \fIaskingInterp\fR contains the error message. |
---|
| 169 | .PP |
---|
| 170 | \fBTcl_CreateAlias\fR creates an object command named \fIslaveCmd\fR in |
---|
| 171 | \fIslaveInterp\fR that when invoked, will cause the command \fItargetCmd\fR |
---|
| 172 | to be invoked in \fItargetInterp\fR. The arguments specified by the strings |
---|
| 173 | contained in \fIargv\fR are always prepended to any arguments supplied in the |
---|
| 174 | invocation of \fIslaveCmd\fR and passed to \fItargetCmd\fR. |
---|
| 175 | This operation returns \fBTCL_OK\fR if it succeeds, or \fBTCL_ERROR\fR if |
---|
| 176 | it fails; in that case, an error message is left in the object result |
---|
| 177 | of \fIslaveInterp\fR. |
---|
| 178 | Note that there are no restrictions on the ancestry relationship (as |
---|
| 179 | created by \fBTcl_CreateSlave\fR) between \fIslaveInterp\fR and |
---|
| 180 | \fItargetInterp\fR. Any two interpreters can be used, without any |
---|
| 181 | restrictions on how they are related. |
---|
| 182 | .PP |
---|
| 183 | \fBTcl_CreateAliasObj\fR is similar to \fBTcl_CreateAlias\fR except |
---|
| 184 | that it takes a vector of objects to pass as additional arguments instead |
---|
| 185 | of a vector of strings. |
---|
| 186 | .PP |
---|
| 187 | \fBTcl_GetAlias\fR returns information about an alias \fIaliasName\fR |
---|
| 188 | in \fIinterp\fR. Any of the result fields can be \fBNULL\fR, in |
---|
| 189 | which case the corresponding datum is not returned. If a result field is |
---|
| 190 | non\-\fBNULL\fR, the address indicated is set to the corresponding datum. |
---|
| 191 | For example, if \fItargetNamePtr\fR is non\-\fBNULL\fR it is set to a |
---|
| 192 | pointer to the string containing the name of the target command. |
---|
| 193 | .PP |
---|
| 194 | \fBTcl_GetAliasObj\fR is similar to \fBTcl_GetAlias\fR except that it |
---|
| 195 | returns a pointer to a vector of Tcl_Obj structures instead of a vector of |
---|
| 196 | strings. |
---|
| 197 | .PP |
---|
| 198 | \fBTcl_ExposeCommand\fR moves the command named \fIhiddenCmdName\fR from |
---|
| 199 | the set of hidden commands to the set of exposed commands, putting |
---|
| 200 | it under the name |
---|
| 201 | \fIcmdName\fR. |
---|
| 202 | \fIHiddenCmdName\fR must be the name of an existing hidden |
---|
| 203 | command, or the operation will return \fBTCL_ERROR\fR and leave an error |
---|
| 204 | message in the \fIresult\fR field in \fIinterp\fR. |
---|
| 205 | If an exposed command named \fIcmdName\fR already exists, |
---|
| 206 | the operation returns \fBTCL_ERROR\fR and leaves an error message in the |
---|
| 207 | object result of \fIinterp\fR. |
---|
| 208 | If the operation succeeds, it returns \fBTCL_OK\fR. |
---|
| 209 | After executing this command, attempts to use \fIcmdName\fR in a call to |
---|
| 210 | \fBTcl_Eval\fR or with the Tcl \fBeval\fR command will again succeed. |
---|
| 211 | .PP |
---|
| 212 | \fBTcl_HideCommand\fR moves the command named \fIcmdName\fR from the set of |
---|
| 213 | exposed commands to the set of hidden commands, under the name |
---|
| 214 | \fIhiddenCmdName\fR. |
---|
| 215 | \fICmdName\fR must be the name of an existing exposed |
---|
| 216 | command, or the operation will return \fBTCL_ERROR\fR and leave an error |
---|
| 217 | message in the object result of \fIinterp\fR. |
---|
| 218 | Currently both \fIcmdName\fR and \fIhiddenCmdName\fR must not contain |
---|
| 219 | namespace qualifiers, or the operation will return \fBTCL_ERROR\fR and |
---|
| 220 | leave an error message in the object result of \fIinterp\fR. |
---|
| 221 | The \fICmdName\fR will be looked up in the global namespace, and not |
---|
| 222 | relative to the current namespace, even if the current namespace is not the |
---|
| 223 | global one. |
---|
| 224 | If a hidden command whose name is \fIhiddenCmdName\fR already |
---|
| 225 | exists, the operation also returns \fBTCL_ERROR\fR and the \fIresult\fR |
---|
| 226 | field in \fIinterp\fR contains an error message. |
---|
| 227 | If the operation succeeds, it returns \fBTCL_OK\fR. |
---|
| 228 | After executing this command, attempts to use \fIcmdName\fR in a call to |
---|
| 229 | \fBTcl_Eval\fR or with the Tcl \fBeval\fR command will fail. |
---|
| 230 | .PP |
---|
| 231 | For a description of the Tcl interface to multiple interpreters, see |
---|
| 232 | \fIinterp(n)\fR. |
---|
| 233 | .SH "SEE ALSO" |
---|
| 234 | interp |
---|
| 235 | |
---|
| 236 | .SH KEYWORDS |
---|
| 237 | alias, command, exposed commands, hidden commands, interpreter, invoke, |
---|
| 238 | master, slave |
---|