PackageManager.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.ibm.com/developerworks/oss/CPLv1.0.htm */
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 */
40 /* */
41 /* Primitive Rexx function/method package */
42 /* */
43 /******************************************************************************/
44 #ifndef PackageManager_Included
45 #define PackageManager_Included
46 
47 #include "RexxCore.h"
48 #include "LibraryPackage.hpp"
49 
50 class BaseCode;
51 class RoutineClass;
52 class ProtectedObject;
53 class RexxArray;
54 class RexxActivity;
55 class RexxNativeMethod;
56 class ProtectedObject;
57 class PackageClass;
58 
60 {
61 public:
62  static void live(size_t liveMark);
63  static void liveGeneral(int reason);
64 
65  static void initialize();
66  static RexxArray *getImageData();
67  static void restore(RexxArray *imageArray);
68  static void restore();
69  static LibraryPackage *getLibrary(RexxString *name);
70  static LibraryPackage *loadLibrary(RexxString *name);
71  static void unload();
72  static RexxNativeMethod *resolveMethod(RexxString *packageName, RexxString *methodName);
73  static RexxNativeMethod *loadMethod(RexxString *packageName, RexxString *methodName);
74  static RoutineClass *resolveRoutine(RexxString *function, RexxString *packageName, RexxString *procedure);
75  static RoutineClass *resolveRoutine(RexxString *packageName, RexxString *function);
76  static RoutineClass *loadRoutine(RexxString *packageName, RexxString *function);
77  static RoutineClass *resolveRoutine(RexxString *function);
79  static RoutineClass *getLoadedRoutine(RexxString *function);
80  static PNATIVEMETHOD resolveMethodEntry(RexxString *package, RexxString *name);
83  static void addPackageRoutine(RexxString *name, RoutineClass *func);
84  static void loadInternalPackage(RexxString *name, RexxPackageEntry *p);
85  static bool registerPackage(RexxString *name, RexxPackageEntry *p);
86  static RexxObject *addRegisteredRoutine(RexxString *name, RexxString *module, RexxString *proc);
89  static bool callNativeRoutine(RexxActivity *activity, RexxString *name,
90  RexxObject **arguments, size_t argcount, size_t named_argcount, ProtectedObject &result);
91 
92  static RoutineClass *loadRequires(RexxActivity *activity, RexxString *shortName, RexxString *resolvedName, ProtectedObject &result);
93  static RoutineClass *getMacroSpaceRequires(RexxActivity *activity, RexxString *name, ProtectedObject &result, RexxObject *securityManager);
94  static RoutineClass *getRequiresFile(RexxActivity *activity, RexxString *name, RexxObject *securityManager, ProtectedObject &result);
95  static RoutineClass *loadRequires(RexxActivity *activity, RexxString *name, const char *data, size_t length, ProtectedObject &result);
96  static RoutineClass *loadRequires(RexxActivity *activity, RexxString *name, RexxArray *data, ProtectedObject &result);
97 
98 protected:
99 
101 
102  enum
103  {
109  };
110 
111  static RexxDirectory *imagePackages; // our loaded packages
112  static RexxDirectory *imagePackageRoutines; // table of functions loaded from packages
113  static RexxDirectory *imageRegisteredRoutines; // table of functions resolved by older registration mechanisms
114  static RexxDirectory *imageLoadedRequires; // table of previously loaded requires files
115 
116 
117  static RexxDirectory *packages; // our loaded packages
118  static RexxDirectory *packageRoutines; // table of functions loaded from packages
119  static RexxDirectory *registeredRoutines; // table of functions resolved by older registration mechanisms
120  static RexxDirectory *loadedRequires; // table of previously loaded requires files
121 
122  static RexxPackageEntry *rexxPackage; // internal generated REXX package
123 };
124 
125 #endif
126 
size_t(RexxEntry * PREGISTEREDROUTINE)(const char *, size_t, PCONSTRXSTRING, const char *, PRXSTRING)
uint16_t *(RexxEntry * PNATIVEMETHOD)(RexxMethodContext *, ValueDescriptor *)
uint16_t *(RexxEntry * PNATIVEROUTINE)(RexxCallContext *, ValueDescriptor *)
static RexxObject * dropRegisteredRoutine(RexxString *name)
static RexxDirectory * imagePackageRoutines
static RexxDirectory * registeredRoutines
static RoutineClass * resolveRoutine(RexxString *function, RexxString *packageName, RexxString *procedure)
static PNATIVEROUTINE resolveRoutineEntry(RexxString *package, RexxString *name)
static RoutineClass * getMacroSpaceRequires(RexxActivity *activity, RexxString *name, ProtectedObject &result, RexxObject *securityManager)
static void liveGeneral(int reason)
static bool callNativeRoutine(RexxActivity *activity, RexxString *name, RexxObject **arguments, size_t argcount, size_t named_argcount, ProtectedObject &result)
static void live(size_t liveMark)
static RexxDirectory * imageLoadedRequires
static RexxArray * getImageData()
static RexxDirectory * packageRoutines
static void addPackageRoutine(RexxString *name, RoutineClass *func)
static RoutineClass * loadRequires(RexxActivity *activity, RexxString *shortName, RexxString *resolvedName, ProtectedObject &result)
static RexxObject * queryRegisteredRoutine(RexxString *name)
static RexxPackageEntry * rexxPackage
static PREGISTEREDROUTINE resolveRegisteredRoutineEntry(RexxString *package, RexxString *name)
static RexxNativeMethod * loadMethod(RexxString *packageName, RexxString *methodName)
static RexxDirectory * imagePackages
static void unload()
static PNATIVEMETHOD resolveMethodEntry(RexxString *package, RexxString *name)
static LibraryPackage * loadLibrary(RexxString *name)
static void restore()
static RexxDirectory * loadedRequires
static RexxDirectory * packages
static void initialize()
static RoutineClass * checkRequiresCache(RexxString *name, ProtectedObject &result)
static bool registerPackage(RexxString *name, RexxPackageEntry *p)
static RexxDirectory * imageRegisteredRoutines
static LibraryPackage * getLibrary(RexxString *name)
static RexxNativeMethod * resolveMethod(RexxString *packageName, RexxString *methodName)
static void loadInternalPackage(RexxString *name, RexxPackageEntry *p)
static RoutineClass * getLoadedRoutine(RexxString *function)
static RoutineClass * getRequiresFile(RexxActivity *activity, RexxString *name, RexxObject *securityManager, ProtectedObject &result)
static RexxObject * addRegisteredRoutine(RexxString *name, RexxString *module, RexxString *proc)
static RoutineClass * loadRoutine(RexxString *packageName, RexxString *function)
static RoutineClass * createRegisteredRoutine(RexxString *function)
Definition: oorexxapi.h:242