os/ossrv/genericopenlibs/liboil/src/copy/copy.c
author sl
Tue, 10 Jun 2014 14:32:02 +0200
changeset 1 260cb5ec6c19
permissions -rw-r--r--
Update contrib.
sl@0
     1
/*
sl@0
     2
 * LIBOIL - Library of Optimized Inner Loops
sl@0
     3
 * Copyright (c) 2004 David A. Schleef <ds@schleef.org>
sl@0
     4
 * All rights reserved.
sl@0
     5
 *
sl@0
     6
 * Redistribution and use in source and binary forms, with or without
sl@0
     7
 * modification, are permitted provided that the following conditions
sl@0
     8
 * are met:
sl@0
     9
 * 1. Redistributions of source code must retain the above copyright
sl@0
    10
 *    notice, this list of conditions and the following disclaimer.
sl@0
    11
 * 2. Redistributions in binary form must reproduce the above copyright
sl@0
    12
 *    notice, this list of conditions and the following disclaimer in the
sl@0
    13
 *    documentation and/or other materials provided with the distribution.
sl@0
    14
 * 
sl@0
    15
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
sl@0
    16
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
sl@0
    17
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
sl@0
    18
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
sl@0
    19
 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
sl@0
    20
 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
sl@0
    21
 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
sl@0
    22
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
sl@0
    23
 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
sl@0
    24
 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
sl@0
    25
 * POSSIBILITY OF SUCH DAMAGE.
sl@0
    26
 */
sl@0
    27
//Portions Copyright (c)  2008-2009 Nokia Corporation and/or its subsidiary(-ies). All rights reserved. 
sl@0
    28
sl@0
    29
#ifdef HAVE_CONFIG_H
sl@0
    30
#include "config.h"
sl@0
    31
#endif
sl@0
    32
sl@0
    33
#include <string.h>
sl@0
    34
sl@0
    35
#include <liboil/liboilfunction.h>
sl@0
    36
sl@0
    37
OIL_DECLARE_CLASS (copy_u8);
sl@0
    38
sl@0
    39
static void
sl@0
    40
copy_u8_libc (uint8_t *dest, const uint8_t *src, int n)
sl@0
    41
{
sl@0
    42
  memcpy (dest, src, n);
sl@0
    43
}
sl@0
    44
OIL_DEFINE_IMPL (copy_u8_libc, copy_u8);
sl@0
    45
sl@0
    46
static void
sl@0
    47
copy_u8_ptr (uint8_t *dest, const uint8_t *src, int n)
sl@0
    48
{
sl@0
    49
  while(n--) {
sl@0
    50
    *dest++ = *src++;
sl@0
    51
  }
sl@0
    52
}
sl@0
    53
OIL_DEFINE_IMPL (copy_u8_ptr, copy_u8);
sl@0
    54
sl@0
    55
#ifdef HAVE_UNALIGNED_ACCESS
sl@0
    56
static void
sl@0
    57
copy_u8_ints (uint8_t *dest, const uint8_t *src, int n)
sl@0
    58
{
sl@0
    59
  int i;
sl@0
    60
  for(i=0;i<(n&3);i++){
sl@0
    61
    *dest++ = *src++;
sl@0
    62
  }
sl@0
    63
  n >>= 2;
sl@0
    64
  for(i=0;i<n;i++){
sl@0
    65
    *(uint32_t *)dest = *(uint32_t *)src;
sl@0
    66
    dest += 4;
sl@0
    67
    src += 4;
sl@0
    68
  }
sl@0
    69
}
sl@0
    70
OIL_DEFINE_IMPL (copy_u8_ints, copy_u8);
sl@0
    71
#endif
sl@0
    72
sl@0
    73
#ifdef HAVE_UNALIGNED_ACCESS
sl@0
    74
/* Submitted by Adam Moss */
sl@0
    75
static void
sl@0
    76
copy_u8_llints (uint8_t *dest, const uint8_t *src, int n)
sl@0
    77
{
sl@0
    78
  int i;
sl@0
    79
  for(i=0;i<(n&7);i++){
sl@0
    80
    *dest++ = *src++;
sl@0
    81
  }
sl@0
    82
  n >>= 3;
sl@0
    83
  for(i=0;i<n;i++){
sl@0
    84
    *(uint64_t *)dest = *(uint64_t *)src;
sl@0
    85
    dest += 8;
sl@0
    86
    src += 8;
sl@0
    87
  }
sl@0
    88
}
sl@0
    89
