mirror of
				https://git.proxmox.com/git/mirror_edk2
				synced 2025-10-31 20:43:59 +00:00 
			
		
		
		
	 4710c53dca
			
		
	
	
		4710c53dca
		
	
	
	
	
		
			
			These files are a subset of the python-2.7.2.tgz distribution from python.org. Changed files from PyMod-2.7.2 have been copied into the corresponding directories of this tree, replacing the original files in the distribution. Signed-off-by: daryl.mcdaniel@intel.com git-svn-id: https://edk2.svn.sourceforge.net/svnroot/edk2/trunk/edk2@13197 6f19259b-4bc3-4df7-8a09-765794883524
		
			
				
	
	
		
			795 lines
		
	
	
		
			21 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			795 lines
		
	
	
		
			21 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| 
 | |
| /* imageopmodule - Various operations on pictures */
 | |
| 
 | |
| #ifdef sun
 | |
| #define signed
 | |
| #endif
 | |
| 
 | |
| #include "Python.h"
 | |
| 
 | |
| #if SIZEOF_INT == 4
 | |
| typedef int Py_Int32;
 | |
| typedef unsigned int Py_UInt32;
 | |
| #else
 | |
| #if SIZEOF_LONG == 4
 | |
| typedef long Py_Int32;
 | |
| typedef unsigned long Py_UInt32;
 | |
| #else
 | |
| #error "No 4-byte integral type"
 | |
| #endif
 | |
| #endif
 | |
| 
 | |
| #define CHARP(cp, xmax, x, y) ((char *)(cp+y*xmax+x))
 | |
| #define SHORTP(cp, xmax, x, y) ((short *)(cp+2*(y*xmax+x)))
 | |
| #define LONGP(cp, xmax, x, y) ((Py_Int32 *)(cp+4*(y*xmax+x)))
 | |
| 
 | |
| static PyObject *ImageopError;
 | |
| static PyObject *ImageopDict;
 | |
| 
 | |
| /**
 | |
|  * Check a coordonnate, make sure that (0 < value).
 | |
|  * Return 0 on error.
 | |
|  */
 | |
| static int
 | |
| check_coordonnate(int value, const char* name)
 | |
| {
 | |
|     if ( 0 < value)
 | |
|         return 1;
 | |
|     PyErr_Format(PyExc_ValueError, "%s value is negative or nul", name);
 | |
|     return 0;
 | |
| }
 | |
| 
 | |
| /**
 | |
|  * Check integer overflow to make sure that product == x*y*size.
 | |
|  * Return 0 on error.
 | |
|  */
 | |
| static int
 | |
| check_multiply_size(int product, int x, const char* xname, int y, const char* yname, int size)
 | |
| {
 | |
|     if ( !check_coordonnate(x, xname) )
 | |
|         return 0;
 | |
|     if ( !check_coordonnate(y, yname) )
 | |
|         return 0;
 | |
|     if ( size == (product / y) / x )
 | |
|         return 1;
 | |
|     PyErr_SetString(ImageopError, "String has incorrect length");
 | |
|     return 0;
 | |
| }
 | |
| 
 | |
| /**
 | |
|  * Check integer overflow to make sure that product == x*y.
 | |
|  * Return 0 on error.
 | |
|  */
 | |
| static int
 | |
| check_multiply(int product, int x, int y)
 | |
| {
 | |
|     return check_multiply_size(product, x, "x", y, "y", 1);
 | |
| }
 | |
| 
 | |
| /* If this function returns true (the default if anything goes wrong), we're
 | |
|    behaving in a backward-compatible way with respect to how multi-byte pixels
 | |
|    are stored in the strings.  The code in this module was originally written
 | |
|    for an SGI which is a big-endian system, and so the old code assumed that
 | |
|    4-byte integers hold the R, G, and B values in a particular order.
 | |
|    However, on little-endian systems the order is reversed, and so not
 | |
|    actually compatible with what gl.lrectwrite and imgfile expect.
 | |
|    (gl.lrectwrite and imgfile are also SGI-specific, however, it is
 | |
|    conceivable that the data handled here comes from or goes to an SGI or that
 | |
|    it is otherwise used in the expectation that the byte order in the strings
 | |
|    is as specified.)
 | |
| 
 | |
|    The function returns the value of the module variable
 | |
|    "backward_compatible", or 1 if the variable does not exist or is not an
 | |
|    int.
 | |
|  */
 | |
