nbmp.h

NEO SDK是一个跨平台的免费开源图形软件开发包。它支持基本绘图、多种格式图形显示、鼠标操 作、扩展内存和扩充内存的操作、时钟、音频播放、多种字体的汉字及英文显示等等特性；更激动人心的是

/*NEO SDK V2.1.90 For DOS
  Copyleft Cker Home 2003-2006.

  Open Source Obey NEO_PL.TXT.
  http://neo.coderlife.net
  [e-mail]

  文件名称 : nshow.h
  摘    要 : 本头文件中包含了NEO SDK里有关各种图形文件处理,显示的函数、结构、全局变量的声明定义
             目前支持格式: 标准微软位图BMP(Bitmap)文件

  当前版本 : V2.39
  作    者 : 凌晨一点
  完成日期 : 2006.02.25

  取代版本 : V2.38
  原 作 者 : 凌晨一点
  完成日期 : 2006.02.14
*/

#ifndef __NBMP_H__
#define __NBMP_H__

#define BMP_MAGIC          19778
#define BI_RGB             0
#define BI_RLE8            1
#define BI_RLE4            2
#define BI_BITFIELDS       3
#define OS2INFOHEADERSIZE  12
#define WININFOHEADERSIZE  40

#ifndef NEO_bmp_support_unused
typedef struct bitmap_file_head
{
   int   bf_type;       /*  位图文件的类型，必须为BM */
   long  bf_size;       /*  位图文件的大小，以字节为单位 */
   int   bf_reserved1;  /*  位图文件保留字，必须为0 */
   int   bf_reserved2;  /*  位图文件保留字，必须为0 */
   long  bf_offset;     /*  位图数据的起始位置，以相对于位图 */
/*  文件头的偏移量表示，以字节为单位 */
}bitmap_file_head_t;

typedef struct bitmap_info_head  /* size: 40 */
{
   long  size;            /*  本结构所占用字节数一般为28h */
   long  width;           /*  位图的宽度，以像素为单位 */
   long  height;          /*  位图的高度，以像素为单位 */
   int   planes;          /*  目标设备的级别，必须为1 */
   int   bitCount;        /*  每个像素所需的位数，必须是1(双色), */
                            /*  4(16色)，8(256色)或24(真彩色)之一 */

   long  compression;     /*  位图压缩类型，必须是 0(不压缩), */
                          /*  1(BI_RLE8压缩类型)或2(BI_RLE4压缩类型)之一 */
   long  sizeImage;       /*  位图的大小，以字节为单位 */
   long  XpelsPerMeter;   /*  位图水平分辨率，每米像素数 */
   long  YpelsPerMeter;   /*  位图垂直分辨率，每米像素数 */
   long  clrUsed;         /*  位图实际使用的颜色表中的颜色数 */
   long  clrImportant;    /*  位图显示过程中重要的颜色数 */
}bitmap_info_head_t;

#endif /*NEO_bmp_support_unused*/
/* Used for both OS/2 and Windows BMP. 
 * Contains only the parameters needed to load the image 
 */
typedef struct
{
   long  biWidth;       /*  位图的宽度，以像素为单位 */
   long  biHeight;      /*  位图的高度，以像素为单位 */
   short biBitCount;    /*  每个像素所需的位数 */
   long  biCompression; /*  位图压缩类型 */
} BITMAPINFOHEADER;


typedef struct BITMAP
{
   /*long     ems_handle;
   unsigned long vram_offset;
   unsigned xms_handle;*/
   int  w;
   int  h;
   int  fp;
   char bpp;
   char flag;   /*小于零表示使用基本内存;等于零表示使用虚拟内存(硬盘空间);为1时为使用扩展内存;
                  为2时为使用扩充内存;为3时使用显存 */
   char *fname; /*不用 "FILE *" 是因为DOS有文件打开数目限制*/
}BITMAP;


#if defined NEO_bmp_support_unused || defined NEO_color_depth_8_unused
#else
char g_last_bmp[PATH_LENGTH] = {'\0'};
#endif
/*char g_map_file[PATH_LENGTH];*/

char g_palette_changed;
char g_enable_palette  = TRUE;

char get_pal_from_bmp(char *filename, PALETTE output);
void set_pal_with_bmp(char *filename);

