]> git.lyx.org Git - lyx.git/blobdiff - src/frontends/xforms/FormBibtex.C
Rob's followup (nr. 1 ;)
[lyx.git] / src / frontends / xforms / FormBibtex.C
index cd29bcdd06bc6a6f6f4af9ff1efb2cbb7de4d7fe..9aae13e8c07c2f9a9ca46a35fd08331c00f6ef36 100644 (file)
@@ -3,8 +3,9 @@
  * Copyright 2001 the LyX Team
  * Read the file COPYING
  *
- * \author Angus Leeming
- * \author John Levon
+ * \author Angus Leeming <leeming@lyx.org>
+ * \author John Levon, moz@compsoc.man.ac.uk
+ * \author Herbert Voss, voss@lyx.org
  */
 
 #ifdef __GNUG__
 #include "xformsBC.h"
 #include "ControlBibtex.h"
 #include "FormBibtex.h"
-#include "form_bibtex.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::vector;
+using std::sort;
 
-typedef FormCB<ControlBibtex, FormDB<FD_form_bibtex> > base_class;
 
-FormBibtex::FormBibtex(ControlBibtex & c)
-       : base_class(c, _("BibTeX Database"))
+typedef FormCB<ControlBibtex, FormDB<FD_bibtex> > base_class;
+
+FormBibtex::FormBibtex()
+       : base_class(_("BibTeX Database"))
 {}
 
 
 void FormBibtex::build()
 {
-       dialog_.reset(build_bibtex());
+       dialog_.reset(build_bibtex(this));
+
+       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);
 }
 
 
-ButtonPolicy::SMInput FormBibtex::input(FL_OBJECT *, long)
+ButtonPolicy::SMInput FormBibtex::input(FL_OBJECT * ob, long)
 {
-       // minimal validation 
-       if (!compare(fl_get_input(dialog_->database),""))
+       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;
 }
@@ -55,15 +142,75 @@ ButtonPolicy::SMInput FormBibtex::input(FL_OBJECT *, long)
 
 void FormBibtex::update()
 {
-       fl_set_input(dialog_->database,
+       fl_set_input(dialog_->input_database,
                     controller().params().getContents().c_str());
-       fl_set_input(dialog_->style,
-                    controller().params().getOptions().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()
 {
-       controller().params().setContents(fl_get_input(dialog_->database));
-       controller().params().setOptions(fl_get_input(dialog_->style));
+       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;
+       }
+
+       controller().params().setContents(unique_and_no_extensions(db));
+
+       // 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), "");
+       }
+
+       bool const bibtotoc = fl_get_button(dialog_->check_bibtotoc);
+
+       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);
 }