--- ray/src/util/cmatrix.c 2020/03/25 01:51:09 2.25 +++ ray/src/util/cmatrix.c 2020/03/26 16:56:10 2.27 @@ -1,5 +1,5 @@ #ifndef lint -static const char RCSid[] = "$Id: cmatrix.c,v 2.25 2020/03/25 01:51:09 greg Exp $"; +static const char RCSid[] = "$Id: cmatrix.c,v 2.27 2020/03/26 16:56:10 greg Exp $"; #endif /* * Color matrix routines. @@ -21,7 +21,7 @@ const char *cm_fmt_id[] = { }; const int cm_elem_size[] = { - 0, 0, 4, 4, 3*sizeof(float), 3*sizeof(double) + 0, 4, 4, 3*sizeof(float), 0, 3*sizeof(double) }; /* Allocate a color coefficient matrix */ @@ -259,20 +259,19 @@ cm_load(const char *inspec, int nrows, int ncols, int } if (nrows <= 0) { /* don't know length? */ int guessrows = 147; /* usually big enough */ - if ((dtype != DTascii) & (fp != stdin) & (inspec[0] != '!')) { + if (cm_elem_size[dtype] && (fp != stdin) & (inspec[0] != '!')) { long startpos = ftell(fp); if (fseek(fp, 0L, SEEK_END) == 0) { + long rowsiz = (long)ncols*cm_elem_size[dtype]; long endpos = ftell(fp); - long elemsiz = 3*(dtype==DTfloat ? - sizeof(float) : sizeof(double)); - if ((endpos - startpos) % (ncols*elemsiz)) { + if ((endpos - startpos) % rowsiz) { sprintf(errmsg, "improper length for binary file '%s'", inspec); error(USER, errmsg); } - guessrows = (endpos - startpos)/(ncols*elemsiz); + guessrows = (endpos - startpos)/rowsiz; if (fseek(fp, startpos, SEEK_SET) < 0) { sprintf(errmsg, "fseek() error on file '%s'", @@ -333,6 +332,14 @@ cm_load(const char *inspec, int nrows, int ncols, int goto EOFerror; } while (nread < cm->nrows*cm->ncols); + if (swap) { + if (sizeof(COLORV) == 4) + swap32((char *)cm->cmem, + 3*cm->nrows*cm->ncols); + else /* sizeof(COLORV) == 8 */ + swap64((char *)cm->cmem, + 3*cm->nrows*cm->ncols); + } } else if (dtype == DTdouble) { double dc[3]; /* load from double */ COLORV *cvp = cm->cmem; @@ -343,6 +350,7 @@ cm_load(const char *inspec, int nrows, int ncols, int while (n--) { if (getbinary(dc, sizeof(double), 3, fp) != 3) goto EOFerror; + if (swap) swap64((char *)dc, 3); copycolor(cvp, dc); cvp += 3; } @@ -356,6 +364,7 @@ cm_load(const char *inspec, int nrows, int ncols, int while (n--) { if (getbinary(fc, sizeof(float), 3, fp) != 3) goto EOFerror; + if (swap) swap32((char *)fc, 3); copycolor(cvp, fc); cvp += 3; } @@ -366,12 +375,6 @@ cm_load(const char *inspec, int nrows, int ncols, int inspec); error(WARNING, errmsg); } - } - if (swap) { - if (dtype == DTfloat) - swap32((char *)cm->cmem, 3*cm->nrows*cm->ncols); - else if (dtype == DTdouble) - swap64((char *)cm->cmem, 3*cm->nrows*cm->ncols); } cleanup: if (fp != stdin) {