Annotation of OpenXM/misc/packages/FreeBSD/openxm-ports/openxm-1.1.2/files/gen-plist.c, Revision 1.4
1.4 ! takayama 1: /* $OpenXM: OpenXM/misc/packages/FreeBSD/openxm-ports/openxm-1.1.2/files/gen-plist.c,v 1.3 2000/03/04 11:03:36 takayama Exp $ */
1.1 takayama 2: #include <stdio.h>
3: #include <sys/types.h>
4: #include <sys/stat.h>
5: #include <unistd.h>
6: /* References are
7: /usr/src/bin/ls/print.c readlink
8: /usr/port/japanese/dvipsk-vflib/pkg/PLIST
9:
10: */
11:
12:
13: main() {
14: char s[512];
15: char s0[512];
16: char lnk[1024];
17: int i;
18: int n;
19: int flag = 0;
20: struct stat sb;
21: int p;
22:
1.2 takayama 23: /* Initial data */
24: printf("bin/asir\n");
25: printf("bin/sm1\n");
26: printf("bin/oxMathematica\n");
27: printf("bin/oxmath\n");
28: printf("bin/ox\n");
1.3 takayama 29: printf("bin/oxgp\n");
30: printf("bin/openxm\n");
1.2 takayama 31:
1.1 takayama 32: while (fgets(s0,512,stdin) != NULL) {
33: n = strlen(s0);
34: if (n <= 1) goto LLL;
35: if (s0[n-1] == '\n') s0[n-1] = '\0';
36: if (s0[0] == '.' && s0[1] == '/' && s0[2] == '.') goto LLL;
37: if (s0[0] == '.' && s0[1] == '/' ) {
38: strcpy(s,&(s0[2]));
39: }else{
40: strcpy(s,s0);
41: }
42: n = strlen(s);
43: flag = 0;
44: if (n == 0) goto LLL;
45: if (isExclude(s,"/CVS/")) goto LLL;
46: if (isExclude(s,".done")) goto LLL;
47: if (isExclude(s,".uuencoded")) goto LLL;
48: if (isExclude(s,"DO_NOT_EDIT")) goto LLL;
49: if (isExclude(s,"~")) goto LLL;
50: if (isExclude(s,".#")) goto LLL;
51: if (isExclude(s,"OpenXM/doc/histrical-doc")) goto LLL;
52: if (isExclude(s,".log")) goto LLL;
53: if (isExclude(s,"fep.linux")) goto LLL;
54: if (isExclude(s,"/Old/")) goto LLL;
55: if (isExclude(s,"/debug/.sm1")) goto LLL;
56: if (isExclude(s,".aux")) goto LLL;
57: if (isExclude(s,".toc")) goto LLL;
58: if (isExclude(s,".keepme")) goto LLL;
59: if (isExclude(s,"/sm1/ole")) goto LLL;
60: if (isExclude(s,"OpenXM/lib/sm1/ttt")) goto LLL;
61: if (isExclude(s,".sm1.org")) goto LLL;
62: if (isExclude(s,"OpenXM/lib/sm1/onlinehelp")) goto LLL;
63: if (isExclude(s,"OpenXM/lib/sm1/printOnlineHelp")) goto LLL;
64: if (isExclude(s,"OpenXM/lib/sm1/Makefile")) goto LLL;
65: if (isExclude(s,"issac2000")) goto LLL;
66: if (isExclude(s,"doc/Papers")) goto LLL;
67: if (isExclude(s,"doc/OpenXM-web")) goto LLL;
68: if (isExclude(s,"doc/Makefile")) goto LLL;
69: if (isExclude(s,"doc/install")) goto LLL;
1.2 takayama 70: if (isExclude(s,"doc/compalg")) goto LLL;
1.1 takayama 71:
72:
73: if (lstat(s,&sb) < 0) fprintf(stderr,"The file %s is not found.\n",s);
74: if (S_ISLNK(sb.st_mode)) {
75: /* symbolic link */
76: p = readlink(s,lnk,1024);
77: if (p > 0) lnk[p] = '\0';
78: else {
79: fprintf(stderr,"readlink could not get the symbolic link of %s\n",s);
80: }
81: printf("@exec ln -fs %s %%D/%s\n",lnk,s);
82: }else{
83: printf("%s\n",s);
84: }
85:
86: LLL: ;
87:
88: }
1.4 ! takayama 89: printf("@dirrm OpenXM\n");
1.1 takayama 90: }
91:
92: isExclude(char *s,char *pattern) {
93: int n;
94: int m;
95: int i,j;
96: n = strlen(pattern);
97: m = strlen(s);
98: /* printf("%s %s\n",s,pattern); */
99: for (i=0; i< m -n +1; i++) {
100: for (j=0; j<n; j++) {
101: /* printf("%c %c, ",pattern[j], s[i+j]); */
102: if (pattern[j] != s[i+j]) goto PPP;
103: }
104: return(1);
105: PPP: ;
106: }
107: return(0);
108: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>