1 | /* ======================================================================== *\
|
---|
2 | !
|
---|
3 | ! *
|
---|
4 | ! * This file is part of MARS, the MAGIC Analysis and Reconstruction
|
---|
5 | ! * Software. It is distributed to you in the hope that it can be a useful
|
---|
6 | ! * and timesaving tool in analysing Data of imaging Cerenkov telescopes.
|
---|
7 | ! * It is distributed WITHOUT ANY WARRANTY.
|
---|
8 | ! *
|
---|
9 | ! * Permission to use, copy, modify and distribute this software and its
|
---|
10 | ! * documentation for any purpose is hereby granted without fee,
|
---|
11 | ! * provided that the above copyright notice appear in all copies and
|
---|
12 | ! * that both that copyright notice and this permission notice appear
|
---|
13 | ! * in supporting documentation. It is provided "as is" without express
|
---|
14 | ! * or implied warranty.
|
---|
15 | ! *
|
---|
16 | !
|
---|
17 | !
|
---|
18 | ! Author(s): Thomas Bretz, 6/2003 <mailto:tbretz@astro.uni-wuerzburg.de>
|
---|
19 | !
|
---|
20 | ! Copyright: MAGIC Software Development, 2000-2003
|
---|
21 | !
|
---|
22 | !
|
---|
23 | \* ======================================================================== */
|
---|
24 |
|
---|
25 | /////////////////////////////////////////////////////////////////////////////
|
---|
26 | //
|
---|
27 | // MTaskInteractive
|
---|
28 | //
|
---|
29 | // If you want to create a new task inside a macro you will have to compile
|
---|
30 | // your macro using macro.C++, because the root interpreter cannot use
|
---|
31 | // uncompiled classes. To workaround this problem you can write simple
|
---|
32 | // funcions (which can be handled by CINT) and use MTaskInteractive.
|
---|
33 | //
|
---|
34 | // This is a simple way to develop new code in a macro without need
|
---|
35 | // to compile it.
|
---|
36 | //
|
---|
37 | // Example:
|
---|
38 | // Int_t Process()
|
---|
39 | // {
|
---|
40 | // gLog << "Processing..." << endl;
|
---|
41 | // return kTRUE;
|
---|
42 | // }
|
---|
43 | //
|
---|
44 | // void main()
|
---|
45 | // {
|
---|
46 | // MTaskInteractive task;
|
---|
47 | // task.SetProcess(Process);
|
---|
48 | // MTaskList list;
|
---|
49 | // list.AddToList(&task);
|
---|
50 | // }
|
---|
51 | //
|
---|
52 | //
|
---|
53 | // Input Containers:
|
---|
54 | // -/-
|
---|
55 | //
|
---|
56 | // Output Containers:
|
---|
57 | // -/-
|
---|
58 | //
|
---|
59 | /////////////////////////////////////////////////////////////////////////////
|
---|
60 | #include "MTaskInteractive.h"
|
---|
61 |
|
---|
62 | #include <Api.h>
|
---|
63 | #include <TMethodCall.h>
|
---|
64 |
|
---|
65 | #include "MLog.h"
|
---|
66 | #include "MLogManip.h"
|
---|
67 |
|
---|
68 | ClassImp(MTaskInteractive);
|
---|
69 |
|
---|
70 | using namespace std;
|
---|
71 |
|
---|
72 | // --------------------------------------------------------------------------
|
---|
73 | //
|
---|
74 | // Default Constructor. Takes name and title of the interactive task
|
---|
75 | //
|
---|
76 | MTaskInteractive::MTaskInteractive(const char *name, const char *title) :
|
---|
77 | fPreProcess(NULL), fProcess(NULL), fPostProcess(NULL)
|
---|
78 | {
|
---|
79 | fName = name ? name : "MTaskInteractive";
|
---|
80 | fTitle = title ? title : "Interactive task";
|
---|
81 |
|
---|
82 | fCall[0] = 0;
|
---|
83 | fCall[1] = 0;
|
---|
84 | fCall[2] = 0;
|
---|
85 | }
|
---|
86 |
|
---|
87 | // --------------------------------------------------------------------------
|
---|
88 | //
|
---|
89 | // Destructor. Free all resources.
|
---|
90 | //
|
---|
91 | MTaskInteractive::~MTaskInteractive()
|
---|
92 | {
|
---|
93 | Free(0);
|
---|
94 | Free(1);
|
---|
95 | Free(2);
|
---|
96 | }
|
---|
97 |
|
---|
98 | // --------------------------------------------------------------------------
|
---|
99 | //
|
---|
100 | // Calls the function and returns its return value.
|
---|
101 | // Called by PreProcess, Process, PostProcess and ReInit.
|
---|
102 | //
|
---|
103 | inline Int_t MTaskInteractive::Return(Int_t no, void *params)
|
---|
104 | {
|
---|
105 | // Static function called when SetFCN is called in interactive mode
|
---|
106 | if (!fCall[no])
|
---|
107 | {
|
---|
108 | gLog << err << dbginf << "Return(" << no << ") - TMethodCall not set." << endl;
|
---|
109 | return kFALSE;
|
---|
110 | }
|
---|
111 |
|
---|
112 | Long_t result;
|
---|
113 | fCall[no]->SetParamPtrs(params);
|
---|
114 | fCall[no]->Execute(result);
|
---|
115 |
|
---|
116 | return result;
|
---|
117 | }
|
---|
118 |
|
---|
119 | // --------------------------------------------------------------------------
|
---|
120 | //
|
---|
121 | // Generalized function to set the functions of your interactive task.
|
---|
122 | // Called by SetPreProcess, SetProcess, SetPostProcess and SetReInit
|
---|
123 | //
|
---|
124 | Bool_t MTaskInteractive::Set(void *fcn, Int_t no, const char *params)
|
---|
125 | {
|
---|
126 | // this function is called by CINT instead of the function above
|
---|
127 | if (!fcn)
|
---|
128 | return kFALSE;
|
---|
129 |
|
---|
130 | char *funcname = G__p2f2funcname(fcn);
|
---|
131 | if (!funcname)
|
---|
132 | return kFALSE;
|
---|
133 |
|
---|
134 | Free(no);
|
---|
135 |
|
---|
136 | fCall[no] = new TMethodCall;
|
---|
137 | fCall[no]->InitWithPrototype(funcname, params);
|
---|
138 |
|
---|
139 | gLog << inf << GetDescriptor() << ": Using " << funcname << " as ";
|
---|
140 | switch (no)
|
---|
141 | {
|
---|
142 | case 0:
|
---|
143 | gLog << "Pre";
|
---|
144 | break;
|
---|
145 | case 2:
|
---|
146 | gLog << "Post";
|
---|
147 | break;
|
---|
148 |
|
---|
149 | }
|
---|
150 | gLog << "Process-function." << endl;
|
---|
151 |
|
---|
152 | return kTRUE;
|
---|
153 | }
|
---|
154 |
|
---|
155 | // --------------------------------------------------------------------------
|
---|
156 | //
|
---|
157 | //
|
---|
158 | //
|
---|
159 | void MTaskInteractive::Free(Int_t no)
|
---|
160 | {
|
---|
161 | if (!fCall[no])
|
---|
162 | return;
|
---|
163 | delete fCall[no];
|
---|
164 | fCall[no] = 0;
|
---|
165 | }
|
---|