PDP11/txt2cbn.c

#include <stdio.h>

#define	ERROR	00404
#include "pdp11_cr_dat.h"

static int	colStart = 1;		/* starting column */
static int	colEnd = 80;		/* ending column */

main ()
{
	int	col, c;

	while (1) {
		for (col = colStart; col <= colEnd; ) {
			switch (c = fgetc (stdin)) {
			case EOF:
				/* fall through */
			case '\n':
				while (col <= colEnd) {
					fputc (o29_code[' '] & 077, stdout);
					fputc ((o29_code[' '] >> 6) & 077, stdout);
					col++;
				}
				break;
			case '\t':
				do {
					fputc (o29_code[' '] & 077, stdout);
					fputc ((o29_code[' '] >> 6) & 077, stdout);
					col++;
				} while (((col & 07) != 1) && (col <= colEnd));
				break;
			default:
				fputc (o29_code[c] & 077, stdout);
				fputc ((o29_code[c] >> 6) & 077, stdout);
				col++;
				break;
			}
		}
		/* flush long lines, or flag over-length card */
		if (c != '\n' && c != EOF) {
			printf ("overlength line\n");
			do c = fgetc (stdin);
			    while ((c != EOF) && (c != '\n'));
		}
		if (c == EOF)
			break;
	}
	exit (1);
}