/* tests, xc,oc and nc */
#include <stdio.h>
#include "test.h"

#define OC_INSN(len,args) ".insn sse,0xd6" len "00000000," args
#define NC_INSN(len,args) ".insn sse,0xd4" len "00000000," args
#define XC_INSN(len,args) ".insn sse,0xd7" len "00000000," args

void test_oc(void)
{
	char buf1[20] = "UUUUU*UUU****U*\0\0\0\0\n";
	char buf2[20] = "*U\0*\0\0UU*\0U*AUAA*UU\n";
	char zero[2] = "\0\0";

	printf("\nOC:\n");
	asm volatile (OC_INSN("00","%0,%0") : "+Q"(*zero) : : "cc");
	printf("CC:%d\n", get_cc());
	dump_field(zero, 2);

	asm volatile (OC_INSN("12","%0,%1") : "=Q"(*buf1) : "Q"(*buf2) : "cc");
	printf("CC:%d\n", get_cc());
	dump_field(buf1, 20);
}

void test_nc(void)
{
	char buf1[20] = "UUUUU*UUU****U*\0\0\0\0\n";
	char buf2[20] = "*U\0*\0\0UU*\0U*AUAA*UU\n";
	char zero[2] = "\0\0";

	printf("\nNC:\n");
	asm volatile (NC_INSN("01","%0,%0") : "+Q"(*zero) : : "cc");
	printf("CC:%d\n", get_cc());
	dump_field(zero, 2);

	asm volatile (NC_INSN("13","%0,%1") : "=Q"(*buf1) : "Q"(*buf2) : "cc");
	printf("CC:%d\n", get_cc());
	dump_field(buf1, 20);
}


void test_xc(void)
{
	char buf1[20] = "UUUUU*UUU****U*\0\0\0\0\n";
	char buf2[20] = "*U\0*\0\0UU*\0U*AUAA*UU\n";
	char buf3[20] = "0123456789abcdefghij";
	char zero[300] =
	    "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
	    "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
	    "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
	    "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
	    "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
	    "aaaaa";

	printf("\nXC:\n");
	asm volatile (XC_INSN("00","%0,%0") : "+Q"(*zero) : : "cc");
	printf("CC:%d\n", get_cc());
	dump_field(zero, 4);

	asm volatile (XC_INSN("09","%0,%0") : "+Q"(*zero) : : "cc");
	printf("CC:%d\n", get_cc());
	dump_field(zero, 12);

	asm volatile (XC_INSN("63","%0,%0") : "+Q"(*zero) : : "cc");
	printf("CC:%d\n", get_cc());
	dump_field(zero, 102);

	asm volatile (XC_INSN("ff","%0,%0") : "+Q"(*zero) : : "cc");
	printf("CC:%d\n", get_cc());
	dump_field(zero, 257);

	asm volatile ("lghi 1,256 + 20\n"
		      "larl 2,1f\n"
		      "ex 1,0(2)\n"
		      "j 2f\n"
		      "1: xc 260(1,%0),260(%0)\n"
		      "2:\n"::"a" (zero), "a"(zero):"cc","memory", "1", "2");
	printf("CC:%d\n", get_cc());
	dump_field(zero + 260, 30);

	asm volatile ("xc 0(19,%0),0(%1)\n"::"a" (buf1),
		      "a"(buf2):"cc","memory");
	printf("CC:%d\n", get_cc());
	dump_field(buf1, 20);
	asm volatile ("xc 0(10,%0),0(%0)\n"::"a" (buf3):"cc","memory");

	printf("CC:%d\n", get_cc());
	dump_field(buf3, 20);
	return;
}

int main()
{
	test_oc();
	test_nc();
	test_xc();
	return 0;
}