| 1 | // This may look like C code, but it is really -*- C++ -*-
|
|---|
| 2 | // Classe interpreteur de commande pour piapp
|
|---|
| 3 | // Reza Aout 97 , Juillet,Aout 98
|
|---|
| 4 | // Octobre 2003: de PIext -> SysTools
|
|---|
| 5 | // LAL-IN2P3/CNRS DAPNIA/CEA
|
|---|
| 6 |
|
|---|
| 7 | #ifndef COMMANDER_H_SEEN
|
|---|
| 8 | #define COMMANDER_H_SEEN
|
|---|
| 9 |
|
|---|
| 10 | #include "machdefs.h"
|
|---|
| 11 | #include <iostream>
|
|---|
| 12 | #include <fstream>
|
|---|
| 13 | #include <string>
|
|---|
| 14 | #include <vector>
|
|---|
| 15 | #include <list>
|
|---|
| 16 | #include <stack>
|
|---|
| 17 | #include <map>
|
|---|
| 18 | #include <functional>
|
|---|
| 19 |
|
|---|
| 20 | #include "pdlmgr.h"
|
|---|
| 21 | #include "dvlist.h"
|
|---|
| 22 | #include "ctimer.h"
|
|---|
| 23 |
|
|---|
| 24 | namespace SOPHYA {
|
|---|
| 25 | // Classe definissant l'interface pour un executeur de commande
|
|---|
| 26 |
|
|---|
| 27 | // Classe definissant l'interface pour un interpreteur de commande
|
|---|
| 28 |
|
|---|
| 29 | //! Interface definition for a generic command interpreter
|
|---|
| 30 | class CmdInterpreter {
|
|---|
| 31 | public:
|
|---|
| 32 | virtual ~CmdInterpreter() {} ;
|
|---|
| 33 | virtual string Name()=0;
|
|---|
| 34 | virtual int Interpret(string& line)=0;
|
|---|
| 35 | };
|
|---|
| 36 |
|
|---|
| 37 |
|
|---|
| 38 | //! Interface definition for command executor, to be used with SOPHYA::Commander
|
|---|
| 39 |
|
|---|
| 40 | class CmdExecutor {
|
|---|
| 41 | public:
|
|---|
| 42 | virtual ~CmdExecutor() {} ;
|
|---|
| 43 | // keyw : Le mot cle associe , args: Arguments de la commande
|
|---|
| 44 | virtual int Execute(string& keyw, vector<string>& args, string& toks)=0;
|
|---|
| 45 | };
|
|---|
| 46 |
|
|---|
| 47 |
|
|---|
| 48 |
|
|---|
| 49 | class CommanderBloc; // Bloc de type foreach / for de l'interpreteur Commander
|
|---|
| 50 | class CommanderScript; // Script de commandes defini ds l'interpreteur Commander
|
|---|
| 51 |
|
|---|
| 52 | //! A simple command interpreter with c-shell like syntax with dynamic load capability.
|
|---|
| 53 |
|
|---|
| 54 | class Commander : public CmdInterpreter {
|
|---|
| 55 | public:
|
|---|
| 56 | static Commander* GetInterpreter();
|
|---|
| 57 |
|
|---|
| 58 | Commander();
|
|---|
| 59 | virtual ~Commander();
|
|---|
| 60 | virtual string Name();
|
|---|
| 61 |
|
|---|
| 62 | virtual void AddHelpGroup(string& grp, string& desc);
|
|---|
| 63 | virtual void RegisterCommand(string& keyw, string& usage, CmdExecutor * ce,
|
|---|
| 64 | string& grp);
|
|---|
| 65 | inline void RegisterCommand(string& keyw, string& usage, CmdExecutor * ce,
|
|---|
| 66 | char* grp)
|
|---|
| 67 | { string sgrp = grp; RegisterCommand(keyw, usage, ce, sgrp); }
|
|---|
| 68 |
|
|---|
| 69 | virtual void RegisterHelp(string& keyw, string& usage, string& grp);
|
|---|
| 70 |
|
|---|
| 71 | virtual void LoadModule(string& fnameso, string& name);
|
|---|
| 72 |
|
|---|
| 73 | virtual void AddInterpreter(CmdInterpreter * cl);
|
|---|
| 74 | virtual void SelInterpreter(string& name);
|
|---|
| 75 |
|
|---|
| 76 | virtual int Interpret(string& line);
|
|---|
| 77 |
|
|---|
| 78 | virtual int ExecuteCommand(string& keyw, vector<string>& args, string& toks);
|
|---|
| 79 | virtual int ExecFile(string& file, vector<string>& args);
|
|---|
| 80 | virtual int CShellExecute(string cmd);
|
|---|
| 81 | virtual string& GetUsage(const string& kw);
|
|---|
| 82 |
|
|---|
| 83 | inline void SetMaxLoopLimit(int_8 lim=0) { maxlooplimit = lim; }
|
|---|
| 84 | inline int_8 GetMaxLoopLimit() { return maxlooplimit; }
|
|---|
| 85 |
|
|---|
| 86 | string GetCurrentPrompt() { return curprompt; }
|
|---|
| 87 |
|
|---|
| 88 |
|
|---|
| 89 | virtual void HelptoLaTeX(string const & flnm);
|
|---|
| 90 |
|
|---|
| 91 | inline CmdInterpreter* CurrentInterpreter() { return(curcmdi); }
|
|---|
| 92 |
|
|---|
| 93 | // ----- Action / gestion des variables propres de l'interpreteur
|
|---|
| 94 | // Verifie l'existence de la variable nomme vn et retourne sa valeur ds vv
|
|---|
| 95 | // Retourne false si la variable n'existe pas
|
|---|
| 96 | virtual bool GetVar(string const & vn, string & vv);
|
|---|
| 97 | virtual bool GetVar(string const & vn, int idx, string & vv);
|
|---|
| 98 | virtual bool GetVar(string const & vn, vector<string> & vv);
|
|---|
| 99 | virtual bool SetVar(string const & vn, string const & vv);
|
|---|
| 100 | virtual bool SetVar(string const & vn, int idx, string const & vv);
|
|---|
| 101 | virtual bool SetVar(string const & vn, vector<string> const & vv);
|
|---|
| 102 | virtual bool CheckVarName(string const & vn);
|
|---|
| 103 | virtual bool DeleteVar(string const & vn);
|
|---|
| 104 | virtual void ListVar();
|
|---|
| 105 | // Variables de l'environnement application
|
|---|
| 106 | virtual bool GetVarApp(string const & vn, string & vv);
|
|---|
| 107 | virtual bool SetVarApp(string const & vn, string const & vv);
|
|---|
| 108 | virtual bool DeleteVarApp(string const & vn);
|
|---|
| 109 | virtual void ListVarApp();
|
|---|
| 110 | // Variables d'environnement globales
|
|---|
| 111 | virtual bool GetVarEnv(string const & vn, string & vv);
|
|---|
| 112 | virtual bool SetVarEnv(string const & vn, string const & vv);
|
|---|
| 113 | virtual bool DeleteVarEnv(string const & vn);
|
|---|
| 114 | virtual void ListVarEnv();
|
|---|
| 115 |
|
|---|
| 116 | // Utilitaire pour decoupage en mot
|
|---|
| 117 | static int LineToWords(string& line, string& kw, vector<string>& tokens,
|
|---|
| 118 | vector<bool>& qottoks, string& toks, bool uq=true);
|
|---|
| 119 | protected:
|
|---|
| 120 | virtual int ParseLineExecute(string& line, bool qw=true);
|
|---|
| 121 |
|
|---|
| 122 | virtual int ExecuteCommandLine(string & keyw, vector<string> & args,
|
|---|
| 123 | string & toks);
|
|---|
| 124 |
|
|---|
| 125 | virtual bool CheckHelpGrp(string& grp, int& gid, string& desc);
|
|---|
| 126 | inline bool CheckHelpGrp(string& grp, int& gid)
|
|---|
| 127 | { string desc=""; return CheckHelpGrp(grp, gid, desc); }
|
|---|
| 128 |
|
|---|
| 129 | virtual int SubstituteVars(string & s, string & s2);
|
|---|
| 130 | int EvaluateTest(vector<string> & args,
|
|---|
| 131 | string & line, bool & res);
|
|---|
| 132 | int EvalRPNExpr(vector<string> & args, string & line);
|
|---|
| 133 |
|
|---|
| 134 | // variable de l'interpreteur = valeur - accepte la syntaxe de type varname[index]
|
|---|
| 135 | virtual bool SetVariable(string const & vn, string const & vv);
|
|---|
| 136 | // Acces aux variables
|
|---|
| 137 | virtual bool Var2Str(string const & vn, string & vv);
|
|---|
| 138 | inline bool Var2Str(string const & vn, int idx, string & vv)
|
|---|
| 139 | { return GetVar(vn, idx, vv); }
|
|---|
| 140 | inline bool Var2Str(string const & vn, vector<string> & vv)
|
|---|
| 141 | { return GetVar(vn, vv); }
|
|---|
| 142 |
|
|---|
| 143 | virtual string GetTmpDir();
|
|---|
| 144 |
|
|---|
| 145 | virtual void SetCurrentPrompt(const char* pr);
|
|---|
| 146 | inline void SetCurrentPrompt(string const & pr) { SetCurrentPrompt(pr.c_str()); }
|
|---|
| 147 | inline void SetDefaultPrompt(string const & pr) { defprompt = pr; }
|
|---|
| 148 |
|
|---|
| 149 | virtual void ShowMessage(const char * msg, int att);
|
|---|
| 150 |
|
|---|
| 151 | void PushStack(vector<string> & args);
|
|---|
| 152 | void PopStack(bool psta=true);
|
|---|
| 153 |
|
|---|
| 154 | CmdInterpreter* curcmdi;
|
|---|
| 155 |
|
|---|
| 156 | // Gestion des variables
|
|---|
| 157 | typedef map< string, vector<string>, less<string> > CmdVarList;
|
|---|
| 158 | CmdVarList variables;
|
|---|
| 159 |
|
|---|
| 160 | // Pour enregistrer la liste de commandes et leurs executeurs et le help
|
|---|
| 161 | struct cmdex {int group; string us; CmdExecutor * cex; } ;
|
|---|
| 162 | struct hgrpst {int gid; string desc; } ; // Identification+description d'un groupe de help
|
|---|
| 163 | typedef map<string, hgrpst, less<string> > CmdHGroup; // Liste des groupes de commandes
|
|---|
| 164 | CmdHGroup cmdhgrp;
|
|---|
| 165 | int cmdgrpid; // Numero de groupe courant
|
|---|
| 166 | typedef map<string, cmdex, less<string> > CmdExmap;
|
|---|
| 167 | CmdExmap cmdexmap; // Liste des commandes et leurs executeurs
|
|---|
| 168 | CmdExmap helpexmap; // Pour les helps sans commande
|
|---|
| 169 |
|
|---|
| 170 | // Pour garder la liste des modules
|
|---|
| 171 | typedef map<string, PDynLinkMgr* , less<string> > Modmap;
|
|---|
| 172 | Modmap modmap;
|
|---|
| 173 |
|
|---|
| 174 | // Pour garder la liste des interpreteur
|
|---|
| 175 | typedef map<string, CmdInterpreter*, less<string> > InterpMap;
|
|---|
| 176 | InterpMap interpmap;
|
|---|
| 177 |
|
|---|
| 178 | // Pour stocker les scripts definis ds l'interpreteur
|
|---|
| 179 | typedef map<string, CommanderScript*, less<string> > ScriptList;
|
|---|
| 180 | ScriptList mScripts; // Liste des scripts
|
|---|
| 181 | CommanderScript* curscript; // Script en cours de definition
|
|---|
| 182 |
|
|---|
| 183 | // Code de retour execution commande
|
|---|
| 184 | int _xstatus;
|
|---|
| 185 | // Valeur de retour (par l'instruction return) -
|
|---|
| 186 | string _retstr;
|
|---|
| 187 |
|
|---|
| 188 | // Pour stocker les alias definies par l'interpreteur
|
|---|
| 189 | typedef map<string, string, less<string> > CmdStrList;
|
|---|
| 190 | CmdStrList mAliases; // Liste des alias
|
|---|
| 191 |
|
|---|
| 192 | // Le stack pour les arguments des .pic et des scripts
|
|---|
| 193 | stack< vector<string> > ArgsStack;
|
|---|
| 194 | // Stack pour les Prompts
|
|---|
| 195 | stack<string> PromptStack;
|
|---|
| 196 |
|
|---|
| 197 | // Gestion des blocs de commandes et tests (if)
|
|---|
| 198 | stack< CommanderBloc * > CmdBlks; // Bloc de commande courant (foreach, ...)
|
|---|
| 199 | int felevel; // foreach-for level
|
|---|
| 200 | int_8 maxlooplimit; // Limite maximum des boucles
|
|---|
| 201 | stack< list<char> > TestsStack; // Stack des resultats de test
|
|---|
| 202 | list<char>::iterator tresit; // Test courant
|
|---|
| 203 | bool curtestresult; // Resultat courant des tests
|
|---|
| 204 |
|
|---|
| 205 | // Controle du flot d'execution
|
|---|
| 206 | bool fgexebrk;
|
|---|
| 207 |
|
|---|
| 208 | // Commande splitees sur plusieurs lignes
|
|---|
| 209 | bool mulinefg; // Bloc multi-lignes (ligne suite)
|
|---|
| 210 | string mulinecmd; // Commande multi-lignes
|
|---|
| 211 |
|
|---|
| 212 | // Texte de prompt (attente de commande)
|
|---|
| 213 | string spromptmul; // Prompt console avant multi-ligne
|
|---|
| 214 | string curprompt; // Prompt courant
|
|---|
| 215 | string defprompt; // Prompt par defaut
|
|---|
| 216 |
|
|---|
| 217 | // Gestion d'historique, trace, timing des commandes
|
|---|
| 218 | ofstream hist; // History file
|
|---|
| 219 | bool histon; // True -> history file
|
|---|
| 220 | bool trace; // Trace flag
|
|---|
| 221 | bool timing; // Display CPU Time
|
|---|
| 222 | Timer* gltimer; // pour Display CPU Time
|
|---|
| 223 |
|
|---|
| 224 | friend class CommanderBloc;
|
|---|
| 225 | friend class CommanderScript;
|
|---|
| 226 |
|
|---|
| 227 | };
|
|---|
| 228 |
|
|---|
| 229 | } // namespace SOPHYA
|
|---|
| 230 |
|
|---|
| 231 | /* end of ifdef COMMANDER_H_SEEN */
|
|---|
| 232 | #endif
|
|---|
| 233 |
|
|---|
![(please configure the [header_logo] section in trac.ini)](/PI/chrome/site/your_project_logo.png){kind=logo}
