[unix-history] / usr / src / cmd / lisp / fixmask.c

static char *sccsid = "@(#)fixmask.c	34.1 10/3/80";

#include <stdio.h>
char mybuf[BUFSIZ];
extern unsigned short mask[];
main(){
	register savesize = 0; char *cp;
	while(fgets(mybuf,BUFSIZ,stdin)!=NULL) {
		if(*mybuf=='#') {
			if(strcmpn(mybuf,"#save	",6)==0){
				savesize = mybuf[6]-'0';
			} else if (strcmpn(mybuf,"#protect	",9)==0){
				savesize = '0'-1-mybuf[9];
			}
		}
		if(savesize && strcmpn(mybuf,"	.set	L",7)==0) {
			for(cp=mybuf;*cp++!=',';);
			sprintf(cp,"0x%X\n",mask[savesize + 10]);
			savesize = 0;
		}
		fputs(mybuf,stdout);
	}
}
unsigned short mask[] = {
	0,0,0,0xfc0,0xfc0,0xfc0,0xec0,0xcc0,0x8c0,0x0c0,0,
	0x800,0xc00,0xe00,0xf00,0xf80,0xfc0,0,0,0,0};
Commit	Line	Data
31cef89c BJ	1	static char *sccsid = "@(#)fixmask.c 34.1 10/3/80";
31cef89c BJ	2
5136bfb4 JF	3	#include <stdio.h>
	4	char mybuf[BUFSIZ];
	5	extern unsigned short mask[];
	6	main(){
	7	register savesize = 0; char *cp;
	8	while(fgets(mybuf,BUFSIZ,stdin)!=NULL) {
	9	if(*mybuf=='#') {
	10	if(strcmpn(mybuf,"#save ",6)==0){
	11	savesize = mybuf[6]-'0';
	12	} else if (strcmpn(mybuf,"#protect ",9)==0){
	13	savesize = '0'-1-mybuf[9];
	14	}
	15	}
31cef89c	16	if(savesize && strcmpn(mybuf," .set L",7)==0) {
5136bfb4 JF	17	for(cp=mybuf;*cp++!=',';);
	18	sprintf(cp,"0x%X\n",mask[savesize + 10]);
	19	savesize = 0;
	20	}
	21	fputs(mybuf,stdout);
	22	}
	23	}
	24	unsigned short mask[] = {
	25	0,0,0,0xfc0,0xfc0,0xfc0,0xec0,0xcc0,0x8c0,0x0c0,0,
	26	0x800,0xc00,0xe00,0xf00,0xf80,0xfc0,0,0,0,0};