| 
 | |
| static int
 | |
| imageop_backward_compatible(void)
 | |
| {
 | |
|     static PyObject *bcos;
 | |
|     PyObject *bco;
 | |
|     long rc;
 | |
| 
 | |
|     if (ImageopDict == NULL) /* "cannot happen" */
 | |
|         return 1;
 | |
|     if (bcos == NULL) {
 | |
|         /* cache string object for future use */
 | |
|         bcos = PyString_FromString("backward_compatible");
 | |
|         if (bcos == NULL)
 | |
|             return 1;
 | |
|     }
 | |
|     bco = PyDict_GetItem(ImageopDict, bcos);
 | |
|     if (bco == NULL)
 | |
|         return 1;
 | |
|     if (!PyInt_Check(bco))
 | |
|         return 1;
 | |
|     rc = PyInt_AsLong(bco);
 | |
|     if (PyErr_Occurred()) {
 | |
|         /* not an integer, or too large, or something */
 | |
|         PyErr_Clear();
 | |
|         rc = 1;
 | |
|     }
 | |
|     return rc != 0;             /* convert to values 0, 1 */
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_crop(PyObject *self, PyObject *args)
 | |
| {
 | |
|     char *cp, *ncp;
 | |
|     short *nsp;
 | |
|     Py_Int32 *nlp;
 | |
|     int len, size, x, y, newx1, newx2, newy1, newy2, nlen;
 | |
|     int ix, iy, xstep, ystep;
 | |
|     PyObject *rv;
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#iiiiiii", &cp, &len, &size, &x, &y,
 | |
|                       &newx1, &newy1, &newx2, &newy2) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( size != 1 && size != 2 && size != 4 ) {
 | |
|         PyErr_SetString(ImageopError, "Size should be 1, 2 or 4");
 | |
|         return 0;
 | |
|     }
 | |
|     if ( !check_multiply_size(len, x, "x", y, "y", size) )
 | |
|         return 0;
 | |
| 
 | |
|     xstep = (newx1 < newx2)? 1 : -1;
 | |
|     ystep = (newy1 < newy2)? 1 : -1;
 | |
| 
 | |
|     nlen = (abs(newx2-newx1)+1)*(abs(newy2-newy1)+1)*size;
 | |
|     if ( !check_multiply_size(nlen, abs(newx2-newx1)+1, "abs(newx2-newx1)+1", abs(newy2-newy1)+1, "abs(newy2-newy1)+1", size) )
 | |
|         return 0;
 | |
|     rv = PyString_FromStringAndSize(NULL, nlen);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (char *)PyString_AsString(rv);
 | |
|     nsp = (short *)ncp;
 | |
|     nlp = (Py_Int32 *)ncp;
 | |
|     newy2 += ystep;
 | |
|     newx2 += xstep;
 | |
|     for( iy = newy1; iy != newy2; iy+=ystep ) {
 | |
|         for ( ix = newx1; ix != newx2; ix+=xstep ) {
 | |
|             if ( iy < 0 || iy >= y || ix < 0 || ix >= x ) {
 | |
|                 if ( size == 1 )
 | |
|                     *ncp++ = 0;
 | |
|                 else
 | |
|                     *nlp++ = 0;
 | |
|             } else {
 | |
|                 if ( size == 1 )
 | |
|                     *ncp++ = *CHARP(cp, x, ix, iy);
 | |
|                 else if ( size == 2 )
 | |
|                     *nsp++ = *SHORTP(cp, x, ix, iy);
 | |
|                 else
 | |
|                     *nlp++ = *LONGP(cp, x, ix, iy);
 | |
|             }
 | |
|         }
 | |
|     }
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_scale(PyObject *self, PyObject *args)
 | |
| {
 | |
|     char *cp, *ncp;
 | |
|     short *nsp;
 | |
|     Py_Int32 *nlp;
 | |
|     int len, size, x, y, newx, newy, nlen;
 | |
|     int ix, iy;
 | |
|     int oix, oiy;
 | |
|     PyObject *rv;
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#iiiii",
 | |
|                       &cp, &len, &size, &x, &y, &newx, &newy) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( size != 1 && size != 2 && size != 4 ) {
 | |
|         PyErr_SetString(ImageopError, "Size should be 1, 2 or 4");
 | |
|         return 0;
 | |
|     }
 | |
|     if ( !check_multiply_size(len, x, "x", y, "y", size) )
 | |
|         return 0;
 | |
|     nlen = newx*newy*size;
 | |
|     if ( !check_multiply_size(nlen, newx, "newx", newy, "newy", size) )
 | |
|         return 0;
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, nlen);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (char *)PyString_AsString(rv);
 | |
