Subversion Repositories test_project

/* ADDED BY ME */
#define OR1K 1
 
/* Test l.mul, l.mac and l.macrc instructions */
#include "support.h"
 
#define T1 0xa6312f33
#define T2 0x0d4de375
#define T3 0x61ab48dc
 
#ifndef __or32__
 
#include <stdlib.h>
#define LONGEST long long
 
 
LONGEST acc = 0;
#define MAC(x,y) {\
  printf ("[%08x,%08x]\t", (unsigned long)(x), (unsigned long)(y));\
  acc += (LONGEST)(x) * (LONGEST)(y);\
  printf ("(%08x,%08x)\n", (unsigned long)(acc >> 32), (unsigned long)(acc & 0xffffffff));\
}
#define MACRC    (macrc())
static inline long macrc() {
  long result = acc >> 28;
  printf ("<%08x>\n", (unsigned long)result);
  acc = 0;
  return result;
}
#else /* OR1K */
 
#define MAC(x,y) asm volatile ("l.mac\t%0,%1" : : "r" (x), "r" (y))
#define MACRC macrc()
static inline long macrc() {
  long x;
  asm volatile ("l.macrc\t%0" : "=r" (x));
  return x;
}
 
#endif /* SIM */
 
// Define dummpy or32 trap vectors
void buserr_except(){}
void dpf_except(){}
void ipf_except(){}
void lpint_except(){}
void align_except(){}
void illegal_except(){}
void hpint_except(){}
void dtlbmiss_except(){}
void itlbmiss_except(){}
void range_except(){}
void syscall_except(){}
void res1_except(){}
void trap_except(){}
void res2_except(){}
 
 
long test_mul (long a, long b) {
  long t;
  int i;
  for (i = 0; i < 100; i++) {
    t = a * b;
    t += 153;
    a = t - a * 17;
    b = t + b * 13333;    
 
    /*printf ("(%08x,%08x)", a, b);*/
  }
  return a;
}
 
long test_mac (long a, long b) {
  long t = 1234567;
  int i;
  for (i = 0; i < 100; i++) {
    MAC (a, b);
    if (i & 3) {
      a = t - a;
      b = t + a;
    } else {
      a = MACRC;
      report(a);
    }
    MAC (a, 3);
    MAC (a, 5);
    MAC (a, 7);
    //printf ("(%08x,%08x)", a, b);
  }
  return a;
}
 
long test_mul_mac (long a, long b) {
  long t = 1;
  int i;
  for (i = 0; i < 100; i++) {
    a = a * 119;
    MAC (a, b);
    MAC (b, 423490431);
    MAC (b, 113);
    MAC (a, 997);
    b = 87 * a * t;
    if (i & 3) {
      t = a * b;
      a = t - a;
      b = t + a;
    } else {
      a = MACRC;
    }
 //   printf ("(%08x,%08x)", a, b);
  }  
  return a;
}
 
int main () {
  unsigned t1;
  unsigned t2;
  unsigned t3;
/*
  report (MACRC);
  MAC ((unsigned long)888888887, (unsigned long)0x87654321);
  report (MACRC);
  MAC ((unsigned long)888888887, (unsigned long)0x87654321);
  MAC ((unsigned long)888888887, (unsigned long)0x87654321);
  report (MACRC);
  or32_exit(0);
*/
  printf ("%8x\n", MACRC);
  t1 = test_mul (888888887, 0x87654321);    
  //t2 = test_mac (888888887, 0x87654321);    
  //t3 = test_mul_mac (888888887, 0x87654321);
  printf ("%08x, expected %08x\n", t1, T1);
  //printf ("%08x, expected %08x\n", t2, T2);
  //printf ("%08x, expected %08x\n", t3, T3);
  report (t1 /*^ t2 ^ t3*/ ^ T1 /* ^ T2 ^ T3*/ ^ 0xdeaddead);
  if (t1 != T1 /* || t2 != T2 || t3 != T3*/) {
    printf ("Test failed!\n");
    if (t1 != T1) or32_exit (1);
    //if (t2 != T2) or32_exit (2);
    //if (t3 != T3) or32_exit (3);
  } else {
    printf ("Test succesful.\n");
    or32_exit (0);
  }
  or32_exit (0);
}