IsisReader: contrib/openisis/tcl/openisistcl.h Source File

00001 /*
00002         openisis - an open implementation of the CDS/ISIS database
00003         Version 0.8.x (patchlevel see file Version)
00004         Copyright (C) 2001-2003 by Erik Grziwotz, erik@openisis.org
00005 
00006         This library is free software; you can redistribute it and/or
00007         modify it under the terms of the GNU Lesser General Public
00008         License as published by the Free Software Foundation; either
00009         version 2.1 of the License, or (at your option) any later version.
00010 
00011         This library is distributed in the hope that it will be useful,
00012         but WITHOUT ANY WARRANTY; without even the implied warranty of
00013         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
00014         Lesser General Public License for more details.
00015 
00016         You should have received a copy of the GNU Lesser General Public
00017         License along with this library; if not, write to the Free Software
00018         Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
00019 
00020         see README for more information
00021 EOH */
00022 
00023 /*
00024         $Id: openisistcl.h,v 1.12 2003/06/06 12:38:39 mawag Exp $
00025         tcl/tk binding
00026 */
00027 
00028 #ifndef OPENISISTCL
00029 #define OPENISISTCL
00030 
00031 #include <tcl.h>
00032 
00033 EXTERN int openIsisTclInit _ANSI_ARGS_ ( ( Tcl_Interp *interp ) );
00034 
00037 EXTERN int openIsisTclNewSession _ANSI_ARGS_ ( ( Tcl_Interp *ip ) );
00038 
00041 EXTERN int openIsisTclGetSession _ANSI_ARGS_ ( (int sessid, Tcl_Interp **ip ) );
00042 
00043 /*
00044         interface needed by "main-threaded" server:
00045         - create commands for records "req", "res", "ses"
00046         - bind Recs to those commands and set "the" session.
00047                 all recs are dynamic and can be assumed to belong to "the" session.
00048                 should be discarded by "the" session when extended.
00049                 the "req" record must not be modified
00050                 (since it's real owner session might be working in parallel).
00051                 modification would require "copy-on-write".
00052         - retrieve Recs
00053         future extension:
00054         the same game with multiple openIsisTclSessions,
00055         each with one interp (constant)
00056 */
00063 EXTERN int openIsisTclCreateRecCmd (
00064         int sid, const char *nam, const char *fdt, int flg );
00078 EXTERN int openIsisTclEval ( int sid,
00079         int cnt, const int *ids, OpenIsisRec **recs, char *script );
00080 
00081 
00082 #endif /* OPENISISTCL */