2 '\" Copyright (c) 1997 Sun Microsystems, Inc.
4 '\" See the file "license.terms" for information on usage and redistribution
5 '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES.
7 .TH Tcl_GetIndexFromObj 3 8.1 Tcl "Tcl Library Procedures"
8 .\" The -*- nroff -*- definitions below are for supplemental macros used
9 .\" in Tcl/Tk manual entries.
11 .\" .AP type name in/out ?indent?
12 .\" Start paragraph describing an argument to a library procedure.
13 .\" type is type of argument (int, etc.), in/out is either "in", "out",
14 .\" or "in/out" to describe whether procedure reads or modifies arg,
15 .\" and indent is equivalent to second arg of .IP (shouldn't ever be
16 .\" needed; use .AS below instead)
19 .\" Give maximum sizes of arguments for setting tab stops. Type and
20 .\" name are examples of largest possible arguments that will be passed
21 .\" to .AP later. If args are omitted, default tab stops are used.
24 .\" Start box enclosure. From here until next .BE, everything will be
25 .\" enclosed in one large box.
28 .\" End of box enclosure.
31 .\" Begin code excerpt.
36 .\" .VS ?version? ?br?
37 .\" Begin vertical sidebar, for use in marking newly-changed parts
38 .\" of man pages. The first argument is ignored and used for recording
39 .\" the version when the .VS was added, so that the sidebars can be
40 .\" found and removed when they reach a certain age. If another argument
41 .\" is present, then a line break is forced before starting the sidebar.
44 .\" End of vertical sidebar.
47 .\" Begin an indented unfilled display.
50 .\" End of indented unfilled display.
53 .\" Start of list of standard options for a Tk widget. The manpage
54 .\" argument defines where to look up the standard options; if
55 .\" omitted, defaults to "options". The options follow on successive
56 .\" lines, in three columns separated by tabs.
59 .\" End of list of standard options for a Tk widget.
61 .\" .OP cmdName dbName dbClass
62 .\" Start of description of a specific option. cmdName gives the
63 .\" option's name as specified in the class command, dbName gives
64 .\" the option's name in the option database, and dbClass gives
65 .\" the option's class in the option database.
68 .\" Print arg1 underlined, then print arg2 normally.
71 .\" Print arg1 in quotes, then arg2 normally (for trailing punctuation).
74 .\" Print an open parenthesis, arg1 in quotes, then arg2 normally
75 .\" (for trailing punctuation) and then a closing parenthesis.
77 .\" # Set up traps and other miscellaneous stuff for Tcl/Tk man pages.
81 .\" # Start an argument description
85 . ie !"\\$2"" .TP \\n()Cu
90 \&\\$1 \\fI\\$2\\fP (\\$3)
103 .\" # define tabbing values for .AP
106 .if !"\\$1"" .nr )A \\w'\\$1'u+3n
109 .if !"\\$2"" .nr )B \\w'\\$2'u+\\n()Au+3n
110 .nr )C \\n()Bu+\\w'(in/out)'u+2n
112 .AS Tcl_Interp Tcl_CreateInterp in/out
113 .\" # BS - start boxed text
114 .\" # ^y = starting y location
122 .if n \l'\\n(.lu\(ul'
125 .\" # BE - end boxed text (draw box now)
130 .ie n \l'\\n(^lu\(ul'
132 .\" Draw four-sided box normally, but don't draw top of
133 .\" box if the box started on an earlier page.
135 \h'-1.5n'\L'|\\n(^yu-1v'\l'\\n(^lu+3n\(ul'\L'\\n(^tu+1v-\\n(^yu'\l'|0u-1.5n\(ul'
138 \h'-1.5n'\L'|\\n(^yu-1v'\h'\\n(^lu+3n'\L'\\n(^tu+1v-\\n(^yu'\l'|0u-1.5n\(ul'
145 .\" # VS - start vertical sidebar
146 .\" # ^Y = starting y location
147 .\" # ^v = 1 (for troff; for nroff this doesn't matter)
151 .ie n 'mc \s12\(br\s0
154 .\" # VE - end of vertical sidebar
162 \h'|\\n(^lu+3n'\L'|\\n(^Yu-1v\(bv'\v'\\n(^tu+1v-\\n(^Yu'\h'-|\\n(^lu+3n'
169 .\" # Special macro to handle page bottom: finish off current
170 .\" # box/sidebar if in box/sidebar mode, then invoked standard
171 .\" # page bottom macro.
178 .\" Draw three-sided box if this is the box's first page,
179 .\" draw two sides but no top otherwise.
180 .ie !\\n(^b-1 \h'-1.5n'\L'|\\n(^yu-1v'\l'\\n(^lu+3n\(ul'\L'\\n(^tu+1v-\\n(^yu'\h'|0u'\c
181 .el \h'-1.5n'\L'|\\n(^yu-1v'\h'\\n(^lu+3n'\L'\\n(^tu+1v-\\n(^yu'\h'|0u'\c
184 .nr ^x \\n(^tu+1v-\\n(^Yu
185 \kx\h'-\\nxu'\h'|\\n(^lu+3n'\ky\L'-\\n(^xu'\v'\\n(^xu'\h'|0u'\c
198 .\" # DS - begin display
204 .\" # DE - end display
210 .\" # SO - start of list of standard options
212 'ie '\\$1'' .ds So \\fBoptions\\fR
213 'el .ds So \\fB\\$1\\fR
214 .SH "STANDARD OPTIONS"
220 .\" # SE - end of list of standard options
225 See the \\*(So manual entry for details on the standard options.
227 .\" # OP - start of full description for a single option
232 Command-Line Name: \\fB\\$1\\fR
233 Database Name: \\fB\\$2\\fR
234 Database Class: \\fB\\$3\\fR
238 .\" # CS - begin code excerpt
244 .\" # CE - end code excerpt
249 .\" # UL - underline word
253 .\" # QW - apply quotation marks to word
255 .ie '\\*(lq'"' ``\\$1''\\$2
256 .\"" fix emacs highlighting
257 .el \\*(lq\\$1\\*(rq\\$2
259 .\" # PQ - apply parens and quotation marks to word
261 .ie '\\*(lq'"' (``\\$1''\\$2)\\$3
262 .\"" fix emacs highlighting
263 .el (\\*(lq\\$1\\*(rq\\$2)\\$3
265 .\" # QR - quoted range
267 .ie '\\*(lq'"' ``\\$1''\\-``\\$2''\\$3
268 .\"" fix emacs highlighting
269 .el \\*(lq\\$1\\*(rq\\-\\*(lq\\$2\\*(rq\\$3
271 .\" # MT - "empty" string
277 Tcl_GetIndexFromObj, Tcl_GetIndexFromObjStruct \- lookup string in table of keywords
280 \fB#include <tcl.h>\fR
283 \fBTcl_GetIndexFromObj\fR(\fIinterp, objPtr, tablePtr, msg, flags,
287 \fBTcl_GetIndexFromObjStruct\fR(\fIinterp, objPtr, structTablePtr, offset,
288 msg, flags, indexPtr\fR)
290 .AS "const char" *structTablePtr in/out
291 .AP Tcl_Interp *interp in
292 Interpreter to use for error reporting; if NULL, then no message is
294 .AP Tcl_Obj *objPtr in/out
295 The string value of this value is used to search through \fItablePtr\fR.
296 The internal representation is modified to hold the index of the matching
298 .AP "const char *const" *tablePtr in
299 An array of null-terminated strings. The end of the array is marked
300 by a NULL string pointer.
301 Note that references to the \fItablePtr\fR may be retained in the
302 internal representation of \fIobjPtr\fR, so this should represent the
303 address of a statically-allocated array.
304 .AP "const void" *structTablePtr in
305 An array of arbitrary type, typically some \fBstruct\fR type.
306 The first member of the structure must be a null-terminated string.
307 The size of the structure is given by \fIoffset\fR.
308 Note that references to the \fIstructTablePtr\fR may be retained in the
309 internal representation of \fIobjPtr\fR, so this should represent the
310 address of a statically-allocated array of structures.
312 The offset to add to structTablePtr to get to the next entry.
313 The end of the array is marked by a NULL string pointer.
314 .AP "const char" *msg in
315 Null-terminated string describing what is being looked up, such as
316 \fBoption\fR. This string is included in error messages.
318 OR-ed combination of bits providing additional information for
319 operation. The only bit that is currently defined is \fBTCL_EXACT\fR.
320 .AP int *indexPtr out
321 The index of the string in \fItablePtr\fR that matches the value of
322 \fIobjPtr\fR is returned here.
326 These procedures provide an efficient way for looking up keywords,
327 switch names, option names, and similar things where the literal value of
328 a Tcl value must be chosen from a predefined set.
329 \fBTcl_GetIndexFromObj\fR compares \fIobjPtr\fR against each of
330 the strings in \fItablePtr\fR to find a match. A match occurs if
331 \fIobjPtr\fR's string value is identical to one of the strings in
332 \fItablePtr\fR, or if it is a non-empty unique abbreviation
333 for exactly one of the strings in \fItablePtr\fR and the
334 \fBTCL_EXACT\fR flag was not specified; in either case
335 the index of the matching entry is stored at \fI*indexPtr\fR
336 and \fBTCL_OK\fR is returned.
338 If there is no matching entry,
339 \fBTCL_ERROR\fR is returned and an error message is left in \fIinterp\fR's
340 result if \fIinterp\fR is not NULL. \fIMsg\fR is included in the
341 error message to indicate what was being looked up. For example,
342 if \fImsg\fR is \fBoption\fR the error message will have a form like
343 .QW "\fBbad option \N'34'firt\N'34': must be first, second, or third\fR" .
345 If \fBTcl_GetIndexFromObj\fR completes successfully it modifies the
346 internal representation of \fIobjPtr\fR to hold the address of
347 the table and the index of the matching entry. If \fBTcl_GetIndexFromObj\fR
348 is invoked again with the same \fIobjPtr\fR and \fItablePtr\fR
349 arguments (e.g. during a reinvocation of a Tcl command), it returns
350 the matching index immediately without having to redo the lookup
351 operation. Note: \fBTcl_GetIndexFromObj\fR assumes that the entries
352 in \fItablePtr\fR are static: they must not change between
353 invocations. If the value of \fIobjPtr\fR is the empty string,
354 \fBTcl_GetIndexFromObj\fR will treat it as a non-matching value
355 and return \fBTCL_ERROR\fR.
357 \fBTcl_GetIndexFromObjStruct\fR works just like
358 \fBTcl_GetIndexFromObj\fR, except that instead of treating
359 \fItablePtr\fR as an array of string pointers, it treats it as a
360 pointer to the first string in a series of strings that have
361 \fIoffset\fR bytes between them (i.e. that there is a pointer to the
362 first array of characters at \fItablePtr\fR, a pointer to the second
363 array of characters at \fItablePtr\fR+\fIoffset\fR bytes, etc.)
364 This is particularly useful when processing things like
365 \fBTk_ConfigurationSpec\fR, whose string keys are in the same place in
366 each of several array elements.
368 prefix(n), Tcl_WrongNumArgs(3)
370 index, option, value, table lookup