1 /* This file is part of
2 * ======================================================
4 * LyX, The Document Processor
6 * Copyright 1995 Matthias Ettrich
7 * Copyright 1995-2000 The LyX Team.
9 * ====================================================== */
17 #pragma implementation
25 #include "lyx_gui_misc.h"
27 #include "support/path.h"
28 #include "support/filetools.h"
29 #include "bufferlist.h"
31 #include "support/FileInfo.h"
32 #include "lastfiles.h"
34 #include "lyxserver.h"
38 #include "MenuBackend.h"
39 #include "ToolbarDefaults.h"
42 #include "converter.h"
46 extern void LoadLyXFile(string const &);
47 extern void QuitLyX();
51 string system_tempdir;
52 string user_lyxdir; // Default $HOME/.lyx
54 // Should this be kept global? Asger says Yes.
57 LastFiles * lastfiles;
59 // This is the global bufferlist object
60 BufferList bufferlist;
62 LyXServer * lyxserver = 0;
63 // this should be static, but I need it in buffer.C
64 bool finished = false; // flag, that we are quitting the program
66 // convenient to have it here.
67 kb_keymap * toplevel_keymap;
70 LyX::LyX(int * argc, char * argv[])
72 // Prevent crash with --help
76 // Here we need to parse the command line. At least
77 // we need to parse for "-dbg" and "-help"
78 bool gui = easyParse(argc, argv);
80 // Global bindings (this must be done as early as possible.) (Lgb)
81 toplevel_keymap = new kb_keymap;
82 defaultKeyBindings(toplevel_keymap);
84 // Make the GUI object, and let it take care of the
85 // command line arguments that concerns it.
86 lyxerr[Debug::INIT] << "Initializing LyXGUI..." << endl;
87 lyxGUI = new LyXGUI(this, argc, argv, gui);
88 lyxerr[Debug::INIT] << "Initializing LyXGUI...done" << endl;
90 // Now the GUI and LyX have taken care of their arguments, so
91 // the only thing left on the command line should be
92 // filenames. Let's check anyway.
93 for (int argi = 1; argi < *argc ; ++argi) {
94 if (argv[argi][0] == '-') {
95 lyxerr << _("Wrong command line option `")
97 << _("'. Exiting.") << endl;
102 // Initialization of LyX (reads lyxrc and more)
103 lyxerr[Debug::INIT] << "Initializing LyX::init..." << endl;
104 init(argc, argv, gui);
105 lyxerr[Debug::INIT] << "Initializing LyX::init...done" << endl;
109 // Load the files specified in the command line.
111 lyxerr[Debug::INFO] << "Opening document..." << endl;
112 else if ((*argc) > 2)
113 lyxerr[Debug::INFO] << "Opening documents..." << endl;
115 Buffer * last_loaded = 0;
117 for (int argi = (*argc) - 1; argi >= 1; --argi) {
118 Buffer * loadb = bufferlist.loadLyXFile(argv[argi]);
125 string splash = i18nLibFileSearch("examples", "splash.lyx");
126 lyxerr[Debug::INIT] << "Opening splash document "
127 << splash << "..." << endl;
128 Buffer * loadb = bufferlist.loadLyXFile(splash);
134 if (last_loaded != 0) {
135 lyxerr[Debug::INIT] << "Yes we loaded some files." << endl;
137 lyxGUI->regBuf(last_loaded);
140 // Execute batch commands if available
141 if (!batch_command.empty()) {
142 lyxerr << "About to handle -x '"
143 << batch_command << "'" << endl;
145 // no buffer loaded, create one
147 last_loaded = bufferlist.newFile("tmpfile", string());
149 // try to dispatch to last loaded buffer first
150 bool dispatched = last_loaded->Dispatch(batch_command);
152 // if this was successful, return.
153 // Maybe we could do something more clever than aborting...
155 lyxerr << "We are done!" << endl;
160 // otherwise, let the GUI handle the batch command
161 lyxGUI->regBuf(last_loaded);
162 lyxGUI->getLyXView()->getLyXFunc()->Dispatch(batch_command);
167 // Let the ball begin...
172 // A destructor is always necessary (asierra-970604)
180 extern "C" void error_handler(int err_sig);
182 void LyX::init(int */*argc*/, char **argv, bool gui)
184 // Install the signal handlers
185 signal(SIGHUP, error_handler);
186 signal(SIGFPE, error_handler);
187 signal(SIGSEGV, error_handler);
188 signal(SIGINT, error_handler);
189 signal(SIGTERM, error_handler);
192 // Determine path of binary
196 string binpath = subst(argv[0], '\\', '/');
197 string binname = OnlyFilename(argv[0]);
198 // Sorry for system specific code. (SMiyata)
199 if (suffixIs(binname, ".exe"))
200 binname.erase(binname.length()-4, string::npos);
202 binpath = ExpandPath(binpath); // This expands ./ and ~/
204 if (!AbsolutePath(binpath)) {
205 string binsearchpath = GetEnvPath("PATH");
206 // This will make "src/lyx" work always :-)
207 binsearchpath += ";.";
208 binpath = FileOpenSearch(binsearchpath, argv[0]);
211 fullbinpath = binpath;
212 binpath = MakeAbsPath(OnlyPath(binpath));
214 // In case we are running in place and compiled with shared libraries
215 if (suffixIs(binpath, "/.libs/"))
216 binpath.erase(binpath.length()-6, string::npos);
218 if (binpath.empty()) {
219 lyxerr << _("Warning: could not determine path of binary.")
221 << _("If you have problems, try starting LyX with an absolute path.")
224 lyxerr[Debug::INIT] << "Path of binary: " << binpath << endl;
227 // Determine system directory.
230 // Directories are searched in this order:
231 // 1) -sysdir command line parameter
232 // 2) LYX_DIR_11x environment variable
233 // 3) Maybe <path of binary>/TOP_SRCDIR/lib
234 // 4) <path of binary>/../share/<name of binary>/
235 // 4a) repeat 4 after following the Symlink if <path of
236 // binary> is a symbolic link.
237 // 5) hardcoded lyx_dir
238 // The directory is checked for the presence of the file
239 // "chkconfig.ltx", and if that is present, the directory
240 // is accepted as the system directory.
241 // If no chkconfig.ltx file is found, a warning is given,
242 // and the hardcoded lyx_dir is used.
244 // If we had a command line switch, system_lyxdir is already set
246 if (!system_lyxdir.empty())
247 searchpath= MakeAbsPath(system_lyxdir) + ';';
249 // LYX_DIR_11x environment variable
250 string lyxdir = GetEnvPath("LYX_DIR_11x");
252 if (!lyxdir.empty()) {
253 lyxerr[Debug::INIT] << "LYX_DIR_11x: " << lyxdir << endl;
254 searchpath += lyxdir + ';';
257 // <path of binary>/TOP_SRCDIR/lib
258 build_lyxdir = MakeAbsPath("../lib", binpath);
259 if (!FileSearch(build_lyxdir, "lyxrc.defaults").empty()) {
260 searchpath += MakeAbsPath(AddPath(TOP_SRCDIR, "lib"),
262 lyxerr[Debug::INIT] << "Checking whether LyX is run in "
263 "place... yes" << endl;
266 << "Checking whether LyX is run in place... no"
268 build_lyxdir.erase();
273 // Path of binary/../share/name of binary/
274 searchpath += NormalizePath(AddPath(binpath, "../share/") +
275 OnlyFilename(binname)) + ';';
278 FileInfo file(fullbinpath, true);
279 FollowLink = file.isLink();
282 if (LyXReadLink(fullbinpath, Link)) {
284 binpath = MakeAbsPath(OnlyPath(fullbinpath));
290 } while (FollowLink);
293 searchpath += LYX_DIR;
295 // If debugging, show complete search path
296 lyxerr[Debug::INIT] << "System directory search path: "
297 << searchpath << endl;
299 string const filename = "chkconfig.ltx";
300 string temp = FileOpenSearch(searchpath, filename, string());
301 system_lyxdir = OnlyPath(temp);
303 // Reduce "path/../path" stuff out of system directory
304 system_lyxdir = NormalizePath(system_lyxdir);
306 bool path_shown = false;
308 // Warn if environment variable is set, but unusable
309 if (!lyxdir.empty()) {
310 if (system_lyxdir != NormalizePath(lyxdir)) {
311 lyxerr <<_("LYX_DIR_11x environment variable no good.")
313 << _("System directory set to: ")
314 << system_lyxdir << endl;
319 // Warn the user if we couldn't find "chkconfig.ltx"
320 if (system_lyxdir == "./") {
321 lyxerr <<_("LyX Warning! Couldn't determine system directory.")
322 <<_("Try the '-sysdir' command line parameter or")
323 <<_("set the environment variable LYX_DIR_11x to the "
324 "LyX system directory")
325 << _("containing the file `chkconfig.ltx'.") << endl;
327 lyxerr << _("Using built-in default ")
328 << LYX_DIR << _(" but expect problems.")
331 lyxerr << _("Expect problems.") << endl;
332 system_lyxdir = LYX_DIR;
336 // Report the system directory if debugging is on
338 lyxerr[Debug::INIT] << "System directory: '"
339 << system_lyxdir << '\'' << endl;
342 // Determine user lyx-dir
345 // Directories are searched in this order:
346 // 1) -userdir command line parameter
347 // 2) LYX_USERDIR_11x environment variable
348 // 3) $HOME/.<name of binary>
350 // If we had a command line switch, user_lyxdir is already set
351 bool explicit_userdir = true;
352 if (user_lyxdir.empty()) {
354 // LYX_USERDIR_11x environment variable
355 user_lyxdir = GetEnvPath("LYX_USERDIR_11x");
358 if (user_lyxdir.empty())
359 user_lyxdir = AddPath(GetEnvPath("HOME"),
360 string(".") + PACKAGE);
361 explicit_userdir = false;
364 lyxerr[Debug::INIT] << "User LyX directory: '"
365 << user_lyxdir << '\'' << endl;
367 // Check that user LyX directory is ok.
368 queryUserLyXDir(explicit_userdir);
371 // Shine up lyxrc defaults
374 // Default template path: system_dir/templates
375 if (lyxrc.template_path.empty()){
376 lyxrc.template_path = AddPath(system_lyxdir, "templates");
379 // Default lastfiles file: $HOME/.lyx/lastfiles
380 if (lyxrc.lastfiles.empty()){
381 lyxrc.lastfiles = AddName(user_lyxdir, "lastfiles");
384 // Disable gui when either lyxrc or easyparse says so
386 lyxrc.use_gui = false;
388 // Calculate screen dpi as average of x-DPI and y-DPI:
390 lyxrc.dpi = getScreenDPI();
391 lyxerr[Debug::INIT] << "DPI setting detected to be "
392 << lyxrc.dpi + 0.5 << endl;
394 lyxrc.dpi = 1; // I hope this is safe
398 // Read configuration files
401 ReadRcFile("lyxrc.defaults");
402 system_lyxrc = lyxrc;
403 system_formats = formats;
404 system_converters = converters;
406 // If there is a preferences file we read that instead
407 // of the old lyxrc file.
408 if (!ReadRcFile("preferences"))
412 converters.Update(formats);
413 converters.BuildGraph();
416 ReadEncodingsFile("encodings");
418 ReadLangugesFile("languages");
421 lyxerr[Debug::INIT] << "Reading layouts..." << endl;
424 // Ensure that we have really read a bind file, so that LyX is
426 if (!lyxrc.hasBindFile)
427 lyxrc.ReadBindFile();
430 ReadUIFile(lyxrc.ui_file);
432 // Bind the X dead keys to the corresponding LyX functions if
434 if (lyxrc.override_x_deadkeys)
435 deadKeyBindings(toplevel_keymap);
437 if (lyxerr.debugging(Debug::LYXRC)) {
441 // Create temp directory
442 system_tempdir = CreateLyXTmpDir(lyxrc.tempdir_path);
443 if (lyxerr.debugging(Debug::INIT)) {
444 lyxerr << "LyX tmp dir: `" << system_tempdir << '\'' << endl;
447 // load the lastfiles mini-database
448 lyxerr[Debug::INIT] << "Reading lastfiles `"
449 << lyxrc.lastfiles << "'..." << endl;
450 lastfiles = new LastFiles(lyxrc.lastfiles,
451 lyxrc.check_lastfiles,
452 lyxrc.num_lastfiles);
454 // start up the lyxserver. (is this a bit early?) (Lgb)
455 // 0.12 this will be way to early, we need the GUI to be initialized
456 // first, so move it for now.
457 // lyxserver = new LyXServer;
461 // These are the default bindings known to LyX
462 void LyX::defaultKeyBindings(kb_keymap * kbmap)
464 kbmap->bind("Right", LFUN_RIGHT);
465 kbmap->bind("Left", LFUN_LEFT);
466 kbmap->bind("Up", LFUN_UP);
467 kbmap->bind("Down", LFUN_DOWN);
469 kbmap->bind("Tab", LFUN_TAB);
471 kbmap->bind("Home", LFUN_HOME);
472 kbmap->bind("End", LFUN_END);
473 kbmap->bind("Prior", LFUN_PRIOR);
474 kbmap->bind("Next", LFUN_NEXT);
476 kbmap->bind("Return", LFUN_BREAKPARAGRAPH);
477 kbmap->bind("~C-~S-~M-nobreakspace", LFUN_PROTECTEDSPACE);
479 kbmap->bind("Delete", LFUN_DELETE);
480 kbmap->bind("BackSpace", LFUN_BACKSPACE);
482 // kbmap->bindings to enable the use of the numeric keypad
484 kbmap->bind("KP_0", LFUN_SELFINSERT);
485 kbmap->bind("KP_Decimal", LFUN_SELFINSERT);
486 kbmap->bind("KP_Enter", LFUN_SELFINSERT);
487 kbmap->bind("KP_1", LFUN_SELFINSERT);
488 kbmap->bind("KP_2", LFUN_SELFINSERT);
489 kbmap->bind("KP_3", LFUN_SELFINSERT);
490 kbmap->bind("KP_4", LFUN_SELFINSERT);
491 kbmap->bind("KP_5", LFUN_SELFINSERT);
492 kbmap->bind("KP_6", LFUN_SELFINSERT);
493 kbmap->bind("KP_Add", LFUN_SELFINSERT);
494 kbmap->bind("KP_7", LFUN_SELFINSERT);
495 kbmap->bind("KP_8", LFUN_SELFINSERT);
496 kbmap->bind("KP_9", LFUN_SELFINSERT);
497 kbmap->bind("KP_Divide", LFUN_SELFINSERT);
498 kbmap->bind("KP_Multiply", LFUN_SELFINSERT);
499 kbmap->bind("KP_Subtract", LFUN_SELFINSERT);
501 /* Most self-insert keys are handled in the 'default:' section of
502 * WorkAreaKeyPress - so we don't have to define them all.
503 * However keys explicit decleared as self-insert are
504 * handled seperatly (LFUN_SELFINSERT.) Lgb. */
506 kbmap->bind("C-Tab", LFUN_TABINSERT); // ale970515
507 kbmap->bind("S-Tab", LFUN_SHIFT_TAB); // jug20000522
511 // LyX can optionally take over the handling of deadkeys
512 void LyX::deadKeyBindings(kb_keymap * kbmap)
514 // bindKeyings for transparent handling of deadkeys
515 // The keysyms are gotten from XFree86 X11R6
516 kbmap->bind("~C-~S-~M-dead_acute", LFUN_ACUTE);
517 kbmap->bind("~C-~S-~M-dead_breve", LFUN_BREVE);
518 kbmap->bind("~C-~S-~M-dead_caron", LFUN_CARON);
519 kbmap->bind("~C-~S-~M-dead_cedilla", LFUN_CEDILLA);
520 kbmap->bind("~C-~S-~M-dead_abovering", LFUN_CIRCLE);
521 kbmap->bind("~C-~S-~M-dead_circumflex", LFUN_CIRCUMFLEX);
522 kbmap->bind("~C-~S-~M-dead_abovedot", LFUN_DOT);
523 kbmap->bind("~C-~S-~M-dead_grave", LFUN_GRAVE);
524 kbmap->bind("~C-~S-~M-dead_doubleacute", LFUN_HUNG_UMLAUT);
525 kbmap->bind("~C-~S-~M-dead_macron", LFUN_MACRON);
526 // nothing with this name
527 // kbmap->bind("~C-~S-~M-dead_special_caron", LFUN_SPECIAL_CARON);
528 kbmap->bind("~C-~S-~M-dead_tilde", LFUN_TILDE);
529 kbmap->bind("~C-~S-~M-dead_diaeresis", LFUN_UMLAUT);
530 // nothing with this name either...
531 //kbmap->bind("~C-~S-~M-dead_underbar", LFUN_UNDERBAR);
532 kbmap->bind("~C-~S-~M-dead_belowdot", LFUN_UNDERDOT);
533 kbmap->bind("~C-~S-~M-dead_tie", LFUN_TIE);
534 kbmap->bind("~C-~S-~M-dead_ogonek", LFUN_OGONEK);
538 // This one is not allowed to use anything on the main form, since that
539 // one does not exist yet. (Asger)
540 void LyX::queryUserLyXDir(bool explicit_userdir)
542 // Does user directory exist?
543 FileInfo fileInfo(user_lyxdir);
544 if (fileInfo.isOK() && fileInfo.isDir()) {
552 // Different wording if the user specifically requested a directory
553 if (!AskQuestion( explicit_userdir
554 ? _("You have specified an invalid LyX directory.")
555 : _("You don't have a personal LyX directory.") ,
557 _("It is needed to keep your own configuration."),
558 _("Should I try to set it up for you (recommended)?"))) {
559 lyxerr << _("Running without personal LyX directory.") << endl;
560 // No, let's use $HOME instead.
561 user_lyxdir = GetEnvPath("HOME");
565 // Tell the user what is going on
566 lyxerr << _("LyX: Creating directory ") << user_lyxdir
567 << _(" and running configure...") << endl;
569 // Create directory structure
570 if (!createDirectory(user_lyxdir, 0755)) {
571 // Failed, let's use $HOME instead.
572 user_lyxdir = GetEnvPath("HOME");
573 lyxerr << _("Failed. Will use ") << user_lyxdir
574 << _(" instead.") << endl;
578 // Run configure in user lyx directory
580 ::system(AddName(system_lyxdir, "configure").c_str());
581 lyxerr << "LyX: " << _("Done!") << endl;
585 // Read the rc file `name'
586 bool LyX::ReadRcFile(string const & name)
588 lyxerr[Debug::INIT] << "About to read " << name << "..." << endl;
590 string lyxrc_path = LibFileSearch(string(), name);
591 if (!lyxrc_path.empty()){
592 lyxerr[Debug::INIT] << "Found " << name
593 << " in " << lyxrc_path << endl;
594 if (lyxrc.read(lyxrc_path) < 0) {
595 WriteAlert(_("LyX Warning!"),
596 _("Error while reading ")+lyxrc_path+".",
597 _("Using built-in defaults."));
602 lyxerr[Debug::INIT] << "Could not find " << name << endl;
607 // Read the ui file `name'
608 void LyX::ReadUIFile(string const & name)
616 struct keyword_item uitags[ui_last-1] = {
617 { "menuset", ui_menuset },
618 { "toolbar", ui_toolbar }
621 lyxerr[Debug::INIT] << "About to read " << name << "..." << endl;
623 string ui_path = LibFileSearch("ui", name, "ui");
625 if (ui_path.empty()) {
626 lyxerr[Debug::INIT] << "Could not find " << name << endl;
627 menubackend.defaults();
631 lyxerr[Debug::INIT] << "Found " << name
632 << " in " << ui_path << endl;
633 LyXLex lex(uitags, ui_last - 1);
634 lex.setFile(ui_path);
636 lyxerr << "Unable to set LyXLeX for ui file: " << ui_path
640 if (lyxerr.debugging(Debug::PARSER))
641 lex.printTable(lyxerr);
646 menubackend.read(lex);
650 toolbardefaults.read(lex);
654 lex.printError("LyX::ReadUFile: "
655 "Unknown menu tag: `$$Token'");
662 // Read the languages file `name'
663 void LyX::ReadLangugesFile(string const & name)
665 lyxerr[Debug::INIT] << "About to read " << name << "..." << endl;
667 string lang_path = LibFileSearch(string(), name);
668 if (lang_path.empty()) {
669 lyxerr[Debug::INIT] << "Could not find " << name << endl;
670 languages.setDefaults();
673 languages.read(lang_path);
677 // Read the encodings file `name'
678 void LyX::ReadEncodingsFile(string const & name)
680 lyxerr[Debug::INIT] << "About to read " << name << "..." << endl;
682 string enc_path = LibFileSearch(string(), name);
683 if (enc_path.empty()) {
684 lyxerr[Debug::INIT] << "Could not find " << name << endl;
687 encodings.read(enc_path);
691 // Set debugging level and report result to user
693 void setDebuggingLevel(string const & dbgLevel)
695 lyxerr << _("Setting debug level to ") << dbgLevel << endl;
696 lyxerr.level(Debug::value(dbgLevel));
697 Debug::showLevel(lyxerr, lyxerr.level());
701 // Give command line help
703 void commandLineHelp()
705 lyxerr << "LyX " LYX_VERSION << " of " LYX_RELEASE << endl;
707 _("Usage: lyx [ command line switches ] [ name.lyx ... ]\n"
708 "Command line switches (case sensitive):\n"
709 "\t-help summarize LyX usage\n"
710 "\t-userdir dir try to set user directory to dir\n"
711 "\t-sysdir dir try to set system directory to dir\n"
712 "\t-geometry WxH+X+Y set geometry of the main window\n"
713 "\t-dbg feature[,feature]...\n"
714 " select the features to debug.\n"
715 " Type `lyx -dbg' to see the list of features\n"
716 "Check the LyX man page for more options.") << endl;
720 bool LyX::easyParse(int * argc, char * argv[])
723 int removeargs = 0; // used when options are read
724 for (int i = 1; i < *argc; ++i) {
725 string arg = argv[i];
727 // Check for -dbg int
730 setDebuggingLevel(argv[i + 1]);
733 lyxerr << _("List of supported debug flags:")
735 Debug::showTags(lyxerr);
739 // Check for "-sysdir"
740 else if (arg == "-sysdir") {
742 system_lyxdir = argv[i + 1];
745 lyxerr << _("Missing directory for -sysdir switch!")
750 // Check for "-userdir"
751 else if (arg == "-userdir") {
753 user_lyxdir = argv[i + 1];
756 lyxerr << _("Missing directory for -userdir switch!")
761 // Check for --help or -help
762 else if (arg == "--help" || arg == "-help") {
766 // Check for "-nw": No XWindows as for emacs this should
767 // give a LyX that could be used in a terminal window.
768 //else if (arg == "-nw") {
772 // Check for "-x": Execute commands
773 else if (arg == "-x" || arg == "--execute") {
775 batch_command = string(argv[i + 1]);
779 lyxerr << _("Missing command string after -x switch!") << endl;
781 // Argh. Setting gui to false segfaults..
785 else if (arg == "-e" || arg == "--export") {
787 string type(argv[i+1]);
789 batch_command = "buffer-export " + type;
792 lyxerr << _("Missing file type [eg latex, "
794 << arg << _(" switch!") << endl;
796 else if (arg == "--import") {
798 string type(argv[i+1]);
799 string file(argv[i+2]);
802 batch_command = "buffer-import " + type + " " + file;
803 lyxerr << "batch_command: "
804 << batch_command << endl;
807 lyxerr << _("Missing type [eg latex, "
809 << arg << _(" switch!") << endl;
812 if (removeargs > 0) {
813 // Now, remove used arguments by shifting
814 // the following ones removeargs places down.
815 (*argc) -= removeargs;
816 for (int j = i; j < (*argc); ++j)
817 argv[j] = argv[j + removeargs];
818 --i; // After shift, check this number again.
829 void error_handler(int err_sig)
833 lyxerr << "\nlyx: SIGHUP signal caught" << endl;
839 lyxerr << "\nlyx: SIGFPE signal caught" << endl;
842 lyxerr << "\nlyx: SIGSEGV signal caught" << endl;
844 "Sorry, you have found a bug in LyX."
845 " If possible, please read 'Known bugs'\n"
846 "under the Help menu and then send us "
847 "a full bug report. Thanks!" << endl;
854 // Deinstall the signal handlers
855 signal(SIGHUP, SIG_DFL);
856 signal(SIGINT, SIG_DFL);
857 signal(SIGFPE, SIG_DFL);
858 signal(SIGSEGV, SIG_DFL);
859 signal(SIGTERM, SIG_DFL);
861 bufferlist.emergencyWriteAll();
863 lyxerr << "Bye." << endl;
864 if (err_sig!= SIGHUP &&
865 (!GetEnv("LYXDEBUG").empty() || err_sig == SIGSEGV))