Program: bbtk
Module: $RCSfile: bbtkInterpreter.cxx,v $ $
Language: C++
- Date: $Date: 2008/01/29 14:11:03 $
- Version: $Revision: 1.12 $
+ Date: $Date: 2008/02/04 13:02:58 $
+ Version: $Revision: 1.18 $
Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
l'Image). All rights reserved. See Doc/License.txt or
info.help = "Prints the value of all configuration parameters";
mCommandDict[info.keyword] = info;
+ info.keyword = "index"; // LG
+ info.argmin = 0;
+ info.argmax = 2;
+ info.code = cIndex;
+ info.syntax = "index [<filename> ['Initials'(default)|'Packages'|'Keywords']]";
+ info.help = "Creates an html index of known boxes. If filename is provided then save it to the file 'filename'. The default index entries are the initial letters of the names of the boxes. If 'Packages' or 'Keywords' is provided then the entries are either the package names or the keywords";
+ mCommandDict[info.keyword] = info;
+
info.keyword = "reset"; //EED
info.argmin = 0;
info.argmax = 0;
info.syntax = "author <string>";
info.help = "Adds the string <string> to the author information of the black box being defined";
mCommandDict[info.keyword] = info;
+
+ info.keyword = "keyword"; //JP
+ info.argmin = 1;
+ info.argmax = 1;
+ info.code = cKeyword;
+ info.syntax = "keyword <list of items, separated by ;>";
+ info.help = "Adds the string <string> to the keyword information of the black box being defined";
+ mCommandDict[info.keyword] = info;
info.keyword = "description";
info.argmin = 1;
case cAuthor :
mExecuter->Author(words[1]);
break;
-
- case cDescription :
- mExecuter->Description(words[1]);
+
+ case cKeyword :
+ mExecuter->Keyword(words[1]);
+ break;
+
+ case cIndex :
+ if (words.size()==1)
+ Index("tmp_index.html");
+ else if (words.size()==2)
+ Index(words[1]);
+ else if (words.size()==3)
+ Index(words[1],words[2]);
+ break;
+ case cDescription :
+ mExecuter->Description(words[1]);
break;
case cHelp :
- //=======================================================================
- void SplitString ( const std::string& str, const std::string& delimiters,
- std::vector<std::string>& tokens)
- {
- // Skip delimiters at beginning.
- std::string::size_type lastPos = str.find_first_not_of(delimiters, 0);
- // Find first delimiter.
- std::string::size_type pos = str.find_first_of(delimiters, lastPos);
-
- while (std::string::npos != pos || std::string::npos != lastPos)
- {
- // Found a token, add it to the vector.
- tokens.push_back(str.substr(lastPos, pos - lastPos));
- // Skip delimiters. Note the "not_of"
- lastPos = str.find_first_not_of(delimiters, pos);
- // Find next delimiter
- pos = str.find_first_of(delimiters, lastPos);
- }
-
- }
- //=======================================================================
-
//=======================================================================
std::string delimiters = "\"";
std::vector<std::string> quote;
- SplitString(str,delimiters,quote);
+ Utilities::SplitString(str,delimiters,quote);
delimiters = " \t";
std::vector<std::string>::iterator i;
for (i=quote.begin(); i!=quote.end(); )
{
- SplitString(*i,delimiters,tokens);
+ Utilities::SplitString(*i,delimiters,tokens);
++i;
if (i!=quote.end())
{
// - absolute full name e.g. /home/usrname/proj/dir/scr.bbs
// same for Windows, with c:, d: ...
//
- // expression like directory/subdir/scrname.bbs is FORBIDDEN (*)
// use ./directory/subdir/scrname.bbs
//
- // (*) except when using packagename/boxes/*
bbtkDebugMessageInc("Interpreter",9,"Interpreter::SwitchToFile( \""
<<name<<"\")"<<std::endl);
-// to be remove in final version
+// to be removed in final version
// use : Config v
-verbose = true;
+//verbose = true;
std::vector<std::string> script_paths;
std::string fullPathScriptName; // full path script name
std::string pkgname; // e.g. <scriptname>.bbs
-
+ std::vector<std::string> Filenames;
+
if (use_configuration_file)
{
// The following is *NOT* a debug time message :
}
std::string upath;
pkgname = Utilities::ExtractScriptName(name,upath);
-
+//std::cout <<"name [" << name << "] pkgname [" << pkgname << "] upath [" << upath << "]" << std::endl;
bool fullnameGiven = false;
bool foundFile = false;
if(pkgname == "*") // =========================================== load all boxes (e.g. std/boxes/*)
{
+ int nbBssFiles;
+
+ if (upath[0]=='/' || upath[1] == ':' ) // ==== absolute name, load all .bbs files
+ {
+ int nbFiles = Utilities::Explore(upath, false, Filenames);
+ nbBssFiles = 0;
+ for (std::vector<std::string>::iterator i = Filenames.begin(); i!= Filenames.end(); ++i)
+ {
+ if ((*i).substr((*i).size()-4, 4) != ".bbs")
+ continue; // ignore non .bbs files
+ LoadScript(*i);
+ nbBssFiles++;
+ }
+ if (nbBssFiles==0)
+ if (verbose)
+ std::cout << "WARNING : No '.bbs' file found in [" << upath << "]" << std::endl;
+
+ return;
+ }
+
+
std::string path;
std::vector<std::string>::iterator i;
std::string fullDirectoryName;
- for (i=script_paths.begin();i!=script_paths.end();++i)
+ for (i=script_paths.begin();i!=script_paths.end();++i)// ==== relative name, iterate + load all .bbs files
{
path = *i;
}
foundFile = true;
- std::vector<std::string> Filenames;
+
int nbFiles = Utilities::Explore(fullDirectoryName, false, Filenames);
// std::cout << "=================nbFiles " << nbFiles << std::endl;
- int nbBssFiles = 0;
- for (std::vector<std::string>::iterator i = Filenames.begin(); i!=Filenames.end(); ++i)
+ nbBssFiles = 0;
+ for (std::vector<std::string>::iterator i = Filenames.begin(); i!= Filenames.end(); ++i)
{
if ((*i).substr((*i).size()-4, 4) != ".bbs")
continue; // ignore non .bbs files
return;
}
- std::string::size_type slash_position = name.find_last_of("/\\");
+ //std::string::size_type slash_position = name.find_last_of("/\\");
// if name starts with a / or a . or contains : user is assumed to have passed a relative/absolute name
// (not only a plain script name)
// we trust him, and try to expland the directory name
// WARNING : starting from current local directory : ./whatYouWant (./ mandatory!)
-
- // if (slash_position != std::string::npos)
+
if (name[0]=='/' || name[1] == ':' || name[0]=='.') // absolute path (linux/windows) or relative path
{
{
foundFile = true;
}
-
} // endif l != 0
}
else
// fullPathScriptName = Utilities::MakePkgnameFromPath(path, name, true); //pkgname);
- fullPathScriptName = Utilities::MakePkgnameFromPath(path, pkgname, true);
+ fullPathScriptName = Utilities::MakePkgnameFromPath(path, name, true);
//std::cout << "FULL PATH = "<<fullPathScriptName<<std::endl;
// Check if library exists
bbtkDebugDecTab("Interpreter",9);
}
- //=======================================================================
- void Interpreter::Graph(const std::vector<std::string>& words)
- {
- std::string page;
+//=======================================================================
+void Interpreter::Graph(const std::vector<std::string>& words)
+{
+ std::string page;
bool system_display = true;
#ifdef _USE_WXWIDGETS_
page = mExecuter->ShowGraph(words[1],words[2],words[3],words[4],words[5],"",system_display);
}
else if (words.size()==7)
- {
- page = mExecuter->ShowGraph(words[1],words[2],words[3],words[4],words[5],words[6],system_display);
- }
-
+ {
+ page = mExecuter->ShowGraph(words[1],words[2],words[3],words[4],words[5],words[6],system_display);
+ }
+
#ifdef _USE_WXWIDGETS_
if ( WxConsole::GetInstance() != 0 )
WxConsole::GetInstance()->ShowHtmlPage(page);
#endif
}
- //=======================================================================
+//=======================================================================
+
+//=======================================================================
+void Interpreter::Index(const std::string& filename,
+ const std::string& type)
+{
+ Factory::IndexEntryType t;
+ if (type=="Initials") t = Factory::Initials;
+ else if (type=="Keywords") t = Factory::Keywords;
+ else if (type=="Packages") t = Factory::Packages;
+
+ GetGlobalFactory()->CreateHtmlIndex(t,filename);
+}
+//=======================================================================
}//namespace
git://git.creatis.insa-lyon.fr / bbtk.git / blobdiff