]> git.lyx.org Git - lyx.git/blobdiff - src/frontends/xforms/FormBibtex.C
Yet more dialog tweaking from Rob.
[lyx.git] / src / frontends / xforms / FormBibtex.C
index 13334e88b54d16244b9896e9b316612a9ee506e6..cf42a0742b9cb23f85f3e25a94bcf6741b04a45c 100644 (file)
 /**
  * \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 Angus Leeming 
  * \author John Levon
+ * \author Herbert Voss
+ *
+ * Full author contact details are available in file CREDITS
  */
 
-#include <config.h>
-
-#include FORMS_H_LOCATION
-
 #ifdef __GNUG__
 #pragma implementation
 #endif
 
-
-#include "Dialogs.h"
+#include <config.h>
+#include "xformsBC.h"
+#include "ControlBibtex.h"
 #include "FormBibtex.h"
-#include "LyXView.h"
-#include "buffer.h"
-#include "form_bibtex.h"
-#include "lyxfunc.h"
+#include "forms/form_bibtex.h"
+#include "Tooltips.h"
+#include "xforms_helpers.h"
+#include FORMS_H_LOCATION
+
+#include "helper_funcs.h"
+#include "gettext.h"
 #include "debug.h"
+#include "support/LAssert.h"
+#include "support/lstrings.h"
+#include "support/filetools.h"
+#include "support/lyxalgo.h"
 
-using std::endl;
-using SigC::slot;
 
-FormBibtex::FormBibtex(LyXView * lv, Dialogs * d)
-       : FormCommand(lv, d, _("BibTeX Database"))
-{
-       d->showBibtex.connect(slot(this, &FormBibtex::showInset));
-}
+using std::vector;
+using std::sort;
 
 
-FL_FORM * FormBibtex::form() const
-{
-       if (dialog_.get())
-               return dialog_->form;
-       return 0;
-}
+typedef FormCB<ControlBibtex, FormDB<FD_bibtex> > base_class;
 
+FormBibtex::FormBibtex()
+       : base_class(_("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));
 
-       // Workaround dumb xforms sizing bug
-       minw_ = form()->w;
-       minh_ = form()->h;
+       fl_set_input_return(dialog_->input_database, FL_RETURN_CHANGED);
+       fl_set_input_return(dialog_->input_style, FL_RETURN_CHANGED);
 
-       fl_set_input_return(dialog_->database, FL_RETURN_CHANGED);
-       fl_set_input_return(dialog_->style, FL_RETURN_CHANGED);
+       setPrehandler(dialog_->input_database);
+       setPrehandler(dialog_->input_style);
 
-        // Manage the ok, apply, restore and cancel/close buttons
+       // Manage the ok, apply, restore and cancel/close buttons
        bc().setOK(dialog_->button_ok);
-       bc().setCancel(dialog_->button_cancel);
-       bc().refresh();
+       bc().setCancel(dialog_->button_close);
+
+       bc().addReadOnly(dialog_->button_database_browse);
+       bc().addReadOnly(dialog_->input_database);
+       bc().addReadOnly(dialog_->button_style_browse);
+       bc().addReadOnly(dialog_->button_style_choose);
+       bc().addReadOnly(dialog_->button_rescan);
+       bc().addReadOnly(dialog_->input_style);
+       bc().addReadOnly(dialog_->check_bibtotoc);
+
+       // set up the tooltips
+       string str = _("The database you want to cite from. Insert it without the default extension \".bib\". If you insert it with the browser, LyX strips the extension. Several databases must be separated by a comma: \"natbib, books\".");
+       tooltips().init(dialog_->button_database_browse, str);
+
+       str = _("Browse your 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 or choose one from the browsers list. Most of the bibstyles are stored in $TEXMF/bibtex/bst. $TEXMF is the root dir of the local TeX tree.");
+       tooltips().init(dialog_->input_style, str);
+
+       str = _("Activate this option if you want the bibliography to appear in the Table of Contents (which doesn't happen by default)");
+       tooltips().init(dialog_->check_bibtotoc, str);
+
+       str = _("Choose a BibTeX style from the browsers list");
+       tooltips().init(dialog_->button_style_choose, str);
+
+       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);
 
-       bc().addReadOnly(dialog_->database);
-       bc().addReadOnly(dialog_->style);
 }
 
 
