libcasio/lib/mcsfile/copy.c

86 lines
2.6 KiB
C

/* ****************************************************************************
* mcsfile/copy.c -- copy an MCS file handle.
* Copyright (C) 2017 Thomas "Cakeisalie5" Touhey <thomas@touhey.fr>
*
* This file is part of libcasio.
* libcasio 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.
*
* libcasio 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 libcasio; if not, see <http://www.gnu.org/licenses/>.
* ************************************************************************* */
#include "mcsfile.h"
/**
* casio_copy_mcsfile:
* Copy an MCS file.
*
* @arg handle the destination file.
* @arg orig the source file.
* @return the error code (0 if ok).
*/
int CASIO_EXPORT casio_copy_mcsfile(casio_mcsfile_t *handle,
casio_mcsfile_t *orig)
{
int err; casio_mcshead_t *head;
int n; unsigned int y, wd, ht;
/* Prepare the new file. */
err = casio_prepare_mcsfile(handle, &orig->casio_mcsfile_head);
if (err) return (err);
head = &handle->casio_mcsfile_head;
/* Copy the data. */
switch (head->casio_mcshead_type) {
case casio_mcstype_list: case casio_mcstype_mat:
case casio_mcstype_vct: case casio_mcstype_ssheet:
wd = head->casio_mcshead_width;
ht = head->casio_mcshead_height;
msg((ll_info, "Copying %d*%d matrix", wd, ht));
for (y = 0; y < ht; y++) {
memcpy(handle->casio_mcsfile_cells[y],
orig->casio_mcsfile_cells[y],
wd * sizeof(casio_mcscell_t));
}
break;
case casio_mcstype_alphamem:
memcpy(handle->casio_mcsfile_vars, orig->casio_mcsfile_vars,
sizeof(casio_mcscell_t) * head->casio_mcshead_count);
break;
case casio_mcstype_pict: case casio_mcstype_capt:
for (n = 0; n < head->casio_mcshead_count; n++)
for (y = 0; y < head->casio_mcshead_height; y++) {
memcpy(handle->casio_mcsfile_pics[n][y],
orig->casio_mcsfile_pics[n][y],
sizeof(casio_pixel_t) * head->casio_mcshead_width);
}
break;
case casio_mcstype_setup:
memcpy(&handle->casio_mcsfile_setup, &orig->casio_mcsfile_setup,
sizeof(casio_setup_t));
break;
case casio_mcstype_end: case casio_mcstype_string: break;
default:
memcpy(handle->casio_mcsfile_content, orig->casio_mcsfile_content,
head->casio_mcshead_size);
break;
}
/* No error! */
return (0);
}