char read_win_bminfoheader(PACKFILE *file, BITMAPINFOHEADER *bmpheader);
char bmp_color_depth(PACKFILE *file);
void read_scan_line(int fp, void *buffer, int count/*, int line*/);
char show_bmp(PACKFILE *bmpfile, int x, int y);
char show_bmp_ex(PACKFILE *bmpfile, int x, int y, int param, long flags);
char bmp_masked_blit(char *bmpname, int source_x, int source_y, int dest_x, int dest_y, int width, int height);
char bmp_blit(char *bmpname, int source_x, int source_y, int dest_x, int dest_y, int width, int height);
#define set_bmp_mask(maskcolor)      g_tptcolor = maskcolor
#define _show_bmp(bmp, x, y)         show_bmp_ex(bmp, x, y, 0, BMP_MASK_C)
#define show_bmp_v_flip(bmp, x, y)   show_bmp_ex(bmp, x, y, 0, BMP_V_FLIP)
#define _show_bmp_v_flip(bmp, x, y)  show_bmp_ex(bmp, x, y, 0, BMP_MASK_C|BMP_V_FLIP)
#define show_bmp_h_flip(bmp, x, y)   show_bmp_ex(bmp, x, y, 0, BMP_H_FLIP)
#define _show_bmp_h_flip(bmp, x, y)  show_bmp_ex(bmp, x, y, 0, BMP_MASK_C|BMP_H_FLIP)
#define show_bmp_vh_flip(bmp, x, y)  show_bmp_ex(bmp, x, y, 0, BMP_H_FLIP|BMP_V_FLIP)
#define _show_bmp_vh_flip(bmp, x, y) show_bmp_ex(bmp, x, y, 0, BMP_MASK_C|BMP_H_FLIP|BMP_V_FLIP)
#define show_bmp_hv_flip(bmp, x, y)  show_bmp_vh_flip(bmp, x, y)
#define _show_bmp_hv_flip(bmp, x, y) _show_bmp_vh_flip(bmp, x, y)

#define save_screen(bmpfile)         rect_save_screen(bmpfile, 0, 0, SCREEN_W - 1, SCREEN_H - 1)
#define scan_line_define scan_line_throw
BITMAP *get_image(int x0, int y0, int x1, int y1);
void put_image_ex(BITMAP *image, int x, int y, int param, long flags);
BITMAP *load_bmp(char *file, PALETTE pal);
void destroy_bitmap(BITMAP *bitmap);

/*已经不被支持的函数*/
#define _load_bmp(filename)   0
#define blit(xms_handle)      0
#define free_bmp( xms_handle) 0

#ifndef NEO_bmp_support_unused

char read_win_bminfoheader(PACKFILE *file, BITMAPINFOHEADER *bmpheader)
{
   FILE *fp;
   int bmpmark;

   fp = fopen(file, "rb");
   if(fp == NULL)
   {
      return FALSE;
   }
   _FREAD(&bmpmark, 2, 1, fp);

   if (bmpmark != BMP_MAGIC)
   {
      return -1;
   }
   fseek(fp, 28,SEEK_SET);
   _FREAD(&bmpheader->biBitCount, 2, 1, fp);
   fseek(fp, 18, SEEK_SET);
   _FREAD(&bmpheader->biWidth, 4, 1, fp);
   /*fseek(fp, 2, SEEK_CUR);*/
   _FREAD(&bmpheader->biHeight, 4, 1, fp);
   fclose(fp);
   return (char)bmpheader->biBitCount;
}


#ifndef NEO_color_depth_8_unused
#ifndef NEO_palette_unused
char get_bmp_palette(int fp, int bpp, PALETTE output) /*show_bmp()函数专用*/
{
   unsigned i = 0;
   unsigned char pix24b[4];

   lseek(fp, 54, SEEK_SET);
   switch (bpp)
   {
      case 8:
      for(; i < 256; ++i)
      {
         _READ(fp, &pix24b, 4);
         output[i].r = pix24b[2] >> g_dac_size_fix;
         output[i].g = pix24b[1] >> g_dac_size_fix;
         output[i].b = pix24b[0] >> g_dac_size_fix;
      }
      break;
      /*case 4:
      for(; i < 16; ++i)
      {
         _READ(fp, &pix24b, 4);
         output[i].r = pix24b[2] >> g_dac_size_fix;
         output[i].g = pix24b[1] >> g_dac_size_fix;
         output[i].b = pix24b[0] >> g_dac_size_fix;
      }   
      break;*/
      default:
      make_332_palette(output);
      break;
   }

   return TRUE;
}

char get_pal_from_bmp(char *bmpfile, PALETTE outpal)
{
   BITMAPINFOHEADER bmpheader;
   int fp;
   if (read_win_bminfoheader(bmpfile, &bmpheader) <= 0)
   {
      #ifndef NEO_sys_report_error_unused
      Errinfo_t error = {"get_bmp_palette", NO_FILE, 1};
      throw_error(error);
      #endif
      return FALSE;
   }
   fp = open(bmpfile, O_RDONLY | O_BINARY);
   get_bmp_palette(fp, bmpheader.biBitCount, outpal);
   close(fp);
   return bmpheader.biBitCount;
}


void set_pal_with_bmp(char *filename)
{
   PALETTE pal;
   get_pal_from_bmp(filename, pal);
   #ifndef NEO_draw_smooth_unused
   _set_palette_range(pal, 0, _PAL_SIZE - 1, 1);
   #else
   _set_palette_range(pal, 0, _PAL_SIZE - 1, 0);
   #endif
}
#endif /*NEO_palette_unused*/
#endif /*NEO_color_depth_8_unused*/


char bmp_color_depth(PACKFILE *file)
{
   BITMAPINFOHEADER bmpheader;

   return read_win_bminfoheader(file, &bmpheader);
}
   

#ifndef NEO_showbmp_unused

