/[gxemul]/trunk/src/main.c
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/src/main.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2 by dpavlin, Mon Oct 8 16:17:48 2007 UTC revision 20 by dpavlin, Mon Oct 8 16:19:23 2007 UTC
# Line 25  Line 25 
25   *  SUCH DAMAGE.   *  SUCH DAMAGE.
26   *   *
27   *   *
28   *  $Id: main.c,v 1.228 2005/04/07 15:43:17 debug Exp $   *  $Id: main.c,v 1.248 2005/11/23 02:17:00 debug Exp $
29   */   */
30    
31  #include <stdio.h>  #include <stdio.h>
# Line 155  void fatal(char *fmt, ...) Line 155  void fatal(char *fmt, ...)
155    
156    
157  /*  /*
  *  mystrtoull():  
  *  
  *  This function is used on OSes that don't have strtoull() in libc.  
  */  
 unsigned long long mystrtoull(const char *s, char **endp, int base)  
 {  
         unsigned long long res = 0;  
         int minus_sign = 0;  
   
         if (s == NULL)  
                 return 0;  
   
         /*  TODO: Implement endp?  */  
         if (endp != NULL) {  
                 fprintf(stderr, "mystrtoull(): endp isn't implemented\n");  
                 exit(1);  
         }  
   
         if (s[0] == '-') {  
                 minus_sign = 1;  
                 s++;  
         }  
   
         /*  Guess base:  */  
         if (base == 0) {  
                 if (s[0] == '0') {  
                         /*  Just "0"? :-)  */  
                         if (!s[1])  
                                 return 0;  
                         if (s[1] == 'x' || s[1] == 'X') {  
                                 base = 16;  
                                 s += 2;  
                         } else {  
                                 base = 8;  
                                 s ++;  
                         }  
                 } else if (s[0] >= '1' && s[0] <= '9')  
                         base = 10;  
         }  
   
         while (s[0]) {  
                 int c = s[0];  
                 if (c >= '0' && c <= '9')  
                         c -= '0';  
                 else if (c >= 'a' && c <= 'f')  
                         c = c - 'a' + 10;  
                 else if (c >= 'A' && c <= 'F')  
                         c = c - 'A' + 10;  
                 else  
                         break;  
                 switch (base) {  
                 case 8: res = (res << 3) | c;  
                         break;  
                 case 16:res = (res << 4) | c;  
                         break;  
                 default:res = (res * base) + c;  
                 }  
                 s++;  
         }  
   
         if (minus_sign)  
                 res = (uint64_t) -(int64_t)res;  
         return res;  
 }  
   
   
 /*****************************************************************************/  
   
   
 /*  
158   *  internal_w():   *  internal_w():
159   *   *
160   *  For internal use by gxemul itself.   *  For internal use by gxemul itself.
# Line 270  static void usage(int longusage) Line 200  static void usage(int longusage)
200    
201          printf("\nusage: %s [machine, other, and general options] [file "          printf("\nusage: %s [machine, other, and general options] [file "
202              "[...]]\n", progname);              "[...]]\n", progname);
203          printf("   or  %s [general options] @configfile [...]\n", progname);          printf("   or  %s [general options] @configfile\n", progname);
204          printf("   or  %s [userland, other, and general options] file "          printf("   or  %s [userland, other, and general options] file "
205              "[args ...]\n", progname);              "[args ...]\n", progname);
206    
# Line 287  static void usage(int longusage) Line 217  static void usage(int longusage)
217              "with -E.)\n");              "with -E.)\n");
218    
219          printf("\nOther options:\n");          printf("\nOther options:\n");
220            printf("  -A        disable alignment checks in some cases (for higher"
221                " speed)\n");
222  #ifdef BINTRANS  #ifdef BINTRANS
223          printf("  -B        disable dynamic binary translation completely\n");          printf("  -B        disable dynamic binary translation. (translation"
224          printf("  -b        use the OLD binary translation subsystem\n");              " is turned on\n            by default, if the host "
225                "supports it)\n");
226  #endif  #endif
227          printf("  -C x      try to emulate a specific CPU. (Use -H to get a "          printf("  -C x      try to emulate a specific CPU. (Use -H to get a "
228              "list of types.)\n");              "list of types.)\n");
229          printf("  -d fname  add fname as a disk image. You can add \"xxx:\""          printf("  -d fname  add fname as a disk image. You can add \"xxx:\""
230              " as a prefix\n");              " as a prefix\n");
231          printf("            where xxx is one or more of the following:\n");          printf("            where xxx is one or more of the following:\n");
232          printf("                b     specifies that this is the boot"          printf("                b      specifies that this is the boot"
233              " device\n");              " device\n");
234          printf("                c     CD-ROM (instead of normal SCSI DISK)\n");          printf("                c      CD-ROM\n");
235          printf("                d     SCSI DISK (this is the default)\n");          printf("                d      DISK\n");
236          printf("                i     IDE (instead of SCSI)\n");          printf("                f      FLOPPY\n");
237          printf("                r     read-only (don't allow changes to the"          printf("                gH;S;  set geometry to H heads and S"
238                " sectors-per-track\n");
239            printf("                i      IDE\n");
240            printf("                r      read-only (don't allow changes to the"
241              " file)\n");              " file)\n");
242          printf("                t     SCSI tape\n");          printf("                s      SCSI\n");
243          printf("                0-7   force a specific SCSI ID number\n");          printf("                t      tape\n");
244            printf("                0-7    force a specific ID\n");
245          printf("  -I x      emulate clock interrupts at x Hz (affects"          printf("  -I x      emulate clock interrupts at x Hz (affects"
246              " rtc devices only, not\n");              " rtc devices only, not\n");
247          printf("            actual runtime speed) (this disables automatic"          printf("            actual runtime speed) (this disables automatic"
# Line 379  static void usage(int longusage) Line 316  static void usage(int longusage)
316              "on a binary.\n"              "on a binary.\n"
317              "To load a raw binary into memory, add \"address:\" in front "              "To load a raw binary into memory, add \"address:\" in front "
318              "of the filename,\n"              "of the filename,\n"
319              "or \"address:skiplen:\" or \"address:skiplen:initialpc\".\n"              "or \"address:skiplen:\" or \"address:skiplen:initialpc:\".\n"
320              "Examples:\n"              "Examples:\n"
321              "    0xbfc00000:rom.bin                  for a raw ROM image\n"              "    0xbfc00000:rom.bin                    for a raw ROM image\n"
322              "    0xbfc00000:0x100:rom.bin            for an image with "              "    0xbfc00000:0x100:rom.bin              for an image with "
323              "0x100 bytes header\n"              "0x100 bytes header\n"
324              "    0xbfc00000:0x100:0xbfc00884:rom.bin  "              "    0xbfc00000:0x100:0xbfc00884:rom.bin   "
325              "start with pc=0xbfc00884\n");              "start with pc=0xbfc00884\n");
326  }  }
327    
# Line 394  static void usage(int longusage) Line 331  static void usage(int longusage)
331   *   *
332   *  Reads command line arguments.   *  Reads command line arguments.
333   */   */
334  int get_cmd_args(int argc, char *argv[], struct emul *emul)  int get_cmd_args(int argc, char *argv[], struct emul *emul,
335            char ***diskimagesp, int *n_diskimagesp)
336  {  {
337          int ch, res, using_switch_d = 0, using_switch_Z = 0;          int ch, res, using_switch_d = 0, using_switch_Z = 0;
338          char *type = NULL, *subtype = NULL;          char *type = NULL, *subtype = NULL;
# Line 402  int get_cmd_args(int argc, char *argv[], Line 340  int get_cmd_args(int argc, char *argv[],
340          int msopts = 0;         /*  Machine-specific options used  */          int msopts = 0;         /*  Machine-specific options used  */
341          struct machine *m = emul_add_machine(emul, "default");          struct machine *m = emul_add_machine(emul, "default");
342    
343          while ((ch = getopt(argc, argv, "BbC:Dd:E:e:HhI:iJj:KM:m:"          while ((ch = getopt(argc, argv, "ABC:Dd:E:e:HhI:iJj:KM:m:"
344              "Nn:Oo:p:QqRrSsTtUu:VvW:XxY:y:Z:z:")) != -1) {              "Nn:Oo:p:QqRrSsTtUu:VvW:XxY:y:Z:z:")) != -1) {
345                  switch (ch) {                  switch (ch) {
346                  case 'B':                  case 'A':
347                          m->bintrans_enable = 0;                          m->dyntrans_alignment_check = 0;
348                          msopts = 1;                          msopts = 1;
349                          break;                          break;
350                  case 'b':                  case 'B':
351                          m->old_bintrans_enable = 1;                          m->bintrans_enable = 0;
352                          msopts = 1;                          msopts = 1;
353                          break;                          break;
354                  case 'C':                  case 'C':
# Line 421  int get_cmd_args(int argc, char *argv[], Line 359  int get_cmd_args(int argc, char *argv[],
359                          fully_deterministic = 1;                          fully_deterministic = 1;
360                          break;                          break;
361                  case 'd':                  case 'd':
362                          diskimage_add(m, optarg);                          /*  diskimage_add() is called further down  */
363                            (*n_diskimagesp) ++;
364                            (*diskimagesp) = realloc(*diskimagesp,
365                                sizeof(char *) * (*n_diskimagesp));
366                            if (*diskimagesp == NULL) {
367                                    fprintf(stderr, "out of memory\n");
368                                    exit(1);
369                            }
370                            (*diskimagesp)[(*n_diskimagesp) - 1] = strdup(optarg);
371                          using_switch_d = 1;                          using_switch_d = 1;
372                          msopts = 1;                          msopts = 1;
373                          break;                          break;
# Line 567  int get_cmd_args(int argc, char *argv[], Line 513  int get_cmd_args(int argc, char *argv[],
513                          break;                          break;
514                  case 'Y':                  case 'Y':
515                          m->x11_scaledown = atoi(optarg);                          m->x11_scaledown = atoi(optarg);
516                            if (m->x11_scaledown < -1) {
517                                    m->x11_scaleup = - m->x11_scaledown;
518                                    m->x11_scaledown = 1;
519                            }
520                            if (m->x11_scaledown < 1) {
521                                    fprintf(stderr, "Invalid scaledown value.\n");
522                                    exit(1);
523                            }
524                          msopts = 1;                          msopts = 1;
525                          break;                          break;
526                  case 'y':                  case 'y':
# Line 597  int get_cmd_args(int argc, char *argv[], Line 551  int get_cmd_args(int argc, char *argv[],
551                          msopts = 1;                          msopts = 1;
552                          break;                          break;
553                  default:                  default:
554                          fprintf(stderr, "Invalid option.\n");                          fprintf(stderr, "Run  %s -h  for help on command "
555                          usage(0);                              "line options.\n", progname);
556                          exit(1);                          exit(1);
557                  }                  }
558          }          }
559    
560          if (type != NULL) {          if (type != NULL || subtype != NULL) {
561                    if (type == NULL)
562                            type = "";
563                  if (subtype == NULL)                  if (subtype == NULL)
564                          subtype = "";                          subtype = "";
565                  res = machine_name_to_type(type, subtype,                  res = machine_name_to_type(type, subtype,
# Line 619  int get_cmd_args(int argc, char *argv[], Line 575  int get_cmd_args(int argc, char *argv[],
575          extra_argv = argv;          extra_argv = argv;
576    
577    
         if (!m->bintrans_enable && m->old_bintrans_enable) {  
                 fprintf(stderr, "You cannot both select old bintrans and"  
                     " disable bintrans at the same time.\n");  
                 exit(1);  
         }  
   
         /*  TODO: Remove this once there is a new bintrans system.  */  
         if (m->bintrans_enable && !m->old_bintrans_enable) {  
                 m->bintrans_enable = 0;  
         }  
   
578          if (m->machine_type == MACHINE_NONE && msopts) {          if (m->machine_type == MACHINE_NONE && msopts) {
579                  fprintf(stderr, "Machine specific options used directly on "                  fprintf(stderr, "Machine specific options used directly on "
580                      "the command line, but no machine\nemulation specified?\n");                      "the command line, but no machine\nemulation specified?\n");
# Line 637  int get_cmd_args(int argc, char *argv[], Line 582  int get_cmd_args(int argc, char *argv[],
582          }          }
583    
584    
585          /*  -i, -r, -t are pretty verbose:  */          /*  -i and -r are pretty verbose:  */
586    
587          if (m->instruction_trace && !verbose) {          if (m->instruction_trace && !verbose) {
588                  fprintf(stderr, "Implicitly turning of -q and turning on -v, "                  fprintf(stderr, "Implicitly %sturning on -v, because"
589                      "because of -i\n");                      " of -i\n", quiet_mode? "turning off -q and " : "");
590                  verbose = 1;                  verbose = 1;
591                  quiet_mode = 0;                  quiet_mode = 0;
592          }          }
593    
594          if (m->register_dump && !verbose) {          if (m->register_dump && !verbose) {
595                  fprintf(stderr, "Implicitly turning of -q and turning on -v, "                  fprintf(stderr, "Implicitly %sturning on -v, because"
596                      "because of -r\n");                      " of -r\n", quiet_mode? "turning off -q and " : "");
597                  verbose = 1;                  verbose = 1;
598                  quiet_mode = 0;                  quiet_mode = 0;
599          }          }
600    
601          if (m->show_trace_tree && !verbose) {          if ((m->instruction_trace || m->register_dump || m->show_trace_tree)
602                  fprintf(stderr, "Implicitly turning of -q and turning on -v, "              && m->bintrans_enable) {
603                      "because of -t\n");                  if (m->arch == ARCH_MIPS)
604                  verbose = 1;                          fprintf(stderr, "Implicitly turning off bintrans.\n");
605                  quiet_mode = 0;                  m->bintrans_enable = 0;
606          }          }
607    
608    
# Line 665  int get_cmd_args(int argc, char *argv[], Line 610  int get_cmd_args(int argc, char *argv[],
610           *  Usually, an executable filename must be supplied.           *  Usually, an executable filename must be supplied.
611           *           *
612           *  However, it is possible to boot directly from a harddisk image           *  However, it is possible to boot directly from a harddisk image
613           *  file. If no kernel is supplied, and the emulation mode is set to           *  file. If no kernel is supplied, but a diskimage is being used,
614           *  DECstation emulation, and there is a diskimage, then try to boot           *  then try to boot from disk.
          *  from that.  
615           */           */
616          if (extra_argc == 0) {          if (extra_argc == 0) {
617                  if (using_switch_d) {                  if (using_switch_d) {
# Line 707  int get_cmd_args(int argc, char *argv[], Line 651  int get_cmd_args(int argc, char *argv[],
651                  exit(1);                  exit(1);
652          }          }
653    
654          if (m->bintrans_enable) {          if (m->bintrans_enable && m->arch == ARCH_MIPS) {
655                  m->speed_tricks = 0;                  m->speed_tricks = 0;
656                  /*  TODO: Print a warning about this?  */                  /*  TODO: Print a warning about this?  */
657          }          }
658    
659          if (m->n_breakpoints > 0 && m->bintrans_enable) {          if (m->n_breakpoints > 0 &&
660                  fprintf(stderr, "Breakpoints and dynamic translation "              m->bintrans_enable && m->arch == ARCH_MIPS) {
661                    fprintf(stderr, "Breakpoints and MIPS binary translation "
662                      "don't work too well together right now.\n");                      "don't work too well together right now.\n");
663                  exit(1);                  exit(1);
664          }          }
# Line 756  int get_cmd_args(int argc, char *argv[], Line 701  int get_cmd_args(int argc, char *argv[],
701  int main(int argc, char *argv[])  int main(int argc, char *argv[])
702  {  {
703          struct emul **emuls;          struct emul **emuls;
704            char **diskimages = NULL;
705            int n_diskimages = 0;
706          int n_emuls;          int n_emuls;
707          int i;          int i;
708    
# Line 781  int main(int argc, char *argv[]) Line 728  int main(int argc, char *argv[])
728                  exit(1);                  exit(1);
729          }          }
730    
731          get_cmd_args(argc, argv, emuls[0]);          get_cmd_args(argc, argv, emuls[0], &diskimages, &n_diskimages);
732    
733          if (!fully_deterministic) {          if (!fully_deterministic) {
734                  /*  TODO: More than just time(). Use gettimeofday().  */                  /*  TODO: More than just time(). Use gettimeofday().  */
# Line 805  int main(int argc, char *argv[]) Line 752  int main(int argc, char *argv[])
752    
753          if (emuls[0]->machines[0]->machine_type == MACHINE_NONE)          if (emuls[0]->machines[0]->machine_type == MACHINE_NONE)
754                  n_emuls --;                  n_emuls --;
755            else {
756                    for (i=0; i<n_diskimages; i++)
757                            diskimage_add(emuls[0]->machines[0], diskimages[i]);
758            }
759    
760          /*  Simple initialization, from command line arguments:  */          /*  Simple initialization, from command line arguments:  */
761          if (n_emuls > 0) {          if (n_emuls > 0) {
# Line 848  int main(int argc, char *argv[]) Line 799  int main(int argc, char *argv[])
799          }          }
800    
801          if (n_emuls == 0) {          if (n_emuls == 0) {
802                  fprintf(stderr, "No emulations defined.\n");                  fprintf(stderr, "No emulations defined. Maybe you forgot to "
803                        "use -E xx and/or -e yy, to specify\nthe machine type."
804                        " For example:\n\n    %s -e 3max -d disk.img\n\n"
805                        "to boot an emulated DECstation 5000/200 with a disk "
806                        "image.\n", progname);
807                  exit(1);                  exit(1);
808          }          }
809    
810          device_set_exit_on_error(0);          device_set_exit_on_error(0);
811            console_warn_if_slaves_are_needed();
812    
813          /*  Run all emulations:  */          /*  Run all emulations:  */
814          emul_run(emuls, n_emuls);          emul_run(emuls, n_emuls);
Legend:
Removed from v.2  
changed lines
  Added in v.20
  ViewVC Help
Powered by ViewVC 1.1.26