/usr/src/WrapITK/Tcl/itkTclCommand.h is in libinsighttoolkit3-dev 3.20.1-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 | /*=========================================================================
Program: Insight Segmentation & Registration Toolkit
Module: itkTclCommand.h
Language: C++
Date: $Date$
Version: $Revision$
Copyright (c) Insight Software Consortium. All rights reserved.
See ITKCopyright.txt or http://www.itk.org/HTML/Copyright.htm for details.
This software is distributed WITHOUT ANY WARRANTY; without even
the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
PURPOSE. See the above copyright notices for more information.
=========================================================================*/
#ifndef _itkTclCommand_h
#define _itkTclCommand_h
#include "itkCommand.h"
#include <tcl.h>
namespace itk
{
/** \Class TclCommand
* \brief Command subclass that calls back to a Tcl interpreter.
*
* TclCommand can be given a string and a Tcl interpreter. When it is
* invoked, it will invoke the string in the Tcl interpreter as a
* command. This can be used to create arbitrary Tcl event callbacks
* in ITK Tcl scripts.
*/
class TclCommand : public Command
{
public:
///! Standard "Self" typedef.
typedef TclCommand Self;
///! Smart pointer typedef support.
typedef SmartPointer<Self> Pointer;
///! Run-time type information (and related methods).
itkTypeMacro(TclCommand,Command);
///! Method for creation through the object factory.
itkNewMacro(Self);
void SetInterpreter(Tcl_Interp*);
Tcl_Interp* GetInterpreter() const;
void SetCommandString(const char*);
const char* GetCommandString() const;
void Execute(Object*, const EventObject & );
void Execute(const Object*, const EventObject & );
protected:
TclCommand();
~TclCommand() {}
TclCommand(const Self&); // Not implemented.
void operator=(const Self&); // Not implemented.
void TclExecute() const;
private:
///! The Tcl interpreter in which the command will be invoked.
Tcl_Interp* m_Interpreter;
///! The command to invoke in the Tcl interpreter.
std::string m_CommandString;
};
} // namespace itk
#endif // _itkTclCommand_h
|