added optimized sgemv_t kernel for nehalem

diff --git a/kernel/x86_64/sgemv_t.c b/kernel/x86_64/sgemv_t.c
index 566311a..47e749e 100644 (file)
--- a/kernel/x86_64/sgemv_t.c
+++ b/kernel/x86_64/sgemv_t.c
@@ -32,6 +32,8 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 #include "sgemv_t_microk_bulldozer-2.c"
 #elif defined(HASWELL)
 #include "sgemv_t_microk_haswell-2.c"
+#elif defined(NEHALEM)
+#include "sgemv_t_microk_nehalem-2.c"
 #endif
 
 /*

diff --git a/kernel/x86_64/sgemv_t_microk_nehalem-2.c b/kernel/x86_64/sgemv_t_microk_nehalem-2.c
new file mode 100644 (file)
index 0000000..e1f2b81
--- /dev/null
+++ b/kernel/x86_64/sgemv_t_microk_nehalem-2.c
@@ -0,0 +1,159 @@
+/***************************************************************************
+Copyright (c) 2014, The OpenBLAS Project
+All rights reserved.
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions are
+met:
+1. Redistributions of source code must retain the above copyright
+notice, this list of conditions and the following disclaimer.
+2. Redistributions in binary form must reproduce the above copyright
+notice, this list of conditions and the following disclaimer in
+the documentation and/or other materials provided with the
+distribution.
+3. Neither the name of the OpenBLAS project nor the names of
+its contributors may be used to endorse or promote products
+derived from this software without specific prior written permission.
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ARE DISCLAIMED. IN NO EVENT SHALL THE OPENBLAS PROJECT OR CONTRIBUTORS BE
+LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
+USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+*****************************************************************************/
+
+#define HAVE_KERNEL_16x4 1
+static void sgemv_kernel_16x4( BLASLONG n, float **ap, float *x, float *y) __attribute__ ((noinline));
+
+static void sgemv_kernel_16x4( BLASLONG n, float **ap, float *x, float *y)
+{
+
+       BLASLONG register i = 0;
+
+       __asm__  __volatile__
+       (
+       "xorps          %%xmm0 , %%xmm0          \n\t"
+       "xorps          %%xmm1 , %%xmm1          \n\t"
+       "xorps          %%xmm2 , %%xmm2          \n\t"
+       "xorps          %%xmm3 , %%xmm3          \n\t"
+       "xorps          %%xmm4 , %%xmm4          \n\t"
+       "xorps          %%xmm5 , %%xmm5          \n\t"
+       "xorps          %%xmm6 , %%xmm6          \n\t"
+       "xorps          %%xmm7 , %%xmm7          \n\t"
+
+       ".align 16                               \n\t"
+       ".L01LOOP%=:                             \n\t"
+       "prefetcht0      384(%2,%0,4)                  \n\t"
+       "movups        (%2,%0,4), %%xmm12        \n\t"  // 4 * x
+       "movups      16(%2,%0,4), %%xmm13        \n\t"  // 4 * x
+       "movups             (%4,%0,4), %%xmm8          \n\t" 
+       "movups      32(%2,%0,4), %%xmm14        \n\t"  // 4 * x
+       "movups      48(%2,%0,4), %%xmm15        \n\t"  // 4 * x
+
+       "prefetcht0      384(%4,%0,4)                  \n\t"
+
+       "movups           16(%4,%0,4), %%xmm9          \n\t" 
+       "movups           32(%4,%0,4), %%xmm10         \n\t" 
+       "movups           48(%4,%0,4), %%xmm11         \n\t" 
+       "mulps          %%xmm12, %%xmm8                \n\t"
+       "addps          %%xmm8 , %%xmm0                \n\t"
+       "mulps          %%xmm13, %%xmm9                \n\t"
+       "addps          %%xmm9 , %%xmm4                \n\t"
+       "movups             (%5,%0,4), %%xmm8          \n\t" 
+       "mulps          %%xmm14, %%xmm10               \n\t"
+       "addps          %%xmm10, %%xmm0                \n\t"
+       "mulps          %%xmm15, %%xmm11               \n\t"
+       "addps          %%xmm11, %%xmm4                \n\t"
+
+       "prefetcht0      384(%5,%0,4)                  \n\t"
+
+       "movups           16(%5,%0,4), %%xmm9          \n\t" 
+       "movups           32(%5,%0,4), %%xmm10         \n\t" 
+       "movups           48(%5,%0,4), %%xmm11         \n\t" 
+       "mulps          %%xmm12, %%xmm8                \n\t"
+       "addps          %%xmm8 , %%xmm1                \n\t"
+       "mulps          %%xmm13, %%xmm9                \n\t"
+       "addps          %%xmm9 , %%xmm5                \n\t"
+       "movups             (%6,%0,4), %%xmm8          \n\t" 
+       "mulps          %%xmm14, %%xmm10               \n\t"
+       "addps          %%xmm10, %%xmm1                \n\t"
+       "mulps          %%xmm15, %%xmm11               \n\t"
+       "addps          %%xmm11, %%xmm5                \n\t"
+
+       "prefetcht0      384(%6,%0,4)                  \n\t"
+
+       "movups           16(%6,%0,4), %%xmm9          \n\t" 
+       "movups           32(%6,%0,4), %%xmm10         \n\t" 
+       "movups           48(%6,%0,4), %%xmm11         \n\t" 
+       "mulps          %%xmm12, %%xmm8                \n\t"
+       "addps          %%xmm8 , %%xmm2                \n\t"
+       "mulps          %%xmm13, %%xmm9                \n\t"
+       "addps          %%xmm9 , %%xmm6                \n\t"
+       "movups             (%7,%0,4), %%xmm8          \n\t" 
+       "mulps          %%xmm14, %%xmm10               \n\t"
+       "addps          %%xmm10, %%xmm2                \n\t"
+       "mulps          %%xmm15, %%xmm11               \n\t"
+       "addps          %%xmm11, %%xmm6                \n\t"
+
+       "prefetcht0      384(%7,%0,4)                  \n\t"
+
+       "movups           16(%7,%0,4), %%xmm9          \n\t" 
+       "movups           32(%7,%0,4), %%xmm10         \n\t" 
+       "movups           48(%7,%0,4), %%xmm11         \n\t" 
+       "mulps          %%xmm12, %%xmm8                \n\t"
+       "addps          %%xmm8 , %%xmm3                \n\t"
+       "mulps          %%xmm13, %%xmm9                \n\t"
+       "addps          %%xmm9 , %%xmm7                \n\t"
+       "mulps          %%xmm14, %%xmm10               \n\t"
+       "addps          %%xmm10, %%xmm3                \n\t"
+       "mulps          %%xmm15, %%xmm11               \n\t"
+       "addps          %%xmm11, %%xmm7                \n\t"
+
+        "addq          $16, %0                       \n\t"
+       "subq           $16, %1                       \n\t"             
+       "jnz            .L01LOOP%=                    \n\t"
+
+       "addps         %%xmm0, %%xmm4                 \n\t"
+       "addps         %%xmm1, %%xmm5                 \n\t"
+       "addps         %%xmm2, %%xmm6                 \n\t"
+       "addps         %%xmm3, %%xmm7                 \n\t"
+
+        "haddps        %%xmm4, %%xmm4  \n\t"
+        "haddps        %%xmm5, %%xmm5  \n\t"
+        "haddps        %%xmm6, %%xmm6  \n\t"
+        "haddps        %%xmm7, %%xmm7  \n\t"
+
+        "haddps        %%xmm4, %%xmm4  \n\t"
+        "haddps        %%xmm5, %%xmm5  \n\t"
+        "haddps        %%xmm6, %%xmm6  \n\t"
+        "haddps        %%xmm7, %%xmm7  \n\t"
+
+        "movss         %%xmm4,    (%3)         \n\t"
+        "movss         %%xmm5,   4(%3)         \n\t"
+        "movss         %%xmm6,   8(%3)         \n\t"
+        "movss         %%xmm7,  12(%3)         \n\t"
+
+       :
+        : 
+          "r" (i),     // 0    
+         "r" (n),      // 1
+          "r" (x),      // 2
+          "r" (y),      // 3
+          "r" (ap[0]),  // 4
+          "r" (ap[1]),  // 5
+          "r" (ap[2]),  // 6
+          "r" (ap[3])   // 7
+       : "cc", 
+         "%xmm0", "%xmm1", "%xmm2", "%xmm3", 
+         "%xmm4", "%xmm5", "%xmm6", "%xmm7", 
+         "%xmm8", "%xmm9", "%xmm10", "%xmm11",
+         "%xmm12", "%xmm13", "%xmm14", "%xmm15",
+         "memory"
+       );
+
+} 
+
+