Files
HxCFloppyEmulator/libhxcfe/sources/loaders/bmp_loader/bmp_disk_writer.c
T
2026-01-18 18:50:10 +01:00

235 lines
7.8 KiB
C

/*
//
// Copyright (C) 2006-2026 Jean-François DEL NERO
//
// This file is part of the HxCFloppyEmulator library
//
// HxCFloppyEmulator may be used and distributed without restriction provided
// that this copyright statement is not removed from the file and that any
// derivative work contains the original copyright notice and the associated
// disclaimer.
//
// HxCFloppyEmulator is free software; you can redistribute it
// and/or modify it under the terms of the GNU General Public License
// as published by the Free Software Foundation; either version 2
// of the License, or (at your option) any later version.
//
// HxCFloppyEmulator is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
// See the GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with HxCFloppyEmulator; if not, write to the Free Software
// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
//
*/
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include "types.h"
#include "internal_libhxcfe.h"
#include "libhxcfe.h"
#include "bmp_loader.h"
#include "libhxcadaptor.h"
#include "bmp_file.h"
#include "misc/env.h"
extern int png_encode_image(void *image, size_t length, uint32_t width, uint32_t height, char * filename);
extern void copyPict(uint32_t * dest,int d_xsize,int d_ysize,int d_xpos,int d_ypos,uint32_t * src,int s_xsize,int s_ysize);
extern unsigned char getPixelCode(uint32_t pix,uint32_t * pal,int * nbcol);
static int progress_callback(unsigned int current,unsigned int total,void * td,void * user)
{
return hxcfe_imgCallProgressCallback((HXCFE_IMGLDR*)user,current,total);
}
static int IMAGE_Disk_libWrite_DiskFile(HXCFE_IMGLDR* imgldr_ctx,HXCFE_FLOPPY * floppydisk,char * filename, int png)
{
int ret,i,j,k;
HXCFE_TD * td;
uint32_t * ptr;
unsigned char * ptrchar;
bitmap_data bdata;
char name[1024];
uint32_t pal[256];
int nbcol;
ret = HXCFE_NOERROR;
imgldr_ctx->hxcfe->hxc_printf(MSG_INFO_1,"Write BMP file %s",filename);
td = hxcfe_td_init(imgldr_ctx->hxcfe,hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPDISKEXPORT_DEFAULT_XSIZE" ), \
hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPDISKEXPORT_DEFAULT_YSIZE" ));
if(td)
{
hxcfe_td_setProgressCallback(td,&progress_callback,(void*)imgldr_ctx);
hxc_getfilenamewext(filename, (char*)&name, SYS_PATH_TYPE);
hxcfe_td_setName( td , (char*)&name );
hxcfe_td_activate_analyzer(td, ISOIBM_MFM_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_ISOIBM_MFM_ENCODING" ));
hxcfe_td_activate_analyzer(td, ISOIBM_FM_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_ISOIBM_FM_ENCODING" ));
hxcfe_td_activate_analyzer(td, AMIGA_MFM_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_AMIGA_MFM_ENCODING" ));
hxcfe_td_activate_analyzer(td, EMU_FM_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_EMU_FM_ENCODING" ));
hxcfe_td_activate_analyzer(td, MEMBRAIN_MFM_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_MEMBRAIN_MFM_ENCODING" ));
hxcfe_td_activate_analyzer(td, TYCOM_FM_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_TYCOM_FM_ENCODING" ));
hxcfe_td_activate_analyzer(td, APPLEII_GCR1_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_APPLEII_GCR1_ENCODING" ));
hxcfe_td_activate_analyzer(td, APPLEII_GCR2_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_APPLEII_GCR2_ENCODING" ));
hxcfe_td_activate_analyzer(td, APPLEMAC_GCR_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_APPLEMAC_GCR_ENCODING" ));
hxcfe_td_activate_analyzer(td, ARBURGDAT_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_ARBURGDAT_ENCODING" ));
hxcfe_td_activate_analyzer(td, ARBURGSYS_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_ARBURGSYS_ENCODING" ));
hxcfe_td_activate_analyzer(td, QD_MO5_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_QD_MO5_ENCODING" ));
hxcfe_td_activate_analyzer(td, C64_GCR_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_C64_GCR_ENCODING"));
hxcfe_td_activate_analyzer(td, VICTOR9K_GCR_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_VICTOR9000_GCR_ENCODING"));
hxcfe_td_activate_analyzer(td, MICRALN_HS_FM_ENCODING, hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_ENABLE_MICRALN_HS_FM_ENCODING"));
hxcfe_td_setparams(td,hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_DEFAULT_XTOTALTIME" ),hxcfe_getEnvVarValue( imgldr_ctx->hxcfe, "BMPEXPORT_DEFAULT_YTOTALTIME" ),90*1000, 0);
ptr = malloc(td->xsize*td->ysize*4);
if(ptr)
{
memset(ptr,0,(td->xsize*td->ysize*4));
imgldr_ctx->hxcfe->hxc_printf(MSG_INFO_1,"Generate track BMP...");
hxcfe_td_draw_disk(td,floppydisk);
copyPict((uint32_t *)ptr,td->xsize,td->ysize,0,0,(uint32_t *)td->framebuffer,td->xsize,td->ysize);
if( png )
{
ptrchar = (unsigned char *)ptr;
// Set alpha bytes
for(i=0;i<(td->xsize*td->ysize);i++)
{
ptrchar[(i*4) + 3] = 0xFF;
}
imgldr_ctx->hxcfe->hxc_printf(MSG_INFO_1,"Writing %s...",filename);
png_encode_image(ptr, td->xsize*td->ysize*4, td->xsize, td->ysize, filename);
}
else
{
for(i=0;i<256;i++)
{
pal[i]=i|(i<<8)|(i<<16);
}
ptrchar = malloc((td->xsize*td->ysize));
if(ptrchar)
{
imgldr_ctx->hxcfe->hxc_printf(MSG_INFO_1,"Converting image...");
nbcol = 0;
k=0;
for(i=0;i< ( td->ysize );i++)
{
for(j=0;j< ( td->xsize );j++)
{
ptrchar[k] = getPixelCode(ptr[k],(uint32_t*)&pal,&nbcol);
k++;
}
}
if(nbcol>=256)
{
k = 0;
for(i=0;i< ( td->ysize );i++)
{
for(j=0;j< ( td->xsize );j++)
{
ptr[k] = ptr[k] & 0xF8F8F8;
k++;
}
}
for(i=0;i<256;i++)
{
pal[i]=i|(i<<8)|(i<<16);
}
nbcol = 0;
k=0;
for(i=0;i< ( td->ysize );i++)
{
for(j=0;j< ( td->xsize );j++)
{
ptrchar[k] = getPixelCode(ptr[k],(uint32_t*)&pal,&nbcol);
k++;
}
}
}
imgldr_ctx->hxcfe->hxc_printf(MSG_INFO_1,"Writing %s...",filename);
if(nbcol>=256)
{
bdata.nb_color = 16;
bdata.xsize = td->xsize;
bdata.ysize = td->ysize;
bdata.data = (void*)ptr;
bdata.palette = 0;
bmp16b_write(filename,&bdata);
}
else
{
bdata.nb_color = 8;
bdata.xsize = td->xsize;
bdata.ysize = td->ysize;
bdata.data = (void*)ptrchar;
bdata.palette = (unsigned char*)&pal;
bmpRLE8b_write(filename,&bdata);
}
imgldr_ctx->hxcfe->hxc_printf(MSG_INFO_1,"%d tracks written to the BMP file",floppydisk->floppyNumberOfTrack * floppydisk->floppyNumberOfSide);
free(ptrchar);
}
else
{
ret = HXCFE_INTERNALERROR;
}
}
free(ptr);
}
else
{
imgldr_ctx->hxcfe->hxc_printf(MSG_ERROR,"Internal error (malloc) !");
return HXCFE_INTERNALERROR;
}
hxcfe_td_deinit(td);
}
else
{
imgldr_ctx->hxcfe->hxc_printf(MSG_ERROR,"Internal error !");
return HXCFE_INTERNALERROR;
}
return ret;
}
int BMP_Disk_libWrite_DiskFile(HXCFE_IMGLDR* imgldr_ctx,HXCFE_FLOPPY * floppydisk,char * filename)
{
return IMAGE_Disk_libWrite_DiskFile(imgldr_ctx,floppydisk,filename,0);
}
int PNG_Disk_libWrite_DiskFile(HXCFE_IMGLDR* imgldr_ctx,HXCFE_FLOPPY * floppydisk,char * filename)
{
return IMAGE_Disk_libWrite_DiskFile(imgldr_ctx,floppydisk,filename,1);
}