pnghand.cpp

Wxpython Implemented on Windows CE, Source code

    }
    //png_set_error(ima_png_error, NULL);
    
    /* initialize the structures, info first for error handling */
    png_info_init(info_ptr);
    png_read_init(png_ptr);
    
    /* set up the input control */
    png_init_io(png_ptr, fp);
    
    /* read the file information */
    png_read_info(png_ptr, info_ptr);
    
    /* allocate the memory to hold the image using the fields
    of png_info. */
    png_color_16 my_background={ 0, 31, 127, 255, 0 };
    
    if (info_ptr->valid & PNG_INFO_bKGD)
    {
        png_set_background(png_ptr, &(info_ptr->background),
            PNG_BACKGROUND_GAMMA_FILE, 1, 1.0);
        if ( info_ptr->num_palette > 0 )
            bgindex = info_ptr->background.index;
    }
    else   {
        png_set_background(png_ptr, &my_background,
            PNG_BACKGROUND_GAMMA_SCREEN, 0, 1.0);
        
        // Added by JACS: guesswork!
        if ( info_ptr->num_trans != 0 )
            bgindex = info_ptr->num_trans - 1 ;
    }
    
    /* tell libpng to strip 16 bit depth files down to 8 bits */
    if (info_ptr->bit_depth == 16)
        png_set_strip_16(png_ptr);
    
    int pixel_depth=(info_ptr->pixel_depth<24) ? info_ptr->pixel_depth: 24;
    Create(info_ptr->width, info_ptr->height, pixel_depth,
        info_ptr->color_type);
    
    if (info_ptr->num_palette>0)
    {
        SetPalette((int)info_ptr->num_palette, (rgb_color_struct*)info_ptr->palette);
    }
    
    int row_stride = info_ptr->width * ((pixel_depth+7)>>3);
    //  printf("P = %d D = %d RS= %d ", info_ptr->num_palette, info_ptr->pixel_depth,row_stride);
    //  printf("CT = %d TRS = %d BD= %d ", info_ptr->color_type, info_ptr->valid & PNG_INFO_tRNS,info_ptr->bit_depth);
    
    byte *row_pointers = new byte[row_stride];
    
    /* turn on interlace handling */
    if (info_ptr->interlace_type)
        number_passes = png_set_interlace_handling(png_ptr);
    else
        number_passes = 1;
    //  printf("NP = %d ", number_passes);
    
    for (int pass=0; pass< number_passes; pass++) 
    {
        iter.upset();
        int y=0;
        CGrafPtr     origPort ;
        GDHandle    origDevice ;
        
        GetGWorld( &origPort , &origDevice ) ;
        // ignore shapedc
        SetGWorld( (GWorldPtr) lpbi , NULL ) ;
        do  
        {
            //    (unsigned char *)iter.GetRow();
            if (info_ptr->interlace_type)  
            {
                if (pass>0)
                    iter.GetRow(row_pointers, row_stride);
                png_read_row(png_ptr, row_pointers, NULL);
            }
            else
                png_read_row(png_ptr, row_pointers, NULL);
            
            if ( info_ptr->palette )
            {
                if ( pixel_depth == 8 )
                {
                    for ( size_t i = 0 ; i < info_ptr->width ; ++i )
                    {
                        png_color_struct* color ; 
                        RGBColor col ;
                        
                        int index = row_pointers[i] ;
                        color = &info_ptr->palette[index] ;
                        col.red = (((int)color->red) << 8) | ((int)color->red) ;
                        col.green = (((int)color->green) << 8) | ((int)color->green) ;
                        col.blue = (((int)color->blue) << 8) | ((int)color->blue) ;
                        SetCPixel( i, y, &col);
                    }
                    /*
                    png_color_struct* color ; 
                    RGBColor col ;
                    unsigned char* p = &row_pointers[0] ;
                    PenNormal() ;
                    MoveTo( 0 , y ) ;
                    int index = *p ;
                    color = &info_ptr->palette[index] ;
                    col.red = (color->red << 8) | color->red ;
                    col.green = (color->green << 8) | color->green ;
                    col.blue = (color->blue << 8) | color->blue ;
                    RGBForeColor( &col ) ;
                    col.red = col.green = col.blue = 0xFFFF ;
                    RGBBackColor( &col ) ;
                    for ( int i = 0 ; i < info_ptr->width ; ++i , ++p)
                    {
                    if ( *p != index )
                    {
                    LineTo( i , y ) ;
                    index = *p ;
                    color = &info_ptr->palette[index] ;
                    col.red = (((int)color->red) << 8) | ((int)color->red) ;
                    col.green = (((int)color->green) << 8) | ((int)color->green) ;
                    col.blue = (((int)color->blue) << 8) | ((int)color->blue) ;
                    RGBForeColor( &col ) ;
                    }
                    }
                    LineTo( info_ptr->width  , y ) ;
                    */
                }
                else
                {
                    for ( size_t i = 0 ; i < info_ptr->width ; ++i )
                    {
                        png_color_struct* color ; 
                        RGBColor col ;
                        
                        int byte = ( i * pixel_depth ) / 8 ;
                        int offset = ( 8 - pixel_depth ) - ( i * pixel_depth ) % 8 ;
                        
                        int index = ( row_pointers[byte] >> offset ) & ( 0xFF >> ( 8 - pixel_depth ) );
                        color = &info_ptr->palette[index] ;
                        col.red = (((int)color->red) << 8) | ((int)color->red) ;
                        col.green = (((int)color->green) << 8) | ((int)color->green) ;
                        col.blue = (((int)color->blue) << 8) | ((int)color->blue) ;
                        SetCPixel( i, y, &col);
                    }
                }
            }
            else
            {
                for ( size_t i = 0 ; i < info_ptr->width ; ++i )
                {
                    png_color_struct* color ; 
                    RGBColor col ;
                    color =(png_color_struct*) (&row_pointers[i*3]) ;
                    col.red = (((int)color->red) << 8) | ((int)color->red) ;
                    col.green = (((int)color->green) << 8) | ((int)color->green) ;
                    col.blue = (((int)color->blue) << 8) | ((int)color->blue) ;
                    SetCPixel( i, y, &col);
                }
            }
            if (number_passes)
                iter.SetRow(row_pointers, row_stride);
            y++;
        } 
        while(iter.PrevRow());
        SetGWorld( origPort , origDevice ) ;
        
        //  printf("Y=%d ",y);
  }
  delete[] row_pointers;
  
  /* read the rest of the file, getting any additional chunks
  in info_ptr */
  png_read_end(png_ptr, info_ptr);
  
  /* clean up after the read, and free any memory allocated */
  png_read_destroy(png_ptr, info_ptr, (png_info *)0);
  
  /* free the structures */
  delete png_ptr;
  delete info_ptr;
  
  /* close the file */
  fclose(fp);
  
  /* that's it */
  return TRUE;
}


