#include<stdio.h>
#include<stdlib.h>
#include<string.h>

void byteprinter(unsigned short val, char* lbl)
{
    unsigned short mask = 0;
    mask |= 1; // equivalent to mask = 1; 
    printf(lbl);
    for (int i=((8*sizeof(short))-1); i>=0; i--)
    {
	putchar(((val >> i) & mask) ? '1' : '0');
    }
    putchar('\n');
}

void and2(unsigned short aa, unsigned short bb)
{
    printf("Bitwise and\n");
    unsigned short cc = aa;
    cc &= bb;
    byteprinter(aa, "aa");
    byteprinter(bb, "bb");
    byteprinter(cc, "cc");
    printf("cc %d\n\n", cc);
}


void andd(unsigned short aa, unsigned short bb)
{
    printf("Bitwise and\n");
    unsigned short cc = aa & bb;
    byteprinter(aa, "aa");
    byteprinter(bb, "bb");
    byteprinter(cc, "cc");
    printf("cc %d\n\n", cc);
}

void orrr(unsigned short aa, unsigned short bb)
{
    printf("Bitwise or\n");
    unsigned short cc = aa | bb;
    byteprinter(aa, "aa");
    byteprinter(bb, "bb");
    byteprinter(cc, "cc");
    printf("cc %d\n\n", cc);
}

void xorr(unsigned short aa, unsigned short bb)
{
    printf("Bitwise XOR\n");
    unsigned short cc = aa ^ bb;
    byteprinter(aa, "aa");
    byteprinter(bb, "bb");
    byteprinter(cc, "cc");
    printf("cc %d\n\n", cc);
}

void orr2(unsigned short aa, unsigned short bb, int shft)
{
    printf("Bitwise or with bb shifted by %d\n", shft);
    unsigned short cc = aa;
    cc |= bb << shft;   // like +=   &= and ^= exists as well
    byteprinter(bb, "bb");    
    printf("\n");
    byteprinter(aa, "aa");
    byteprinter(bb<<shft, "bs");
    byteprinter(cc, "cc");
    printf("cc %d\n\n", cc);
}

void comp(unsigned short aa)
{
    printf("Bitwise complement\n");
    unsigned short cc = ~aa;
    byteprinter(aa, "aa");
    byteprinter(cc, "cc");
    printf("cc %d\n\n", cc);
}


void shft(unsigned short aa, int shft)
{
    printf("Bitwise shift by %d\n", shft);
    unsigned short cc = shft>0 ? aa << shft : aa >> -shft;
    byteprinter(aa, "aa");
    byteprinter(cc, "cc");
    printf("cc %d\n\n", cc);
}

void mask(unsigned short shift, unsigned short mask, unsigned short aa)
{
    printf("Masking\n");
    unsigned short cc = aa & (mask<<shift);
    byteprinter(aa, "start");
    byteprinter((mask<<shift), "mask ");
    byteprinter(cc, "rslt ");
    printf("take action? %s\n\n", cc?"YES":"NO");
}

void cyclic(unsigned short aa, unsigned short rightshift)
{
    printf("Cyclic \n");
    int leftshift = 8*sizeof(short)-rightshift;
    unsigned short cc = (aa << leftshift) | (aa >> rightshift);
    byteprinter(aa, "num1");
    byteprinter(cc, "rslt ");
    printf("cc %d\n\n", cc);
}

int binaryfromstring(char* desc)
{
    printf(desc);
    char a[256];
    fgets(a, 255, stdin);
    int rtn = 0;
    for (int i=0; i<strlen(a)-1; i++)
    {
	rtn = rtn<<1;
	if (a[i]=='1')
	    rtn|=1;
    }
    return rtn;
}


int getnum(char* desc)
{
    printf(desc);
    char a[256];
    fgets(a, 255, stdin);
    return atoi(a);
}

int main()
{
    while (1)
    {
	printf("1. AND\n");
	printf("10. AND (again)\n");
	printf("11. Masking\n");
	printf("2. OR\n");
	printf("20. OR with shift\n");
	printf("3. XOR\n");
	printf("4. Shift\n");
	printf("5. Complement\n");
	printf("6. Cycle\n");
	printf("8. binary from string\n");
	int tt = getnum("operation:");
	switch (tt)
	{
	case 1:
	    andd(getnum("num 1:"), getnum("num 2:"));
	    break;
	case 10:
	    and2(getnum("num 1:"), getnum("num 2:"));
	    break;
	case 11:
	    mask(getnum("shift:"), getnum("mask(1,3,7):"), getnum("num:"));
	    break;
	case 2:
	    orrr(getnum("num 1:"), getnum("num 2:"));
	    break;
	case 20:
	    orr2(getnum("num 1:"), getnum("num 2:"), getnum("shift"));
	    break;
	case 3:
	    xorr(getnum("num 1:"), getnum("num 2:"));
	    break;
	case 4:
	    shft(getnum("num 1:"), getnum("shift:"));
	    break;
	case 5:
	    comp(getnum("num 1:"));
	    break;
	case 6:
	    cyclic(getnum("num:"), getnum("shift right:"));
	    break;
	case 8:
	{
	    short r = binaryfromstring("binary string");
	    byteprinter(r, "bits");
	    printf("r = %d\n", r);
	}
	    break;
	default:
	    return 0;
	    break;
	}
    }	
}