Ejemplo n.º 1
0
int main (int argc, char *argv[])
{
  OilFunctionClass *klass;
  OilFunctionImpl *impl;
  OilTest *test;
  double ave, std;
  int n;

  oil_init ();

  if (argc < 2) {
    printf("oil-test <class_name>\n");
    exit(0);
  }

  klass = oil_class_get (argv[1]);
  if (klass == NULL) {
    printf("class not found: %s\n", argv[1]);
    exit(0);
  }
  oil_class_optimize (klass);

  for (n = 0; n < 200; n+=1) {
    printf("%d", n);

    test = oil_test_new(klass);
    oil_test_set_iterations(test, 10);
    test->n = n;
    test->m = 10;

    impl = klass->reference_impl;
    ave = impl->profile_ave;
    std = impl->profile_std;
    oil_test_check_impl (test, impl);

    for (impl = klass->first_impl; impl; impl = impl->next) {
      if (oil_impl_is_usable (impl)) {
        oil_test_check_impl (test, impl);
        //printf(" %g %g", test->profile_ave, test->profile_std);
        printf(" %g", test->profile_ave);
      }
    }
    printf("\n");
  }

  return 0;
}
Ejemplo n.º 2
0
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;
}