|     nsp = (short *)ncp;
 | |
|     nlp = (Py_Int32 *)ncp;
 | |
|     for( iy = 0; iy < newy; iy++ ) {
 | |
|         for ( ix = 0; ix < newx; ix++ ) {
 | |
|             oix = ix * x / newx;
 | |
|             oiy = iy * y / newy;
 | |
|             if ( size == 1 )
 | |
|                 *ncp++ = *CHARP(cp, x, oix, oiy);
 | |
|             else if ( size == 2 )
 | |
|                 *nsp++ = *SHORTP(cp, x, oix, oiy);
 | |
|             else
 | |
|                 *nlp++ = *LONGP(cp, x, oix, oiy);
 | |
|         }
 | |
|     }
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| /* Note: this routine can use a bit of optimizing */
 | |
| 
 | |
| static PyObject *
 | |
| imageop_tovideo(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int maxx, maxy, x, y, len;
 | |
|     int i;
 | |
|     unsigned char *cp, *ncp;
 | |
|     int width;
 | |
|     PyObject *rv;
 | |
| 
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#iii", &cp, &len, &width, &maxx, &maxy) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( width != 1 && width != 4 ) {
 | |
|         PyErr_SetString(ImageopError, "Size should be 1 or 4");
 | |
|         return 0;
 | |
|     }
 | |
|     if ( !check_multiply_size(len, maxx, "max", maxy, "maxy", width) )
 | |
|         return 0;
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, len);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
| 
 | |
|     if ( width == 1 ) {
 | |
|         memcpy(ncp, cp, maxx);                  /* Copy first line */
 | |
|         ncp += maxx;
 | |
|         for (y=1; y<maxy; y++) {                /* Interpolate other lines */
 | |
|             for(x=0; x<maxx; x++) {
 | |
|                 i = y*maxx + x;
 | |
|                 *ncp++ = ((int)cp[i] + (int)cp[i-maxx]) >> 1;
 | |
|             }
 | |
|         }
 | |
|     } else {
 | |
|         memcpy(ncp, cp, maxx*4);                        /* Copy first line */
 | |
|         ncp += maxx*4;
 | |
|         for (y=1; y<maxy; y++) {                /* Interpolate other lines */
 | |
|             for(x=0; x<maxx; x++) {
 | |
|                 i = (y*maxx + x)*4 + 1;
 | |
|                 *ncp++ = 0;                     /* Skip alfa comp */
 | |
|                 *ncp++ = ((int)cp[i] + (int)cp[i-4*maxx]) >> 1;
 | |
|                 i++;
 | |
|                 *ncp++ = ((int)cp[i] + (int)cp[i-4*maxx]) >> 1;
 | |
|                 i++;
 | |
|                 *ncp++ = ((int)cp[i] + (int)cp[i-4*maxx]) >> 1;
 | |
|             }
 | |
|         }
 | |
|     }
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_grey2mono(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int tres, x, y, len;
 | |
|     unsigned char *cp, *ncp;
 | |
|     unsigned char ovalue;
 | |
|     PyObject *rv;
 | |
|     int i, bit;
 | |
| 
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#iii", &cp, &len, &x, &y, &tres) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( !check_multiply(len, x, y) )
 | |
|         return 0;
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, (len+7)/8);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
| 
 | |