/* write a png file */

bool wxPNGReader::SaveFile(char * ImageFileName)
{
    if (ImageFileName)
        strcpy(filename, ImageFileName);
    
    wxPNGReaderIter iter(this);
    FILE *fp;
    png_struct *png_ptr;
    png_info *info_ptr;
    
    /* open the file */
    fp = fopen(filename, "wb");
    if (!fp)
        return FALSE;
    
    /* allocate the necessary structures */
    png_ptr = new (png_struct);
    if (!png_ptr)
    {
        fclose(fp);
        return FALSE;
    }
    
    info_ptr = new (png_info);
    if (!info_ptr)
    {
        fclose(fp);
        delete png_ptr;
        return FALSE;
    }
    
    /* set error handling */
    if (setjmp(png_ptr->jmpbuf))
    {
        png_write_destroy(png_ptr);
        fclose(fp);
        delete png_ptr;
        delete info_ptr;
        
        /* If we get here, we had a problem reading the file */
        return FALSE;
    }
    //png_set_error(ima_png_error, NULL);
    
    //  printf("writig pg %s ", filename);
    /* initialize the structures */
    png_info_init(info_ptr);
    png_write_init(png_ptr);
    
    int row_stride = GetWidth() * ((GetDepth()+7)>>3);
    /* set up the output control */
    png_init_io(png_ptr, fp);
    
    /* set the file information here */
    info_ptr->width = GetWidth();
    info_ptr->height = GetHeight();
    info_ptr->pixel_depth = GetDepth();
    info_ptr->channels = (GetDepth()>8) ? 3: 1;
    info_ptr->bit_depth = GetDepth()/info_ptr->channels;
    info_ptr->color_type = GetColorType();
    info_ptr->compression_type = info_ptr->filter_type = info_ptr->interlace_type=0;
    info_ptr->valid = 0;
    info_ptr->rowbytes = row_stride;
    
    
    // printf("P = %d D = %d RS= %d GD= %d CH= %d ", info_ptr->pixel_depth, info_ptr->bit_depth, row_stride, GetDepth(), info_ptr->channels);
    /* set the palette if there is one */
    if ((GetColorType() & COLORTYPE_PALETTE) && GetPalette())
    {
        //    printf("writing paleta[%d %d %x]",GetColorType() ,COLORTYPE_PALETTE, GetPalette());
        info_ptr->valid |= PNG_INFO_PLTE;
        info_ptr->palette = new png_color[256];
        info_ptr->num_palette = 256;
        for (int i=0; i<256; i++)
            GetPalette()->GetRGB(i, &info_ptr->palette[i].red, &info_ptr->palette[i].green, &info_ptr->palette[i].blue);
    }
    //    printf("Paleta [%d %d %x]",GetColorType() ,COLORTYPE_PALETTE, GetPalette());
    
    
    /* optional significant bit chunk */
    //   info_ptr->valid |= PNG_INFO_sBIT;
    //   info_ptr->sig_bit = true_bit_depth;
    
    /* optional gamma chunk */
    //   info_ptr->valid |= PNG_INFO_gAMA;
    //   info_ptr->gamma = gamma;
    
    /* other optional chunks */
    
    /* write the file information */
    png_write_info(png_ptr, info_ptr);
    
    /* set up the transformations you want.  Note that these are
    all optional.  Only call them if you want them */
    
    /* shift the pixels up to a legal bit depth and fill in
    as appropriate to correctly scale the image */
    //   png_set_shift(png_ptr, &(info_ptr->sig_bit));
    
    /* pack pixels into bytes */
    //   png_set_packing(png_ptr);
    
    /* flip bgr pixels to rgb */
    //   png_set_bgr(png_ptr);
    
    /* swap bytes of 16 bit files to most significant bit first */
    //   png_set_swap(png_ptr);
    
    /* get rid of filler bytes, pack rgb into 3 bytes */
    //   png_set_rgbx(png_ptr);
    
    /* If you are only writing one row at a time, this works */
    
    byte *row_pointers = new byte[row_stride];
    iter.upset();
    do  {
        //    (unsigned char *)iter.GetRow();
        iter.GetRow(row_pointers, row_stride);
        png_write_row(png_ptr, row_pointers);
    } while(iter.PrevRow());
    
    delete[] row_pointers;
    
    /* write the rest of the file */
    png_write_end(png_ptr, info_ptr);
    
    /* clean up after the write, and free any memory allocated */
    png_write_destroy(png_ptr);
    
    /* if you malloced the palette, free it here */
    if (info_ptr->palette)
        delete[] (info_ptr->palette);
    
    /* free the structures */
    delete png_ptr;
    delete info_ptr;
    
    /* close the file */
    fclose(fp);
    
    /* that's it */
    return TRUE;
}

