From: utzoo!decvax!harpo!floyd!cmcl2!philabs!sdcsvax!vicki Newsgroups: net.sources Title: unmore.c Article-I.D.: sdcsvax.74 Posted: Sat Jan 22 09:57:32 1983 Received: Thu Jan 27 21:19:31 1983 Are you tired of editing those net.sources programs that have been more'd together so you can play with them. Well then have I got a program for you. -------------------------------- /* ** unmore.c -- January 20, 1982. ** by Robert M. Rother & Vicki L. Hutchison ** UUCP: ucbvax!sdcsvax!vicki or robert ** UUCP: philabs!sdcsvax!vicki or robert ** */ #includechar row[] = "::::::::::::::\n"; char line[255]; char fname[80]; FILE *fid, *in; main(argc, argv) int argc; char *argv[]; { if (argc == 2) { if ((in = fopen(argv[1], "r")) == NULL) { fprintf(stderr,"Error opening file %s\n", argv[1]); exit(-1); } } else in = stdin; while (!(feof(in))) { fgets(line, 255, in); if (!strcmp(line, row)) break; } while (!(feof(in))) { if (!strcmp(line, row)) { if (!(feof(in))) fgets(fname, 80, in); else { fprintf(stderr,"*** Error ***\n"); exit(-1); } if (!(feof(in))) fgets(line, 255, in); else { fprintf(stderr,"*** Error ***\n"); exit(-1); } if (strcmp(line, row)) { fprintf(stderr,"*** Error ***\n"); exit(-1); } fname[strlen(fname) - 1] = NULL; fid = fopen(fname,"w"); printf("Opening file %s\n", fname); fgets(line,255,in); if (!(feof(in))) do { if (!strcmp(line, row)) break; else fputs(line, fid); fgets(line,255,in); } while(!(feof(in))); fclose(fid); } } }