File:  [Research Unix] / researchv10no / dk / cmd / pop.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:21:35 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv10, HEAD
researchv10 Norman

#include <sgtty.h>

main()
{
	int fd, x;

	fd = open("/dev/dk/dk01", 2);
	if(fd < 0){
		perror("dk01");
		exit(1);
	}
	printf("dk01 opened %d\n", fd);
	while((x = ioctl(fd, FIOLOOKLD, 0)) != -1){
		printf("popping %d\n", x);
		if(ioctl(fd, FIOPOPLD, 0) < 0){
			perror("pop");
			exit(1);
		}
	}
	printf("done\n");
	exit(0);
}

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.