home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / gdb-4.16-base.tgz / gdb-4.16-base.tar / fsf / gdb / sim / z8k / mem.c < prev    next >
C/C++ Source or Header  |  1996-01-05  |  3KB  |  127 lines
  1. /* memory support for Z8KSIM
  2.    Copyright (C) 1987, 1992 Free Software Foundation, Inc.
  3.  
  4. This file is part of Z8KSIM
  5.  
  6. Z8KSIM is free software; you can redistribute it and/or modify
  7. it under the terms of the GNU General Public License as published by
  8. the Free Software Foundation; either version 2, or (at your option)
  9. any later version.
  10.  
  11. Z8KSIM is distributed in the hope that it will be useful,
  12. but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14. GNU General Public License for more details.
  15.  
  16. You should have received a copy of the GNU General Public License
  17. along with Z8KZIM; if not, write to the Free Software
  18. Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  19.  
  20. #include "config.h"
  21.  
  22. #include <ansidecl.h>
  23.  
  24. #ifdef HAVE_STDLIB_H
  25. #include <stdlib.h>
  26. #endif
  27.  
  28. #include "tm.h"
  29. #include "mem.h"
  30. #include "sim.h"
  31.  
  32. #define INLINE
  33. static 
  34. long
  35. sitoptr (si)
  36. long si;
  37. {
  38.   return ((si & 0xff000000) >> 8) | (si & 0xffff);
  39. }
  40.  
  41. static
  42. unsigned short *
  43. get_page_and_offset (context, where, offset_ptr)
  44.      sim_state_type *context;
  45.      sim_phys_addr_type where;
  46.      int *offset_ptr;
  47. {
  48.   /* Is the page allocated ? */
  49.  
  50.   if (context->memory == 0)
  51.     {
  52.       /* Must allocate 16MB in order to run Z8001 programs.  */
  53.       context->memory  = (unsigned short *)calloc(64*1024*64,4);
  54.     }
  55.  
  56.   *offset_ptr = sitoptr(where);
  57.   return context->memory;
  58. }
  59.  
  60. void
  61. sim_write_byte (context, where, what)
  62.      sim_state_type *context;
  63.      sim_phys_addr_type where;
  64.      int what;
  65. {
  66.   unsigned int offset;
  67.   char *ptr = (char *)get_page_and_offset (context, where, &offset);
  68.  
  69.   ptr[offset] = what;
  70. }
  71.  
  72. void
  73. sim_write_short (context, where, what)
  74.      sim_state_type *context;
  75.      sim_phys_addr_type where;
  76.      int what;
  77. {
  78.   int offset;
  79.   char *ptr = (char *)get_page_and_offset (context, where, &offset);
  80.  
  81.   ptr[offset] = what >> 8;
  82.   ptr[offset + 1] = what;
  83. }
  84.  
  85. void
  86. sim_write_long (context, where, what)
  87.      sim_state_type *context;
  88.      sim_phys_addr_type where;
  89.      int what;
  90. {
  91.   int offset;
  92.   char *ptr = (char *)get_page_and_offset (context, where, &offset);
  93.  
  94.   ptr[offset] = what >> 24;
  95.   ptr[offset + 1] = what >> 16;
  96.   ptr[offset + 3] = what >> 8;
  97.   ptr[offset + 4] = what;
  98. }
  99.  
  100. int
  101. sim_read_byte (context, where)
  102.      sim_state_type *context;
  103.      sim_phys_addr_type where;
  104. {
  105.   int offset;
  106.   char *ptr = (char *)get_page_and_offset (context, where, &offset);
  107.  
  108.  return ptr[offset];
  109. }
  110.  
  111. unsigned
  112. sim_read_short (context, where)
  113.      sim_state_type *context;
  114.      sim_phys_addr_type where;
  115. {
  116.   int what;
  117.   int offset;
  118.  
  119.   char *ptr = (char *)get_page_and_offset (context, where, &offset);
  120.  
  121.   what = (ptr[offset] << 8) | ptr[offset + 1];
  122.   return what;
  123. }
  124.  
  125.  
  126.  
  127.