libcasio/src/link/seven_mcs/put.c.draft

62 lines
2.3 KiB
Plaintext

/* ****************************************************************************
* link/seven_mcs/put.c -- put a file into a protocol seven main memory.
* 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 "seven_mcs.h"
/**
* casio_sevenmcs_put:
* Put the file to the Protocol 7.00 main memory.
*
* @arg cookie the Protocol 7.00 main memory interface detail.
* @arg mcsfile the MCS file to send.
* @return the error code (0 if ok).
*/
int casio_sevenmcs_put(sevenmcs_t *cookie, casio_mcsfile_t *mcsfile)
{
int err; casio_mcshead_t *head;
casio_stream_t *data_stream;
/* Send the command. */
msg((ll_info, "Sending the file request."));
err = casio_seven_send_cmd_data(cookie->sevenmcs_link,
casio_seven_cmdmcs_putfile, casio_seven_ow_force,
head.casio_mcshead_rawtype, /* FIXME: size */,
head.casio_mcshead_dirname, head.casio_mcshead_name,
head.casio_mcshead_group, NULL, NULL, NULL);
if (err) return (err);
/* Check the answer. */
if (response.casio_seven_packet_type == casio_seven_type_nak
&& response.casio_seven_packet_code == casio_seven_err_other)
return (casio_error_op);
else if (response.casio_seven_packet_type != casio_seven_type_ack)
return (casio_error_unknown);
/* Make the data stream. */
err = casio_seven_open_data_stream(&data_stream, cookie->sevenmcs_link,
/* FIXME: size */, cookie->sevenmcs_disp,
cookie->sevenmcs_disp_cookie);
if (err) return (err);
/* Encode the file on-the-flight. */
err = casio_encode_mcsfile(mcsfile, data_stream);
casio_close(data_stream);
return (err);
}