OIL_DEFINE_IMPL (copy_u8_llints, copy_u8);
sl@0
    90
#endif
sl@0
    91
sl@0
    92
#ifdef HAVE_UNALIGNED_ACCESS
sl@0
    93
/* Submitted by Adam Moss */
sl@0
    94
static void
sl@0
    95
copy_u8_llints_duff (uint8_t *dest, const uint8_t *src, int n)
sl@0
    96
{
sl@0
    97
  switch(n&7) {
sl@0
    98
  case 7: *dest++ = *src++;
sl@0
    99
  case 6: *dest++ = *src++;
sl@0
   100
  case 5: *dest++ = *src++;
sl@0
   101
  case 4: *dest++ = *src++;
sl@0
   102
  case 3: *dest++ = *src++;
sl@0
   103
  case 2: *dest++ = *src++;
sl@0
   104
  case 1: *dest++ = *src++;
sl@0
   105
  default: ;
sl@0
   106
  }
sl@0
   107
  n >>= 3;
sl@0
   108
  while (n) {
sl@0
   109
    switch (n & 15) {
sl@0
   110
    default:
sl@0
   111
    case 0: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   112
    case 15: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   113
    case 14: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   114
    case 13: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   115
    case 12: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   116
    case 11: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   117
    case 10: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   118
    case 9: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   119
    case 8: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   120
    case 7: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   121
    case 6: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   122
    case 5: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   123
    case 4: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   124
    case 3: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   125
    case 2: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   126
    case 1: *(uint64_t *)dest = *(uint64_t *)src; dest += 8; src += 8;
sl@0
   127
    }
sl@0
   128
    n = (n - 1) & ~(int)15;
sl@0
   129
  }
sl@0
   130
}
sl@0
   131
OIL_DEFINE_IMPL (copy_u8_llints_duff, copy_u8);
sl@0
   132
#endif
sl@0
   133
sl@0
   134
sl@0
   135
sl@0
   136
#ifdef	__SYMBIAN32__
sl@0
   137
 
sl@0
   138
OilFunctionImpl* __oil_function_impl_copy_u8_libc() {
sl@0
   139
		return &_oil_function_impl_copy_u8_libc;
sl@0
   140
}
sl@0
   141
#endif
sl@0
   142
sl@0
   143
#ifdef	__SYMBIAN32__
sl@0
   144
 
sl@0
   145
OilFunctionImpl* __oil_function_impl_copy_u8_ptr() {
sl@0
   146
		return &_oil_function_impl_copy_u8_ptr;
sl@0
   147
}
sl@0
   148
#endif
sl@0
   149
sl@0
   150
#ifdef HAVE_UNALIGNED_ACCESS
sl@0
   151
#ifdef	__SYMBIAN32__
sl@0
   152
 
sl@0
   153
OilFunctionImpl* __oil_function_impl_copy_u8_ints() {
sl@0
   154
		return &_oil_function_impl_copy_u8_ints;
sl@0
   155
}
sl@0
   156
#endif
sl@0
   157
#endif
sl@0
   158
sl@0
   159
#ifdef HAVE_UNALIGNED_ACCESS
sl@0
   160
#ifdef	__SYMBIAN32__
sl@0
   161
 
sl@0
   162
OilFunctionImpl* __oil_function_impl_copy_u8_llints() {
sl@0
   163
		return &_oil_function_impl_copy_u8_llints;
sl@0
   164
}
sl@0
   165
#endif
sl@0
   166
#endif
sl@0
   167
sl@0
   168
#ifdef HAVE_UNALIGNED_ACCESS
sl@0
   169
#ifdef	__SYMBIAN32__
sl@0
   170
 
sl@0
   171
OilFunctionImpl* __oil_function_impl_copy_u8_llints_duff() {
sl@0
   172
		return &_oil_function_impl_copy_u8_llints_duff;
sl@0
   173
}
sl@0
   174
#endif
sl@0
   175
#endif