]> git.lyx.org Git - lyx.git/blobdiff - src/frontends/xforms/FormBibtex.C
Introduce LFUN_PRINT.
[lyx.git] / src / frontends / xforms / FormBibtex.C
index 21603d1fc4846c36291433ec3a52f3356b7f8dba..71416187e1356669392e783a7089bb184adb3c63 100644 (file)
@@ -1,44 +1,51 @@
 /**
  * \file FormBibtex.C
- * 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
+ * \author Herbert Voß
+ * \author Rob Lahaye
  *
- * Full author contact details are available in file CREDITS
+ * 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 "ControlBibtex.h"
 #include "forms/form_bibtex.h"
+
 #include "Tooltips.h"
 #include "xforms_helpers.h"
-#include FORMS_H_LOCATION
+#include "xformsBC.h"
 
-#include "helper_funcs.h"
-#include "gettext.h"
-#include "debug.h"
-#include "support/LAssert.h"
-#include "support/lstrings.h"
 #include "support/filetools.h"
+#include "support/globbing.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::FileFilterList;
+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::sort;
+using std::string;
 
 
-typedef FormCB<ControlBibtex, FormDB<FD_bibtex> > base_class;
+typedef FormController<ControlBibtex, FormView<FD_bibtex> > base_class;
 
-FormBibtex::FormBibtex()
-       : base_class(_("BibTeX Database"))
+FormBibtex::FormBibtex(Dialog & parent)
+       : base_class(parent, _("BibTeX Database"))
 {}
 
 
@@ -46,90 +53,111 @@ void FormBibtex::build()
 {
        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);
-
+       // 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);
 
-       // Manage the ok, apply, restore and cancel/close buttons
-       bc().setOK(dialog_->button_ok);
-       bc().setCancel(dialog_->button_close);
+       fl_set_input_return(dialog_->input_database, FL_RETURN_CHANGED);
+       fl_set_input_return(dialog_->input_style, FL_RETURN_CHANGED);
 
-       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);
+       // 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\". If you insert it with the browser, LyX strips the extension. Several databases must be separated by a comma: \"natbib, books\".");
+       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 your directory for BibTeX stylefiles");
+       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 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.");
+       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 = _("Activate this option if you want the bibliography to appear in the Table of Contents (which doesn't happen by default)");
+       str = _("Select if the bibliography should appear in the Table "
+               "of Contents");
        tooltips().init(dialog_->check_bibtotoc, str);
 
-       str = _("Choose a BibTeX style from the browsers list");
-       tooltips().init(dialog_->button_style_choose, str);
+       str = _("Double click to choose a BibTeX style from the list.");
+       tooltips().init(dialog_->browser_styles, 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);
+#if FL_VERSION == 0 || (FL_REVISION == 0 && FL_FIXLEVEL == 0)
+       // Work-around xforms' bug; enable tooltips for browser widgets.
+       setPrehandler(dialog_->browser_styles);
+#endif
 
+       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_->button_database_browse) {
                // When browsing, take the first file only
-               string const in_name = fl_get_input(dialog_->input_database);
+               string const in_name = getString(dialog_->input_database);
+               FileFilterList const
+                       filter(_("*.bib| BibTeX Databases (*.bib)"));
                string out_name =
-                       controller().Browse("",
-                               _("Select Database"),
-                               _("*.bib| BibTeX Databases (*.bib)"));
+                       controller().browse("", _("Select Database"),
+                                           filter);
                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());
+               string const in_name = getString(dialog_->input_style);
+               FileFilterList const
+                       filter(_("*.bst| BibTeX Styles (*.bst)"));
+               string const style = controller()
+                       .browse(in_name, _("Select BibTeX-Style"), filter);
+               if (!style.empty()) {
+                       fl_set_input(dialog_->input_style, style.c_str());
                }
-       } else if (ob == dialog_->button_style_choose) {
-               unsigned int selection = fl_get_browser(dialog_->browser_styles);
-               if (!selection)
+
+       } 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;
-               
-               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 {
+                       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();
-               string const str =
-                       controller().getBibStyles();
-               fl_add_browser_line(dialog_->browser_styles, str.c_str());
+               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 ...
@@ -145,26 +173,27 @@ void FormBibtex::update()
 {
        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);
+       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 = string();
+                       bibstyle.erase();
                }
+       }
+       fl_set_input(dialog_->input_style, bibstyle.c_str());
 
-               fl_set_input(dialog_->input_style, bibstyle.c_str());
+       vector<string> styles;
+       controller().getBibStyles(styles);
 
-       } 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());
+       fl_add_browser_line(dialog_->browser_styles,
+                           getStringFromVector(styles, "\n").c_str());
 }
 
 namespace {
@@ -185,7 +214,7 @@ string const unique_and_no_extensions(string const & str_in)
 
 void FormBibtex::apply()
 {
-       string const db = fl_get_input(dialog_->input_database);
+       string const db = getString(dialog_->input_database);
        if (db.empty()) {
                // no database -> no bibtex-command and no options!
                controller().params().setContents("");
@@ -196,22 +225,20 @@ void FormBibtex::apply()
        controller().params().setContents(unique_and_no_extensions(db));
 
        // empty is valid!
-       string bibstyle = fl_get_input(dialog_->input_style);
+       string bibstyle = getString(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);
+       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 (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);
+       } else {
+               // At least one of addtotoc and bibstyle is empty. No harm to output both!
+               controller().params().setOptions(bibtotoc + bibstyle);
+       }
 }