main.c

   1 /*
   2
   3     Ann Hell Ex Machina - Music Software
   4     Copyright (C) 2003/2008 Angel Ortega <angel@triptico.com>
   5
   6     main.c - Miscellaneous functions and startup
   7
   8     This program is free software; you can redistribute it and/or
   9     modify it under the terms of the GNU General Public License
  10     as published by the Free Software Foundation; either version 2
  11     of the License, or (at your option) any later version.
  12
  13     This program is distributed in the hope that it will be useful,
  14     but WITHOUT ANY WARRANTY; without even the implied warranty of
  15     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16     GNU General Public License for more details.
  17
  18     You should have received a copy of the GNU General Public License
  19     along with this program; if not, write to the Free Software
  20     Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  21
  22     http://www.triptico.com
  23
  24 */
  25
  26 #include "config.h"
  27
  28 #include <stdio.h>
  29 #include <string.h>
  30 #include <stdlib.h>
  31 #include <limits.h>
  32
  33 #include "ahxm.h"
  34
  35 /*******************
  36         Data
  37 ********************/
  38
  39 /* output information */
  40
  41 static char *devfile = NULL;
  42 static char *driver = "default";
  43
  44 /* seconds to skip */
  45 static int skip_secs = 0;
  46
  47 /*******************
  48         Code
  49 ********************/
  50
  51 static void read_config(void)
  52 {
  53 }
  54
  55
  56 static int main_usage(void)
  57 {
  58         printf("Ann Hell Ex Machina %s - Music Writing Software\n", VERSION);
  59         printf("Copyright (C) 2003-2008 Angel Ortega <angel@triptico.com>\n");
  60         printf("This software is covered by the GPL license. NO WARRANTY.\n\n");
  61         printf("Usage: ahxm [options] {script.ahs}\n\n");
  62         printf("Options:\n\n");
  63         printf("-o {output file or device} Set output file [default: driver dependent].\n");
  64         printf("-d {driver}                Output driver [default: 'default'].\n");
  65         printf("-L {path}                  Add path to script / data library search path.\n");
  66         printf("-r {sampling rate}         Set sampling rate [default: %d]\n", ss_frequency);
  67         printf("-c {# of channels}         Force number of channels [default: use all]\n");
  68         printf("-v {master volume}         Set master volume [default: %02.02f]\n",
  69                ss_master_volume);
  70         printf("-s {seconds to skip}       Seconds to skip from the start of the song.\n");
  71         printf("                           [default: 0, start from the beginning]\n");
  72         printf("-z {track number}          Play track number in a solo\n");
  73         printf("-i {interpolation}         Set interpolation algorithm\n");
  74         printf("                           (0, none; 1, linear; 2, cubic spline,\n");
  75         printf("                           3, Lagrange) [default: %d]\n", ss_interpolation);
  76         printf("-b {size in frames}        Set maximum wave buffer size in frames, so\n");
  77         printf("                           wave files bigger than this will be paged\n");
  78         printf("                           (-1, load full wave in memory) [default: %d]\n",
  79                ss_page_size);
  80         printf("-D {number}                Verbosity level (0-3) [default: %d].\n", verbose);
  81         printf("-C {cue file name}         Generate .cue file.\n");
  82         printf("-T                         Show tracing information.\n");
  83         printf
  84             ("-M                         Output song to MIDI device instead of softsynth.\n");
  85         printf("-I                         Interactive; read from MIDI device and\n");
  86         printf("                           use {script} as instrument (UNIMPLEMENTED).\n");
  87         printf("\n");
  88         printf("Internal sample size: %d bytes (floating point)\n", (int) sizeof(sample_t));
  89         printf("Library path: ");
  90         libpath_print();
  91         printf("\n");
  92
  93         return 1;
  94 }
  95
  96
  97 static int main_interactive(char *script_or_ins)
  98 {
  99         printf("UNIMPLEMENTED; use the 'midiin' program instead.\n");
 100         return 0;
 101 }
 102
 103
 104 static int main_midi(char *script)
 105 {
 106         if (compile_ahs(script))
 107                 return 3;
 108
 109         if (midi_device_open(devfile) < 0) {
 110                 printf("Error: can't open MIDI device\n");
 111                 return 2;
 112         }
 113
 114         midi_song_play(skip_secs);
 115
 116         midi_device_close();
 117
 118         return 0;
 119 }
 120
 121
 122 static int main_ss(char *script)
 123 {
 124         char *ptr;
 125
 126         /* is it an .sf2? create an ad-hoc mini program to list it */
 127         if ((ptr = strrchr(script, '.')) != NULL && strcmp(ptr, ".sf2") == 0) {
 128                 char tmp[4096];
 129
 130                 snprintf(tmp, sizeof(tmp), "{ sf2 \"%s\" }", script);
 131                 if (compile_ahs_string(tmp))
 132                         return 4;
 133         }
 134         else
 135         if (compile_ahs(script))
 136                 return 3;
 137
 138         ss_song_render(skip_secs, driver, devfile);
 139
 140         if (verbose >= 1)
 141                 printf("clipped: %d optimal volume: %f\n",
 142                        ss_output_clipped, ss_optimal_volume);
 143
 144         return 0;
 145 }
 146
 147
 148 static int ahxm_main(int argc, char *argv[])
 149 {
 150         int ret = 1;
 151         int n = 1;
 152         char *opt = NULL;
 153         char *script = NULL;
 154         int midi = 0;
 155         int interactive = 0;
 156
 157         read_config();
 158
 159         /* default path */
 160         libpath_add("~/ahxmlib", 0);
 161
 162         /* specific converters */
 163         transconv_add(".flac", ".wav", "flac -d -s -o '%s' '%s'");
 164         transconv_add(".mp3", ".wav", "mpg321 -q -w '%s' '%s'");
 165
 166         /* fallout converter */
 167         transconv_add(".*", ".wav", "ffmpeg '%s' -i '%s'");
 168
 169         if (argc == 1)
 170                 return main_usage();
 171
 172         while (n < argc - 1) {
 173                 opt = argv[n++];
 174
 175                 if (strcmp(opt, "-o") == 0) {
 176                         /* set output device or file */
 177                         devfile = argv[n++];
 178                 }
 179                 else if (strcmp(opt, "-d") == 0) {
 180                         /* set driver */
 181                         driver = argv[n++];
 182                 }
 183                 else if (strcmp(opt, "-L") == 0) {
 184                         /* add path to library */
 185                         libpath_add(argv[n++], 0);
 186                 }
 187                 else if (strcmp(opt, "-r") == 0) {
 188                         /* set sampling rate */
 189                         ss_frequency = atoi(argv[n++]);
 190                 }
 191                 else if (strcmp(opt, "-c") == 0) {
 192                         /* set number of channels */
 193                         ss_nchannels = atoi(argv[n++]);
 194                 }
 195                 else if (strcmp(opt, "-v") == 0) {
 196                         /* set master volume */
 197                         ss_master_volume = (double) atof(argv[n++]);
 198                 }
 199                 else if (strcmp(opt, "-i") == 0) {
 200                         /* set interpolation type */
 201                         ss_interpolation = atoi(argv[n++]);
 202                 }
 203                 else if (strcmp(opt, "-s") == 0) {
 204                         /* seconds to skip */
 205                         skip_secs = atoi(argv[n++]);
 206                 }
 207                 else if (strcmp(opt, "-I") == 0) {
 208                         /* activate interactive mode */
 209                         interactive = 1;
 210                 }
 211                 else if (strcmp(opt, "-M") == 0) {
 212                         /* activate MIDI mode */
 213                         midi = 1;
 214                 }
 215                 else if (strcmp(opt, "-z") == 0) {
 216                         /* set solo track */
 217                         solo_track = atoi(argv[n++]);
 218                 }
 219                 else if (strcmp(opt, "-b") == 0) {
 220                         /* set page size */
 221                         ss_page_size = atoi(argv[n++]);
 222
 223                         /* if it's -1, set as 'no limit' */
 224                         if (ss_page_size < 0)
 225                                 ss_page_size = INT_MAX;
 226                 }
 227                 else if (strcmp(opt, "-D") == 0) {
 228                         /* debug information */
 229                         verbose = atoi(argv[n++]);
 230                 }
 231                 else if (strcmp(opt, "-C") == 0) {
 232                         /* set cue file name */
 233                         ss_cue_file_name = argv[n++];
 234                 }
 235                 else if (strcmp(opt, "-T") == 0)
 236                         trace = 1;
 237                 else
 238                         return main_usage();
 239
 240         }
 241
 242         script = argv[argc - 1];
 243
 244         if (*script == '-')
 245                 return main_usage();
 246
 247         if (interactive)
 248                 ret = main_interactive(script);
 249         else if (midi)
 250                 ret = main_midi(script);
 251         else
 252                 ret = main_ss(script);
 253
 254         return ret;
 255 }
 256
 257
 258 int main(int argc, char *argv[])
 259 {
 260         return ahxm_main(argc, argv);
 261 }