static int Power(int x, int y)
{
    int z = 1;
    int i;
    for ( i = 0; i < y; i++)
    {
        z *= x;
    }
    return z;
}

static char hexArray[] = { '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B',
'C', 'D', 'E', 'F' };

static void DecToHex(int dec, char *buf)
{
    int firstDigit = (int)(dec/16.0);
    int secondDigit = (int)(dec - (firstDigit*16.0));
    buf[0] = hexArray[firstDigit];
    buf[1] = hexArray[secondDigit];
    buf[2] = 0;
}


bool wxPNGReader::SaveXPM(char *filename, char *name)
{
    char nameStr[256];
    if ( name )
        strcpy(nameStr, name);
    else
    {
    	wxString str = wxString::FromAscii(filename) ;
    	wxStripExtension( str ) ;
        strcpy(nameStr, str.ToAscii() );
    }
    
    if ( GetDepth() > 4 )
    {
        // Only a depth of 4 and below allowed
        return FALSE;
    }
    
    if ( !GetPalette() )
        return FALSE;
    
    wxSTD ofstream str(filename);
    if ( str.bad() )
        return FALSE;
    
    int noColours = Power(2, GetDepth());
    
    // Output header
    str << "/* XPM */\n";
    str << "static char * " << nameStr << "_xpm[] = {\n";
    str << "\"" << GetWidth() << " " << GetHeight() << " " << noColours << " 1\",\n";
    
    // Output colourmap
    int base = 97 ; // start from 'a'
    
    unsigned char red, green, blue;
    char hexBuf[4];
    int i;
    for ( i = 0; i < noColours; i ++)
    {
        str << "\"" << (char)(base + i) << "      c #";
        GetPalette()->GetRGB(i, &red, &green, &blue);
        DecToHex(red, hexBuf);
        str << hexBuf;
        DecToHex(green, hexBuf);
        str << hexBuf;
        DecToHex(blue, hexBuf);
        str << hexBuf;
        str << "\",\n";
    }
    
    // Output the data
    int x, y;
    for ( y = 0; y < GetHeight(); y++)
    {
        str << "\"";
        for ( x = 0; x < GetWidth(); x++)
        {
            int index = GetIndex(x, y);
            str << (char)(base + index) ;
        }
        str << "\",\n";
    }
    
    str << "};\n";
    str.flush();
    
    return TRUE;
}


IMPLEMENT_DYNAMIC_CLASS(wxPNGFileHandler, wxBitmapHandler)

bool wxPNGFileHandler::LoadFile(wxBitmap *bitmap, const wxString& name, long flags,
                                int desiredWidth, int desiredHeight)
{
    wxPNGReader reader;
    if (reader.ReadFile( (char*)(const char*) name.ToAscii() ) )
    {
        return reader.InstantiateBitmap(bitmap);
    }
    else
        return FALSE;
}

bool wxPNGFileHandler::SaveFile(const wxBitmap *bitmap, const wxString& name, int type, const wxPalette *pal)
{
    return FALSE;
}