Annotation of OpenXM/misc/packages/FreeBSD/openxm-ports/openxm-1.1.2/files/gen-plist.c, Revision 1.2
1.2 ! takayama 1: /* $OpenXM: OpenXM/misc/packages/FreeBSD/openxm-ports/openxm-1.1.2/files/gen-plist.c,v 1.1.1.1 2000/03/02 10:32:39 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");
! 29: printf("bin/gp\n");
! 30:
1.1 takayama 31: while (fgets(s0,512,stdin) != NULL) {
32: n = strlen(s0);
33: if (n <= 1) goto LLL;
34: if (s0[n-1] == '\n') s0[n-1] = '\0';
35: if (s0[0] == '.' && s0[1] == '/' && s0[2] == '.') goto LLL;
36: if (s0[0] == '.' && s0[1] == '/' ) {
37: strcpy(s,&(s0[2]));
38: }else{
39: strcpy(s,s0);
40: }
41: n = strlen(s);
42: flag = 0;
43: if (n == 0) goto LLL;
44: if (isExclude(s,"/CVS/")) goto LLL;
45: if (isExclude(s,".done")) goto LLL;
46: if (isExclude(s,".uuencoded")) goto LLL;
47: if (isExclude(s,"DO_NOT_EDIT")) goto LLL;
48: if (isExclude(s,"~")) goto LLL;
49: if (isExclude(s,".#")) goto LLL;
50: if (isExclude(s,"OpenXM/doc/histrical-doc")) goto LLL;
51: if (isExclude(s,".log")) goto LLL;
52: if (isExclude(s,"fep.linux")) goto LLL;
53: if (isExclude(s,"/Old/")) goto LLL;
54: if (isExclude(s,"/debug/.sm1")) goto LLL;
55: if (isExclude(s,".aux")) goto LLL;
56: if (isExclude(s,".toc")) goto LLL;
57: if (isExclude(s,".keepme")) goto LLL;
58: if (isExclude(s,"/sm1/ole")) goto LLL;
59: if (isExclude(s,"OpenXM/lib/sm1/ttt")) goto LLL;
60: if (isExclude(s,".sm1.org")) goto LLL;
61: if (isExclude(s,"OpenXM/lib/sm1/onlinehelp")) goto LLL;
62: if (isExclude(s,"OpenXM/lib/sm1/printOnlineHelp")) goto LLL;
63: if (isExclude(s,"OpenXM/lib/sm1/Makefile")) goto LLL;
64: if (isExclude(s,"issac2000")) goto LLL;
65: if (isExclude(s,"doc/Papers")) goto LLL;
66: if (isExclude(s,"doc/OpenXM-web")) goto LLL;
67: if (isExclude(s,"doc/Makefile")) goto LLL;
68: if (isExclude(s,"doc/install")) goto LLL;
1.2 ! takayama 69: if (isExclude(s,"doc/compalg")) goto LLL;
1.1 takayama 70:
71:
72: if (lstat(s,&sb) < 0) fprintf(stderr,"The file %s is not found.\n",s);
73: if (S_ISLNK(sb.st_mode)) {
74: /* symbolic link */
75: p = readlink(s,lnk,1024);
76: if (p > 0) lnk[p] = '\0';
77: else {
78: fprintf(stderr,"readlink could not get the symbolic link of %s\n",s);
79: }
80: printf("@exec ln -fs %s %%D/%s\n",lnk,s);
81: }else{
82: printf("%s\n",s);
83: }
84:
85: LLL: ;
86:
87: }
88: }
89:
90: isExclude(char *s,char *pattern) {
91: int n;
92: int m;
93: int i,j;
94: n = strlen(pattern);
95: m = strlen(s);
96: /* printf("%s %s\n",s,pattern); */
97: for (i=0; i< m -n +1; i++) {
98: for (j=0; j<n; j++) {
99: /* printf("%c %c, ",pattern[j], s[i+j]); */
100: if (pattern[j] != s[i+j]) goto PPP;
101: }
102: return(1);
103: PPP: ;
104: }
105: return(0);
106: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>