gh-mirror/mikepaul-LuaJIT
1
0
Fork 0
mirror of https://github.com/LuaJIT/LuaJIT.git synced 2025-02-07 15:14:08 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

DynASM/PPC: Add missing 64 bit rotates and mtocrf/mfocrf.

Browse Source
This commit is contained in:
Mike Pall 2012-06-12 16:47:25 +02:00
parent 0528bb7d02
commit 6b605bd455
1 changed files with 33 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
dynasm/dasm_ppc.lua
View File

@ -339,8 +339,9 @@ local map_op = {
iselgt_3 = "7c00005eRRR",
iseleq_3 = "7c00009eRRR",
mfcr_1 = "7c000026R",
mfocrf_2 = "7c100026RG",
mtcrf_2 = "7c000120GR",
-- NYI: mtocrf, mfocrf
mtocrf_2 = "7c100120GR",
lwarx_3 = "7c000028RR0R",
ldx_3 = "7c00002aRR0R",
lwzx_3 = "7c00002eRR0R",
@ -467,6 +468,7 @@ local map_op = {
sraw_3 = "7c000630RR~R.",
srad_3 = "7c000634RR~R.",
srawi_3 = "7c000670RR~A.",
sradi_3 = "7c000674RR~H.",
eieio_0 = "7c0006ac",
lfiwax_3 = "7c0006aeFR0R",
sthbrx_3 = "7c00072cRR0R",
@ -481,6 +483,14 @@ local map_op = {
divwo_3 = "7c0007d6RRR.",
dcbz_2 = "7c0007ec-RR",
-- Primary opcode 30:
rldicl_4 = "78000000RR~HM.",
rldicr_4 = "78000004RR~HM.",
rldic_4 = "78000008RR~HM.",
rldimi_4 = "7800000cRR~HM.",
rldcl_4 = "78000010RR~RM.",
rldcr_4 = "78000012RR~RM.",
-- Primary opcode 59:
fdivs_3 = "ec000024FFF.",
fsubs_3 = "ec000028FFF.",
@ -807,9 +817,7 @@ local map_op = {
evmwlumianw_3 = "100005c8RRR",
evmwlsmianw_3 = "100005c9RRR",
-- NYI: some 64 bit PowerPC and Book E instructions:
-- rldicl, rldicr, rldic, rldimi, rldcl, rldcr, sradi, 64 bit ext. add/sub,
-- extended addressing branches, cache management, loads and stores
-- NYI: Book E instructions.
}
-- Add mnemonics for "." variants.
@ -919,6 +927,23 @@ local function parse_imm(imm, bits, shift, scale, signed)
end
end
local function parse_shiftmask(imm, isshift)
local n = tonumber(imm)
if n then
if n % 1 == 0 and n >= 0 and n <= 63 then
local lsb = imm % 32
local msb = imm - lsb
return isshift and (lsb*2048+msb/16) or (lsb*64+msb)
end
werror("out of range immediate `"..imm.."'")
elseif match(imm, "^r([1-3]?[0-9])$") or
match(imm, "^([%w_]+):(r[1-3]?[0-9])$") then
werror("expected immediate operand, got register")
else
werror("NYI: parameterized 64 bit shift/mask")
end
end
local function parse_disp(disp)
local imm, reg = match(disp, "^(.*)%(([%w_:]+)%)$")
if imm then
@ -1030,6 +1055,10 @@ map_op[".template__"] = function(params, template, nparams)
op = op + parse_cr(params[n]); n = n + 1
elseif p == "G" then
op = op + parse_imm(params[n], 8, 12, 0, false); n = n + 1
elseif p == "H" then
op = op + parse_shiftmask(params[n], true); n = n + 1
elseif p == "M" then
op = op + parse_shiftmask(params[n], false); n = n + 1
elseif p == "J" or p == "K" then
local mode, n, s = parse_label(params[n], false)
if p == "K" then n = n + 2048 end