static void make_dvms_hdr(sox_format_t * ft, struct dvms_header *hdr)
{
priv_t *p = (priv_t *) ft->priv;
size_t len;
char * comment = lsx_cat_comments(ft->oob.comments);
memset(hdr->Filename, 0, sizeof(hdr->Filename));
len = strlen(ft->filename);
if (len >= sizeof(hdr->Filename))
len = sizeof(hdr->Filename)-1;
memcpy(hdr->Filename, ft->filename, len);
hdr->Id = hdr->State = 0;
hdr->Unixtime = sox_globals.repeatable? 0 : time(NULL);
hdr->Usender = hdr->Ureceiver = 0;
hdr->Length = p->bytes_written;
hdr->Srate = p->cvsd_rate/100;
hdr->Days = hdr->Custom1 = hdr->Custom2 = 0;
memset(hdr->Info, 0, sizeof(hdr->Info));
len = strlen(comment);
if (len >= sizeof(hdr->Info))
len = sizeof(hdr->Info)-1;
memcpy(hdr->Info, comment, len);
memset(hdr->extend, 0, sizeof(hdr->extend));
free(comment);
}
static int write_header(sox_format_t * ft)
{
char * comments = lsx_cat_comments(ft->oob.comments);
size_t comments_len = strlen(comments);
size_t comments_bytes = (comments_len + 7) & ~7u; /* Multiple of 8 bytes */
uint64_t size = ft->olength? ft->olength : ft->signal.length;
sox_bool error = sox_false
||lsx_writedw(ft, *(uint32_t *)&magic[MACHINE_IS_BIGENDIAN])
||lsx_writedw(ft, FIXED_HDR + (unsigned)comments_bytes)
||lsx_writeqw(ft, size)
||lsx_writedf(ft, ft->signal.rate)
||lsx_writedw(ft, ft->signal.channels)
||lsx_writedw(ft, (unsigned)comments_len)
||lsx_writechars(ft, comments, comments_len)
||lsx_padbytes(ft, comments_bytes - comments_len);
free(comments);
return error? SOX_EOF: SOX_SUCCESS;
}
static int write_header(sox_format_t * ft)
{
char * comment = lsx_cat_comments(ft->oob.comments);
size_t len = min(FIXED_HDR - 26, strlen(comment)) + 1; /* null-terminated */
size_t info_len = max(4, (len + 3) & ~3u); /* Minimum & multiple of 4 bytes */
int i = ft->encoding.reverse_bytes == MACHINE_IS_BIGENDIAN? 0 : 2;
sox_bool error = sox_false
||lsx_writechars(ft, id[i].str, sizeof(id[i].str))
||lsx_writef(ft, ft->signal.rate)
||lsx_writedw(ft, ft->signal.channels)
||lsx_writedw(ft, ft_enc(ft->encoding.bits_per_sample, ft->encoding.encoding))
||lsx_writew(ft, SF_COMMENT)
||lsx_writew(ft, (unsigned) info_len)
||lsx_writechars(ft, comment, len)
||lsx_padbytes(ft, FIXED_HDR - 20 - len);
free(comment);
return error? SOX_EOF: SOX_SUCCESS;
}
