michaelk@copper.TEK.COM (Michael D. Kersenbrock) (06/01/88)
NOTE: Yes, this technically is a source listing, but it is REAL short to
be counted as just a "letter".
The file SIMCPM.IDX which has a CP/M filelist (with descriptions) is in a
DBASE-II format of some sort. Having a copy of the file, but NOT having
dbase results in a problem.
The real-short routine below was a 10-minute hack-job that converts that
format into a more-or-less nice readable format suitable for grepping.
Just thought I'd save y'all the ten minutes I spent....:-)
-----------------cut here--------------
/*
* Filters SIMCPM.IDX into "nice text".
*
* A quickie-hack by: Michael D. Kersenbrock
* Aloha, Oregon
* Version 1.0 5/31/88
*/
#include <stdio.h>
char Line[500],Drive[100],Directory[100], Name[100];
char Description[100],Word2[100],Date[100];
int Version,Size,Type;
main() {
register char *ptr,*p2;
while (gets(Line) != NULL) {
for (ptr = Line ; *ptr != '\0' ; ptr++) {
if (*ptr == '"' || *ptr == ',') *ptr = ' ';
}
sscanf(Line,"%s %s %s %d %d %d %s %s %s",
Drive,Directory,Name,&Version,&Size,&Type,Date,
Description,Word2);
strcat(Description, " ");
strcat(Description, Word2);
for (ptr = Line ; *ptr != '\0' ; ptr++) {
if (strncmp(ptr,Description,strlen(Description)) == 0) {
strcpy(Description,ptr);
break;
}
}
printf("%s%11s %12s %d %3dK ",
Drive,Directory,Name,Version,(Size + 512)/1024);
putchar(Date[2]);
putchar(Date[3]);
putchar('-');
putchar(Date[0]);
putchar(Date[1]);
printf(" %s\n",Description);
}
}
--
Mike Kersenbrock
Tektronix Microcomputer Development Products
Aloha, Oregon