88 lines
2.7 KiB
C
88 lines
2.7 KiB
C
|
/* *****************************************************************************
|
||
|
|
* encode/mcs/matrix.c -- encode an MCS matrix.
|
||
|
|
* Copyright (C) 2017 Thomas "Cakeisalie5" Touhey <thomas@touhey.fr>
|
||
|
|
*
|
||
|
|
* This file is part of libg1m.
|
||
|
|
* libg1m is free software; you can redistribute it and/or modify it
|
||
|
|
* under the terms of the GNU Lesser General Public License as published by
|
||
|
|
* the Free Software Foundation; either version 3.0 of the License,
|
||
|
|
* or (at your option) any later version.
|
||
|
|
*
|
||
|
|
* libg1m 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 Lesser General Public License for more details.
|
||
|
|
*
|
||
|
|
* You should have received a copy of the GNU Lesser General Public License
|
||
|
|
* along with libg1m; if not, see <http://www.gnu.org/licenses/>.
|
||
|
|
* ************************************************************************** */
|
||
|
|
#include <libg1m/internals.h>
|
||
|
|
|
||
|
|
/**
|
||
|
|
* g1m_announce_mcs_matrix:
|
||
|
|
* Announce a matrix's size.
|
||
|
|
*
|
||
|
|
* @arg handle the handle to make the size out of.
|
||
|
|
* @arg sz the size to contribute to.
|
||
|
|
* @return the error code (0 if ok).
|
||
|
|
*/
|
||
|
|
|
||
|
|
int g1m_announce_mcs_matrix(const g1m_mcsfile_t *handle, size_t *sz)
|
||
|
|
{
|
||
|
|
/* base size of the matrix */
|
||
|
|
size_t content_size = handle->head.height * handle->head.width
|
||
|
|
* sizeof(mcs_bcd_t);
|
||
|
|
*sz += sizeof(struct mcs_matheader) + content_size;
|
||
|
|
|
||
|
|
/* check if there's an imaginary part */
|
||
|
|
for (unsigned int y = 0; y < handle->head.height; y++)
|
||
|
|
for (unsigned int x = 0; x < handle->head.width; x++) {
|
||
|
|
if (g1m_bcd_has_special(&handle->cells[y][x].real)) {
|
||
|
|
*sz += content_size;
|
||
|
|
return (0);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/* no error! */
|
||
|
|
return (0);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* g1m_encode_mcs_matrix:
|
||
|
|
* Encode a matrix.
|
||
|
|
*
|
||
|
|
* @arg handle the handle to encode.
|
||
|
|
* @arg buffer the buffer to write to.
|
||
|
|
* @return the error code (0 if ok).
|
||
|
|
*/
|
||
|
|
|
||
|
|
int g1m_encode_mcs_matrix(const g1m_mcsfile_t *handle, g1m_buffer_t *buffer)
|
||
|
|
{
|
||
|
|
/* write the header */
|
||
|
|
struct mcs_matheader hd = {
|
||
|
|
.height = htobe16(handle->head.height),
|
||
|
|
.width = htobe16(handle->head.width),
|
||
|
|
.undocumented2 = {0} };
|
||
|
|
DWRITE(hd)
|
||
|
|
|
||
|
|
/* write the real parts */
|
||
|
|
int one_imgn = 0;
|
||
|
|
for (unsigned int y = 0; y < handle->head.height; y++)
|
||
|
|
for (unsigned int x = 0; x < handle->head.width; x++) {
|
||
|
|
mcs_bcd_t rawbcd; g1m_bcd_tomcs(&handle->cells[y][x].real, &rawbcd);
|
||
|
|
DWRITE(rawbcd)
|
||
|
|
|
||
|
|
one_imgn |= g1m_bcd_has_special(&handle->cells[y][x].real);
|
||
|
|
}
|
||
|
|
|
||
|
|
/* write the imaginary parts */
|
||
|
|
if (one_imgn) for (unsigned int y = 0; y < handle->head.height; y++)
|
||
|
|
for (unsigned int x = 0; x < handle->head.width; x++) {
|
||
|
|
mcs_bcd_t rawbcd; g1m_bcd_tomcs(&handle->cells[y][x].imgn, &rawbcd);
|
||
|
|
DWRITE(rawbcd)
|
||
|
|
}
|
||
|
|
|
||
|
|
/* no error */
|
||
|
|
return (0);
|
||
|
|
}
|