/*
  !!DESCRIPTION!! Shift bytes left and right by a constant.
  !!ORIGIN!!      SDCC regression tests
  !!LICENCE!!     GPL, read COPYING.GPL
*/

#include <stdio.h>
#include <limits.h>

unsigned char success=0;
unsigned char failures=0;
unsigned char dummy=0;

#ifdef SUPPORT_BIT_TYPES
bit bit0 = 0;
#endif
unsigned int aint0 = 0;
unsigned int aint1 = 0;
unsigned char achar0 = 0;
unsigned char achar1 = 0;
unsigned char achar2 = 0;

void done()
{
  dummy++;
}

void check(void)
{
  if(achar0 != achar1)
    failures++;
}

void shift_left_1(void)
{
  achar0 <<= 1;

  check();
}

void shift_left_2(void)
{
  achar0 <<= 2;

  if(achar0 != achar1)
    failures++;
}

void shift_left_3(void)
{
  achar0 <<= 3;

  if(achar0 != achar1)
    failures++;
}

void shift_left_4(void)
{
  achar0 <<= 4;

  if(achar0 != achar1)
    failures++;
}

void shift_left_5(void)
{
  achar0 <<= 5;

  if(achar0 != achar1)
    failures++;
}

void shift_left_6(void)
{
  achar0 <<= 6;

  if(achar0 != achar1)
    failures++;
}

void shift_left_7(void)
{
  achar0 <<= 7;

  if(achar0 != achar1)
    failures++;
}

void shift_right_1(void)
{
  achar0 >>= 1;

  check();
}

void shift_right_2(void)
{
  achar0 >>= 2;

  check();
}

void shift_right_3(void)
{
  achar0 >>= 3;

  check();
}

void shift_right_4(void)
{
  achar0 >>= 4;

  check();
}

void shift_right_5(void)
{
  achar0 >>= 5;

  check();
}

void shift_right_6(void)
{
  achar0 >>= 6;

  check();
}

void shift_right_7(void)
{
  achar0 >>= 7;

  check();
}

int main(void)
{
  /* call with both values zero */
  shift_left_1();

  achar0 = 1;
  achar1 = 2;
  for(achar2=0; achar2<6; achar2++) {
    shift_left_1();
    achar1 <<=1;
  }

  achar0 = 1;
  achar1 = 4;
  shift_left_2();

  achar0 = 1;
  achar1 = 8;
  shift_left_3();

  achar0 = 1;
  achar1 = 0x10;
  shift_left_4();

  achar0 = 1;
  achar1 = 0x20;
  shift_left_5();

  achar0 = 1;
  achar1 = 0x40;
  shift_left_6();

  achar0 = 1;
  achar1 = 0x80;
  shift_left_7();

  achar0 = 2;
  achar1 = 1;
  shift_right_1();

  achar0 = 4;
  shift_right_2();

  achar0 = 8;
  shift_right_3();

  achar0 = 0x10;
  shift_right_4();

  achar0 = 0x20;
  shift_right_5();

  achar0 = 0x40;
  shift_right_6();

  achar0 = 0x80;
  shift_right_7();

  success=failures;
  done();
  printf("failures: %d\n",failures);

  return failures;
}