s390: Allow larger Operands/Displacements/Offsets in s390

src/s390/simulator-s390.cc

 // Copyright 2014 the V8 project authors. All rights reserved.
 // Use of this source code is governed by a BSD-style license that can be
 // found in the LICENSE file.
 
 #include <stdarg.h>
 #include <stdlib.h>
 #include <cmath>
 
 #if V8_TARGET_ARCH_S390
 
@@ skipping 7819 matching lines @@
 
 EVALUATE(LARL) {
   DCHECK_OPCODE(LARL);
   DECODE_RIL_B_INSTRUCTION(r1, i2);
   intptr_t offset = i2 * 2;
   set_register(r1, get_pc() + offset);
   return length;
 }
 
 EVALUATE(LGFI) {
-  UNIMPLEMENTED();
-  USE(instr);
-  return 0;
+  DCHECK_OPCODE(LGFI);
+  DECODE_RIL_A_INSTRUCTION(r1, imm);
+  set_register(r1, static_cast<int64_t>(static_cast<int32_t>(imm)));
+  return length;
 }
 
 EVALUATE(BRASL) {
   DCHECK_OPCODE(BRASL);
   // Branch and Save Relative Long
   DECODE_RIL_B_INSTRUCTION(r1, i2);
   intptr_t d2 = i2;
   intptr_t pc = get_pc();
   set_register(r1, pc + 6);  // save next instruction to register
   set_pc(pc + d2 * 2);       // update register
@@ skipping 2639 matching lines @@
     r1_val_ptr[i] = __builtin_popcount(x);
 #else
 #error unsupport __builtin_popcount
 #endif
   }
   set_register(r1, static_cast<uint64_t>(r1_val));
   return length;
 }
 
 EVALUATE(LOCGR) {
-  DCHECK_OPCODE(LOCR);
+  DCHECK_OPCODE(LOCGR);
   DECODE_RRF_C_INSTRUCTION(r1, r2, m3);
   if (TestConditionCode(m3)) {
     set_register(r1, get_register(r2));
   }
   return length;
 }
 
 EVALUATE(NGRK) {
   DCHECK_OPCODE(NGRK);
   DECODE_RRF_A_INSTRUCTION(r1, r2, r3);
@@ skipping 2084 matching lines @@
   return 0;
 }
 
 #undef EVALUATE
 
 }  // namespace internal
 }  // namespace v8
 
 #endif  // USE_SIMULATOR
 #endif  // V8_TARGET_ARCH_S390