/*
**	io - binary i/o routines for verification programs
**	written by Joseph B. Evans, 7/25/88
*/
#include <stdio.h>
#include <math.h>
#include "binary.h"

print_binary(x,bits)
int x,bits;
{
	extern int masks[];
	int i;

	for (i=0;i<bits;i++) {
		if ((masks[bits-1]&x) != 0)
			printf("1");
		else
			printf("0");
		x = x<<1;
	}
}

scan_binary(x,bits)
int *x,*bits;
{
	extern int masks[];
	int y,c,k = 0;
	char sf = 0;

	*x = 0;
	while((c = getchar()) != '\n') {
		if (c == ZERO)
			y = (sf == 0)?(0):(1);
		else if ((c == ONE)&&(k != 0))
			y = (sf == 0)?(1):(0);
		else if ((c == ONE)&&(k == 0)) {
			sf = 1;
			y = 0;
		} else
			printf("input error\n");
		*x = ((*x)<<1) + y;
		k++;
	}
	*x = (sf == 1)?(-(*x)-1):(*x);
	*bits = k;
}