/**
* \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 Voß
+ * \author Rob Lahaye
+ *
+ * Full author contact details are available in file CREDITS.
*/
#include <config.h>
-#include FORMS_H_LOCATION
+#include "FormBibtex.h"
+#include "ControlBibtex.h"
+#include "forms/form_bibtex.h"
-#ifdef __GNUG__
-#pragma implementation
-#endif
+#include "Tooltips.h"
+#include "xforms_helpers.h"
+#include "xformsBC.h"
+#include "support/filetools.h"
+#include "support/lstrings.h"
+#include "support/lyxalgo.h"
-#include "Dialogs.h"
-#include "FormBibtex.h"
-#include "LyXView.h"
-#include "buffer.h"
-#include "form_bibtex.h"
-#include "lyxfunc.h"
-#include "debug.h"
+#include "lyx_forms.h"
-using std::endl;
+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;
-FormBibtex::FormBibtex(LyXView * lv, Dialogs * d)
- : FormCommand(lv, d, _("BibTeX Database"))
-{
- d->showBibtex.connect(slot(this, &FormBibtex::showInset));
-}
+using std::vector;
+using std::string;
-FL_FORM * FormBibtex::form() const
-{
- if (dialog_.get())
- return dialog_->form;
- return 0;
-}
+typedef FormController<ControlBibtex, FormView<FD_bibtex> > base_class;
+FormBibtex::FormBibtex(Dialog & parent)
+ : base_class(parent, _("BibTeX Database"))
+{}
-void FormBibtex::connect()
-{
- fl_set_form_maxsize(form(), 2 * minw_, minh_);
- FormCommand::connect();
-}
-
void FormBibtex::build()
{
- dialog_.reset(build_bibtex());
+ 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
- // Workaround dumb xforms sizing bug
- minw_ = form()->w;
- minh_ = form()->h;
+ 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);
+}
- 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);
- bc().refresh();
+ButtonPolicy::SMInput FormBibtex::input(FL_OBJECT * ob, long ob_value)
+{
+ 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()) {
+ // 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());
+ }
- bc().addReadOnly(dialog_->database);
- bc().addReadOnly(dialog_->style);
+ } 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());
+ }
+
+ // with an empty database nothing makes sense ...
+ if (!compare(fl_get_input(dialog_->input_database), "")) {
+ return ButtonPolicy::SMI_NOOP;
+ }
+
+ return ButtonPolicy::SMI_VALID;
}
-bool FormBibtex::input(FL_OBJECT *, long)
+void FormBibtex::update()
{
- // minimal validation
- if (!compare(fl_get_input(dialog_->database),""))
- return false;
+ fl_set_input(dialog_->input_database,
+ controller().params().getContents().c_str());
+
+ 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.erase();
+ }
+ }
+ fl_set_input(dialog_->input_style, bibstyle.c_str());
+
+ vector<string> styles;
+ controller().getBibStyles(styles);
- return true;
+ fl_clear_browser(dialog_->browser_styles);
+ fl_add_browser_line(dialog_->browser_styles,
+ getStringFromVector(styles, "\n").c_str());
}
+namespace {
-void FormBibtex::update()
+string const unique_and_no_extensions(string const & str_in)
{
- fl_set_input(dialog_->database, params.getContents().c_str());
- fl_set_input(dialog_->style, params.getOptions().c_str());
- // Surely, this should reset the buttons to their original state?
- // It doesn't. Instead "Restore" becomes a "Close"
- //bc().refresh();
- bc().readOnly(lv_->buffer()->isReadonly());
+ 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()
{
- if (lv_->buffer()->isReadonly())
+ 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;
-
- params.setContents(fl_get_input(dialog_->database));
- params.setOptions(fl_get_input(dialog_->style));
-
- if (inset_ != 0) {
- // Only update if contents have changed
- if (params != inset_->params()) {
- if (params.getContents() != inset_->params().getContents())
- lv_->view()->ChangeCitationsIfUnique(
- inset_->params().getContents(), params.getContents());
-
- inset_->setParams(params);
- lv_->view()->updateInset(inset_, true);
-
- // We need to do a redraw because the maximum
- // InsetBibKey width could have changed
- lv_->view()->redraw();
- lv_->view()->fitCursor(lv_->view()->getLyXText());
- }
- } else
- lyxerr[Debug::GUI] << "Editing non-existent bibtex inset !" << endl;
+ }
+
+ 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);
+
+ } else {
+ // At least one of addtotoc and bibstyle is empty. No harm to output both!
+ controller().params().setOptions(bibtotoc + bibstyle);
+ }
}