(print): robustify.

[lilypond.git] / lily / main.cc

diff --git a/lily/main.cc b/lily/main.cc
index ce647209779cb5f1a23590f390381657e4441394..12c6598ac8074f71686ebe514e75a23ad1c21203 100644 (file)
--- a/lily/main.cc
+++ b/lily/main.cc
@@ -64,8 +64,11 @@ bool verbose_global_b = false;
 String init_scheme_code_string = "(begin #t ";
 
 bool make_pdf = false;
+bool make_dvi = false;
+bool make_ps = false;
 bool make_png = false;
 bool make_preview = false;
+bool make_tex = false;
 
 /*
  * Miscellaneous global stuff.
@@ -81,13 +84,13 @@ static char const *AUTHORS =
 "  Han-Wen Nienhuys <hanwen@cs.uu.nl>\n"
 "  Jan Nieuwenhuizen <janneke@gnu.org>\n";
 
-static char const *PROGRAM_NAME = "lilypond-bin";
+static char const *PROGRAM_NAME = "lilypond";
 static char const *PROGRAM_URL = "http://lilypond.org";
 
 static char const *NOTICE =
 _i ("This program is free software.  It is covered by the GNU General Public\n"
     "License and you are welcome to change it and/or distribute copies of it\n"
-    "under certain conditions.  Invoke as `lilypond-bin --warranty' for more\n"
+    "under certain conditions.  Invoke as `lilypond --warranty' for more\n"
     "information.\n");
   
 static char const *WARRANTY =
@@ -124,7 +127,7 @@ static Long_option_init options_static[] =
      _i ("set options, use -e '(ly:option-usage)' for help")},
     /* Bug in option parser: --output=foe is taken as an abbreviation
        for --output-format.  */
-    {_i ("EXT"), "format", 'f', _i ("use output format EXT")},
+    {_i ("EXT"), "format", 'f', _i ("select back-end to use")},
     {0, "help", 'h',  _i ("print this help")},
     {_i ("FIELD"), "header", 'H',  _i ("write header field to BASENAME.FIELD")},
     {_i ("DIR"), "include", 'I',  _i ("add DIR to search path")},
@@ -132,6 +135,11 @@ static Long_option_init options_static[] =
     {0, "no-paper", 'm',  _i ("produce MIDI output only")},
     {_i ("FILE"), "output", 'o',  _i ("write output to FILE")},
     {0, "preview", 'p',  _i ("generate a preview")},
+    {0, "png", 0,  _i ("generate PNG")},
+    {0, "ps", 0,  _i ("generate PostScript")},
+    {0, "dvi", 0,  _i ("generate DVI")},
+    {0, "pdf", 0,  _i ("generate PDF (default)")},
+    {0, "tex", 0,  _i ("generate TeX")},
     {0, "safe-mode", 's',  _i ("run in safe mode")},
     {0, "version", 'v',  _i ("print version number")},
     {0, "verbose", 'V', _i ("be verbose")},
@@ -242,6 +250,46 @@ prepend_load_path (String dir)
   scm_c_eval_string (s.to_str0 ());
 }
 
+static void
+determine_output_options ()
+{
+  
+  bool found_tex = false;
+  SCM formats = ly_output_formats ();
+  for (SCM s = formats; ly_c_pair_p (s); s = ly_cdr (s)) 
+    {
+      found_tex = found_tex || (ly_scm2string (ly_car (s)) == "tex");
+    }
+
+      
+  if (make_ps && found_tex)
+    {
+      make_dvi = true;
+    }
+  if (make_pdf || make_png)
+    {
+      make_ps = true;
+    }
+  if (make_dvi && found_tex)
+    {
+      make_tex = true;
+    }
+  if (!(make_dvi
+       || make_tex
+       || make_ps
+       || make_png
+       || make_pdf))
+    {
+      make_pdf = true;
+      make_ps = true;
+      if (found_tex)
+       {
+         make_dvi = true;
+         make_tex = true;
+       }
+    }
+}
+
 static void
 main_with_guile (void *, int, char **)
 {
@@ -261,6 +309,7 @@ main_with_guile (void *, int, char **)
   call_constructors ();
   progress_indication ("\n");
 
+  determine_output_options ();  
   all_fonts_global = new All_font_metrics (global_path.to_string ());
 
   init_scheme_code_string += ")";
@@ -324,6 +373,21 @@ parse_argv (int argc, char **argv)
     {
       switch (opt->shortname_char_)
        {
+       case 0:
+         if (String (opt->longname_str0_) == "png")
+           make_png = true;
+         else if (String (opt->longname_str0_) == "pdf")
+           make_pdf = true;
+         else if (String (opt->longname_str0_) == "ps")
+           make_ps = true;
+         else if (String (opt->longname_str0_) == "dvi")
+           make_dvi = true;
+         else if (String (opt->longname_str0_) == "tex")
+           make_tex = true;
+         else if (String (opt->longname_str0_) == "preview")
+           make_preview = true;
+         break;
+         
        case 'v':
          notice ();
          exit (0);
@@ -335,9 +399,6 @@ parse_argv (int argc, char **argv)
            output_name_global = file_name.to_string ();
          }
          break;
-       case 'p':
-         make_preview = true;    
-         break;
        case 'e':
          init_scheme_code_string += option_parser->optional_argument_str0_;
          break;
@@ -376,7 +437,12 @@ parse_argv (int argc, char **argv)
        case 'm':
          no_paper_global_b = true;
          break;
+       case 'p':
+         make_preview = true;
+         break;
        default:
+         programming_error (to_string ("unhandled short option: %c",
+                                       opt->shortname_char_));
          assert (false);
          break;
        }