|     bit = 0x80;
 | |
|     ovalue = 0;
 | |
|     for ( i=0; i < len; i++ ) {
 | |
|         if ( (int)cp[i] > tres )
 | |
|             ovalue |= bit;
 | |
|         bit >>= 1;
 | |
|         if ( bit == 0 ) {
 | |
|             *ncp++ = ovalue;
 | |
|             bit = 0x80;
 | |
|             ovalue = 0;
 | |
|         }
 | |
|     }
 | |
|     if ( bit != 0x80 )
 | |
|         *ncp++ = ovalue;
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_grey2grey4(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int x, y, len;
 | |
|     unsigned char *cp, *ncp;
 | |
|     unsigned char ovalue;
 | |
|     PyObject *rv;
 | |
|     int i;
 | |
|     int pos;
 | |
| 
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( !check_multiply(len, x, y) )
 | |
|         return 0;
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, (len+1)/2);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
|     pos = 0;
 | |
|     ovalue = 0;
 | |
|     for ( i=0; i < len; i++ ) {
 | |
|         ovalue |= ((int)cp[i] & 0xf0) >> pos;
 | |
|         pos += 4;
 | |
|         if ( pos == 8 ) {
 | |
|             *ncp++ = ovalue;
 | |
|             ovalue = 0;
 | |
|             pos = 0;
 | |
|         }
 | |
|     }
 | |
|     if ( pos != 0 )
 | |
|         *ncp++ = ovalue;
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_grey2grey2(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int x, y, len;
 | |
|     unsigned char *cp, *ncp;
 | |
|     unsigned char ovalue;
 | |
|     PyObject *rv;
 | |
|     int i;
 | |
|     int pos;
 | |
| 
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( !check_multiply(len, x, y) )
 | |
|         return 0;
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, (len+3)/4);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
|     pos = 0;
 | |
|     ovalue = 0;
 | |
|     for ( i=0; i < len; i++ ) {
 | |
|         ovalue |= ((int)cp[i] & 0xc0) >> pos;
 | |
|         pos += 2;
 | |
|         if ( pos == 8 ) {
 | |
|             *ncp++ = ovalue;
 | |
|             ovalue = 0;
 | |
|             pos = 0;
 | |
|         }
 | |
|     }
 | |
|     if ( pos != 0 )
 | |
|         *ncp++ = ovalue;
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_dither2mono(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int sum, x, y, len;
 | |
|     unsigned char *cp, *ncp;
 | |
|     unsigned char ovalue;
 | |
|     PyObject *rv;
 | |
|     int i, bit;
 | |
| 
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( !check_multiply(len, x, y) )
 | |
|         return 0;
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, (len+7)/8);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
| 
 | |
|     bit = 0x80;
 | |
|     ovalue = 0;
 | |
|     sum = 0;
 | |
|     for ( i=0; i < len; i++ ) {
 | |
|         sum += cp[i];
 | |
|         if ( sum >= 256 ) {
 | |
|             sum -= 256;
 | |
|             ovalue |= bit;
 | |
|         }
 | |
|         bit >>= 1;
 | |
|         if ( bit == 0 ) {
 | |
|             *ncp++ = ovalue;
 | |
|             bit = 0x80;
 | |
|             ovalue = 0;
 | |
|         }
 | |
|     }
 | |
|     if ( bit != 0x80 )
 | |
|         *ncp++ = ovalue;
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_dither2grey2(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int x, y, len;
 | |
|     unsigned char *cp, *ncp;
 | |
|     unsigned char ovalue;
 | |
|     PyObject *rv;
 | |
|     int i;
 | |
|     int pos;
 | |
|     int sum = 0, nvalue;
 | |
| 
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( !check_multiply(len, x, y) )
 | |
|         return 0;
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, (len+3)/4);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
|     pos = 1;
 | |
|     ovalue = 0;
 | |
