lyx_mirror/src/lyxtextclasslist.C
Lars Gullik Bjønnes ab9e55eb69 * lyxfunctional.h: delete compare_memfun and helper classes
* xformsImage.C (loadableFormats): use bind, equal_to instead of
compare_memfun
* QLImage.C (loadableFormats): use bind, equal_to instead of
compare_memfun
* bufferlist.C (exists): use bind and equal_to instead of
compare_memfun
(getBuffer): ditto
* lyxtextclasslist.C (NumberOfClass): ditto


git-svn-id: svn://svn.lyx.org/lyx/lyx-devel/trunk@9183 a592a061-630c-0410-9148-cb99ea01b6c8
2004-11-06 16:14:22 +00:00

186 lines
4.7 KiB
C

/**
* \file lyxtextclasslist.C
* This file is part of LyX, the document processor.
* Licence details can be found in the file COPYING.
*
* \author Lars Gullik Bjønnes
* \author John Levon
*
* Full author contact details are available in file CREDITS.
*/
#include <config.h>
#include "lyxtextclasslist.h"
#include "lyxtextclass.h"
#include "debug.h"
#include "lyxlex.h"
#include "support/filetools.h"
#include <boost/bind.hpp>
using lyx::textclass_type;
using lyx::support::LibFileSearch;
using lyx::support::MakeDisplayPath;
using boost::bind;
#ifndef CXX_GLOBAL_CSTD
using std::exit;
#endif
using std::endl;
using std::equal_to;
using std::find_if;
using std::make_pair;
using std::sort;
using std::string;
using std::pair;
// Gets textclass number from name
pair<bool, textclass_type> const
LyXTextClassList::NumberOfClass(string const & textclass) const
{
ClassList::const_iterator cit =
find_if(classlist_.begin(), classlist_.end(),
bind(equal_to<string>(),
bind(&LyXTextClass::name, _1),
textclass));
return cit != classlist_.end() ?
make_pair(true, textclass_type(cit - classlist_.begin())) :
make_pair(false, textclass_type(0));
}
// Gets a textclass structure from number
LyXTextClass const &
LyXTextClassList::operator[](textclass_type textclass) const
{
classlist_[textclass].load();
if (textclass < classlist_.size())
return classlist_[textclass];
else
return classlist_[0];
}
// used when sorting the textclass list.
struct less_textclass_avail_desc
: public std::binary_function<LyXTextClass, LyXTextClass, int>
{
int operator()(LyXTextClass const & tc1,
LyXTextClass const & tc2) const
{
// Ordering criteria:
// 1. Availability of text class
// 2. Description (lexicographic)
return (tc1.isTeXClassAvailable() && !tc2.isTeXClassAvailable()) ||
(tc1.isTeXClassAvailable() == tc2.isTeXClassAvailable() &&
tc1.description() < tc2.description());
}
};
// Reads LyX textclass definitions according to textclass config file
bool LyXTextClassList::Read()
{
LyXLex lex(0, 0);
string real_file = LibFileSearch("", "textclass.lst");
lyxerr[Debug::TCLASS] << "Reading textclasses from `"
<< real_file << '\'' << endl;
if (real_file.empty()) {
lyxerr << "LyXTextClassList::Read: unable to find "
"textclass file `" << MakeDisplayPath(real_file, 1000)
<< "'. Exiting." << endl;
return false;
// This causes LyX to end... Not a desirable behaviour. Lgb
// What do you propose? That the user gets a file dialog
// and is allowed to hunt for the file? (Asger)
// more that we have a layout for minimal.cls statically
// compiled in... (Lgb)
}
if (!lex.setFile(real_file)) {
lyxerr << "LyXTextClassList::Read: "
"lyxlex was not able to set file: "
<< real_file << endl;
}
if (!lex.isOK()) {
lyxerr << "LyXTextClassList::Read: unable to open "
"textclass file `" << MakeDisplayPath(real_file, 1000)
<< "'\nCheck your installation. LyX can't continue."
<< endl;
return false;
}
bool finished = false;
// Parse config-file
lyxerr[Debug::TCLASS] << "Starting parsing of textclass.lst" << endl;
while (lex.isOK() && !finished) {
lyxerr[Debug::TCLASS] << "\tline by line" << endl;
switch (lex.lex()) {
case LyXLex::LEX_FEOF:
finished = true;
break;
default:
string const fname = lex.getString();
lyxerr[Debug::TCLASS] << "Fname: " << fname << endl;
if (lex.next()) {
string const clname = lex.getString();
lyxerr[Debug::TCLASS] << "Clname: " << clname << endl;
if (lex.next()) {
string const desc = lex.getString();
lyxerr[Debug::TCLASS] << "Desc: " << desc << endl;
if (lex.next()) {
bool avail = lex.getBool();
lyxerr[Debug::TCLASS] << "Avail: " << avail << endl;
// This code is run when we have
// fname, clname, desc, and avail
LyXTextClass tmpl(fname, clname, desc, avail);
if (lyxerr.debugging(Debug::TCLASS)) {
tmpl.load();
}
classlist_.push_back(tmpl);
}
}
}
}
}
lyxerr[Debug::TCLASS] << "End of parsing of textclass.lst" << endl;
if (classlist_.empty()) {
lyxerr << "LyXTextClassList::Read: no textclasses found!"
<< endl;
return false;
}
// Ok everything loaded ok, now sort the list.
sort(classlist_.begin(), classlist_.end(), less_textclass_avail_desc());
return true;
}
// Global variable: textclass table.
LyXTextClassList textclasslist;
// Reads the style files
void LyXSetStyle()
{
lyxerr[Debug::TCLASS] << "LyXSetStyle: parsing configuration..." << endl;
if (!textclasslist.Read()) {
lyxerr[Debug::TCLASS] << "LyXSetStyle: an error occured "
"during parsing.\n Exiting." << endl;
exit(1);
}
lyxerr[Debug::TCLASS] << "LyXSetStyle: configuration parsed." << endl;
}