void read_scan_line(int fp, void *buffer, int count/*, int line*/)
{
   _READ(fp, buffer, count);

   if (g_bmp_flags)
   {
      if (g_h_flip_) /*进行扫描线水平翻转*/
      {
         scan_line_h_flip(buffer, count/*, line*/);
      }
      if (g_stead_) /*颜色替换应该放在前面，以保证颜色信息在不被其它特效干扰*/
      {
         scan_line_stead(buffer, count/*, line*/);
      }
      if (g_bright_)
      {
         scan_line_bright(buffer, count/*, line*/);
      }
      if (g_vivid_)
      {
         scan_line_vivid(buffer, count/*, line*/);
      }
      if (g_roloc_)
      {
         scan_line_roloc(buffer, count/*, line*/);
      }
      if (g_wublur_)
      {
         scan_line_wublur(buffer, count/*, line*/);
      }

      if (g_channl_) /*去颜色通道也要放在后面，否则会被其它算法干扰*/
      {
         scan_line_throw(buffer, count/*, line*/);
      }
      if (g_jmplin_) /*这两个一定要放在最后，否则无法产生透明效果*/
      {
         scan_line_jump(buffer, count/*, line*/);
      }
      if (g_broken_)
      {
         scan_line_broken(buffer, count/*, line*/);
      }
      if (g_define_)
      {
         scan_line_define(buffer, count/*, line*/);
      }
   }
}


char show_bmp(PACKFILE *bmpfile, int x, int y)
{
   BITMAPINFOHEADER bmpheader;
   Uint32 cnt = 0, addr1;
   register int   i, j, k;
   int   length, len, len2, real_hig;
   int   rect_scr_h = g_rect_right + 1;
   int   fp;
   int   offset = 0, color, fix = 0;
   int   xx = x, yy, start = -1, temp, masklen;
   char  page1;
   Uint8 wid_fix = 0;
   Uint8 *buffer;

   if (read_win_bminfoheader(bmpfile, &bmpheader) <= 0)
   {
      #ifndef NEO_sys_report_error_unused
      Errinfo_t error = {"show_bmp", NO_FILE, 1};
      throw_error(error);
      #endif
      return 0;
   }

   fp = open(bmpfile, O_RDONLY | O_BINARY);

   g_bmp_wid  = (int)bmpheader.biWidth;
   g_bmpheight= (int)bmpheader.biHeight;
   g_bmpbits  = (char)bmpheader.biBitCount;

   if ( (y > g_rect_bottom) || (y + g_bmpheight < g_rect_top) )
   {
      close(fp);
      return -1;
   }
   real_hig = --g_bmpheight;

   if (x >= 0 && x < rect_scr_h)
   {
      if (rect_scr_h - x >= g_bmp_wid) /*图象完全显示*/
      {
         fix = (x <= g_rect_left? (x >> (g_color_depth == 8)) : (g_rect_left >> (g_color_depth == 8)) );
         masklen = length = len = g_bmp_wid;
      }
      else                            /*图象右端溢出*/
      {
         if (x > g_rect_left)
         {
            x -= g_rect_left;
            start = 0;
         }
         else fix = (x >> (g_color_depth == 8));
         masklen = length = len = rect_scr_h - x;
      }
   }
   else if (x < 0 && x > (-g_bmp_wid))
   {
      offset = x;
      if (g_bmp_wid + x >= rect_scr_h)  /*图象水平两端溢出*/
      {
         length = len = rect_scr_h;
         masklen = rect_scr_h - x;
      }
      else                             /*图象左边溢出*/
      {
         len = (masklen = length = g_bmp_wid) + x;
      }
      x = 0;
   }
   else
   {
      close(fp);
      return -1;
   }

   if (g_color_depth == 8)
   {
      #ifndef NEO_color_depth_8_unused
      int far *s_tmp;
      int origin;

      len >>= 1;length -= (length & 1);
      origin = (g_rect_left >> 1) - fix;
      if (start < 0) start = origin;
      temp = start;

      if (g_bmpbits == 8)
      {
         #ifndef NEO_8bit_bmp_unused
         if ((buffer = (unsigned char *)malloc(len2 = g_bmp_wid + (wid_fix = (g_bmp_wid & 3)?(4 - (g_bmp_wid & 3)) : 0))) == NULL)
         {
            #ifndef NEO_sys_report_error_unused
            Errinfo_t error = {"show_bmp", NO_MEMORY, 0};
            close(fp);
            throw_error(error);
            #endif
         }
         s_tmp = (int far *)buffer;
         (char far *)s_tmp  -= offset;
         if (g_enable_palette && ((strnicmp(g_last_bmp,bmpfile,strlen(bmpfile)) != 0) || g_palette_changed))
         {
            PALETTE pal;
            get_bmp_palette(fp, 8, pal);

            #ifndef NEO_draw_smooth_unused
            _set_palette_range(pal, 0, 255, 1);
            #else
            _set_palette_range(pal, 0, 255, 0);
            #endif
            strcpy(g_last_bmp,bmpfile);
         }
         else lseek(fp, 1078, SEEK_SET);

         for(j = real_hig; j >= 0; --j)
         {
            if (((yy = y + (g_v_flip_?real_hig - j : j) ) < g_rect_top) || (yy > g_rect_bottom))
            {