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 */
+