|     for ( i=0; i < len; i++ ) {
 | |
|         sum += cp[i];
 | |
|         nvalue = sum & 0x180;
 | |
|         sum -= nvalue;
 | |
|         ovalue |= nvalue >> pos;
 | |
|         pos += 2;
 | |
|         if ( pos == 9 ) {
 | |
|             *ncp++ = ovalue;
 | |
|             ovalue = 0;
 | |
|             pos = 1;
 | |
|         }
 | |
|     }
 | |
|     if ( pos != 0 )
 | |
|         *ncp++ = ovalue;
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_mono2grey(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int v0, v1, x, y, len, nlen;
 | |
|     unsigned char *cp, *ncp;
 | |
|     PyObject *rv;
 | |
|     int i, bit;
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#iiii", &cp, &len, &x, &y, &v0, &v1) )
 | |
|         return 0;
 | |
| 
 | |
|     nlen = x*y;
 | |
|     if ( !check_multiply(nlen, x, y) )
 | |
|         return 0;
 | |
|     if ( (nlen+7)/8 != len ) {
 | |
|         PyErr_SetString(ImageopError, "String has incorrect length");
 | |
|         return 0;
 | |
|     }
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, nlen);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
| 
 | |
|     bit = 0x80;
 | |
|     for ( i=0; i < nlen; i++ ) {
 | |
|         if ( *cp & bit )
 | |
|             *ncp++ = v1;
 | |
|         else
 | |
|             *ncp++ = v0;
 | |
|         bit >>= 1;
 | |
|         if ( bit == 0 ) {
 | |
|             bit = 0x80;
 | |
|             cp++;
 | |
|         }
 | |
|     }
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_grey22grey(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int x, y, len, nlen;
 | |
|     unsigned char *cp, *ncp;
 | |
|     PyObject *rv;
 | |
|     int i, pos, value = 0, nvalue;
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) )
 | |
|         return 0;
 | |
| 
 | |
|     nlen = x*y;
 | |
|     if ( !check_multiply(nlen, x, y) ) {
 | |
|         return 0;
 | |
|     }
 | |
|     if ( (nlen+3)/4 != len ) {
 | |
|         PyErr_SetString(ImageopError, "String has incorrect length");
 | |
|         return 0;
 | |
|     }
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, nlen);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
| 
 | |
|     pos = 0;
 | |
|     for ( i=0; i < nlen; i++ ) {
 | |
|         if ( pos == 0 ) {
 | |
|             value = *cp++;
 | |
|             pos = 8;
 | |
|         }
 | |
|         pos -= 2;
 | |
|         nvalue = (value >> pos) & 0x03;
 | |
|         *ncp++ = nvalue | (nvalue << 2) |
 | |
|                  (nvalue << 4) | (nvalue << 6);
 | |
|     }
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_grey42grey(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int x, y, len, nlen;
 | |
|     unsigned char *cp, *ncp;
 | |
|     PyObject *rv;
 | |
|     int i, pos, value = 0, nvalue;
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) )
 | |
|         return 0;
 | |
| 
 | |
|     nlen = x*y;
 | |
|     if ( !check_multiply(nlen, x, y) )
 | |
|         return 0;
 | |
|     if ( (nlen+1)/2 != len ) {
 | |
|         PyErr_SetString(ImageopError, "String has incorrect length");
 | |
|         return 0;
 | |
|     }
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, nlen);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
| 
 | |
|     pos = 0;
 | |
|     for ( i=0; i < nlen; i++ ) {
 | |
|         if ( pos == 0 ) {
 | |
|             value = *cp++;
 | |
|             pos = 8;
 | |
|         }
 | |
|         pos -= 4;
 | |
|         nvalue = (value >> pos) & 0x0f;
 | |
|         *ncp++ = nvalue | (nvalue << 4);
 | |
|     }
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_rgb2rgb8(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int x, y, len, nlen;
 | |
|     unsigned char *cp;
 | |
|     unsigned char *ncp;
 | |
|     PyObject *rv;
 | |
|     int i, r, g, b;
 | |
|     int backward_compatible = imageop_backward_compatible();
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( !check_multiply_size(len, x, "x", y, "y", 4) )
 | |
|         return 0;
 | |
|     nlen = x*y;
 | |
|     if ( !check_multiply(nlen, x, y) )
 | |
|         return 0;
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, nlen);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
| 
 | |
