diff --git a/vbox3/vboxgetty/tclscript.h b/vbox3/vboxgetty/tclscript.h new file mode 100644 index 00000000..05059339 --- /dev/null +++ b/vbox3/vboxgetty/tclscript.h @@ -0,0 +1,40 @@ +/* +** $Id$ +** +** Copyright 1996-1998 Michael 'Ghandi' Herold +*/ + +#ifndef _VBOX_TCLSCRIPT_H +#define _VBOX_TCLSCRIPT_H 1 + +#include +#include "userrc.h" + +/** Structures ***********************************************************/ + +struct vbox_tcl_function +{ + unsigned char *name; + Tcl_ObjCmdProc *proc; +}; + +struct vbox_tcl_variable +{ + unsigned char *name; + unsigned char *args; +}; + +/** Defines **************************************************************/ + +#define VBOX_TCLFUNC_PROTO ClientData, Tcl_Interp *, int, Tcl_Obj *CONST [] +#define VBOX_TCLFUNC ClientData data, Tcl_Interp *intp, int objc, Tcl_Obj *CONST objv[] + +/** Prototypes ***********************************************************/ + +extern int scr_create_interpreter(void); +extern void scr_remove_interpreter(void); +extern int scr_execute(unsigned char *, struct vboxuser *); +extern int scr_init_variables(struct vbox_tcl_variable *); +extern unsigned char *scr_tcl_version(void); + +#endif /* _VBOX_TCLSCRIPT_H */