home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Graphics / Graphics.zip / xfitsvew.zip / XFITSview / fitssubs / matxpos.c < prev    next >
C/C++ Source or Header  |  1998-04-02  |  3KB  |  96 lines
  1. /*  MatrixPos class implementation  */ 
  2. /* a MatrixPos contains information relating to a pixel position in a Matrix
  3.    and functions for manipulating them. Pixel numbers are 0 relative.*/
  4. /*-----------------------------------------------------------------------
  5. *  Copyright (C) 1996,1998
  6. *  Associated Universities, Inc. Washington DC, USA.
  7. *  This program is free software; you can redistribute it and/or
  8. *  modify it under the terms of the GNU General Public License as
  9. *  published by the Free Software Foundation; either version 2 of
  10. *  the License, or (at your option) any later version.
  11. *
  12. *  This program is distributed in the hope that it will be useful,
  13. *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14. *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15. *  GNU General Public License for more details.
  16. *-----------------------------------------------------------------------*/
  17.   
  18. #include "matxpos.h" 
  19.  
  20. /* MatrixPos class implementation.  */ 
  21.   
  22. /* Constructor  */
  23. MatrixPos* MakeMatrixPos(Integer n, Integer *p) 
  24. { 
  25.   Integer i; 
  26.   MatrixPos *temp = (MatrixPos *) malloc (sizeof(MatrixPos)); 
  27.   temp->ndims = n; 
  28.   for (i=0; i<7; i++) temp->pos[i] = 0; 
  29.   for (i=0; i<n; i++) temp->pos[i] = p[i]; 
  30.   return temp;} /* end MakeMatrixPos */ 
  31.   
  32. /* destructor  */ 
  33. void KillMatrixPos(MatrixPos* me)
  34. { 
  35.   if (me) free (me);
  36. }  /* end KillMatrixPos */ 
  37.   
  38.   
  39. /* copy pos2 to pos1 */ 
  40. void MatrixPosCopy (MatrixPos *pos1, MatrixPos *pos2) 
  41. { 
  42.   Integer i; 
  43.   if (!pos1) return;
  44.   if (!pos2) return;
  45.   pos1->ndims = pos2->ndims; 
  46.   for (i=0; i<7; i++) pos1->pos[i]=pos2->pos[i]; 
  47. } /* end MatrixPosCopy */ 
  48.   
  49. /* increment a MatrixPos, returns false when done  */ 
  50. /* Honors the window.  */ 
  51. Logical inc_pixel(MatrixPos *me, MatrixDescriptor *d)
  52. {Integer i=0; 
  53.  if (!me) return 0;
  54.  if (!d) return 0;
  55.  me->pos[i]++;
  56.  while (me->pos[i]>=d->window_hi[i])
  57.      {me->pos[i] = d->window_lo[i]; i++;
  58.       me->pos[i]++;
  59.       if (i>=me->ndims-1) break;}
  60. /* Done?  */ 
  61.  if ((me->pos[i])>=d->dims[i])
  62.      return 0;   /* Yes  */ 
  63.  else 
  64.      return 1;   /*  No  */ 
  65. }  /*  End inc_pixel  */ 
  66.   
  67. Logical inc_patch(MatrixPos *me, MatrixDescriptor *d)
  68. {Integer i=1; 
  69.  if (!me) return 0;
  70.  if (!d) return 0;
  71.  me->pos[i] += d->num_row;
  72.  while (me->pos[i]>=d->window_hi[i])
  73.      {me->pos[i] = d->window_lo[i]; i++;
  74.       me->pos[i]++;
  75.       if (i>=me->ndims-1) break;}
  76. /* Done?  */ 
  77.  if ((me->pos[i])>=d->dims[i])
  78.      {me->pos[me->ndims-1] =
  79.     d->dims[me->ndims-1] + 100; /* Force invalid pixel */
  80.       return 0;}   /* Yes  */ 
  81.  else 
  82.      return 1;   /*  No  */ 
  83. }  /*  End increment patch  */ 
  84.   
  85. /* Zero a MatrixPos  */ 
  86. void ZeroMatrixPos(MatrixPos *me)
  87. { 
  88.   Integer i; 
  89.  if (!me) return;
  90.   for (i=0; i<7; i++) me->pos[i] = 0; 
  91. }  /* end ZeroMatrixPos  */ 
  92.   
  93. /*  End of MatrixPos class  */
  94.   
  95.   
  96.