rlm@1: /* Bra.c -- Converters for RISC code
rlm@1: 2008-10-04 : Igor Pavlov : Public domain */
rlm@1: 
rlm@1: #include "Bra.h"
rlm@1: 
rlm@1: SizeT ARM_Convert(Byte *data, SizeT size, UInt32 ip, int encoding)
rlm@1: {
rlm@1:   SizeT i;
rlm@1:   if (size < 4)
rlm@1:     return 0;
rlm@1:   size -= 4;
rlm@1:   ip += 8;
rlm@1:   for (i = 0; i <= size; i += 4)
rlm@1:   {
rlm@1:     if (data[i + 3] == 0xEB)
rlm@1:     {
rlm@1:       UInt32 dest;
rlm@1:       UInt32 src = ((UInt32)data[i + 2] << 16) | ((UInt32)data[i + 1] << 8) | (data[i + 0]);
rlm@1:       src <<= 2;
rlm@1:       if (encoding)
rlm@1:         dest = ip + (UInt32)i + src;
rlm@1:       else
rlm@1:         dest = src - (ip + (UInt32)i);
rlm@1:       dest >>= 2;
rlm@1:       data[i + 2] = (Byte)(dest >> 16);
rlm@1:       data[i + 1] = (Byte)(dest >> 8);
rlm@1:       data[i + 0] = (Byte)dest;
rlm@1:     }
rlm@1:   }
rlm@1:   return i;
rlm@1: }
rlm@1: 
rlm@1: SizeT ARMT_Convert(Byte *data, SizeT size, UInt32 ip, int encoding)
rlm@1: {
rlm@1:   SizeT i;
rlm@1:   if (size < 4)
rlm@1:     return 0;
rlm@1:   size -= 4;
rlm@1:   ip += 4;
rlm@1:   for (i = 0; i <= size; i += 2)
rlm@1:   {
rlm@1:     if ((data[i + 1] & 0xF8) == 0xF0 &&
rlm@1:         (data[i + 3] & 0xF8) == 0xF8)
rlm@1:     {
rlm@1:       UInt32 dest;
rlm@1:       UInt32 src =
rlm@1:         (((UInt32)data[i + 1] & 0x7) << 19) |
rlm@1:         ((UInt32)data[i + 0] << 11) |
rlm@1:         (((UInt32)data[i + 3] & 0x7) << 8) |
rlm@1:         (data[i + 2]);
rlm@1:       
rlm@1:       src <<= 1;
rlm@1:       if (encoding)
rlm@1:         dest = ip + (UInt32)i + src;
rlm@1:       else
rlm@1:         dest = src - (ip + (UInt32)i);
rlm@1:       dest >>= 1;
rlm@1:       
rlm@1:       data[i + 1] = (Byte)(0xF0 | ((dest >> 19) & 0x7));
rlm@1:       data[i + 0] = (Byte)(dest >> 11);
rlm@1:       data[i + 3] = (Byte)(0xF8 | ((dest >> 8) & 0x7));
rlm@1:       data[i + 2] = (Byte)dest;
rlm@1:       i += 2;
rlm@1:     }
rlm@1:   }
rlm@1:   return i;
rlm@1: }
rlm@1: 
rlm@1: SizeT PPC_Convert(Byte *data, SizeT size, UInt32 ip, int encoding)
rlm@1: {
rlm@1:   SizeT i;
rlm@1:   if (size < 4)
rlm@1:     return 0;
rlm@1:   size -= 4;
rlm@1:   for (i = 0; i <= size; i += 4)
rlm@1:   {
rlm@1:     if ((data[i] >> 2) == 0x12 && (data[i + 3] & 3) == 1)
rlm@1:     {
rlm@1:       UInt32 src = ((UInt32)(data[i + 0] & 3) << 24) |
rlm@1:         ((UInt32)data[i + 1] << 16) |
rlm@1:         ((UInt32)data[i + 2] << 8) |
rlm@1:         ((UInt32)data[i + 3] & (~3));
rlm@1:       
rlm@1:       UInt32 dest;
rlm@1:       if (encoding)
rlm@1:         dest = ip + (UInt32)i + src;
rlm@1:       else
rlm@1:         dest = src - (ip + (UInt32)i);
rlm@1:       data[i + 0] = (Byte)(0x48 | ((dest >> 24) &  0x3));
rlm@1:       data[i + 1] = (Byte)(dest >> 16);
rlm@1:       data[i + 2] = (Byte)(dest >> 8);
rlm@1:       data[i + 3] &= 0x3;
rlm@1:       data[i + 3] |= dest;
rlm@1:     }
rlm@1:   }
rlm@1:   return i;
rlm@1: }
rlm@1: 
rlm@1: SizeT SPARC_Convert(Byte *data, SizeT size, UInt32 ip, int encoding)
rlm@1: {
rlm@1:   UInt32 i;
rlm@1:   if (size < 4)
rlm@1:     return 0;
rlm@1:   size -= 4;
rlm@1:   for (i = 0; i <= size; i += 4)
rlm@1:   {
rlm@1:     if (data[i] == 0x40 && (data[i + 1] & 0xC0) == 0x00 ||
rlm@1:         data[i] == 0x7F && (data[i + 1] & 0xC0) == 0xC0)
rlm@1:     {
rlm@1:       UInt32 src =
rlm@1:         ((UInt32)data[i + 0] << 24) |
rlm@1:         ((UInt32)data[i + 1] << 16) |
rlm@1:         ((UInt32)data[i + 2] << 8) |
rlm@1:         ((UInt32)data[i + 3]);
rlm@1:       UInt32 dest;
rlm@1:       
rlm@1:       src <<= 2;
rlm@1:       if (encoding)
rlm@1:         dest = ip + i + src;
rlm@1:       else
rlm@1:         dest = src - (ip + i);
rlm@1:       dest >>= 2;
rlm@1:       
rlm@1:       dest = (((0 - ((dest >> 22) & 1)) << 22) & 0x3FFFFFFF) | (dest & 0x3FFFFF) | 0x40000000;
rlm@1: 
rlm@1:       data[i + 0] = (Byte)(dest >> 24);
rlm@1:       data[i + 1] = (Byte)(dest >> 16);
rlm@1:       data[i + 2] = (Byte)(dest >> 8);
rlm@1:       data[i + 3] = (Byte)dest;
rlm@1:     }
rlm@1:   }
rlm@1:   return i;
rlm@1: }