|     for ( i=0; i < nlen; i++ ) {
 | |
|         /* Bits in source: aaaaaaaa BBbbbbbb GGGggggg RRRrrrrr */
 | |
|         if (backward_compatible) {
 | |
|             Py_UInt32 value = * (Py_UInt32 *) cp;
 | |
|             cp += 4;
 | |
|             r = (int) ((value & 0xff) / 255. * 7. + .5);
 | |
|             g = (int) (((value >> 8) & 0xff) / 255. * 7. + .5);
 | |
|             b = (int) (((value >> 16) & 0xff) / 255. * 3. + .5);
 | |
|         } else {
 | |
|             cp++;                       /* skip alpha channel */
 | |
|             b = (int) (*cp++ / 255. * 3. + .5);
 | |
|             g = (int) (*cp++ / 255. * 7. + .5);
 | |
|             r = (int) (*cp++ / 255. * 7. + .5);
 | |
|         }
 | |
|         *ncp++ = (unsigned char)((r<<5) | (b<<3) | g);
 | |
|     }
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_rgb82rgb(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int x, y, len, nlen;
 | |
|     unsigned char *cp;
 | |
|     unsigned char *ncp;
 | |
|     PyObject *rv;
 | |
|     int i, r, g, b;
 | |
|     unsigned char value;
 | |
|     int backward_compatible = imageop_backward_compatible();
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( !check_multiply(len, x, y) )
 | |
|         return 0;
 | |
|     nlen = x*y*4;
 | |
|     if ( !check_multiply_size(nlen, x, "x", y, "y", 4) )
 | |
|         return 0;
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, nlen);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
| 
 | |
|     for ( i=0; i < len; i++ ) {
 | |
|         /* Bits in source: RRRBBGGG
 | |
|         ** Red and Green are multiplied by 36.5, Blue by 85
 | |
|         */
 | |
|         value = *cp++;
 | |
|         r = (value >> 5) & 7;
 | |
|         g = (value     ) & 7;
 | |
|         b = (value >> 3) & 3;
 | |
|         r = (r<<5) | (r<<3) | (r>>1);
 | |
|         g = (g<<5) | (g<<3) | (g>>1);
 | |
|         b = (b<<6) | (b<<4) | (b<<2) | b;
 | |
|         if (backward_compatible) {
 | |
|             Py_UInt32 nvalue = r | (g<<8) | (b<<16);
 | |
|             * (Py_UInt32 *) ncp = nvalue;
 | |
|             ncp += 4;
 | |
|         } else {
 | |
|             *ncp++ = 0;
 | |
|             *ncp++ = b;
 | |
|             *ncp++ = g;
 | |
|             *ncp++ = r;
 | |
|         }
 | |
|     }
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_rgb2grey(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int x, y, len, nlen;
 | |
|     unsigned char *cp;
 | |
|     unsigned char *ncp;
 | |
|     PyObject *rv;
 | |
|     int i, r, g, b;
 | |
|     int nvalue;
 | |
|     int backward_compatible = imageop_backward_compatible();
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( !check_multiply_size(len, x, "x", y, "y", 4) )
 | |
|         return 0;
 | |
|     nlen = x*y;
 | |
|     if ( !check_multiply(nlen, x, y) )
 | |
|         return 0;
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, nlen);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
| 
 | |
|     for ( i=0; i < nlen; i++ ) {
 | |
|         if (backward_compatible) {
 | |
|             Py_UInt32 value = * (Py_UInt32 *) cp;
 | |
|             cp += 4;
 | |
|             r = (int) ((value & 0xff) / 255. * 7. + .5);
 | |
|             g = (int) (((value >> 8) & 0xff) / 255. * 7. + .5);
 | |
|             b = (int) (((value >> 16) & 0xff) / 255. * 3. + .5);
 | |
|         } else {
 | |
|             cp++;                       /* skip alpha channel */
 | |
|             b = *cp++;
 | |
|             g = *cp++;
 | |
|             r = *cp++;
 | |
|         }
 | |
|         nvalue = (int)(0.30*r + 0.59*g + 0.11*b);
 | |
|         if ( nvalue > 255 ) nvalue = 255;
 | |
|         *ncp++ = (unsigned char)nvalue;
 | |
|     }
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyObject *
 | |