-bool FormBibtex::input(FL_OBJECT *, long)
+ButtonPolicy::SMInput FormBibtex::input(FL_OBJECT * ob, long)
 {
-       // minimal validation 
-       if (!compare(fl_get_input(dialog_->database),""))
-               return false;
-
-       return true;
+       if (ob == dialog_->button_database_browse) {
+               // When browsing, take the first file only
+               string const in_name = fl_get_input(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_freeze_form(form());
+                       fl_set_input(dialog_->input_database, out_name.c_str());
+                       fl_unfreeze_form(form());
+               }
+       } else if (ob == dialog_->button_style_browse) {
+               string const in_name = fl_get_input(dialog_->input_style);
+               string out_name =
+                       controller().Browse(in_name,
+                               _("Select BibTeX-Style"),
+                               _("*.bst| BibTeX Styles (*.bst)"));
+               if (!out_name.empty()) {
+                       fl_freeze_form(form());
+                       fl_set_input(dialog_->input_style, out_name.c_str());
+                       fl_unfreeze_form(form());
+               }
+       } else if (ob == dialog_->button_style_choose) {
+               unsigned int selection = fl_get_browser(dialog_->browser_styles);
+               if (!selection)
+                       return ButtonPolicy::SMI_NOOP;
+               
+               string const out_name = fl_get_browser_line(dialog_->browser_styles,
+                                                               selection);
+               fl_set_input(dialog_->input_style,
+                               ChangeExtension(out_name, string()).c_str());
+       } else if (ob == dialog_->button_rescan) {
+               fl_clear_browser(dialog_->browser_styles);
+               controller().rescanBibStyles();
+               string const str =
+                       controller().getBibStyles();
+               fl_add_browser_line(dialog_->browser_styles, str.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;
 }
 
 
 void FormBibtex::update()
 {
-       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());
+       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_->check_bibtotoc,1);
+               if (contains(bibstyle, ',')) { // bibstyle exists?
+                       bibstyle = split(bibstyle, bibtotoc, ',');
+               } else {
+                       bibstyle = string();
+               }
+
+               fl_set_input(dialog_->input_style, bibstyle.c_str());
+
+       } else {
+               fl_set_button(dialog_->check_bibtotoc,0);
+               fl_set_input(dialog_->input_style, bibstyle.c_str());
+       }
+       fl_clear_browser(dialog_->browser_styles);
+       string const str =
+               controller().getBibStyles();
+       fl_add_browser_line(dialog_->browser_styles, str.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()
 {
-       if (lv_->buffer()->isReadonly())
+       string const db = fl_get_input(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));
+       controller().params().setContents(unique_and_no_extensions(db));
 
-       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());
+       // empty is valid!
+       string bibstyle = fl_get_input(dialog_->input_style);
+       if (!bibstyle.empty()) {
+               // save the BibTeX style without any ".bst" extension
+               bibstyle = ChangeExtension(OnlyFilename(bibstyle), "");
+       }
 
-               inset_->setParams(params);
-               lv_->view()->updateInset(inset_, true);
+       bool const bibtotoc = fl_get_button(dialog_->check_bibtotoc);
 
-               // 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;
+       if (bibtotoc && (!bibstyle.empty())) {
+               // both bibtotoc and style
+               controller().params().setOptions("bibtotoc," + bibstyle);
+
+       } else if (bibtotoc) {
+               // bibtotoc and no style
+               controller().params().setOptions("bibtotoc");
+
+       } else  // all other cases
+               controller().params().setOptions(bibstyle);
 }