/**
* \file FormBibtex.C
- * Copyright 2001 the LyX Team
- * Read the file COPYING
+ * This file is part of LyX, the document processor.
+ * Licence details can be found in the file COPYING.
*
* \author Angus Leeming
* \author John Levon
- * \author Herbert Voss <voss@lyx.org>
+ * \author Herbert Voß
+ * \author Rob Lahaye
+ *
+ * Full author contact details are available in file CREDITS.
*/
-#ifdef __GNUG__
-#pragma implementation
-#endif
-
#include <config.h>
-#include "xformsBC.h"
-#include "ControlBibtex.h"
+
#include "FormBibtex.h"
-#include "form_bibtex.h"
-#include "gettext.h"
-#include "debug.h"
-#include "support/lstrings.h"
+#include "ControlBibtex.h"
+#include "forms/form_bibtex.h"
+
+#include "Tooltips.h"
+#include "xforms_helpers.h"
+#include "xformsBC.h"
+
#include "support/filetools.h"
+#include "support/lstrings.h"
+#include "support/lyxalgo.h"
+
+#include "lyx_forms.h"
+
+using lyx::support::ChangeExtension;
+using lyx::support::compare;
+using lyx::support::contains;
+using lyx::support::getStringFromVector;
+using lyx::support::getVectorFromString;
+using lyx::support::OnlyFilename;
+using lyx::support::prefixIs;
+using lyx::support::split;
+using std::vector;
+using std::string;
-typedef FormCB<ControlBibtex, FormDB<FD_form_bibtex> > base_class;
-FormBibtex::FormBibtex(ControlBibtex & c)
- : base_class(c, _("BibTeX Database"))
+typedef FormController<ControlBibtex, FormView<FD_bibtex> > base_class;
+
+FormBibtex::FormBibtex(Dialog & parent)
+ : base_class(parent, _("BibTeX Database"))
{}
void FormBibtex::build()
{
- dialog_.reset(build_bibtex());
-
- fl_set_input_return(dialog_->database, FL_RETURN_CHANGED);
- fl_set_input_return(dialog_->style, FL_RETURN_CHANGED);
-
- // Manage the ok, apply, restore and cancel/close buttons
- bc().setOK(dialog_->button_ok);
- bc().setCancel(dialog_->button_cancel);
+ dialog_.reset(build_bibtex(this));
+
+ // Manage the ok, apply, restore and cancel/close buttons
+ bcview().setOK(dialog_->button_ok);
+ bcview().setApply(dialog_->button_apply);
+ bcview().setCancel(dialog_->button_close);
+ bcview().setRestore(dialog_->button_restore);
+
+ // disable for read-only documents
+ bcview().addReadOnly(dialog_->input_database);
+ bcview().addReadOnly(dialog_->button_database_browse);
+ bcview().addReadOnly(dialog_->button_style_browse);
+ bcview().addReadOnly(dialog_->button_rescan);
+ bcview().addReadOnly(dialog_->input_style);
+ bcview().addReadOnly(dialog_->check_bibtotoc);
+
+ // trigger an input event for cut&paste with middle mouse button.
+ setPrehandler(dialog_->input_database);
+ setPrehandler(dialog_->input_style);
+
+ fl_set_input_return(dialog_->input_database, FL_RETURN_CHANGED);
+ fl_set_input_return(dialog_->input_style, FL_RETURN_CHANGED);
+
+ // callback for double click in browser
+ fl_set_browser_dblclick_callback(dialog_->browser_styles,
+ C_FormDialogView_InputCB, 2);
+
+ // set up the tooltips
+ string str = _("The database you want to cite from. Insert it "
+ "without the default extension \".bib\". Use comma "
+ "to separate databases.");
+ tooltips().init(dialog_->button_database_browse, str);
+
+ str = _("Browse directory for BibTeX stylefiles");
+ tooltips().init(dialog_->button_style_browse, str);
+
+ str = _("The BibTeX style to use (only one allowed). Insert it without "
+ "the default extension \".bst\" and without path.");
+ tooltips().init(dialog_->input_style, str);
+
+ str = _("Select if the bibliography should appear in the Table "
+ "of Contents");
+ tooltips().init(dialog_->check_bibtotoc, str);
+
+ str = _("Double click to choose a BibTeX style from the list.");
+ tooltips().init(dialog_->browser_styles, str);
+
+#if FL_VERSION == 0 || (FL_REVISION == 0 && FL_FIXLEVEL == 0)
+ // Work-around xforms' bug; enable tooltips for browser widgets.
+ setPrehandler(dialog_->browser_styles);
+#endif
- bc().addReadOnly(dialog_->database_browse);
- bc().addReadOnly(dialog_->database);
- bc().addReadOnly(dialog_->style_browse);
- bc().addReadOnly(dialog_->style);
- bc().addReadOnly(dialog_->radio_bibtotoc);
+ str = _("Updates your TeX system for a new bibstyle list. Only "
+ "the styles which are in directories where TeX finds them "
+ "are listed!");
+ tooltips().init(dialog_->button_rescan, str);
}
-ButtonPolicy::SMInput FormBibtex::input(FL_OBJECT * ob, long)
+ButtonPolicy::SMInput FormBibtex::input(FL_OBJECT * ob, long ob_value)
{
- if (ob == dialog_->database_browse) {
- string const in_name = fl_get_input(dialog_->database);
- string out_name =
- controller().Browse(in_name,
- "Select Database",
- "*.bib| BibTeX Databases (*.bib)");
+ if (ob == dialog_->button_database_browse) {
+ // When browsing, take the first file only
+ string const in_name = getString(dialog_->input_database);
+ string out_name =
+ controller().Browse("",
+ _("Select Database"),
+ _("*.bib| BibTeX Databases (*.bib)"));
if (!out_name.empty()) {
- if (suffixIs(out_name,".bib")) {
- // to prevent names like xxxbib.bib
- // latex needs it without suffix
- out_name = ChangeExtension(out_name,"");
- }
-
- fl_freeze_form(form());
- fl_set_input(dialog_->database, out_name.c_str());
- fl_unfreeze_form(form());
+ // add the database to any existing ones
+ if (!in_name.empty())
+ out_name = in_name + ',' + out_name;
+
+ fl_set_input(dialog_->input_database, out_name.c_str());
}
- }
-
- if (ob == dialog_->style_browse) {
- string const in_name = fl_get_input(dialog_->style);
- string out_name =
- controller().Browse(in_name,
- "Select BibTeX-Style",
- "*.bst| BibTeX Styles (*.bst)");
- if (!out_name.empty()) {
- if (suffixIs(out_name,".bst")) {
- // to prevent names like xxxbib.bib
- // name for display only
- out_name = OnlyFilename(ChangeExtension(out_name,""));
- }
-
- fl_freeze_form(form());
- fl_set_input(dialog_->style, out_name.c_str());
- fl_unfreeze_form(form());
+
+ } else if (ob == dialog_->button_style_browse) {
+ string const in_name = getString(dialog_->input_style);
+ string const style = controller().Browse(in_name,
+ _("Select BibTeX-Style"),
+ _("*.bst| BibTeX Styles (*.bst)"));
+ if (!style.empty()) {
+ fl_set_input(dialog_->input_style, style.c_str());
}
+
+ } else if (ob == dialog_->browser_styles && ob_value == 2) {
+ // double clicked in styles browser
+ string const style = getString(dialog_->browser_styles);
+ if (style.empty()) {
+ return ButtonPolicy::SMI_NOOP;
+ } else {
+ fl_set_input(dialog_->input_style,
+ ChangeExtension(style, "").c_str());
+ }
+ // reset the browser so that the following
+ // single-click callback doesn't do anything
+ fl_deselect_browser(dialog_->browser_styles);
+
+ } else if (ob == dialog_->button_rescan) {
+ fl_clear_browser(dialog_->browser_styles);
+ controller().rescanBibStyles();
+ vector<string> styles;
+ controller().getBibStyles(styles);
+ fl_add_browser_line(dialog_->browser_styles,
+ getStringFromVector(styles, "\n").c_str());
}
-
- if (!compare(fl_get_input(dialog_->database),"")) {
+
+ // with an empty database nothing makes sense ...
+ if (!compare(fl_get_input(dialog_->input_database), "")) {
return ButtonPolicy::SMI_NOOP;
}
void FormBibtex::update()
{
- fl_set_input(dialog_->database,
+ fl_set_input(dialog_->input_database,
controller().params().getContents().c_str());
- string bibtotoc = "bibtotoc";
- string bibstyle (controller().params().getOptions().c_str());
- if (prefixIs(bibstyle,bibtotoc)) { // bibtotoc exists?
- fl_set_button(dialog_->radio_bibtotoc,1);
- if (contains(bibstyle,',')) { // bibstyle exists?
- bibstyle = split(bibstyle,bibtotoc,',');
+
+ string bibtotoc = "bibtotoc";
+ string bibstyle = controller().params().getOptions();
+
+ bool const bibtotoc_exists = prefixIs(bibstyle, bibtotoc);
+ fl_set_button(dialog_->check_bibtotoc, bibtotoc_exists);
+ if (bibtotoc_exists) {
+ if (contains(bibstyle, ',')) { // bibstyle exists?
+ bibstyle = split(bibstyle, bibtotoc, ',');
} else {
- bibstyle = "";
+ bibstyle.erase();
}
+ }
+ fl_set_input(dialog_->input_style, bibstyle.c_str());
- fl_set_input(dialog_->style,bibstyle.c_str());
+ vector<string> styles;
+ controller().getBibStyles(styles);
- } else {
- fl_set_button(dialog_->radio_bibtotoc,0);
- fl_set_input(dialog_->style,bibstyle.c_str());
+ fl_clear_browser(dialog_->browser_styles);
+ fl_add_browser_line(dialog_->browser_styles,
+ getStringFromVector(styles, "\n").c_str());
+}
+
+namespace {
+
+string const unique_and_no_extensions(string const & str_in)
+{
+ vector<string> dbase = getVectorFromString(str_in);
+ for (vector<string>::iterator it = dbase.begin();
+ it != dbase.end(); ++it) {
+ *it = ChangeExtension(*it, string());
}
+ lyx::eliminate_duplicates(dbase);
+ return getStringFromVector(dbase);
}
+} // namespace anon
+
void FormBibtex::apply()
{
- controller().params().setContents(fl_get_input(dialog_->database));
- string const bibstyle = fl_get_input(dialog_->style); // may be empty!
+ string const db = getString(dialog_->input_database);
+ if (db.empty()) {
+ // no database -> no bibtex-command and no options!
+ controller().params().setContents("");
+ controller().params().setOptions("");
+ return;
+ }
+
+ controller().params().setContents(unique_and_no_extensions(db));
+
+ // empty is valid!
+ string bibstyle = getString(dialog_->input_style);
+ if (!bibstyle.empty()) {
+ // save the BibTeX style without any ".bst" extension
+ bibstyle = ChangeExtension(OnlyFilename(bibstyle), "");
+ }
+
+ bool const addtotoc = fl_get_button(dialog_->check_bibtotoc);
+ string const bibtotoc = addtotoc ? "bibtotoc" : "";
+ if (addtotoc && !bibstyle.empty()) {
+ // Both bibtotoc and style.
+ controller().params().setOptions(bibtotoc + ',' + bibstyle);
- if ((fl_get_button(dialog_->radio_bibtotoc) > 0) &&
- (!bibstyle.empty())) {
- // both bibtotoc and style
- controller().params().setOptions("bibtotoc,"+bibstyle);
} else {
- if (fl_get_button(dialog_->radio_bibtotoc) > 0) {
- // bibtotoc and no style
- controller().params().setOptions("bibtotoc");
- } else {
- // only style
- controller().params().setOptions(bibstyle);
- }
+ // At least one of addtotoc and bibstyle is empty. No harm to output both!
+ controller().params().setOptions(bibtotoc + bibstyle);
}
}
-