summaryrefslogtreecommitdiff
path: root/wodim/audiosize.c
diff options
context:
space:
mode:
Diffstat (limited to 'wodim/audiosize.c')
-rw-r--r--wodim/audiosize.c289
1 files changed, 289 insertions, 0 deletions
diff --git a/wodim/audiosize.c b/wodim/audiosize.c
new file mode 100644
index 0000000..2cdad97
--- /dev/null
+++ b/wodim/audiosize.c
@@ -0,0 +1,289 @@
+/*
+ * This file has been modified for the cdrkit suite.
+ *
+ * The behaviour and appearence of the program code below can differ to a major
+ * extent from the version distributed by the original author(s).
+ *
+ * For details, see Changelog file distributed with the cdrkit package. If you
+ * received this file from another source then ask the distributing person for
+ * a log of modifications.
+ *
+ */
+
+/* @(#)audiosize.c 1.19 04/03/01 Copyright 1998-2004 J. Schilling */
+/*
+ * Copyright (c) 1998-2004 J. Schilling
+ *
+ * First .vaw implementation made by Dave Platt <dplatt@iq.nc.com>
+ * Current .wav implementation with additional help from Heiko Eißfeld.
+ */
+/*
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License version 2
+ * as published by the Free Software Foundation.
+ *
+ * This program 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
+ * this program; see the file COPYING. If not, write to the Free Software
+ * Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ */
+
+#include <mconfig.h>
+#include <statdefs.h>
+#include <unixstd.h>
+#include <standard.h>
+#include <utypes.h>
+#include <strdefs.h>
+#include <intcvt.h>
+#include <schily.h>
+
+#include <usal/usalcmd.h>
+#include "auheader.h"
+
+typedef struct {
+ Uchar magic[4];
+ Uchar hdr_size[4];
+ Uchar data_size[4];
+ Uchar encoding[4];
+ Uchar sample_rate[4];
+ Uchar channels[4];
+} sun_au_t;
+
+#define SUN_AU_MAGIC ".snd"
+#define SUN_AU_UNKNOWN_LEN ((Uint)~0)
+#define SUN_AU_ULAW8 1 /* American ISDN Telephonie */
+#define SUN_AU_LINEAR8 2 /* Linear PCM 8 bit/channel */
+#define SUN_AU_LINEAR16 3 /* Linear PCM 16 bit/channel */
+#define SUN_AU_LINEAR24 4 /* Linear PCM 24 bit/channel */
+#define SUN_AU_LINEAR32 5 /* Linear PCM 32 bit/channel */
+#define SUN_AU_FLOAT 6 /* 32 bit IEEE floatingpoint */
+#define SUN_AU_DOUBLE 7 /* 64 bit IEEE floatingpoint */
+#define SUN_AU_G721 23 /* 4 bit CCITT G.721 ADPCM */
+#define SUN_AU_G722 24 /* CCITT G.722 ADPCM */
+#define SUN_AU_G723_3 25 /* 3 bit CCITT G.723 ADPCM */
+#define SUN_AU_G723_5 26 /* 5 bit CCITT G.723 ADPCM */
+#define SUN_AU_ALAW8 27 /* International ISDN Tel. */
+
+typedef struct {
+ Uchar ckid[4];
+ Uchar cksize[4];
+} chunk_t;
+
+typedef struct {
+ Uchar wave[4];
+} riff_chunk;
+
+typedef struct {
+ Uchar fmt_tag[2];
+ Uchar channels[2];
+ Uchar sample_rate[4];
+ Uchar av_byte_rate[4];
+ Uchar block_size[2];
+ Uchar bits_per_sample[2];
+} fmt_chunk;
+
+#define WAV_RIFF_MAGIC "RIFF" /* Magic for file format */
+#define WAV_WAVE_MAGIC "WAVE" /* Magic for Waveform Audio */
+#define WAV_FMT_MAGIC "fmt " /* Start of Waveform format */
+#define WAV_DATA_MAGIC "data" /* Start of data chunk */
+#define WAV_FORMAT_PCM 0x0001 /* Linear PCM format */
+#define WAV_FORMAT_ULAW 0x0101 /* American ISDN Telephonie */
+#define WAV_FORMAT_ALAW 0x0102 /* International ISDN Tel. */
+#define WAV_FORMAT_ADPCM 0x0103 /* ADPCM format */
+
+#define le_a_to_u_short(a) ((unsigned short) \
+ ((((unsigned char *)a)[0] & 0xFF) | \
+ (((unsigned char *)a)[1] << 8 & 0xFF00)))
+
+#ifdef __STDC__
+#define le_a_to_u_long(a) ((unsigned long) \
+ ((((unsigned char *)a)[0] & 0xFF) | \
+ (((unsigned char *)a)[1] << 8 & 0xFF00) | \
+ (((unsigned char *)a)[2] << 16 & 0xFF0000) | \
+ (((unsigned char *)a)[3] << 24 & 0xFF000000UL)))
+#else
+#define le_a_to_u_long(a) ((unsigned long) \
+ ((((unsigned char *)a)[0] & 0xFF) | \
+ (((unsigned char *)a)[1] << 8 & 0xFF00) | \
+ (((unsigned char *)a)[2] << 16 & 0xFF0000) | \
+ (((unsigned char *)a)[3] << 24 & 0xFF000000)))
+#endif
+
+BOOL is_auname(const char *name);
+off_t ausize(int f);
+BOOL is_wavname(const char *name);
+off_t wavsize(int f);
+
+BOOL
+is_auname(const char *name)
+{
+ const char *p;
+
+ if ((p = strrchr(name, '.')) == NULL)
+ return (FALSE);
+ return (streql(p, ".au"));
+}
+
+/*
+ * Read Sun audio header, leave file seek pointer past auheader.
+ */
+off_t
+ausize(int f)
+{
+ sun_au_t hdr;
+ struct stat sb;
+ mode_t mode;
+ off_t size;
+ Int32_t val;
+ long ret = AU_BAD_HEADER;
+
+ /*
+ * First check if a bad guy tries to call ausize()
+ * with an unappropriate file descriptor.
+ * return -1 in this case.
+ */
+ if (isatty(f))
+ return (-1L);
+ if (fstat(f, &sb) < 0)
+ return (-1L);
+ mode = sb.st_mode & S_IFMT;
+ if (!S_ISREG(mode) && !S_ISBLK(mode) && !S_ISCHR(mode))
+ return (-1L);
+
+ if (read(f, &hdr, sizeof (hdr)) != sizeof (hdr))
+ goto err;
+
+ if (strncmp((char *)hdr.magic, SUN_AU_MAGIC, 4) != 0)
+ goto err;
+
+ ret = AU_BAD_CODING;
+
+ val = a_to_u_4_byte(hdr.encoding);
+ if (val != SUN_AU_LINEAR16)
+ goto err;
+
+ val = a_to_u_4_byte(hdr.channels);
+ if (val != 2)
+ goto err;
+
+ val = a_to_u_4_byte(hdr.sample_rate);
+ if (val != 44100)
+ goto err;
+
+ size = (off_t)a_to_u_4_byte(hdr.hdr_size);
+ if (size < (off_t)sizeof (hdr) || size > 512)
+ goto err;
+ lseek(f, size, SEEK_SET);
+
+ /*
+ * Most .au files don't seem to honor the data_size field,
+ * so we use the whole file size without the header.
+ */
+ size = sb.st_size - size;
+ return (size);
+
+err:
+ lseek(f, (off_t)0L, SEEK_SET);
+ return ((off_t)ret);
+}
+
+BOOL
+is_wavname(const char *name)
+{
+ const char *p;
+
+ if ((p = strrchr(name, '.')) == NULL)
+ return (FALSE);
+ return (streql(p, ".wav") || streql(p, ".WAV"));
+}
+
+/*
+ * Read WAV header, leave file seek pointer past WAV header.
+ */
+off_t
+wavsize(int f)
+{
+ chunk_t chunk;
+ riff_chunk riff;
+ fmt_chunk fmt;
+ struct stat sb;
+ off_t cursor;
+ BOOL gotFormat;
+ mode_t mode;
+ off_t size;
+ long ret = AU_BAD_HEADER;
+
+ /*
+ * First check if a bad guy tries to call wavsize()
+ * with an unappropriate file descriptor.
+ * return -1 in this case.
+ */
+
+ if (isatty(f))
+ return (-1L);
+ if (fstat(f, &sb) < 0)
+ return (-1L);
+ mode = sb.st_mode & S_IFMT;
+ if (!S_ISREG(mode) && !S_ISBLK(mode) && !S_ISCHR(mode))
+ return (-1L);
+
+ cursor = (off_t)0;
+ gotFormat = FALSE;
+
+ for (;;) {
+ if (read(f, &chunk, sizeof (chunk)) != sizeof (chunk))
+ goto err;
+ size = (off_t)le_a_to_u_long(chunk.cksize);
+
+ if (strncmp((char *)chunk.ckid, WAV_RIFF_MAGIC, 4) == 0) {
+ /*
+ * We found (first) RIFF header. Check if a WAVE
+ * magic follows. Set up size to be able to skip
+ * past this header.
+ */
+ if (read(f, &riff, sizeof (riff)) != sizeof (riff))
+ goto err;
+ if (strncmp((char *)riff.wave, WAV_WAVE_MAGIC, 4) != 0)
+ goto err;
+ size = (off_t)sizeof (riff);
+
+ } else if (strncmp((char *)chunk.ckid, WAV_FMT_MAGIC, 4) == 0) {
+ /*
+ * We found WAVE "fmt " header. Check size (if it is
+ * valid for a WAVE file) and coding whether it is
+ * useable for a CD.
+ */
+ if (size < (off_t)sizeof (fmt)) goto err;
+ if (sizeof (fmt) != read(f, &fmt, sizeof (fmt))) goto err;
+ if (le_a_to_u_short(fmt.channels) != 2 ||
+ le_a_to_u_long(fmt.sample_rate) != 44100 ||
+ le_a_to_u_short(fmt.bits_per_sample) != 16) {
+ ret = AU_BAD_CODING;
+ goto err;
+ }
+ gotFormat = TRUE;
+
+ } else if (strncmp((char *)chunk.ckid, WAV_DATA_MAGIC, 4) == 0) {
+ /*
+ * We found WAVE "data" header. This contains the
+ * size value of the audio part.
+ */
+ if (!gotFormat) {
+ ret = AU_BAD_CODING;
+ goto err;
+ }
+ if ((cursor + size + sizeof (chunk)) > sb.st_size)
+ size = sb.st_size - (cursor + sizeof (chunk));
+ return (size);
+ }
+ cursor += size + sizeof (chunk);
+ lseek(f, cursor, SEEK_SET); /* Skip over current chunk */
+ }
+err:
+ lseek(f, (off_t)0L, SEEK_SET);
+ return (ret);
+}
generated by cgit v1.2.3 (git 2.39.1) at 2024-11-21 14:03:20 +0000