Commit | Line | Data |
---|---|---|
161423a6 RE |
1 | /* |
2 | * Copyright (c) 1980 Regents of the University of California. | |
3 | * All rights reserved. The Berkeley software License Agreement | |
4 | * specifies the terms and conditions for redistribution. | |
5 | */ | |
6 | ||
936bfa00 DL |
7 | /* |
8 | * mkindx.c - utility to format a nice index to source files, etc. | |
9 | * | |
10 | * usage: mkindx "title string" [file_name] [filename] ..... | |
11 | */ | |
12 | ||
13 | # include <stdio.h> | |
14 | ||
161423a6 | 15 | char id_mkindx[] = "@(#)mkindx.c 5.1 %G%"; |
936bfa00 DL |
16 | |
17 | char list[10000] = "pwd >>index; echo \" \" >>index; ls -l "; | |
18 | char *apndx = ">>index"; | |
19 | char *cp = list; | |
20 | extern char *ctime(); | |
21 | FILE *fopen(), *index; | |
22 | ||
23 | main (argc, argv) | |
24 | char **argv; | |
25 | { | |
26 | short i; | |
27 | long time(), t; | |
28 | ||
29 | if (index = fopen ("index", "w")) | |
30 | { | |
31 | fprintf (index, "\n\n\n\n\n\n\n\n\n"); | |
32 | center (argv[1]); /* center title on page */ | |
33 | t = time(0); | |
34 | center (ctime(&t)); /* center date & time */ | |
35 | fprintf (index, "\n"); | |
36 | fclose (index); | |
37 | while (*cp) cp++; /* find end of shell command */ | |
38 | for (i = 2; i < argc; i++) | |
39 | { | |
40 | while (*argv[i]) *cp++ = *(argv[i]++); | |
41 | *cp++ = ' '; | |
42 | } | |
43 | while (*apndx) *cp++ = *apndx++; | |
44 | *cp = '\0'; | |
45 | system (list); | |
46 | } | |
47 | else fprintf (stderr, "mkindx: can't open index\n"); | |
48 | } | |
49 | ||
50 | center (string) | |
51 | char *string; | |
52 | { | |
53 | short pad; | |
54 | ||
55 | pad = (72 - strlen(string)) >> 1; | |
56 | while (pad-- > 0) fputc(' ', index); | |
57 | fprintf (index, "%s\n", string); | |
58 | } |