From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1LWZJt-0004N1-0p for qemu-devel@nongnu.org; Mon, 09 Feb 2009 11:49:17 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1LWZJs-0004Mh-BR for qemu-devel@nongnu.org; Mon, 09 Feb 2009 11:49:16 -0500 Received: from [199.232.76.173] (port=34580 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1LWZJr-0004Md-Oq for qemu-devel@nongnu.org; Mon, 09 Feb 2009 11:49:15 -0500 Received: from savannah.gnu.org ([199.232.41.3]:46456 helo=sv.gnu.org) by monty-python.gnu.org with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1LWZJr-0003WY-7R for qemu-devel@nongnu.org; Mon, 09 Feb 2009 11:49:15 -0500 Received: from cvs.savannah.gnu.org ([199.232.41.69]) by sv.gnu.org with esmtp (Exim 4.63) (envelope-from ) id 1LWZJn-0004tW-Kv for qemu-devel@nongnu.org; Mon, 09 Feb 2009 16:49:11 +0000 Received: from aurel32 by cvs.savannah.gnu.org with local (Exim 4.63) (envelope-from ) id 1LWZJn-0004tS-9E for qemu-devel@nongnu.org; Mon, 09 Feb 2009 16:49:11 +0000 MIME-Version: 1.0 Errors-To: aurel32 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit From: Aurelien Jarno Message-Id: Date: Mon, 09 Feb 2009 16:49:11 +0000 Subject: [Qemu-devel] [6571] target-ppc: Add vcmp{eq, ge, gt, b}fp{, .} instructions Reply-To: qemu-devel@nongnu.org List-Id: qemu-devel.nongnu.org List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , To: qemu-devel@nongnu.org Revision: 6571 http://svn.sv.gnu.org/viewvc/?view=rev&root=qemu&revision=6571 Author: aurel32 Date: 2009-02-09 16:49:10 +0000 (Mon, 09 Feb 2009) Log Message: ----------- target-ppc: Add vcmp{eq, ge, gt, b}fp{, .} instructions Signed-off-by: Nathan Froyd Signed-off-by: Aurelien Jarno Modified Paths: -------------- trunk/target-ppc/helper.h trunk/target-ppc/op_helper.c trunk/target-ppc/translate.c Modified: trunk/target-ppc/helper.h =================================================================== --- trunk/target-ppc/helper.h 2009-02-09 16:48:59 UTC (rev 6570) +++ trunk/target-ppc/helper.h 2009-02-09 16:49:10 UTC (rev 6571) @@ -132,6 +132,10 @@ DEF_HELPER_3(vcmpgtsb, void, avr, avr, avr) DEF_HELPER_3(vcmpgtsh, void, avr, avr, avr) DEF_HELPER_3(vcmpgtsw, void, avr, avr, avr) +DEF_HELPER_3(vcmpeqfp, void, avr, avr, avr) +DEF_HELPER_3(vcmpgefp, void, avr, avr, avr) +DEF_HELPER_3(vcmpgtfp, void, avr, avr, avr) +DEF_HELPER_3(vcmpbfp, void, avr, avr, avr) DEF_HELPER_3(vcmpequb_dot, void, avr, avr, avr) DEF_HELPER_3(vcmpequh_dot, void, avr, avr, avr) DEF_HELPER_3(vcmpequw_dot, void, avr, avr, avr) @@ -141,6 +145,10 @@ DEF_HELPER_3(vcmpgtsb_dot, void, avr, avr, avr) DEF_HELPER_3(vcmpgtsh_dot, void, avr, avr, avr) DEF_HELPER_3(vcmpgtsw_dot, void, avr, avr, avr) +DEF_HELPER_3(vcmpeqfp_dot, void, avr, avr, avr) +DEF_HELPER_3(vcmpgefp_dot, void, avr, avr, avr) +DEF_HELPER_3(vcmpgtfp_dot, void, avr, avr, avr) +DEF_HELPER_3(vcmpbfp_dot, void, avr, avr, avr) DEF_HELPER_3(vmrglb, void, avr, avr, avr) DEF_HELPER_3(vmrglh, void, avr, avr, avr) DEF_HELPER_3(vmrglw, void, avr, avr, avr) Modified: trunk/target-ppc/op_helper.c =================================================================== --- trunk/target-ppc/op_helper.c 2009-02-09 16:48:59 UTC (rev 6570) +++ trunk/target-ppc/op_helper.c 2009-02-09 16:49:10 UTC (rev 6571) @@ -2220,6 +2220,74 @@ #undef VCMP_DO #undef VCMP +#define VCMPFP_DO(suffix, compare, order, record) \ + void helper_vcmp##suffix (ppc_avr_t *r, ppc_avr_t *a, ppc_avr_t *b) \ + { \ + uint32_t ones = (uint32_t)-1; \ + uint32_t all = ones; \ + uint32_t none = 0; \ + int i; \ + for (i = 0; i < ARRAY_SIZE(r->f); i++) { \ + uint32_t result; \ + int rel = float32_compare_quiet(a->f[i], b->f[i], &env->vec_status); \ + if (rel == float_relation_unordered) { \ + result = 0; \ + } else if (rel compare order) { \ + result = ones; \ + } else { \ + result = 0; \ + } \ + r->u32[i] = result; \ + all &= result; \ + none |= result; \ + } \ + if (record) { \ + env->crf[6] = ((all != 0) << 3) | ((none == 0) << 1); \ + } \ + } +#define VCMPFP(suffix, compare, order) \ + VCMPFP_DO(suffix, compare, order, 0) \ + VCMPFP_DO(suffix##_dot, compare, order, 1) +VCMPFP(eqfp, ==, float_relation_equal) +VCMPFP(gefp, !=, float_relation_less) +VCMPFP(gtfp, ==, float_relation_greater) +#undef VCMPFP_DO +#undef VCMPFP + +static always_inline void vcmpbfp_internal (ppc_avr_t *r, ppc_avr_t *a, + ppc_avr_t *b, int record) +{ + int i; + int all_in = 0; + for (i = 0; i < ARRAY_SIZE(r->f); i++) { + int le_rel = float32_compare_quiet(a->f[i], b->f[i], &env->vec_status); + if (le_rel == float_relation_unordered) { + r->u32[i] = 0xc0000000; + /* ALL_IN does not need to be updated here. */ + } else { + float32 bneg = float32_chs(b->f[i]); + int ge_rel = float32_compare_quiet(a->f[i], bneg, &env->vec_status); + int le = le_rel != float_relation_greater; + int ge = ge_rel != float_relation_less; + r->u32[i] = ((!le) << 31) | ((!ge) << 30); + all_in |= (!le | !ge); + } + } + if (record) { + env->crf[6] = (all_in == 0) << 1; + } +} + +void helper_vcmpbfp (ppc_avr_t *r, ppc_avr_t *a, ppc_avr_t *b) +{ + vcmpbfp_internal(r, a, b, 0); +} + +void helper_vcmpbfp_dot (ppc_avr_t *r, ppc_avr_t *a, ppc_avr_t *b) +{ + vcmpbfp_internal(r, a, b, 1); +} + void helper_vmaddfp (ppc_avr_t *r, ppc_avr_t *a, ppc_avr_t *b, ppc_avr_t *c) { int i; Modified: trunk/target-ppc/translate.c =================================================================== --- trunk/target-ppc/translate.c 2009-02-09 16:48:59 UTC (rev 6570) +++ trunk/target-ppc/translate.c 2009-02-09 16:49:10 UTC (rev 6571) @@ -6430,6 +6430,10 @@ GEN_VXRFORM(vcmpgtub, 3, 8) GEN_VXRFORM(vcmpgtuh, 3, 9) GEN_VXRFORM(vcmpgtuw, 3, 10) +GEN_VXRFORM(vcmpeqfp, 3, 3) +GEN_VXRFORM(vcmpgefp, 3, 7) +GEN_VXRFORM(vcmpgtfp, 3, 11) +GEN_VXRFORM(vcmpbfp, 3, 15) #define GEN_VXFORM_SIMM(name, opc2, opc3) \ GEN_HANDLER(name, 0x04, opc2, opc3, 0x00000000, PPC_ALTIVEC) \