Symaptic: os/ossrv/genericopenlibs/liboil/src/i386/trans8x8

     1 /*

     2  * LIBOIL - Library of Optimized Inner Loops

     3  * Copyright (c) 2003,2004 David A. Schleef <ds@schleef.org>

     4  * All rights reserved.

     5  *

     6  * Redistribution and use in source and binary forms, with or without

     7  * modification, are permitted provided that the following conditions

     8  * are met:

     9  * 1. Redistributions of source code must retain the above copyright

    10  *    notice, this list of conditions and the following disclaimer.

    11  * 2. Redistributions in binary form must reproduce the above copyright

    12  *    notice, this list of conditions and the following disclaimer in the

    13  *    documentation and/or other materials provided with the distribution.

    14  *

    15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR

    16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED

    17  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE

    18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,

    19  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES

    20  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR

    21  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)

    22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,

    23  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING

    24  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE

    25  * POSSIBILITY OF SUCH DAMAGE.

    26  */

    27 //Portions Copyright (c)  2008-2009 Nokia Corporation and/or its subsidiary(-ies). All rights reserved.

    29 #ifdef HAVE_CONFIG_H

    30 #include "config.h"

    31 #endif

    33 #include <liboil/liboilfunction.h>

    34 #include <math.h>

    36 OIL_DECLARE_CLASS(trans8x8_u16);

    38 /* this could use additional work. */

    39 static void

    40 trans8x8_u16_mmx (uint16_t *dest, int dstr, uint16_t *src, int sstr)

    41 {

    42 #if !defined(__WINSCW__) && !defined(__WINS__)

    43   asm volatile (

    44       "  leal (%3,%3,2),%%eax \n"         // UBER 0:

    45       "  movq (%1), %%mm0 \n"             // UBER 1:

    46       "  movq (%1,%3,2), %%mm2 \n"        // UBER 2:

    47       "  movq %%mm0, %%mm4 \n"            // UBER 3: 1

    48       "  movq %%mm2, %%mm5 \n"            // UBER 4: 2

    49       "  punpcklwd (%1,%3), %%mm0 \n"     // UBER 5: 1

    50       "  punpcklwd (%1,%%eax), %%mm2 \n"  // UBER 6: 0 2

    51       "  punpckhwd (%1,%3), %%mm4 \n"     // UBER 7: 3

    52       "  punpckhwd (%1,%%eax), %%mm5 \n"  // UBER 8: 4

    53       "  movq %%mm0, %%mm1 \n"            // UBER 9: 5

    54       "  movq %%mm4, %%mm3 \n"            // UBER 10: 7

    55       "  punpckldq %%mm2, %%mm0 \n"       // UBER 11: 5 6

    56       "  punpckldq %%mm5, %%mm4 \n"       // UBER 12: 7 8

    57       "  punpckhdq %%mm2, %%mm1 \n"       // UBER 13: 6 9

    58       "  punpckhdq %%mm5, %%mm3 \n"       // UBER 14: 9 10

    59       "  leal (%2,%2,2),%%eax \n"         // UBER 15: 8

    60       "  movq %%mm0, 0(%0) \n"            // UBER 16: 11

    61       "  movq %%mm1, (%0,%2) \n"          // UBER 17: 13

    62       "  movq %%mm4, (%0,%2,2) \n"        // UBER 18: 12

    63       "  movq %%mm3, (%0,%%eax) \n"       // UBER 19: 14 15

    65       "  leal (%3,%3,2),%%eax \n"

    66       "  movq 8(%1), %%mm0 \n"

    67       "  movq 8(%1,%3,2), %%mm2 \n"

    68       "  movq %%mm0, %%mm4 \n"

    69       "  movq %%mm2, %%mm5 \n"

    70       "  punpcklwd 8(%1,%3), %%mm0 \n"

    71       "  punpcklwd 8(%1,%%eax), %%mm2 \n"

    72       "  punpckhwd 8(%1,%3), %%mm4 \n"

    73       "  punpckhwd 8(%1,%%eax), %%mm5 \n"

    74       "  movq %%mm0, %%mm1 \n"

    75       "  movq %%mm4, %%mm3 \n"

    76       "  punpckldq %%mm2, %%mm0 \n"

    77       "  punpckldq %%mm5, %%mm4 \n"

    78       "  punpckhdq %%mm2, %%mm1 \n"

    79       "  punpckhdq %%mm5, %%mm3 \n"

    80       "  leal (%2,%2,2),%%eax \n"

    81       "  leal (%0,%2,4),%0 \n"

    82       "  movq %%mm0, 0(%0) \n"

    83       "  movq %%mm1, (%0,%2) \n"

    84       "  movq %%mm4, (%0,%2,2) \n"

    85       "  movq %%mm3, (%0,%%eax) \n"

    87       "  leal (%1,%3,4),%1 \n"

    88       "  leal (%3,%3,2),%%eax \n"

    89       "  movq 0(%1), %%mm0 \n"

    90       "  movq 0(%1,%3,2), %%mm2 \n"

    91       "  movq %%mm0, %%mm4 \n"

    92       "  movq %%mm2, %%mm5 \n"

    93       "  punpcklwd 0(%1,%3), %%mm0 \n"

    94       "  punpcklwd 0(%1,%%eax), %%mm2 \n"

    95       "  punpckhwd 0(%1,%3), %%mm4 \n"

    96       "  punpckhwd 0(%1,%%eax), %%mm5 \n"

    97       "  movq %%mm0, %%mm1 \n"

    98       "  movq %%mm4, %%mm3 \n"

    99       "  punpckldq %%mm2, %%mm0 \n"

   100       "  punpckldq %%mm5, %%mm4 \n"

   101       "  punpckhdq %%mm2, %%mm1 \n"

   102       "  punpckhdq %%mm5, %%mm3 \n"

   103       "  leal (%2,%2,2),%%eax \n"

   104       "  neg %2 \n"

   105       "  leal (%0,%2,4),%0 \n"

   106       "  neg %2 \n"

   107       "  movq %%mm0, 8(%0) \n"

   108       "  movq %%mm1, 8(%0,%2) \n"

   109       "  movq %%mm4, 8(%0,%2,2) \n"

   110       "  movq %%mm3, 8(%0,%%eax) \n"

   112       "  leal (%3,%3,2),%%eax \n"

   113       "  movq 8(%1), %%mm0 \n"

   114       "  movq 8(%1,%3,2), %%mm2 \n"

   115       "  movq %%mm0, %%mm4 \n"

   116       "  movq %%mm2, %%mm5 \n"

   117       "  punpcklwd 8(%1,%3), %%mm0 \n"

   118       "  punpcklwd 8(%1,%%eax), %%mm2 \n"

   119       "  punpckhwd 8(%1,%3), %%mm4 \n"

   120       "  punpckhwd 8(%1,%%eax), %%mm5 \n"

   121       "  movq %%mm0, %%mm1 \n"

   122       "  movq %%mm4, %%mm3 \n"

   123       "  punpckldq %%mm2, %%mm0 \n"

   124       "  punpckldq %%mm5, %%mm4 \n"

   125       "  punpckhdq %%mm2, %%mm1 \n"

   126       "  punpckhdq %%mm5, %%mm3 \n"

   127       "  leal (%2,%2,2),%%eax \n"

   128       "  leal (%0,%2,4),%0 \n"

   129       "  movq %%mm0, 8(%0) \n"

   130       "  movq %%mm1, 8(%0,%2) \n"

   131       "  movq %%mm4, 8(%0,%2,2) \n"

   132       "  movq %%mm3, 8(%0,%%eax) \n"

   133       "  emms \n"

   134       : "+r" (dest), "+r" (src), "+r" (dstr), "+r" (sstr)

   135       :

   136       : "eax");

   137 #endif

   138 }

   139 OIL_DEFINE_IMPL_FULL (trans8x8_u16_mmx, trans8x8_u16, OIL_IMPL_FLAG_MMX);

   141 static void

   142 trans8x8_u16_asm1 (uint16_t *dest, int dstr, uint16_t *src, int sstr)

   143 {

   144 #if !defined(__WINSCW__) && !defined(__WINS__)

   145   int saved_ebx = 0;

   146   asm (

   147       "  movl %%ebx, %4 \n"

   148       "  movl %0, %%ecx \n"

   149       "  movl %2, %%ebx \n"

   150       "  movl %1, %%edx \n"

   151       "  lea (%%ecx,%%edx,8), %%esi \n"

   152       "  sub %%edx, %%esi\n "

   153       "  movl $7, %%edi \n"

   154       "1: \n"

   156       "  mov (%%ebx), %%ax \n"

   157       "  mov %%ax,(%%ecx) \n"

   158       "  mov 2(%%ebx), %%ax \n"

   159       "  mov %%ax,(%%ecx,%%edx,1) \n"

   160       "  mov 4(%%ebx), %%ax \n"

   161       "  mov %%ax,(%%ecx,%%edx,2) \n"

   162       "  mov 8(%%ebx), %%ax \n"

   163       "  mov %%ax,(%%ecx,%%edx,4) \n"

   165       "  neg %%edx \n"

   167       "  mov 6(%%ebx), %%ax \n"

   168       "  mov %%ax,(%%esi,%%edx,4) \n"

   169       "  mov 10(%%ebx), %%ax \n"

   170       "  mov %%ax,(%%esi,%%edx,2) \n"

   171       "  mov 12(%%ebx), %%ax \n"

   172       "  mov %%ax,(%%esi,%%edx,1) \n"

   173       "  mov 14(%%ebx), %%ax \n"

   174       "  mov %%ax,(%%esi) \n"

   176       "  neg %%edx \n"

   177       "  add %3, %%ebx \n"

   178       "  add $2, %%ecx \n"

   179       "  add $2, %%esi \n"

   181       "  dec %%edi \n"

   182       "  jge 1b \n"

   183       "  movl %4, %%ebx \n"

   184       :

   185       : "m" (dest), "m" (dstr), "m" (src), "m" (sstr), "m" (saved_ebx)

   186       : "eax", "ecx", "edx", "esi", "edi");

   187 #endif

   188 }

   189 OIL_DEFINE_IMPL (trans8x8_u16_asm1, trans8x8_u16);

   191 static void

   192 trans8x8_u16_asm2 (uint16_t *dest, int dstr, uint16_t *src, int sstr)

   193 {

   194 #if !defined(__WINSCW__) && !defined(__WINS__)

   195   int i;

   196   int saved_ebx = 0;

   197   asm (

   198       "  movl %%ebx, %5 \n"

   199       "  movl %0, %%ecx \n"

   200       "  movl %2, %%ebx \n"

   201       "  movl %1, %%edx \n"

   202       "  lea (%%ecx,%%edx,8), %%esi \n"

   203       "  sub %%edx, %%esi\n "

   204       "  movl $7, %4 \n"

   205       "  movl %%edx, %%edi \n"

   206       "  negl %%edi \n"

   207       "1: \n"

   209       "  movl (%%ebx), %%eax \n"

   210       "  mov %%ax,(%%ecx) \n"

   211       "  shr $16, %%eax \n"

   212       "  mov %%ax,(%%ecx,%%edx,1) \n"

   214       "  movl 4(%%ebx), %%eax \n"

   215       "  mov %%ax,(%%ecx,%%edx,2) \n"

   216       "  shr $16, %%eax \n"

   217       "  mov %%ax,(%%esi,%%edi,4) \n"

   219       "  movl 8(%%ebx), %%eax \n"

   220       "  mov %%ax,(%%ecx,%%edx,4) \n"

   221       "  shr $16, %%eax \n"

   222       "  mov %%ax,(%%esi,%%edi,2) \n"

   224       "  movl 12(%%ebx), %%eax \n"

   225       "  mov %%ax,(%%esi,%%edi,1) \n"

   226       "  shr $16, %%eax \n"

   227       "  mov %%ax,(%%esi) \n"

   229       "  add %3, %%ebx \n"

   230       "  add $2, %%ecx \n"

   231       "  add $2, %%esi \n"

   233       "  decl %4 \n"

   234       "  jge 1b \n"

   235       "  movl %5, %%ebx \n"

   236       :

   237       : "m" (dest), "m" (dstr), "m" (src), "m" (sstr), "m" (i), "m" (saved_ebx)

   238       : "eax", "ecx", "edx", "esi", "edi");

   239 #endif

   240 }

   241 OIL_DEFINE_IMPL (trans8x8_u16_asm2, trans8x8_u16);

   245 #ifdef	__SYMBIAN32__

   247 OilFunctionImpl* __oil_function_impl_trans8x8_u16_mmx, trans8x8_u16() {

   248 		return &_oil_function_impl_trans8x8_u16_mmx, trans8x8_u16;

   249 }

   250 #endif

   254 #ifdef	__SYMBIAN32__

   256 OilFunctionImpl* __oil_function_impl_trans8x8_u16_asm1() {

   257 		return &_oil_function_impl_trans8x8_u16_asm1;

   258 }

   259 #endif

   261 #ifdef	__SYMBIAN32__

   263 OilFunctionImpl* __oil_function_impl_trans8x8_u16_asm2() {

   264 		return &_oil_function_impl_trans8x8_u16_asm2;

   265 }

   266 #endif

author	sl@SLION-WIN7.fritz.box
	Fri, 15 Jun 2012 03:10:57 +0200
changeset 0	bde4ae8d615e
permissions	-rw-r--r--