File:  [parser3project] / parser3 / src / include / pa_request.h
Revision 1.7: download - view: text, annotated - select for diffs - revision graph
Wed Feb 21 17:36:30 2001 UTC (25 years, 4 months ago) by paf
Branches: MAIN
CVS tags: HEAD
get put -1 [just compiled]

/*
  $Id: pa_request.h,v 1.7 2001/02/21 17:36:30 paf Exp $
*/

#ifndef PA_REQUEST_H
#define PA_REQUEST_H

#include "pa_pool.h"
#include "pa_exception.h"
#include "pa_hash.h"
#include "pa_wcontext.h"
#include "pa_value.h"
#include "pa_stack.h"

#define MAIN_METHOD_NAME "main"

#ifndef NO_STRING_ORIGIN
#	define COMPILE_PARAMS char *source, char *file
#	define COMPILE(source, file) real_compile(source, file)
#else
#	define COMPILE_PARAMS char *source
#	define COMPILE(source, file) real_compile(source)
#endif

class Local_request_exception;

class Request : public Pooled {
	friend Local_request_exception;
public:
	
	Request(Pool& apool) : Pooled(apool),
		fpool(apool), 
		stack(apool),
		fclasses(apool)
		{
	}
	~Request() {}

	// IMPORTANT: don't use without  Local_request_exception 
	Exception& exception() { return *fexception; }

	// global classes
	Hash& classes() { return fclasses; }

	// core request processing
	void core();

private: // core data

	// classes
	Hash fclasses;

	// contexts
	Value *root, *self, *rcontext;
	WContext *wcontext;
	
	// execution stack
	Stack stack;

private: // core.C

	Array& load_and_compile_RUN();
	VClass *construct_class(String& name, Array& compiled_methods);
	char *execute_MAIN(VClass *class_RUN);

private: // compile.C

	Array& real_compile(COMPILE_PARAMS);

private: // execute.C

	void execute(Array& ops);

protected:

	// all request' objects are allocated in this pool
	Pool& fpool;

	// exception replacement mechanism is protected from direct usage
	// Local_request_exception object enforces paired set/restore
	Exception *set_exception(Exception *e){
		Exception *r=fexception;
		fexception=e;
		return r;
	}
	void restore_exception(Exception *e) {
		fexception=e;
	}

private:

	// current request's exception object
	Exception *fexception;

};

class Local_request_exception {
	Request request;
	Exception *saved_exception;
public:
	Local_request_exception(Request& arequest, Exception& exception) : 
		request(arequest),
		saved_exception(arequest.set_exception(&exception)) {}
	~Local_request_exception() { request.restore_exception(saved_exception); }
};

// core func
void core();

#endif

E-mail: