home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1997 August / PCO0897.ISO / filesbbs / os2 / plnk065.arj / PLNK065.ZIP / pilot-link.0.6.5 / scripts / os2dist.pl < prev    next >
Encoding:
Perl Script  |  1997-05-27  |  1.5 KB  |  51 lines
  1. #!/usr/bin/perl
  2.  
  3. # Conjure up OS/2 specific makefiles
  4.  
  5. %defs = ( '@RANLIB@', 'ar -s', '@CC@', 'gcc', '@CFLAGS@', '-g -O2 -fno-strength-reduce',
  6.           '@CWFLAG@', '-Wall', '@CPLIB@', 'cp', '@YACC@', 'bison -y', 
  7.           '@LIBS@', '-lsocket -los2', '@EXT@', '.EXE',
  8.           '@SUBMAKE_COMM@', '$(MAKE) -C libsock -f Makefile.os2',
  9.           '@SUBMAKE_COMM_CC@', '$(MAKE) -C libcc -f Makefile.os2',
  10.           '@CXX@', 'gcc',
  11.           '@CXXFLAGS@', '-g -O2 -fno-strength-reduce' ,
  12.           '@CXXLIBS@', '-lstdcpp',
  13.           '@ARFLAGS@', '-cur',
  14.           '@cclib@', 'libpicc.a', '@libcclib@', 'libcc/libpicc.a',
  15.           '@ccexecs@', '$(CCEXECS)',
  16.       '@LDFLAGS@', ''
  17.         );
  18.         
  19. $defs{'@srcdir@'} = './';
  20.  
  21. open(STDIN,"<Makefile.in") or die "Unable to read Makefile.in";
  22. open(STDOUT,">Makefile.os2") or die "Unable to write to Makefile.os2";
  23. while(<>) {
  24.     foreach $k (keys %defs) {
  25.       s/$k/$defs{$k}/g;
  26.     }
  27.     print;
  28. }
  29.  
  30. $defs{'@srcdir@'} = '../';
  31.  
  32. open(STDIN,"<libsock/Makefile.in") or die "Unable to read Makefile.in";
  33. open(STDOUT,">libsock/Makefile.os2") or die "Unable to write to libsock/Makefile.os2";
  34. while(<>) {
  35.     foreach $k (keys %defs) {
  36.       s/$k/$defs{$k}/g;
  37.     }
  38.     s#../include/pi-config.h# #g;
  39.     print;
  40. }
  41.  
  42. open(STDIN,"<libcc/Makefile.in") or die "Unable to read Makefile.in";
  43. open(STDOUT,">libcc/Makefile.os2") or die "Unable to write to libcc/Makefile.os2";
  44. while(<>) {
  45.     foreach $k (keys %defs) {
  46.       s/$k/$defs{$k}/g;
  47.     }
  48.     s#../include/pi-config.h# #g;
  49.     print;
  50. }
  51.