From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1LJbD2-0001oU-FS for qemu-devel@nongnu.org; Sun, 04 Jan 2009 17:12:36 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1LJbD1-0001oG-Px for qemu-devel@nongnu.org; Sun, 04 Jan 2009 17:12:35 -0500 Received: from [199.232.76.173] (port=59170 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1LJbD1-0001oD-HA for qemu-devel@nongnu.org; Sun, 04 Jan 2009 17:12:35 -0500 Received: from savannah.gnu.org ([199.232.41.3]:36049 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 1LJbD0-00012J-Kz for qemu-devel@nongnu.org; Sun, 04 Jan 2009 17:12:35 -0500 Received: from cvs.savannah.gnu.org ([199.232.41.69]) by sv.gnu.org with esmtp (Exim 4.63) (envelope-from ) id 1LJbCv-0003Zm-Ut for qemu-devel@nongnu.org; Sun, 04 Jan 2009 22:12:30 +0000 Received: from aurel32 by cvs.savannah.gnu.org with local (Exim 4.63) (envelope-from ) id 1LJbCv-0003Zh-IN for qemu-devel@nongnu.org; Sun, 04 Jan 2009 22:12:29 +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: Sun, 04 Jan 2009 22:12:29 +0000 Subject: [Qemu-devel] [6184] Add vmh{,r}addshs 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: 6184 http://svn.sv.gnu.org/viewvc/?view=rev&root=qemu&revision=6184 Author: aurel32 Date: 2009-01-04 22:12:29 +0000 (Sun, 04 Jan 2009) Log Message: ----------- Add vmh{,r}addshs 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-01-04 22:12:19 UTC (rev 6183) +++ trunk/target-ppc/helper.h 2009-01-04 22:12:29 UTC (rev 6184) @@ -178,6 +178,8 @@ DEF_HELPER_3(vpkuhum, void, avr, avr, avr) DEF_HELPER_3(vpkuwum, void, avr, avr, avr) DEF_HELPER_3(vpkpx, void, avr, avr, avr) +DEF_HELPER_4(vmhaddshs, void, avr, avr, avr, avr) +DEF_HELPER_4(vmhraddshs, void, avr, avr, avr, avr) DEF_HELPER_1(efscfsi, i32, i32) DEF_HELPER_1(efscfui, i32, i32) Modified: trunk/target-ppc/op_helper.c =================================================================== --- trunk/target-ppc/op_helper.c 2009-01-04 22:12:19 UTC (rev 6183) +++ trunk/target-ppc/op_helper.c 2009-01-04 22:12:29 UTC (rev 6184) @@ -2061,6 +2061,38 @@ #undef VAVG_DO #undef VAVG +void helper_vmhaddshs (ppc_avr_t *r, ppc_avr_t *a, ppc_avr_t *b, ppc_avr_t *c) +{ + int sat = 0; + int i; + + for (i = 0; i < ARRAY_SIZE(r->s16); i++) { + int32_t prod = a->s16[i] * b->s16[i]; + int32_t t = (int32_t)c->s16[i] + (prod >> 15); + r->s16[i] = cvtswsh (t, &sat); + } + + if (sat) { + env->vscr |= (1 << VSCR_SAT); + } +} + +void helper_vmhraddshs (ppc_avr_t *r, ppc_avr_t *a, ppc_avr_t *b, ppc_avr_t *c) +{ + int sat = 0; + int i; + + for (i = 0; i < ARRAY_SIZE(r->s16); i++) { + int32_t prod = a->s16[i] * b->s16[i] + 0x00004000; + int32_t t = (int32_t)c->s16[i] + (prod >> 15); + r->s16[i] = cvtswsh (t, &sat); + } + + if (sat) { + env->vscr |= (1 << VSCR_SAT); + } +} + #define VMINMAX_DO(name, compare, element) \ void helper_v##name (ppc_avr_t *r, ppc_avr_t *a, ppc_avr_t *b) \ { \ Modified: trunk/target-ppc/translate.c =================================================================== --- trunk/target-ppc/translate.c 2009-01-04 22:12:19 UTC (rev 6183) +++ trunk/target-ppc/translate.c 2009-01-04 22:12:29 UTC (rev 6184) @@ -6385,6 +6385,8 @@ tcg_temp_free_ptr(rd); \ } +GEN_VAFORM_PAIRED(vmhaddshs, vmhraddshs, 16) + GEN_VAFORM_PAIRED(vmsumubm, vmsummbm, 18) GEN_VAFORM_PAIRED(vsel, vperm, 21)