rnd-20040814-1-src
[rocksndiamonds.git] / src / libem / main.c
1 /* Emerald Mine
2  * 
3  * David Tritscher
4  * 
5  * v0.0 2000-01-06T06:43:39Z
6  *
7  * set everything up and close everything down
8  */
9
10 #include <stdlib.h>
11 #include <unistd.h>
12 #include <stdio.h>
13 #include <string.h>
14 #include <errno.h>
15
16 #include "global.h"
17
18 char *progname;
19 char *arg_basedir;
20 char *arg_display;
21 char *arg_geometry;
22 int arg_install;
23 int arg_silence;
24
25 extern void tab_generate();
26 extern void ulaw_generate();
27
28 int em_main(int argc, char **argv)
29 {
30         int result;
31         int option;
32         extern char *optarg;
33
34         /* pre-calculate some data */
35         tab_generate();
36         ulaw_generate();
37
38         progname = strrchr(argv[0], '/'); progname = progname ? progname + 1 : argv[0];
39
40         while((option = getopt(argc, argv, "b:d:g:in")) != -1) {
41                 switch(option) {
42                 case 'b': arg_basedir = optarg; break;
43                 case 'd': arg_display = optarg; break;
44                 case 'g': arg_geometry = optarg; break;
45                 case 'i': arg_install = 1; break;
46                 case 'n': arg_silence = 1; break;
47                 default:
48                         printf("Emerald Mine for X11 © 2000,2001 David Tritscher\n\n");
49                         printf("usage: %s [options]\n", progname);
50                         printf("\t-b    set base directory\n");
51                         printf("\t-d    server to contact\n");
52                         printf("\t-g    geometry\n");
53                         printf("\t-i    install colourmap\n");
54                         printf("\t-n    no sounds\n");
55                         exit(option == 'h' ? 0 : 1);
56                 }
57         }
58         if(arg_basedir == 0) arg_basedir = getenv("EMERALD_BASE");
59
60         result = open_all(); if(result) goto fail;
61         result = game_start(); if(result) goto fail;
62         result = 0;
63 fail:
64         close_all();
65         return(result);
66 }
67
68 /* massive kludge for buffer overflows
69  * i cant think of an elegant way to handle this situation.
70  * oh wait yes i can. dynamically allocate each string. oh well
71  */
72 void snprintf_overflow(char *description)
73 {
74         fprintf(stderr, "%s: %s\n", progname, "buffer overflow; check EMERALD_BASE environment variable");
75         fprintf(stderr, "%s %s\n", "Fault occured while attempting to", description);
76         abort();
77 }