ooRexx  4.2.0-source
About: ooRexx (Open Object Rexx) is a free implementation of Object Rexx. Object Rexx is an enhancement of the classic Rexx interpreter; a full-featured programming language with a human-oriented syntax.
  Fossies Dox: ooRexx-4.2.0-source.tar.gz  ("inofficial" and yet experimental doxygen-generated source code documentation)  

hostemu.h
Go to the documentation of this file.
1 /*----------------------------------------------------------------------------*/
2 /* */
3 /* Copyright (c) 2009-2010 Rexx Language Association. All rights reserved. */
4 /* */
5 /* This program and the accompanying materials are made available under */
6 /* the terms of the Common Public License v1.0 which accompanies this */
7 /* distribution. A copy is also available at the following address: */
8 /* http://www.oorexx.org/license.html */
9 /* */
10 /* Redistribution and use in source and binary forms, with or */
11 /* without modification, are permitted provided that the following */
12 /* conditions are met: */
13 /* */
14 /* Redistributions of source code must retain the above copyright */
15 /* notice, this list of conditions and the following disclaimer. */
16 /* Redistributions in binary form must reproduce the above copyright */
17 /* notice, this list of conditions and the following disclaimer in */
18 /* the documentation and/or other materials provided with the distribution. */
19 /* */
20 /* Neither the name of Rexx Language Association nor the names */
21 /* of its contributors may be used to endorse or promote products */
22 /* derived from this software without specific prior written permission. */
23 /* */
24 /* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS */
25 /* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT */
26 /* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS */
27 /* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT */
28 /* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, */
29 /* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED */
30 /* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, */
31 /* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY */
32 /* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING */
33 /* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS */
34 /* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
35 /* */
36 /* Authors; */
37 /* W. David Ashley <dashley@us.ibm.com> */
38 /* */
39 /*----------------------------------------------------------------------------*/
40 
41 
42 #ifndef HOSTEMU_INCLUDED
43 #define HOSTEMU_INCLUDED
44 
45 
46 /*--------------------------------------------------------------------*/
47 /* */
48 /* Prototype definitions for external functions */
49 /* */
50 /*--------------------------------------------------------------------*/
51 
52 int yyparse (
53  void); /* no arguments */
55  unsigned short int *flags,
56  PRXSTRING retc);
57 
58 
59 /*--------------------------------------------------------------------*/
60 /* */
61 /* Global definitions */
62 /* */
63 /*--------------------------------------------------------------------*/
64 
65 // Use the following to get debug messages to stdout
66 // #define HOSTEMU_DEBUG
67 
68 #define SYMTABLESIZE 15
69 #define EXECIO_STMT 0
70 #define HI_STMT 1
71 #define TE_STMT 2
72 #define TS_STMT 3
73 typedef struct _EXECIO_OPTIONS
74  {
75  long lRcdCnt; /* # of records to be processed */
76  bool fRW; /* DISKR or DISKW */
77  char aFilename [1024]; /* ddname (filename) */
78  char aStem [251]; /* stem variable name */
79  bool fFinis; /* FINIS option */
80  long lStartRcd; /* start record number */
81  long lDirection; /* FIFO, LIFO or SKIP option */
83 
84 
85 /*--------------------------------------------------------------------*/
86 /* */
87 /* Extern definitions */
88 /* */
89 /*--------------------------------------------------------------------*/
90 
91 extern const char * szVersion;
92 extern const char * szDate;
94 extern PCONSTRXSTRING prxCmd;
95 extern long lCmdPtr;
96 extern unsigned long ulNumSym;
97 extern char * pszSymbol [SYMTABLESIZE];
98 extern long lStmtType;
99 
100 #endif /* HOSTEMU_INCLUDED */
EXECIO_OPTIONS
struct _EXECIO_OPTIONS EXECIO_OPTIONS
prxCmd
PCONSTRXSTRING prxCmd
Definition: hostemu.cpp:62
_EXECIO_OPTIONS::fRW
bool fRW
Definition: hostemu.h:76
_EXECIO_OPTIONS::aFilename
char aFilename[1024]
Definition: hostemu.h:77
RexxReturnCode
int RexxReturnCode
Definition: rexx.h:73
_EXECIO_OPTIONS::lDirection
long lDirection
Definition: hostemu.h:81
yyparse
int yyparse(void)
Definition: cmdparse.cpp:1212
_EXECIO_OPTIONS::lStartRcd
long lStartRcd
Definition: hostemu.h:80
_EXECIO_OPTIONS::lRcdCnt
long lRcdCnt
Definition: hostemu.h:75
lCmdPtr
long lCmdPtr
Definition: hostemu.cpp:64
_RXSTRING
Definition: rexx.h:156
lStmtType
long lStmtType
Definition: hostemu.cpp:68
szDate
const char * szDate
szVersion
const char * szVersion
GrxHost
RexxReturnCode RexxEntry GrxHost(PCONSTRXSTRING command, unsigned short int *flags, PRXSTRING retc)
Definition: hostemu.cpp:266
SYMTABLESIZE
#define SYMTABLESIZE
Definition: hostemu.h:68
_EXECIO_OPTIONS
Definition: hostemu.h:73
ulNumSym
unsigned long ulNumSym
Definition: hostemu.cpp:65
pszSymbol
char * pszSymbol[15]
Definition: hostemu.cpp:66
ExecIO_Options
EXECIO_OPTIONS ExecIO_Options
Definition: hostemu.cpp:63
_EXECIO_OPTIONS::aStem
char aStem[251]
Definition: hostemu.h:78
RexxEntry
#define RexxEntry
Definition: rexx.h:233
_CONSTRXSTRING
Definition: rexx.h:161
_EXECIO_OPTIONS::fFinis
bool fFinis
Definition: hostemu.h:79