/*
|
/*
|
* mkshtest.c -- generate shift test program
|
* mkshtest.c -- generate shift test program
|
*/
|
*/
|
|
|
|
|
#include <stdio.h>
|
#include <stdio.h>
|
#include <stdlib.h>
|
#include <stdlib.h>
|
#include <string.h>
|
#include <string.h>
|
|
|
|
|
#define N0 ((unsigned) 0x48E6F0B2)
|
#define N0 ((unsigned) 0x48E6F0B2)
|
#define N1 ((unsigned) 0xC8E6F0B3)
|
#define N1 ((unsigned) 0xC8E6F0B3)
|
|
|
|
|
int chooseReg(void) {
|
int chooseReg(void) {
|
int r;
|
int r;
|
|
|
r = (rand() >> 8) % 16;
|
r = (rand() >> 8) % 16;
|
return r + 8;
|
return r + 8;
|
}
|
}
|
|
|
|
|
void chooseRegs(int *r1, int *r2, int *r3, int *r4) {
|
void chooseRegs(int *r1, int *r2, int *r3, int *r4) {
|
*r1 = chooseReg();
|
*r1 = chooseReg();
|
do {
|
do {
|
*r2 = chooseReg();
|
*r2 = chooseReg();
|
} while (*r2 == *r1);
|
} while (*r2 == *r1);
|
do {
|
do {
|
*r3 = chooseReg();
|
*r3 = chooseReg();
|
} while (*r3 == *r2 || *r3 == *r1);
|
} while (*r3 == *r2 || *r3 == *r1);
|
do {
|
do {
|
*r4 = chooseReg();
|
*r4 = chooseReg();
|
} while (*r4 == *r3 || *r4 == *r2 || *r4 == *r1);
|
} while (*r4 == *r3 || *r4 == *r2 || *r4 == *r1);
|
}
|
}
|
|
|
|
|
int newLabel(void) {
|
int newLabel(void) {
|
static int lbl = 1000;
|
static int lbl = 1000;
|
return lbl++;
|
return lbl++;
|
}
|
}
|
|
|
|
|
unsigned sar(unsigned n, int shamt) {
|
unsigned sar(unsigned n, int shamt) {
|
unsigned mask;
|
unsigned mask;
|
|
|
mask = (n & 0x80000000) ? ~((unsigned) 0xFFFFFFFF >> shamt) : 0x00000000;
|
mask = (n & 0x80000000) ? ~((unsigned) 0xFFFFFFFF >> shamt) : 0x00000000;
|
return mask | (n >> shamt);
|
return mask | (n >> shamt);
|
}
|
}
|
|
|
|
|
int main(void) {
|
int main(void) {
|
int shamt;
|
int shamt;
|
int src;
|
int src;
|
int sha;
|
int sha;
|
int dst;
|
int dst;
|
int ref;
|
int ref;
|
int lbl;
|
int lbl;
|
|
|
printf("\tadd\t$7,$0,'.'\n");
|
printf("\tadd\t$7,$0,'.'\n");
|
for (shamt = 0; shamt < 32; shamt++) {
|
for (shamt = 0; shamt < 32; shamt++) {
|
/* sll, N0 */
|
/* sll, N0 */
|
printf("\t; sll, n0\n");
|
printf("\t; sll, n0\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tsll\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tsll\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N0 << shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N0 << shamt);
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
/* slli, N0 */
|
/* slli, N0 */
|
printf("\t; slli, n0\n");
|
printf("\t; slli, n0\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tsll\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tsll\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N0 << shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N0 << shamt);
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
/* sll, N1 */
|
/* sll, N1 */
|
printf("\t; sll, n1\n");
|
printf("\t; sll, n1\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tsll\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tsll\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N1 << shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N1 << shamt);
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
/* slli, N1 */
|
/* slli, N1 */
|
printf("\t; slli, n1\n");
|
printf("\t; slli, n1\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tsll\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tsll\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N1 << shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N1 << shamt);
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
|
|
/* slr, N0 */
|
/* slr, N0 */
|
printf("\t; slr, n0\n");
|
printf("\t; slr, n0\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tslr\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tslr\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N0 >> shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N0 >> shamt);
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
/* slri, N0 */
|
/* slri, N0 */
|
printf("\t; slri, n0\n");
|
printf("\t; slri, n0\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tslr\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tslr\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N0 >> shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N0 >> shamt);
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
/* slr, N1 */
|
/* slr, N1 */
|
printf("\t; slr, n1\n");
|
printf("\t; slr, n1\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tslr\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tslr\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N1 >> shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N1 >> shamt);
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
/* slri, N1 */
|
/* slri, N1 */
|
printf("\t; slri, n1\n");
|
printf("\t; slri, n1\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tslr\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tslr\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N1 >> shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, N1 >> shamt);
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
|
|
/* sar, N0 */
|
/* sar, N0 */
|
printf("\t; sar, n0\n");
|
printf("\t; sar, n0\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tsar\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tsar\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, sar(N0, shamt));
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, sar(N0, shamt));
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
/* sari, N0 */
|
/* sari, N0 */
|
printf("\t; sari, n0\n");
|
printf("\t; sari, n0\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N0);
|
printf("\tsar\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tsar\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, sar(N0, shamt));
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, sar(N0, shamt));
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
/* sar, N1 */
|
/* sar, N1 */
|
printf("\t; sar, n1\n");
|
printf("\t; sar, n1\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tadd\t$%d,$0,%d\n", sha, shamt);
|
printf("\tsar\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tsar\t$%d,$%d,$%d\n", dst, src, sha);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, sar(N1, shamt));
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, sar(N1, shamt));
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
/* sari, N1 */
|
/* sari, N1 */
|
printf("\t; sari, n1\n");
|
printf("\t; sari, n1\n");
|
chooseRegs(&src, &sha, &dst, &ref);
|
chooseRegs(&src, &sha, &dst, &ref);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tadd\t$%d,$0,0x%08X\n", src, N1);
|
printf("\tsar\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tsar\t$%d,$%d,%d\n", dst, src, shamt);
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, sar(N1, shamt));
|
printf("\tadd\t$%d,$0,0x%08X\n", ref, sar(N1, shamt));
|
lbl = newLabel();
|
lbl = newLabel();
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tbeq\t$%d,$%d,L%d\n", dst, ref, lbl);
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("\tadd\t$7,$0,'?'\n");
|
printf("L%d:\n", lbl);
|
printf("L%d:\n", lbl);
|
}
|
}
|
printf("out:\n");
|
printf("out:\n");
|
printf("\tadd\t$6,$0,0xF0300000\n");
|
printf("\tadd\t$6,$0,0xF0300000\n");
|
printf("out1:\n");
|
printf("out1:\n");
|
printf("\tldw\t$5,$6,8\n");
|
printf("\tldw\t$5,$6,8\n");
|
printf("\tand\t$5,$5,1\n");
|
printf("\tand\t$5,$5,1\n");
|
printf("\tbeq\t$5,$0,out1\n");
|
printf("\tbeq\t$5,$0,out1\n");
|
printf("\tstw\t$7,$6,12\n");
|
printf("\tstw\t$7,$6,12\n");
|
printf("halt:\n");
|
printf("halt:\n");
|
printf("\tj\thalt\n");
|
printf("\tj\thalt\n");
|
return 0;
|
return 0;
|
}
|
}
|
|
|