From ea1947ffcc606d757357398b24e74a3f4ecefa07 Mon Sep 17 00:00:00 2001
From: neonloop
Date: Wed, 20 Oct 2021 14:54:27 +0000
Subject: Initial commit from steward-fu release

---
 modules/mod_map/file_pcx.c | 187 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 187 insertions(+)
 create mode 100644 modules/mod_map/file_pcx.c

(limited to 'modules/mod_map/file_pcx.c')

diff --git a/modules/mod_map/file_pcx.c b/modules/mod_map/file_pcx.c
new file mode 100644
index 0000000..4bdc3df
--- /dev/null
+++ b/modules/mod_map/file_pcx.c
@@ -0,0 +1,187 @@
+/*
+ *  Copyright © 2006-2016 SplinterGU (Fenix/Bennugd)
+ *  Copyright © 2002-2006 Fenix Team (Fenix)
+ *  Copyright © 1999-2002 José Luis Cebrián Pagüe (Fenix)
+ *
+ *  This file is part of Bennu - Game Development
+ *
+ *  This software is provided 'as-is', without any express or implied
+ *  warranty. In no event will the authors be held liable for any damages
+ *  arising from the use of this software.
+ *
+ *  Permission is granted to anyone to use this software for any purpose,
+ *  including commercial applications, and to alter it and redistribute it
+ *  freely, subject to the following restrictions:
+ *
+ *     1. The origin of this software must not be misrepresented; you must not
+ *     claim that you wrote the original software. If you use this software
+ *     in a product, an acknowledgment in the product documentation would be
+ *     appreciated but is not required.
+ *
+ *     2. Altered source versions must be plainly marked as such, and must not be
+ *     misrepresented as being the original software.
+ *
+ *     3. This notice may not be removed or altered from any source
+ *     distribution.
+ *
+ */
+
+/* --------------------------------------------------------------------------- */
+
+#include "mod_map.h"
+
+/* --------------------------------------------------------------------------- */
+
+/*
+ * TYPE DEFINITIONS
+ */
+
+typedef struct
+{
+    uint8_t Manufacturer;
+    uint8_t Version;
+    uint8_t Encoding;
+    uint8_t BitsPerPixel;
+    int16_t Xmin, Ymin, Xmax, Ymax;
+    int16_t HDpi, VDpi;
+    uint8_t Colormap[48];
+    uint8_t Reserved;
+    uint8_t NPlanes;
+    int16_t BytesPerLine;
+    int16_t PaletteInfo;
+    int16_t HscreenSize;
+    int16_t VscreenSize;
+    uint8_t Filler[54];
+} PCXheader ;
+
+/* --------------------------------------------------------------------------- */
+
+/*
+ *  FUNCTION : gr_read_pcx
+ *
+ *  Returns GRAPH newly created from FILENAME.  GRAPH is created in LIB 0
+ *
+ *  PARAMS:
+ *      CONST CHAR * filename: File to be read
+ *
+ *  RETURN VALUE:
+ *      pointer to the newly created GRAPH
+ *
+ */
+
+GRAPH * gr_read_pcx( const char * filename )
+{
+    PCXheader header ;
+    file *    file ;
+    int       width, height, x, y, p, count ;
+    GRAPH *   bitmap ;
+    uint8_t *   ptr, ch ;
+
+    file = file_open( filename, "rb" ) ;
+    if ( !file ) return NULL ;
+
+    file_read( file, &header, sizeof( header ) ) ;
+
+    /* Arrange the data for big-endian machines */
+    ARRANGE_WORD( &header.Xmax );
+    ARRANGE_WORD( &header.Xmin );
+    ARRANGE_WORD( &header.Ymax );
+    ARRANGE_WORD( &header.Ymin );
+    ARRANGE_WORD( &header.BytesPerLine );
+    ARRANGE_WORD( &header.PaletteInfo );
+    ARRANGE_WORD( &header.HDpi );
+    ARRANGE_WORD( &header.VDpi );
+    ARRANGE_WORD( &header.HscreenSize );
+    ARRANGE_WORD( &header.VscreenSize );
+
+    width  = header.Xmax - header.Xmin + 1 ;
+    height = header.Ymax - header.Ymin + 1 ;
+
+    bitmap = bitmap_new( 0, width, height, ( header.BitsPerPixel == 8 ) ? 8 : 16 ) ;
+    if ( !bitmap )
+    {
+        file_close( file );
+        return NULL;
+    }
+
+    if ( width > header.BytesPerLine )
+    {
+        bitmap_destroy( bitmap );
+        file_close( file );
+        return NULL;
+    }
+
+    if ( header.BitsPerPixel == 8 )
+    {
+        for ( y = 0 ; y < height ; y++ )
+            for ( p = 0 ; p < header.NPlanes ; p++ )
+            {
+                ptr = ( uint8_t * )bitmap->data + bitmap->pitch * y ;
+                for ( x = 0 ; x < header.BytesPerLine ; )
+                {
+                    if ( file_read( file, &ch, 1 ) < 1 )
+                    {
+                        bitmap_destroy( bitmap );
+                        file_close( file );
+                        return NULL;
+                    }
+                    if (( ch & 0xC0 ) == 0xC0 )
+                    {
+                        count = ( ch & 0x3F ) ;
+                        file_read( file, &ch, 1 ) ;
+                    }
+                    else
+                    {
+                        count = 1 ;
+                    }
+                    while ( count-- )
+                    {
+                        *ptr = ch ;
+                        x++ ;
+                        ptr += header.NPlanes ;
+                    }
+                }
+            }
+
+        if ( file_read( file, &ch, 1 ) == 1 && ch == 0x0c )
+        {
+            uint8_t colors[256 * 3] ;
+            if ( file_read( file, colors, sizeof( colors ) ) )
+            {
+                bitmap->format->palette = pal_new_rgb(( uint8_t * )colors );
+                pal_refresh( bitmap->format->palette );
+
+                if ( !sys_pixel_format->palette )
+                {
+                    sys_pixel_format->palette = pal_new( bitmap->format->palette );
+/*                    pal_use( bitmap->format->palette ); */
+                    palette_changed = 1 ;
+                }
+            }
+        }
+    }
+    else
+    {
+        bitmap_destroy( bitmap );
+        file_close( file );
+        return NULL;
+    }
+
+    bitmap->modified = 0 ;
+    bitmap_analize( bitmap );
+
+    return bitmap ;
+}
+
+/* --------------------------------------------------------------------------- */
+
+int gr_load_pcx( const char * mapname )
+{
+    GRAPH * gr = gr_read_pcx( mapname ) ;
+    if ( !gr ) return 0 ;
+    gr->code = bitmap_next_code() ;
+    grlib_add_map( 0, gr ) ;
+    return gr->code ;
+}
+
+/* --------------------------------------------------------------------------- */
-- 
cgit v1.2.3