home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 1 / 1981 < prev    next >
Encoding:
Internet Message Format  |  1990-12-28  |  5.2 KB
  1. From: ken@csis.dit.csiro.au (Ken Yap)
  2. Newsgroups: alt.sources,sci.electronics
  3. Subject: cheap pcb autorouter and printer
  4. Message-ID: <1990Oct23.074827.12643@csis.dit.csiro.au>
  5. Date: 23 Oct 90 07:48:27 GMT
  6.  
  7. If you're looking for a free pcb cad package, these diffs may be for
  8. you.  They are to be applied to Randy Nevin's pcb.arc version 1.00 to
  9. compile with gcc under SunOS 4.1.  The original sources are at
  10. wuarchive.wustl.edu in mirrors/msdos/cad/pcb.arc (or something like
  11. that).
  12.  
  13. Besides making pcbroute run, pcbprint was modified to generate pbm
  14. files which can be converted to a variety of formats with pbmplus
  15. (expo.lcs.mit.edu:contrib/pbmplus.tar.Z). No attempt has been made to
  16. Unixify the programs, pcbprint wants flags MSDOS style, e.g.  "pcbprint
  17. /Z3 foo".
  18.  
  19. DISCLAIMER: I have not tested the package beyond trying the example,
  20. printing the generated layers and observing that they look like good
  21. traces. I have not tried making PCBs; I don't have the materials at
  22. hand.  I'm sure there are limitations, but hey what do you want for
  23. free?  I'll be no good at answering questions about the package. I hear
  24. that Randy has a more comprehensive release he's selling. That's all I
  25. know, contact Randy yourself.  I'm posting these diffs simply because
  26. the diffs are so small and somebody might benefit.
  27.  
  28. *** /dev/null    Tue Oct 23 17:14:21 1990
  29. --- makefile    Tue Oct 23 17:33:39 1990
  30. ***************
  31. *** 0 ****
  32. --- 1,35 ----
  33. + # printed circuit board autorouter, viewer, and printer
  34. + CC=gcc        # or another ANSI standard compiler
  35. + 
  36. + .c.o:
  37. +     $(CC) -Dfar= -DAlloc=malloc -D_fmalloc=malloc -D_ffree=free -c $*.c
  38. + 
  39. + all:    pcbroute pcbprint
  40. + 
  41. + pcbroute: pcbroute.o io.o solve.o board.o queue.o work.o \
  42. +         dist.o alloc.o
  43. +     $(CC) -o $@ pcbroute.o io.o solve.o board.o queue.o work.o \
  44. +         dist.o alloc.o
  45. + 
  46. + pcbroute.o: pcbroute.c cell.h
  47. + 
  48. + io.o: io.c cell.h
  49. + 
  50. + solve.o: solve.c cell.h
  51. + 
  52. + board.o: board.c cell.h
  53. + 
  54. + queue.o: queue.c cell.h
  55. + 
  56. + work.o: work.c cell.h
  57. + 
  58. + dist.o: dist.c cell.h
  59. + 
  60. + alloc.o: alloc.c
  61. + 
  62. + bitmap.o: bitmap.c cell.h bitmap1.h bitmap2.h bitmap3.h
  63. + 
  64. + pcbprint: pcbprint.o bitmap.o board.o alloc.o
  65. +     $(CC) -o $@ pcbprint.o bitmap.o board.o alloc.o
  66. + 
  67. + pcbprint.o: pcbprint.c cell.h
  68. *** alloc.c.old    Mon Oct 22 15:26:50 1990
  69. --- alloc.c    Thu Aug 23 17:10:19 1990
  70. ***************
  71. *** 1,25 ****
  72.   #include <stdio.h>
  73.   #include <stdlib.h>
  74. - #include <dos.h>
  75.   
  76.   char far *Alloc( long );
  77.   void Nomem( void );
  78.   
  79. - char far *Alloc ( x ) /* allocate x bytes of far memory */
  80. -     long x;
  81. -     {
  82. -     union REGS regs;
  83. - 
  84. -     regs.h.ah = 0x48; /* allocate memory dos call */
  85. -     x = (x+15)>>4; /* get number of paragraphs to allocate */
  86. -     regs.x.bx = (int)x;
  87. -     intdos( ®s, ®s ); /* call dos; request memory */
  88. -     if (regs.x.cflag) /* memory allocation error */
  89. -         Nomem();
  90. -     return( (char far *)((long)regs.x.ax<<16) ); /* make a far pointer */
  91. -     }
  92. - 
  93.   void Nomem () { /* a memory allocation request has failed */
  94.       printf( "out of memory\n" );
  95.       exit( -1 );
  96.       }
  97. --- 1,15 ----
  98.   #include <stdio.h>
  99.   #include <stdlib.h>
  100.   
  101.   char far *Alloc( long );
  102.   void Nomem( void );
  103.   
  104.   void Nomem () { /* a memory allocation request has failed */
  105.       printf( "out of memory\n" );
  106.       exit( -1 );
  107.       }
  108. + 
  109. + strupr(s)
  110. +     char    *s;
  111. + {
  112. + }
  113. *** solve.c.old    Mon Oct 22 15:26:57 1990
  114. --- solve.c    Thu Aug 23 17:05:52 1990
  115. ***************
  116. *** 1,7 ****
  117.   #include <stdio.h>
  118.   #include <stdlib.h>
  119.   #include <fcntl.h>
  120. - #include <io.h>
  121.   #include "cell.h"
  122.   
  123.   /*
  124. --- 1,6 ----
  125. *** pcbprint.c.old    Mon Oct 22 15:26:55 1990
  126. --- pcbprint.c    Mon Oct 22 14:43:29 1990
  127. ***************
  128. *** 241,268 ****
  129.   static void prolog ( fp ) /* output initial laser printer commands */
  130.       register FILE *fp;
  131.       {
  132. !     putc( 0x1B, fp );        /* <esc> */
  133. !     putc( 'E', fp );        /* reset */
  134. !     putc( 0x1B, fp );        /* <esc> */
  135. !     fprintf( fp, "&l%dO", orient );    /* set image orientation */
  136. !     putc( 0x1B, fp );        /* <esc> */
  137. !     fprintf( fp, "&a10R" );        /* cursor to row 10 */
  138. !     putc( 0x1B, fp );        /* <esc> */
  139. !     fprintf( fp, "&a10C" );        /* cursor to column 10 */
  140. !     putc( 0x1B, fp );        /* <esc> */
  141. !     fprintf( fp, "*t%dR", resol );    /* set resolution in dots per inch */
  142. !     putc( 0x1B, fp );        /* <esc> */
  143. !     fprintf( fp, "*r1A" );        /* start graphics at cursor */
  144.       }
  145.   
  146.   static void epilog ( fp ) /* output final laser printer commands */
  147.       register FILE *fp;
  148.       {
  149. -     putc( 0x1B, fp );    /* <esc> */
  150. -     fprintf( fp, "*rB" );    /* end graphics */
  151. -     putc( 0x12, fp );    /* formfeed to eject paper */
  152. -     putc( 0x1B, fp );    /* <esc> */
  153. -     putc( 'E', fp );    /* reset */
  154.       }
  155.   
  156.   static void doimage ( fp ) /* create the board image, row by column */
  157. --- 241,252 ----
  158.   static void prolog ( fp ) /* output initial laser printer commands */
  159.       register FILE *fp;
  160.       {
  161. !     fprintf(fp, "P4\n%d %d\n", Ncols*size[zoom], Nrows*size[zoom]);
  162.       }
  163.   
  164.   static void epilog ( fp ) /* output final laser printer commands */
  165.       register FILE *fp;
  166.       {
  167.       }
  168.   
  169.   static void doimage ( fp ) /* create the board image, row by column */
  170. ***************
  171. *** 274,281 ****
  172.   
  173.       for (r = Nrows-1; r >= 0; r--) { /* each row */
  174.           for (ir = size[zoom]-1; ir >= 0; ir--) { /* each scan line */
  175. -             putc( 0x1B, fp );    /* <esc> */
  176. -             fprintf( fp, "*b%dW", nbytes );
  177.               initbit();
  178.               for (c = 0; c < Ncols; c++) {
  179.                   x = GetCell( r, c, TOP );
  180. --- 258,263 ----
  181.