home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / vol_200 / 293_02 / gor.c < prev    next >
C/C++ Source or Header  |  1989-08-25  |  8KB  |  240 lines
  1. /*********************** gor.c **************************************
  2.  
  3.       3-D Reconstruction of Medical Images
  4.  
  5.     Three Dimensional Reconstruction Of Medical
  6.     Images from Serial Slices - CT, MRI, Ultrasound
  7.  
  8.  
  9.    These programs process a set of slices images (scans) for one
  10.    patient. It outputs two sets of files containing nine predefined
  11.    views of bony surfaces. One set contains distance values and
  12.    the other gradient values.
  13.  
  14.    The distance values are used as 3-D spatial topographic surface
  15.    coordinate maps for geometrical analysis of the scanned object.
  16.  
  17.    The gradient values are used for rendering the surface maps on
  18.    CRT displays for subjective viewing where perception of small
  19.    surface details is important.
  20.  
  21.     Daniel Geist, B.S.
  22.     Michael W. Vannier, M.D.
  23.  
  24.     Mallinckrodt Institute of Radiology
  25.     Washington University School of Medicine
  26.     510 S. Kingshighway Blvd.
  27.     St. Louis, Mo. 63110
  28.  
  29.     These programs may be copied and used freely for non-commercial
  30.     purposes by developers with inclusion of this notice.
  31.  
  32.  
  33. ********************************************************************/
  34. #include <stdio.h>
  35. #include <math.h>
  36. int outfile,ZMAX,FIRSTSLICE,LASTSLICE,THRESHOLD,ZOOM,
  37.     RIGHTMID,LEFTMID,TOPINT,midslice,midline;
  38. int  buffer[2][6][256];
  39. float fxbuf[5][256],fybuf[5][256];
  40. float huge fzbuf[256][256];
  41. /*            standard 18 output files ( 9 views x 2) */
  42. char *fnamein="ctbild.000",*fgll="gll.out",*fdll="dll.out";
  43. succ(i)
  44. int i;
  45. {return(i==2?0:i+1);}
  46. prev(i)
  47. int i;
  48. {return(i==0?2:i-1);}
  49. setfilename(filenum)
  50. int filenum;
  51. {fnamein[7]=filenum/100+'0';
  52.  fnamein[8]=(filenum%100)/10+'0';
  53.  fnamein[9]='0'+filenum%10;
  54. }
  55. interpolate(line,bot,top)
  56. int line,bot,top;
  57. {int next,i,j,x,inc;
  58.  inc=top>bot?1:(-1);
  59.  next=bot+inc;
  60.  for(i=1,j=ZOOM-1;i<ZOOM;i++,j--){
  61.       for(x=0;x<256;x++) buffer[line][next][x]=
  62.         (buffer[line][bot][x]*j+buffer[line][top][x]*i)/ZOOM;
  63.       next+=inc;
  64.  }
  65. }
  66. float midpoint(b,a)
  67. float b,a;
  68. {return( (THRESHOLD-a) / (b-a) );}
  69. getdistances()
  70. {int z,x,y,i,j,start,stop,inc,line;
  71.  FILE *fxfloat,*fyfloat,*fzfloat,*fn[2];
  72.   fxfloat=fopen("xdis.dat","wb");
  73.   fyfloat=fopen("ydis.dat","wb");
  74.   for(i=0;i<256;i++)
  75.    for(j=0;j<256;j++)fzbuf[i][j]=256;
  76.   for(z=0;z<(LASTSLICE-FIRSTSLICE);z++){
  77.       for(i=0;i<2;i++){
  78.           setfilename(LASTSLICE-(z+i));
  79.           fn[i]=fopen(fnamein,"rb");
  80.           fseek(fn[i],(long)512,SEEK_SET);
  81.       }
  82.       line=0;
  83.       for(j=0;j<ZOOM;j++)
  84.        for(i=0;i<256;i++)fxbuf[i][j]=fybuf[j][i]=256;
  85.       for(y=255;y>=0;y--){
  86.           fseek(fn[0],(long)512*(y+1),SEEK_SET);
  87.           fread(buffer[line][0],1,512,fn[0]);
  88.           fseek(fn[1],(long)512*(y+1),SEEK_SET);
  89.           fread(buffer[line][ZOOM],1,512,fn[1]);
  90.           interpolate(line,0,ZOOM);
  91.           for(i=0;i<ZOOM;i++){
  92.              for(x=255;x>=0;x--)if (buffer[line][i+1][x]>=THRESHOLD){
  93.                 if(fxbuf[i][y]==256.0) fxbuf[i][y]=(x==255)?0:255-(x+1)+
  94.                       midpoint((float)buffer[line][i+1][x],
  95.                               (float)buffer[line][i+1][x+1]);
  96.                 if(fybuf[i][x]==256.0) fybuf[i][x]=(y==255)?0:255-(y+1)+
  97.                       midpoint((float)buffer[line][i+1][x],
  98.                                        (float)buffer[1-line][i+1][x]);
  99.                 if(fzbuf[y][x]==256.0) fzbuf[y][x]=
  100.                      (z==0) && (buffer[line][0][x]>=THRESHOLD)?0:z*ZOOM+i+
  101.                       midpoint((float)buffer[line][i+1][x],
  102.                                        (float)buffer[line][i][x]);
  103.              }
  104.           }
  105.           line=1-line;
  106.       }
  107.       fclose(fn[0]);
  108.       fclose(fn[1]);
  109.       fwrite(fxbuf,1,ZOOM*1024,fxfloat);
  110.       fwrite(fybuf,1,ZOOM*1024,fyfloat);
  111.       printf("did %d \n",z);
  112.   }
  113.   fclose(fxfloat);
  114.   fclose(fyfloat);
  115.   fzfloat=fopen("zdis.dat","wb");
  116.   for(i=0;i<256;i++){fwrite(fzbuf[i],1,1024,fzfloat);printf("wr %d",i);}
  117.   fclose(fzfloat);
  118. }
  119. unsigned char gradx(y1,y2,z1,z2)
  120. float y1,y2,z1,z2;
  121. {float gx,gy,gz;
  122.  unsigned char gxint;
  123.      /* get z and y components of gradient */
  124.   gz=(z1-z2)/2;
  125.   gy=(y1-y2)/2;
  126.      /*compute gx - normalized x component of gradient */
  127.   gx=1/sqrt(1+gz*gz+gy*gy);
  128.   gxint=255*gx+0.5;      /*scale gx by 256 */
  129.   return(gxint);
  130. }
  131. doviews(namedis,nameg,named,nlines)
  132. char *namedis,*nameg,*named;
  133. int nlines;
  134. {FILE *fg,*fd,*ffloat;
  135.  int z,i,j,k,midline;
  136.  char lined[256],lineg[256];
  137.  midline=1;
  138.  fd=fopen(named,"wb");
  139.  fg=fopen(nameg,"wb");
  140.  ffloat=fopen(namedis,"rb");
  141.  fread(fxbuf,1,3072,ffloat);
  142.  /* do first line */
  143.  if(fxbuf[0][0]==256.0)lineg[0]=lined[0]=0;
  144.  else{
  145.      lined[0]=256-fxbuf[0][0];
  146.      lineg[0]=gradx(fxbuf[0][0]*2,fxbuf[0][1]*2,fxbuf[0][0]*2,fxbuf[1][0]*2);
  147.  }
  148.  for(i=1;i<255;i++)
  149.   if(fxbuf[0][i]==256.0) lineg[i]=lined[i]=0;
  150.   else{
  151.       lined[i]=256-fxbuf[0][i];
  152.       lineg[i]=gradx(fxbuf[0][i-1],fxbuf[0][i+1],2*fxbuf[0][i],2*fxbuf[1][i]);
  153.  }
  154.  if(fxbuf[0][255]==256.0)lineg[255]=lined[255]=0;
  155.  else{
  156.      lined[255]=256-fxbuf[0][255];
  157.      lineg[255]=
  158.        gradx(fxbuf[0][255]*2,fxbuf[0][254]*2,fxbuf[0][255]*2,fxbuf[1][255]*2);
  159.  }
  160.  fwrite(lineg,1,256,fg);
  161.  fwrite(lined,1,256,fd);
  162.  printf("Begining computation of  views\n");
  163.  for(z=0;z<(nlines-2);z++){      /*for each slice */
  164.      if(fxbuf[midline][0]==256.0)lineg[0]=lined[0]=0;
  165.      else{
  166.          lined[0]=256-fxbuf[midline][0];
  167.          lineg[0]=
  168.            gradx(fxbuf[midline][0]*2,fxbuf[midline][1]*2,
  169.                    fxbuf[prev(midline)][0],fxbuf[succ(midline)][0]);
  170.      }
  171.      for(i=1;i<255;i++)
  172.        if(fxbuf[midline][i]==256.0) lineg[i]=lined[i]=0;
  173.       else{
  174.           lined[i]=256-fxbuf[midline][i];
  175.           lineg[i]=gradx(fxbuf[midline][i-1],fxbuf[midline][i+1],
  176.            fxbuf[prev(midline)][i],fxbuf[succ(midline)][i]);
  177.      }
  178.      if(fxbuf[midline][255]==256.0)lineg[255]=lined[255]=0;
  179.      else{
  180.          lined[255]=256-fxbuf[midline][255];
  181.         lineg[255]=gradx(fxbuf[midline][255]*2,fxbuf[midline][254]*2
  182.             ,fxbuf[prev(midline)][255],fxbuf[succ(midline)][255]);
  183.      }
  184.      fwrite(lineg,1,256,fg);
  185.      fwrite(lined,1,256,fd);
  186.      fread(fxbuf[prev(midline)],1,1024,ffloat);
  187.      midline=succ(midline);
  188.      printf(" did %d \n",z);
  189.  }
  190.  /* do last line */
  191.  if(fxbuf[midline][0]==256.0)lineg[0]=lined[0]=0;
  192.  else{
  193.      lined[0]=256-fxbuf[midline][0];
  194.      lineg[0]=gradx(fxbuf[midline][0]*2,fxbuf[midline][1]*2,
  195.          fxbuf[midline][0]*2,fxbuf[prev(midline)][0]*2);
  196.  }
  197.  for(i=1;i<255;i++)
  198.   if(fxbuf[midline][i]==256.0) lineg[i]=lined[i]=0;
  199.   else{
  200.       lined[i]=256-fxbuf[0][i];
  201.       lineg[i]=gradx(fxbuf[midline][i-1],fxbuf[midline][i+1],
  202.          2*fxbuf[midline][i],2*fxbuf[prev(midline)][i]);
  203.  }
  204.  if(fxbuf[midline][255]==256.0)lineg[255]=lined[255]=0;
  205.  else{
  206.      lined[255]=256-fxbuf[midline][255];
  207.      lineg[255]=
  208.        gradx(fxbuf[midline][255]*2,fxbuf[midline][254]*2,
  209.          fxbuf[midline][255]*2,fxbuf[prev(midline)][255]*2);
  210.  }
  211.  fwrite(lineg,1,256,fg);
  212.  fwrite(lined,1,256,fd);
  213.  fclose(fg);
  214.  fclose(fd);
  215.  fclose(ffloat);
  216. }
  217. /**********************************************************/
  218. /**** MAIN ***** MAIN ***** MAIN ***** MAIN ***** MAIN ****/
  219. /**********************************************************/
  220. main()
  221. {
  222.  /* first get some parameters from user */
  223.  printf("Enter Zoom factor: ");
  224.  scanf("%d",&ZOOM);
  225.  printf("Enter Starting scan number: ");
  226.  scanf("%d",&FIRSTSLICE);
  227.  printf("Enter ending scan number: ");
  228.  scanf("%d",&LASTSLICE);
  229.  printf("Enter threshold number: ");
  230.  scanf("%d",&THRESHOLD);
  231.  THRESHOLD+=1024;
  232.  getdistances();
  233.  printf("doing bottom views");
  234.  doviews("zdis.dat","fgbo.out","fdbo.out",256);
  235.  printf("doing left views");
  236.  doviews("xdis.dat","fgll.out","fdll.out",(LASTSLICE-FIRSTSLICE)*ZOOM);
  237.  printf("doing bottom views");
  238.  doviews("ydis.dat","fgre.out","fdre.out",(LASTSLICE-FIRSTSLICE)*ZOOM);
  239. }
  240.