src/frontends/xforms/FormBibtex.C

   1 /**
   2  * \file FormBibtex.C
   3  * This file is part of LyX, the document processor.
   4  * Licence details can be found in the file COPYING.
   5  *
   6  * \author Angus Leeming
   7  * \author John Levon
   8  * \author Herbert Voss
   9  * \author Rob Lahaye
  10  *
  11  * Full author contact details are available in file CREDITS
  12  */
  13
  14
  15 #include <config.h>
  16 #include "xformsBC.h"
  17 #include "ControlBibtex.h"
  18 #include "FormBibtex.h"
  19 #include "forms/form_bibtex.h"
  20 #include "Tooltips.h"
  21 #include "xforms_helpers.h"
  22 #include FORMS_H_LOCATION
  23
  24 #include "helper_funcs.h"
  25 #include "gettext.h"
  26 #include "support/lstrings.h"
  27 #include "support/filetools.h"
  28 #include "support/lyxalgo.h"
  29
  30
  31 using std::vector;
  32 using std::sort;
  33
  34
  35 typedef FormController<ControlBibtex, FormView<FD_bibtex> > base_class;
  36
  37 FormBibtex::FormBibtex(Dialog & parent)
  38         : base_class(parent, _("BibTeX Database"))
  39 {}
  40
  41
  42 void FormBibtex::build()
  43 {
  44         dialog_.reset(build_bibtex(this));
  45
  46         // Manage the ok, apply, restore and cancel/close buttons
  47         bcview().setOK(dialog_->button_ok);
  48         bcview().setApply(dialog_->button_apply);
  49         bcview().setCancel(dialog_->button_close);
  50         bcview().setRestore(dialog_->button_restore);
  51
  52         // disable for read-only documents
  53         bcview().addReadOnly(dialog_->input_database);
  54         bcview().addReadOnly(dialog_->button_database_browse);
  55         bcview().addReadOnly(dialog_->button_style_browse);
  56         bcview().addReadOnly(dialog_->button_rescan);
  57         bcview().addReadOnly(dialog_->input_style);
  58         bcview().addReadOnly(dialog_->check_bibtotoc);
  59
  60         // trigger an input event for cut&paste with middle mouse button.
  61         setPrehandler(dialog_->input_database);
  62         setPrehandler(dialog_->input_style);
  63
  64         fl_set_input_return(dialog_->input_database, FL_RETURN_CHANGED);
  65         fl_set_input_return(dialog_->input_style, FL_RETURN_CHANGED);
  66
  67         // callback for double click in browser
  68         fl_set_browser_dblclick_callback(dialog_->browser_styles,
  69                                          C_FormDialogView_InputCB, 2);
  70
  71         // set up the tooltips
  72         string str = _("The database you want to cite from. Insert it "
  73                        "without the default extension \".bib\". Use comma "
  74                        "to separate databases.");
  75         tooltips().init(dialog_->button_database_browse, str);
  76
  77         str = _("Browse directory for BibTeX stylefiles");
  78         tooltips().init(dialog_->button_style_browse, str);
  79
  80         str = _("The BibTeX style to use (only one allowed). Insert it without "
  81                 "the default extension \".bst\" and without path.");
  82         tooltips().init(dialog_->input_style, str);
  83
  84         str = _("Select if the bibliography should appear in the Table "
  85                 "of Contents");
  86         tooltips().init(dialog_->check_bibtotoc, str);
  87
  88         str = _("Double click to choose a BibTeX style from the list.");
  89         tooltips().init(dialog_->browser_styles, str);
  90         // Work-around xforms' bug; enable tooltips for browser widgets.
  91         setPrehandler(dialog_->browser_styles);
  92
  93         str = _("Updates your TeX system for a new bibstyle list. Only "
  94                 "the styles which are in directories where TeX finds them "
  95                 "are listed!");
  96         tooltips().init(dialog_->button_rescan, str);
  97 }
  98
  99
 100 ButtonPolicy::SMInput FormBibtex::input(FL_OBJECT * ob, long ob_value)
 101 {
 102         if (ob == dialog_->button_database_browse) {
 103                 // When browsing, take the first file only
 104                 string const in_name = getString(dialog_->input_database);
 105                 string out_name =
 106                         controller().Browse("",
 107                                 _("Select Database"),
 108                                 _("*.bib| BibTeX Databases (*.bib)"));
 109                 if (!out_name.empty()) {
 110                         // add the database to any existing ones
 111                         if (!in_name.empty())
 112                                 out_name = in_name + ',' + out_name;
 113
 114                         fl_set_input(dialog_->input_database, out_name.c_str());
 115                 }
 116
 117         } else if (ob == dialog_->button_style_browse) {
 118                 string const in_name = getString(dialog_->input_style);
 119                 string const style = controller().Browse(in_name,
 120                                         _("Select BibTeX-Style"),
 121                                         _("*.bst| BibTeX Styles (*.bst)"));
 122                 if (!style.empty()) {
 123                         fl_set_input(dialog_->input_style, style.c_str());
 124                 }
 125
 126         } else if (ob == dialog_->browser_styles && ob_value == 2) {
 127                 // double clicked in styles browser
 128                 string const style = getString(dialog_->browser_styles);
 129                 if (style.empty()) {
 130                         return ButtonPolicy::SMI_NOOP;
 131                 } else {
 132                         fl_set_input(dialog_->input_style,
 133                                         ChangeExtension(style, "").c_str());
 134                 }
 135                 // reset the browser so that the following
 136                 // single-click callback doesn't do anything
 137                 fl_deselect_browser(dialog_->browser_styles);
 138
 139         } else if (ob == dialog_->button_rescan) {
 140                 fl_clear_browser(dialog_->browser_styles);
 141                 controller().rescanBibStyles();
 142                 string const str =
 143                         controller().getBibStyles();
 144                 fl_add_browser_line(dialog_->browser_styles, str.c_str());
 145         }
 146
 147         // with an empty database nothing makes sense ...
 148         if (!compare(fl_get_input(dialog_->input_database), "")) {
 149                 return ButtonPolicy::SMI_NOOP;
 150         }
 151
 152         return ButtonPolicy::SMI_VALID;
 153 }
 154
 155
 156 void FormBibtex::update()
 157 {
 158         fl_set_input(dialog_->input_database,
 159                      controller().params().getContents().c_str());
 160
 161         string bibtotoc = "bibtotoc";
 162         string bibstyle = controller().params().getOptions();
 163
 164         bool const bibtotoc_exists = prefixIs(bibstyle, bibtotoc);
 165         fl_set_button(dialog_->check_bibtotoc, bibtotoc_exists);
 166         if (bibtotoc_exists) {
 167                 if (contains(bibstyle, ',')) { // bibstyle exists?
 168                         bibstyle = split(bibstyle, bibtotoc, ',');
 169                 } else {
 170                         bibstyle.erase();
 171                 }
 172         }
 173         fl_set_input(dialog_->input_style, bibstyle.c_str());
 174
 175         fl_clear_browser(dialog_->browser_styles);
 176         string const str = controller().getBibStyles();
 177         fl_add_browser_line(dialog_->browser_styles, str.c_str());
 178 }
 179
 180 namespace {
 181
 182 string const unique_and_no_extensions(string const & str_in)
 183 {
 184         vector<string> dbase = getVectorFromString(str_in);
 185         for (vector<string>::iterator it = dbase.begin();
 186              it != dbase.end(); ++it) {
 187                 *it = ChangeExtension(*it, string());
 188         }
 189         lyx::eliminate_duplicates(dbase);
 190         return getStringFromVector(dbase);
 191 }
 192
 193 } // namespace anon
 194
 195
 196 void FormBibtex::apply()
 197 {
 198         string const db = getString(dialog_->input_database);
 199         if (db.empty()) {
 200                 // no database -> no bibtex-command and no options!
 201                 controller().params().setContents("");
 202                 controller().params().setOptions("");
 203                 return;
 204         }
 205
 206         controller().params().setContents(unique_and_no_extensions(db));
 207
 208         // empty is valid!
 209         string bibstyle = getString(dialog_->input_style);
 210         if (!bibstyle.empty()) {
 211                 // save the BibTeX style without any ".bst" extension
 212                 bibstyle = ChangeExtension(OnlyFilename(bibstyle), "");
 213         }
 214
 215         bool const addtotoc = fl_get_button(dialog_->check_bibtotoc);
 216         string const bibtotoc = addtotoc ? "bibtotoc" : "";
 217         if (addtotoc && !bibstyle.empty()) {
 218                 // Both bibtotoc and style.
 219                 controller().params().setOptions(bibtotoc + ',' + bibstyle);
 220
 221         } else {
 222                 // At least one of addtotoc and bibstyle is empty. No harm to output both!
 223                 controller().params().setOptions(bibtotoc + bibstyle);
 224         }
 225 }