target-mips/op_mem.c

   1 /*
   2  *  MIPS emulation memory micro-operations for qemu.
   3  *
   4  *  Copyright (c) 2004-2005 Jocelyn Mayer
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2 of the License, or (at your option) any later version.
  10  *
  11  * This library 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 GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 /* Standard loads and stores */
  22 void glue(op_lb, MEMSUFFIX) (void)
  23 {
  24     T0 = glue(ldsb, MEMSUFFIX)(T0);
  25     RETURN();
  26 }
  27
  28 void glue(op_lbu, MEMSUFFIX) (void)
  29 {
  30     T0 = glue(ldub, MEMSUFFIX)(T0);
  31     RETURN();
  32 }
  33
  34 void glue(op_sb, MEMSUFFIX) (void)
  35 {
  36     glue(stb, MEMSUFFIX)(T0, T1);
  37     RETURN();
  38 }
  39
  40 void glue(op_lh, MEMSUFFIX) (void)
  41 {
  42     T0 = glue(ldsw, MEMSUFFIX)(T0);
  43     RETURN();
  44 }
  45
  46 void glue(op_lhu, MEMSUFFIX) (void)
  47 {
  48     T0 = glue(lduw, MEMSUFFIX)(T0);
  49     RETURN();
  50 }
  51
  52 void glue(op_sh, MEMSUFFIX) (void)
  53 {
  54     glue(stw, MEMSUFFIX)(T0, T1);
  55     RETURN();
  56 }
  57
  58 void glue(op_lw, MEMSUFFIX) (void)
  59 {
  60     T0 = glue(ldl, MEMSUFFIX)(T0);
  61     RETURN();
  62 }
  63
  64 void glue(op_lwu, MEMSUFFIX) (void)
  65 {
  66     T0 = glue(ldl, MEMSUFFIX)(T0);
  67     RETURN();
  68 }
  69
  70 void glue(op_sw, MEMSUFFIX) (void)
  71 {
  72     glue(stl, MEMSUFFIX)(T0, T1);
  73     RETURN();
  74 }
  75
  76 /* "half" load and stores.  We must do the memory access inline,
  77    or fault handling won't work.  */
  78 /* XXX: This is broken, CP0_BADVADDR has the wrong (aligned) value. */
  79 void glue(op_lwl, MEMSUFFIX) (void)
  80 {
  81     uint32_t tmp = glue(ldl, MEMSUFFIX)(T0 & ~3);
  82     CALL_FROM_TB1(glue(do_lwl, MEMSUFFIX), tmp);
  83     RETURN();
  84 }
  85
  86 void glue(op_lwr, MEMSUFFIX) (void)
  87 {
  88     uint32_t tmp = glue(ldl, MEMSUFFIX)(T0 & ~3);
  89     CALL_FROM_TB1(glue(do_lwr, MEMSUFFIX), tmp);
  90     RETURN();
  91 }
  92
  93 void glue(op_swl, MEMSUFFIX) (void)
  94 {
  95     uint32_t tmp = glue(ldl, MEMSUFFIX)(T0 & ~3);
  96     tmp = CALL_FROM_TB1(glue(do_swl, MEMSUFFIX), tmp);
  97     glue(stl, MEMSUFFIX)(T0 & ~3, tmp);
  98     RETURN();
  99 }
 100
 101 void glue(op_swr, MEMSUFFIX) (void)
 102 {
 103     uint32_t tmp = glue(ldl, MEMSUFFIX)(T0 & ~3);
 104     tmp = CALL_FROM_TB1(glue(do_swr, MEMSUFFIX), tmp);
 105     glue(stl, MEMSUFFIX)(T0 & ~3, tmp);
 106     RETURN();
 107 }
 108
 109 void glue(op_ll, MEMSUFFIX) (void)
 110 {
 111     T1 = T0;
 112     T0 = glue(ldl, MEMSUFFIX)(T0);
 113     env->CP0_LLAddr = T1;
 114     RETURN();
 115 }
 116
 117 void glue(op_sc, MEMSUFFIX) (void)
 118 {
 119     CALL_FROM_TB0(dump_sc);
 120     if (T0 & 0x3) {
 121         env->CP0_BadVAddr = T0;
 122         CALL_FROM_TB1(do_raise_exception, EXCP_AdES);
 123     }
 124     if (T0 == env->CP0_LLAddr) {
 125         glue(stl, MEMSUFFIX)(T0, T1);
 126         T0 = 1;
 127     } else {
 128         T0 = 0;
 129     }
 130     RETURN();
 131 }
 132
 133 #ifdef TARGET_MIPS64
 134 void glue(op_ld, MEMSUFFIX) (void)
 135 {
 136     T0 = glue(ldq, MEMSUFFIX)(T0);
 137     RETURN();
 138 }
 139
 140 void glue(op_sd, MEMSUFFIX) (void)
 141 {
 142     glue(stq, MEMSUFFIX)(T0, T1);
 143     RETURN();
 144 }
 145
 146 /* "half" load and stores.  We must do the memory access inline,
 147    or fault handling won't work.  */
 148 void glue(op_ldl, MEMSUFFIX) (void)
 149 {
 150     target_long tmp = glue(ldq, MEMSUFFIX)(T0 & ~7);
 151     CALL_FROM_TB1(glue(do_ldl, MEMSUFFIX), tmp);
 152     RETURN();
 153 }
 154
 155 void glue(op_ldr, MEMSUFFIX) (void)
 156 {
 157     target_long tmp = glue(ldq, MEMSUFFIX)(T0 & ~7);
 158     CALL_FROM_TB1(glue(do_ldr, MEMSUFFIX), tmp);
 159     RETURN();
 160 }
 161
 162 void glue(op_sdl, MEMSUFFIX) (void)
 163 {
 164     target_long tmp = glue(ldq, MEMSUFFIX)(T0 & ~7);
 165     tmp = CALL_FROM_TB1(glue(do_sdl, MEMSUFFIX), tmp);
 166     glue(stq, MEMSUFFIX)(T0 & ~7, tmp);
 167     RETURN();
 168 }
 169
 170 void glue(op_sdr, MEMSUFFIX) (void)
 171 {
 172     target_long tmp = glue(ldq, MEMSUFFIX)(T0 & ~7);
 173     tmp = CALL_FROM_TB1(glue(do_sdr, MEMSUFFIX), tmp);
 174     glue(stq, MEMSUFFIX)(T0 & ~7, tmp);
 175     RETURN();
 176 }
 177
 178 void glue(op_lld, MEMSUFFIX) (void)
 179 {
 180     T1 = T0;
 181     T0 = glue(ldq, MEMSUFFIX)(T0);
 182     env->CP0_LLAddr = T1;
 183     RETURN();
 184 }
 185
 186 void glue(op_scd, MEMSUFFIX) (void)
 187 {
 188     CALL_FROM_TB0(dump_sc);
 189     if (T0 & 0x7) {
 190         env->CP0_BadVAddr = T0;
 191         CALL_FROM_TB1(do_raise_exception, EXCP_AdES);
 192     }
 193     if (T0 == env->CP0_LLAddr) {
 194         glue(stq, MEMSUFFIX)(T0, T1);
 195         T0 = 1;
 196     } else {
 197         T0 = 0;
 198     }
 199     RETURN();
 200 }
 201 #endif /* TARGET_MIPS64 */
 202
 203 void glue(op_lwc1, MEMSUFFIX) (void)
 204 {
 205     WT0 = glue(ldl, MEMSUFFIX)(T0);
 206     RETURN();
 207 }
 208 void glue(op_swc1, MEMSUFFIX) (void)
 209 {
 210     glue(stl, MEMSUFFIX)(T0, WT0);
 211     RETURN();
 212 }
 213 void glue(op_ldc1, MEMSUFFIX) (void)
 214 {
 215     DT0 = glue(ldq, MEMSUFFIX)(T0);
 216     RETURN();
 217 }
 218 void glue(op_sdc1, MEMSUFFIX) (void)
 219 {
 220     glue(stq, MEMSUFFIX)(T0, DT0);
 221     RETURN();
 222 }
 223 void glue(op_luxc1, MEMSUFFIX) (void)
 224 {
 225     DT0 = glue(ldq, MEMSUFFIX)(T0 & ~0x7);
 226     RETURN();
 227 }
 228 void glue(op_suxc1, MEMSUFFIX) (void)
 229 {
 230     glue(stq, MEMSUFFIX)(T0 & ~0x7, DT0);
 231     RETURN();
 232 }