nevrax.org : docs

00001 #include <stdio.h>
+00002 #include <stdlib.h>
+00003 #include <string.h>
+00004 
+00005 #include "pic_private.h"
+00006 #include "pic.h"
+00007 
+00008 // ----------------------------------------------------------------------------------------------------------------------------------
+00009 
+00010 #pragma pack(1)
+00011 typedef struct BMP_HEADER
+00012 {
+00013         unsigned short  bfType;
+00014         unsigned long   bfSize;
+00015         unsigned short  Res1;
+00016         unsigned short  Res2;
+00017         unsigned long   bfOffBits;
+00018         unsigned long   biSize;
+00019         unsigned long   biWidth;
+00020         unsigned long   biHeight;
+00021         unsigned short  biPlanes;
+00022         unsigned short  biBitCount;
+00023         unsigned long   biCompression;
+00024         unsigned long   biSizeImage;
+00025         unsigned long   biXPelsPerMeter;
+00026         unsigned long   biYPelsPerMeter;
+00027         unsigned long   biClrUsed;
+00028         unsigned long   biClrImportant;
+00029 } BMP_HEADER;
+00030 #pragma pack()
+00031 
+00032 // ----------------------------------------------------------------------------------------------------------------------------------
+00033 
+00034 unsigned long Pic_BMP_Write(    unsigned char *FileName, 
+00035                                                                 unsigned char *pPal,unsigned char *pDatas, 
+00036                                                                 unsigned long w, unsigned long h, unsigned long d)
+00037 
+00038 {
+00039         FILE                    *file;
+00040         BMP_HEADER              bmph;
+00041         unsigned long   slsize;
+00042         unsigned char   *scanline;      
+00043         unsigned long   i;
+00044         long                    x,y,rest;
+00045         unsigned char   r,g,b;
+00046 
+00047         file=fopen(FileName,"wb");
+00048         if (!file)
+00049         {
+00050                 return(0);
+00051         }
+00052         memset(&bmph,0,sizeof(BMP_HEADER));
+00053         bmph.bfType=19778;
+00054         bmph.bfSize=sizeof(BMP_HEADER);
+00055         bmph.bfSize+=w*h*d/8;
+00056         if (pPal)
+00057         {
+00058                 bmph.bfSize+=(256*4);
+00059         }
+00060         bmph.bfOffBits=sizeof(BMP_HEADER);
+00061         if (pPal)
+00062         {
+00063                 bmph.bfOffBits+=(256*4);
+00064         }
+00065         bmph.biSize=40;//sizeof(BMP_HEADER);
+00066         bmph.biWidth=w;
+00067         bmph.biHeight=h;
+00068         bmph.biPlanes=1;
+00069         bmph.biBitCount=(unsigned short)d;
+00070         bmph.biCompression=0;
+00071         bmph.biSizeImage=w*h*d/8;
+00072 
+00073         fwrite(&bmph,1,sizeof(BMP_HEADER),file);
+00074         if (pPal)
+00075         {
+00076                 for(i=0 ; i<256 ; i++)
+00077                 {
+00078                         fwrite(&pPal[i*3+0],1,1,file);
+00079                         fwrite(&pPal[i*3+1],1,1,file);
+00080                         fwrite(&pPal[i*3+2],1,1,file);
+00081                         fwrite(&pPal[i*3+2],1,1,file);
+00082                 }
+00083         }
+00084         slsize=w*d/8;
+00085         scanline=Pic_calloc(1,slsize);
+00086         if (!scanline)
+00087         {
+00088                 Pic_SetError("BMP_Write, not enough memory for scanline");
+00089                 return(0);
+00090         }
+00091         for(rest=0 ; ((w*d/8)+rest)%4!=0 ; rest++);
+00092         for(y=0 ; y<(long)h ; y++)
+00093         {
+00094                 memcpy(scanline,&pDatas[(h-y-1)*slsize],slsize);
+00095                 if (d==24)
+00096                 {
+00097                         for(x=0 ; x<(long)w ; x++)
+00098                         {
+00099                                 b=scanline[x*3+0];
+00100                                 g=scanline[x*3+1];
+00101                                 r=scanline[x*3+2];
+00102                                 scanline[x*3+0]=b;
+00103                                 scanline[x*3+1]=g;
+00104                                 scanline[x*3+2]=r;                              
+00105                         }
+00106                 }
+00107                 fwrite(scanline,1,slsize,file);
+00108                 if (rest)
+00109                 {
+00110                         fwrite(scanline,1,rest,file);
+00111                 }
+00112         }
+00113         Pic_free(scanline);
+00114         fclose(file);
+00115         return(1);
+00116 }
+00117 
+00118 // ----------------------------------------------------------------------------------------------------------------------------------
+00119 
+00120 unsigned long Pic_BMP_Read(     unsigned char *FileName,
+00121                                                         unsigned char **ppPal, unsigned char **ppDatas,
+00122                                                         unsigned long *pWidth, unsigned long *pHeight, 
+00123                                                         unsigned long *pDepth)
+00124 {
+00125         FILE                    *file;
+00126         BMP_HEADER              bmph;
+00127         unsigned char   *pPal;
+00128         unsigned char   *pDatas;
+00129         unsigned char   *scanline;
+00130         long                    w,h,d;  
+00131         long                    i,x,y,rest;
+00132         unsigned char   r,g,b;
+00133         unsigned char   pad[4];
+00134 
+00135         pPal=NULL;
+00136         pDatas=NULL;
+00137         file=fopen(FileName,"rb");
+00138         if (!file)
+00139         {
+00140                 Pic_SetError("BMP_Read, unable to open %s",FileName);
+00141                 return(0);
+00142         }
+00143         fread(&bmph,1,sizeof(BMP_HEADER),file);
+00144         *pWidth=w=bmph.biWidth;
+00145         *pHeight=h=bmph.biHeight;
+00146         *pDepth=d=bmph.biBitCount;
+00147         if (d!=8 && d!=24)
+00148         {
+00149                 Pic_SetError("BMP_Read, number of bits per pixel unsupported");
+00150                 return(0);
+00151         }
+00152         if (*pDepth==8)
+00153         {
+00154                 pPal=Pic_calloc(1,256*3);
+00155                 if (!pPal)
+00156                 {
+00157                         Pic_SetError("BMP_Read, not enough memory for palette");
+00158                         return(0);
+00159                 }
+00160                 for(i=0 ; i<256 ; i++)
+00161                 {
+00162                         fread(&pPal[i*3+2],1,1,file);           
+00163                         fread(&pPal[i*3+1],1,1,file);           
+00164                         fread(&pPal[i*3+0],1,1,file);           
+00165                         fread(&pad[0],1,1,file);
+00166                 }               
+00167         }
+00168         pDatas=Pic_calloc(1,w*h*d/8);
+00169         if (!pDatas)
+00170         {
+00171                 if (pPal)
+00172                 {
+00173                         Pic_free(pPal);
+00174                 }
+00175                 Pic_SetError("BMP_Read, not enough memory for datas");
+00176                 return(0);
+00177         }
+00178         scanline=Pic_calloc(1,w*h*d/8);
+00179         if (!scanline)
+00180         {
+00181                 if (pPal)
+00182                 {
+00183                         Pic_free(pPal);
+00184                 }
+00185                 Pic_free(pDatas);
+00186                 Pic_SetError("BMP_Read, not enough memory for scanline");
+00187                 return(0);
+00188         }
+00189         for(rest=0 ; (w+rest)%4!=0 ; rest++);
+00190         for(y=0 ; y<h ; y++)
+00191         {
+00192                 fread(scanline,w,d/8,file);
+00193                 if (d==24)
+00194                 {
+00195                         for(x=0 ; x<w ; x++)
+00196                         {
+00197                                 r=scanline[x*3+0];
+00198                                 g=scanline[x*3+1];
+00199                                 b=scanline[x*3+2];
+00200                                 scanline[x*3+0]=b;
+00201                                 scanline[x*3+1]=g;
+00202                                 scanline[x*3+2]=r;                              
+00203                         }
+00204                 }
+00205                 memcpy(&pDatas[(h-y-1)*w*d/8],scanline,w*d/8);
+00206                 fread(pad,rest,d/8,file);
+00207         }
+00208         fclose(file);
+00209         Pic_free(scanline);
+00210         *ppPal=pPal;
+00211         *ppDatas=pDatas;
+00212         return(1);
+00213 }
+00214 
+00215 // ----------------------------------------------------------------------------------------------------------------------------------
+
Pic_BMP.c
