testsuite/perf_opcodes_sys_compare.c

   1
   2 #include "config.h"
   3
   4 #include <stdio.h>
   5
   6 #include <orc/orc.h>
   7 #include <orc-test/orctest.h>
   8
   9
  10 int error = FALSE;
  11
  12 void test_opcode_src (OrcStaticOpcode *opcode);
  13
  14 int
  15 main (int argc, char *argv[])
  16 {
  17   int i;
  18   OrcOpcodeSet *opcode_set;
  19
  20   orc_test_init();
  21   orc_init();
  22
  23   opcode_set = orc_opcode_set_get ("sys");
  24
  25   for(i=0;i<opcode_set->n_opcodes;i++){
  26     //printf("opcode_%-20s ", opcode_set->opcodes[i].name);
  27     test_opcode_src (opcode_set->opcodes + i);
  28   }
  29
  30   if (error) return 1;
  31   return 0;
  32 }
  33
  34 void
  35 test_opcode_src (OrcStaticOpcode *opcode)
  36 {
  37   OrcProgram *p;
  38   char s[40];
  39   int flags = 0;
  40   double perf_mmx, perf_sse;
  41
  42   p = orc_program_new ();
  43   if (opcode->flags & ORC_STATIC_OPCODE_ACCUMULATOR) {
  44     orc_program_add_accumulator (p, opcode->dest_size[0], "d1");
  45   } else {
  46     orc_program_add_destination (p, opcode->dest_size[0], "d1");
  47   }
  48   if (opcode->dest_size[1] != 0) {
  49     orc_program_add_destination (p, opcode->dest_size[1], "d2");
  50   }
  51   orc_program_add_source (p, opcode->src_size[0], "s1");
  52   if (opcode->src_size[1] != 0) {
  53     if (opcode->flags & ORC_STATIC_OPCODE_SCALAR) {
  54       orc_program_add_constant (p, opcode->src_size[1], 1, "s2");
  55     } else {
  56       orc_program_add_source (p, opcode->src_size[1], "s2");
  57     }
  58   }
  59
  60   if ((opcode->flags & ORC_STATIC_OPCODE_FLOAT_SRC) ||
  61       (opcode->flags & ORC_STATIC_OPCODE_FLOAT_DEST)) {
  62     flags = ORC_TEST_FLAGS_FLOAT;
  63   }
  64
  65   sprintf(s, "test_s_%s ", opcode->name);
  66   orc_program_set_name (p, s);
  67
  68   if (opcode->dest_size[1] != 0) {
  69     orc_program_append_dds_str (p, opcode->name, "d1", "d2", "s1");
  70   } else {
  71     orc_program_append_str (p, opcode->name, "d1", "s1", "s2");
  72   }
  73
  74   perf_mmx = orc_test_performance_full (p, flags, "mmx");
  75   perf_sse = orc_test_performance_full (p, flags, "sse");
  76
  77   printf("%g %g\n", perf_mmx, perf_sse);
  78
  79   orc_program_free (p);
  80 }
  81