| imageop_grey2rgb(PyObject *self, PyObject *args)
 | |
| {
 | |
|     int x, y, len, nlen;
 | |
|     unsigned char *cp;
 | |
|     unsigned char *ncp;
 | |
|     PyObject *rv;
 | |
|     int i;
 | |
|     unsigned char value;
 | |
|     int backward_compatible = imageop_backward_compatible();
 | |
| 
 | |
|     if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) )
 | |
|         return 0;
 | |
| 
 | |
|     if ( !check_multiply(len, x, y) )
 | |
|         return 0;
 | |
|     nlen = x*y*4;
 | |
|     if ( !check_multiply_size(nlen, x, "x", y, "y", 4) )
 | |
|         return 0;
 | |
| 
 | |
|     rv = PyString_FromStringAndSize(NULL, nlen);
 | |
|     if ( rv == 0 )
 | |
|         return 0;
 | |
|     ncp = (unsigned char *)PyString_AsString(rv);
 | |
| 
 | |
|     for ( i=0; i < len; i++ ) {
 | |
|         value = *cp++;
 | |
|         if (backward_compatible) {
 | |
|             * (Py_UInt32 *) ncp = (Py_UInt32) value | ((Py_UInt32) value << 8 ) | ((Py_UInt32) value << 16);
 | |
|             ncp += 4;
 | |
|         } else {
 | |
|             *ncp++ = 0;
 | |
|             *ncp++ = value;
 | |
|             *ncp++ = value;
 | |
|             *ncp++ = value;
 | |
|         }
 | |
|     }
 | |
|     return rv;
 | |
| }
 | |
| 
 | |
| static PyMethodDef imageop_methods[] = {
 | |
|     { "crop",                   imageop_crop, METH_VARARGS },
 | |
|     { "scale",                  imageop_scale, METH_VARARGS },
 | |
|     { "grey2mono",              imageop_grey2mono, METH_VARARGS },
 | |
|     { "grey2grey2",             imageop_grey2grey2, METH_VARARGS },
 | |
|     { "grey2grey4",             imageop_grey2grey4, METH_VARARGS },
 | |
|     { "dither2mono",            imageop_dither2mono, METH_VARARGS },
 | |
|     { "dither2grey2",           imageop_dither2grey2, METH_VARARGS },
 | |
|     { "mono2grey",              imageop_mono2grey, METH_VARARGS },
 | |
|     { "grey22grey",             imageop_grey22grey, METH_VARARGS },
 | |
|     { "grey42grey",             imageop_grey42grey, METH_VARARGS },
 | |
|     { "tovideo",                imageop_tovideo, METH_VARARGS },
 | |
|     { "rgb2rgb8",               imageop_rgb2rgb8, METH_VARARGS },
 | |
|     { "rgb82rgb",               imageop_rgb82rgb, METH_VARARGS },
 | |
|     { "rgb2grey",               imageop_rgb2grey, METH_VARARGS },
 | |
|     { "grey2rgb",               imageop_grey2rgb, METH_VARARGS },
 | |
|     { 0,                    0 }
 | |
| };
 | |
| 
 | |
| 
 | |
| PyMODINIT_FUNC
 | |
| initimageop(void)
 | |
| {
 | |
|     PyObject *m;
 | |
| 
 | |
|     if (PyErr_WarnPy3k("the imageop module has been removed in "
 | |
|                        "Python 3.0", 2) < 0)
 | |
|         return;
 | |
| 
 | |
|     m = Py_InitModule("imageop", imageop_methods);
 | |
|     if (m == NULL)
 | |
|         return;
 | |
|     ImageopDict = PyModule_GetDict(m);
 | |
|     ImageopError = PyErr_NewException("imageop.error", NULL, NULL);
 | |
|     if (ImageopError != NULL)
 | |
|         PyDict_SetItemString(ImageopDict, "error", ImageopError);
 | |
| }
 |