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)  

RexxEnvelope.hpp
Go to the documentation of this file.
1 /*----------------------------------------------------------------------------*/
2 /* */
3 /* Copyright (c) 1995, 2004 IBM Corporation. All rights reserved. */
4 /* Copyright (c) 2005-2009 Rexx Language Association. All rights reserved. */
5 /* */
6 /* This program and the accompanying materials are made available under */
7 /* the terms of the Common Public License v1.0 which accompanies this */
8 /* distribution. A copy is also available at the following address: */
9 /* http://www.oorexx.org/license.html */
10 /* */
11 /* Redistribution and use in source and binary forms, with or */
12 /* without modification, are permitted provided that the following */
13 /* conditions are met: */
14 /* */
15 /* Redistributions of source code must retain the above copyright */
16 /* notice, this list of conditions and the following disclaimer. */
17 /* Redistributions in binary form must reproduce the above copyright */
18 /* notice, this list of conditions and the following disclaimer in */
19 /* the documentation and/or other materials provided with the distribution. */
20 /* */
21 /* Neither the name of Rexx Language Association nor the names */
22 /* of its contributors may be used to endorse or promote products */
23 /* derived from this software without specific prior written permission. */
24 /* */
25 /* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS */
26 /* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT */
27 /* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS */
28 /* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT */
29 /* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, */
30 /* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED */
31 /* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, */
32 /* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY */
33 /* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING */
34 /* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS */
35 /* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
36 /* */
37 /*----------------------------------------------------------------------------*/
38 /******************************************************************************/
39 /* REXX Kernel RexxEnvelope.hpp */
40 /* */
41 /* Primitive Envelope Class Definitions */
42 /* */
43 /******************************************************************************/
44 #ifndef Included_RexxEnvelope
45 #define Included_RexxEnvelope
46 
47 class RexxSmartBuffer;
48 class RexxBuffer;
49 
50 // default size of the buffer used for flatten operations
51 #define DEFAULT_ENVELOPE_BUFFER (64*1024)
52 
54 {
55  public:
56  void *operator new(size_t);
57  inline void *operator new(size_t size, void *ptr) {return ptr;}
58  RexxEnvelope();
59  inline RexxEnvelope(RESTORETYPE restoreType) { ; };
60  void live(size_t);
61  void liveGeneral(int reason);
62 
63  void flattenReference(void *, size_t, void *);
65  void puff(RexxBuffer *, char *, size_t length);
66  size_t queryObj(RexxObject *);
67  size_t copyBuffer(RexxObject *);
68  void rehash();
69  char *bufferStart();
70  void associateObject(RexxObject *, size_t);
71  void addTable(RexxObject *obj);
72 
73  inline RexxSmartBuffer *getBuffer() {return this->buffer;}
74  inline RexxObject *getReceiver() {return this->receiver;}
75  inline size_t getCurrentOffset() { return this->currentOffset; }
76  inline RexxIdentityTable *getDuptable() {return this->duptable;}
77  inline RexxIdentityTable *getRehashtable() {return this->rehashtable;}
78 
79  size_t currentOffset; /* current flattening offset */
80 
81 protected:
83  RexxObject *receiver; /* object to receive the message */
84  RexxIdentityTable *duptable; /* table of duplicates */
85  RexxIdentityTable *savetable; /* table of protected objects created during flattening */
86  RexxSmartBuffer *buffer; /* smart buffer wrapper */
87  RexxIdentityTable *rehashtable; /* table to rehash */
88  RexxStack *flattenStack; /* the flattening stack */
89 };
90 #endif
RexxEnvelope::RexxEnvelope
RexxEnvelope(RESTORETYPE restoreType)
Definition: RexxEnvelope.hpp:59
RexxEnvelope::liveGeneral
void liveGeneral(int reason)
Definition: RexxEnvelope.cpp:79
RexxEnvelope::live
void live(size_t)
Definition: RexxEnvelope.cpp:63
RexxInternalObject
Definition: ObjectClass.hpp:206
RexxEnvelope::bufferStart
char * bufferStart()
Definition: RexxEnvelope.cpp:413
RexxEnvelope::home
RexxObject * home
Definition: RexxEnvelope.hpp:82
RexxEnvelope::receiver
RexxObject * receiver
Definition: RexxEnvelope.hpp:83
RexxSmartBuffer
Definition: RexxSmartBuffer.hpp:47
RexxEnvelope::associateObject
void associateObject(RexxObject *, size_t)
Definition: RexxEnvelope.cpp:421
RexxEnvelope::getDuptable
RexxIdentityTable * getDuptable()
Definition: RexxEnvelope.hpp:76
RexxEnvelope
Definition: RexxEnvelope.hpp:53
RexxBuffer
Definition: BufferClass.hpp:91
RexxEnvelope::queryObj
size_t queryObj(RexxObject *)
Definition: RexxEnvelope.cpp:345
RexxEnvelope::buffer
RexxSmartBuffer * buffer
Definition: RexxEnvelope.hpp:86
RexxEnvelope::savetable
RexxIdentityTable * savetable
Definition: RexxEnvelope.hpp:85
RexxEnvelope::getBuffer
RexxSmartBuffer * getBuffer()
Definition: RexxEnvelope.hpp:73
RexxEnvelope::duptable
RexxIdentityTable * duptable
Definition: RexxEnvelope.hpp:84
RexxEnvelope::rehashtable
RexxIdentityTable * rehashtable
Definition: RexxEnvelope.hpp:87
RexxEnvelope::getReceiver
RexxObject * getReceiver()
Definition: RexxEnvelope.hpp:74
RexxEnvelope::currentOffset
size_t currentOffset
Definition: RexxEnvelope.hpp:79
RexxStack
Definition: StackClass.hpp:47
RexxEnvelope::copyBuffer
size_t copyBuffer(RexxObject *)
Definition: RexxEnvelope.cpp:354
RexxEnvelope::RexxEnvelope
RexxEnvelope()
Definition: RexxEnvelope.cpp:56
RexxEnvelope::addTable
void addTable(RexxObject *obj)
Definition: RexxEnvelope.cpp:433
RexxEnvelope::flattenStack
RexxStack * flattenStack
Definition: RexxEnvelope.hpp:88
RexxEnvelope::flattenReference
void flattenReference(void *, size_t, void *)
Definition: RexxEnvelope.cpp:95
RexxEnvelope::pack
RexxBuffer * pack(RexxObject *)
Definition: RexxEnvelope.cpp:168
RexxEnvelope::getCurrentOffset
size_t getCurrentOffset()
Definition: RexxEnvelope.hpp:75
RexxEnvelope::puff
void puff(RexxBuffer *, char *, size_t length)
Definition: RexxEnvelope.cpp:242
RexxIdentityTable
Definition: IdentityTableClass.hpp:49
RESTORETYPE
RESTORETYPE
Definition: ObjectClass.hpp:80
RexxEnvelope::rehash
void rehash()
Definition: RexxEnvelope.cpp:393
RexxEnvelope::getRehashtable
RexxIdentityTable * getRehashtable()
Definition: RexxEnvelope.hpp:77
RexxObject
Definition: ObjectClass.hpp:311