/*

 * Copyright (c) 2009 Nokia Corporation and/or its subsidiary(-ies).

 * All rights reserved.

 * This component and the accompanying materials are made available

 * under the terms of "Eclipse Public License v1.0"

 * which accompanies this distribution, and is available

 * at the URL "http://www.eclipse.org/legal/epl-v10.html".

 *

 * Initial Contributors:

 * Nokia Corporation - initial contribution.

 *

 * Contributors:

 *

 * Description: 

 *

 */

 #include <stdio.h>

 #include <stdlib.h>

 #include <string.h>

 #define LOG_FILE "c:\\logs\\memcpy-speed_logs.txt"

 #include "std_log_result.h"

 #define LOG_FILENAME_LINE __FILE__, __LINE__

 void create_xml(int result)

 {

     if(result)

         assert_failed = 1;

     testResultXml("memcpy-speed");

     close_log_file();

 }

 #include <liboil/liboil.h>

 #include <liboil/liboilprofile.h>

 #include <liboil/liboilfunction.h>

 #include <liboil/globals.h>

 #define ALIGN(ptr,n) ((void *)((unsigned long)(ptr) & (~(unsigned long)(n-1))))

 int

 main(int argc, char *argv[])

 {

   char *s=NULL, *d=NULL;

   uint32_t *src, *dest;

   int16_t res=0;

   OilProfile prof;

   double ave, std;

   int i,j, cnt;

   double cpufreq;

   OilFunctionClass *klass;

   OilFunctionImpl *impl;

   int the_class;

   std_log(LOG_FILENAME_LINE,"Test Started memcpy-speed");

   oil_init ();

   s = malloc(512*1024+1024);

   d = malloc(512*1024+1024);

 //  src = ((void *)((unsigned long)(s) |  0xFF ));

   //dest = ((void *)((unsigned long)(d) |  0xFF ));

     src = ((void *)((unsigned long)(s) ));

   dest = ((void *)((unsigned long)(d) ));

   for(the_class=0; the_class<3; the_class++)

   { 

       cpufreq = 1788e6;    

       switch(the_class) {

         case 0:

           klass = oil_class_get ("splat_u32_ns");

           break;

         case 1:

           klass = oil_class_get ("copy_u8");

           break;

         case 2:

           klass = oil_class_get ("sum_s16");

           break;

       }

       for(impl=klass->first_impl;impl;impl=impl->next) {

       std_log(LOG_FILENAME_LINE,"impl %s\n", impl->name);

         if (!oil_impl_is_usable(impl)) {

         std_log(LOG_FILENAME_LINE,"  not usable\n");

           continue;

         }

         oil_class_choose_by_name (klass, impl->name);

         for(i=10;i<20;i++){

           oil_profile_init (&prof);

           for(j=0;j<10;j++){

             switch(the_class) {

               case 0:

                 oil_profile_start(&prof);

                 oil_splat_u32_ns (dest, src, 1<<(i-2));

                 oil_profile_stop(&prof);

                 for(cnt=0; cnt<(1<<(i-2)); cnt++){

                     if(dest[cnt]!=*src){

                         std_log(LOG_FILENAME_LINE,"Failed at the_class=%d, cnt=%d, i=%d, j=%d, impl->name=%s\n", the_class, cnt, i, j, impl->name);

                         assert_failed =1;

                     }

                 }

                 break;

               case 1:

                 oil_profile_start(&prof);

                 oil_memcpy (dest, src, 1<<i);

                 oil_profile_stop(&prof);

                 for(cnt=0; cnt<(1<<(i-2)); cnt++){      //cnt is checked with 1<<(i-2) because dest & src are of type uint32_t*

                     if(dest[cnt]!=src[cnt]){

                         std_log(LOG_FILENAME_LINE,"Failed at the_class=%d, cnt=%d, i=%d, j=%d, impl->name=%s\n", the_class, cnt, i, j, impl->name);

                         assert_failed =1;

                     }

                 }

                 break;

               case 2:

                   {

                 int16_t* src1 = (int16_t*)src;

                 int16_t* dest1 = (int16_t*)dest;

                 oil_profile_start(&prof);

                 oil_sum_s16 (dest1, src1, 1<<(i-1));

                 oil_profile_stop(&prof);

                 res=0;

                 for(cnt=0; cnt<(1<<(i-1)); cnt++){

                     res += src1[cnt];

                 }

                 if(*dest1 != res){

                     std_log(LOG_FILENAME_LINE,"Failed at the_class=%d, impl->name=%s\n", the_class, impl->name);

                     assert_failed =1;

                 }

                   }

                 break;

             }

           }

           oil_profile_get_ave_std (&prof, &ave, &std);                    

           std_log(LOG_FILENAME_LINE,"%d: %10.4g %10.4g %10.4g\n", i, ave, std,

             ave/(1<<i));

         }

       }

  }

   free(s);

   free(d);

   if(!assert_failed)

       std_log(LOG_FILENAME_LINE, "Test Passed");

   else

       std_log(LOG_FILENAME_LINE, "Test Failed");

   create_xml(0);

   return 0;

 }