summaryrefslogtreecommitdiffstatshomepage
path: root/src/lib/formats/orao_cas.cpp
diff options
context:
space:
mode:
author Miodrag Milanovic <mmicko@gmail.com>2015-11-08 12:56:12 +0100
committer Miodrag Milanovic <mmicko@gmail.com>2015-11-08 12:56:12 +0100
commit7c19aac60e12d6f5ea301bdb34d7826a01e0b06f (patch)
treef310d86aa2c6bfc19d115307dedde4eb0cd52dad /src/lib/formats/orao_cas.cpp
parenta57b46ae933badd7441ce1644711dbb851e2b504 (diff)
Rename *.c -> *.cpp in our source (nw)
Diffstat (limited to 'src/lib/formats/orao_cas.cpp')
-rw-r--r--src/lib/formats/orao_cas.cpp122
1 files changed, 122 insertions, 0 deletions
diff --git a/src/lib/formats/orao_cas.cpp b/src/lib/formats/orao_cas.cpp
new file mode 100644
index 00000000000..9e88119d825
--- /dev/null
+++ b/src/lib/formats/orao_cas.cpp
@@ -0,0 +1,122 @@
+// license:BSD-3-Clause
+// copyright-holders:Olivier Galibert
+/*
+
+ Tape support for Orao TAP format
+
+*/
+#include <assert.h>
+
+#include "orao_cas.h"
+
+
+#define ORAO_WAV_FREQUENCY 44100
+#define WAVE_HIGH -32768
+#define WAVE_LOW 0
+
+#define ORAO_WAVE_ONE 24
+#define ORAO_WAVE_ZERO 11
+
+#define ORAO_HEADER_SIZE 360
+
+static INT16 wave_data;
+static int len;
+
+static void orao_output_wave( INT16 **buffer, int length ) {
+ if ( buffer == NULL ) {
+ return;
+ }
+
+ for( ; length > 0; length-- ) {
+ **buffer = wave_data;
+ *buffer = *buffer + 1;
+ }
+}
+static int orao_cas_to_wav_size( const UINT8 *casdata, int caslen ) {
+ int i,j,size;
+ UINT8 b;
+
+ if (casdata == NULL) return -1;
+ if (caslen <= ORAO_HEADER_SIZE) {
+ return -1;
+ }
+ size = 0;
+ for (i=ORAO_HEADER_SIZE;i<caslen-ORAO_HEADER_SIZE;i++) {
+ for (j=0;j<8;j++) {
+ b = (casdata[i] >> j) & 1;
+ if (b==0) {
+ size += 2*ORAO_WAVE_ZERO;
+ } else {
+ size += 2*ORAO_WAVE_ONE;
+ }
+ }
+ }
+ len = caslen;
+ return size;
+}
+
+static int orao_cas_fill_wave( INT16 *buffer, int length, UINT8 *bytes ) {
+ int i,j,size;
+ UINT8 b;
+ size = 0;
+ if (bytes == NULL) return -1;
+ for (i=ORAO_HEADER_SIZE;i<len-ORAO_HEADER_SIZE;i++) {
+ for (j=0;j<8;j++) {
+ b = (bytes[i] >> j) & 1;
+ if (b==0) {
+ wave_data = WAVE_LOW;
+ orao_output_wave(&buffer,ORAO_WAVE_ZERO);
+ wave_data = WAVE_HIGH;
+ orao_output_wave(&buffer,ORAO_WAVE_ZERO);
+ size += 2 *ORAO_WAVE_ZERO;
+ } else {
+ wave_data = WAVE_LOW;
+ orao_output_wave(&buffer,ORAO_WAVE_ONE);
+ wave_data = WAVE_HIGH;
+ orao_output_wave(&buffer,ORAO_WAVE_ONE);
+ size += 2 * ORAO_WAVE_ONE;
+ }
+ }
+ }
+
+ return size;
+}
+
+
+
+
+static const struct CassetteLegacyWaveFiller orao_legacy_fill_wave = {
+ orao_cas_fill_wave, /* fill_wave */
+ -1, /* chunk_size */
+ 0, /* chunk_samples */
+ orao_cas_to_wav_size, /* chunk_sample_calc */
+ ORAO_WAV_FREQUENCY, /* sample_frequency */
+ 0, /* header_samples */
+ 0 /* trailer_samples */
+};
+
+
+
+static casserr_t orao_cassette_identify( cassette_image *cassette, struct CassetteOptions *opts ) {
+ return cassette_legacy_identify( cassette, opts, &orao_legacy_fill_wave );
+}
+
+
+
+static casserr_t orao_cassette_load( cassette_image *cassette ) {
+ return cassette_legacy_construct( cassette, &orao_legacy_fill_wave );
+}
+
+
+
+static const struct CassetteFormat orao_cassette_format = {
+ "tap",
+ orao_cassette_identify,
+ orao_cassette_load,
+ NULL
+};
+
+
+CASSETTE_FORMATLIST_START(orao_cassette_formats)
+ CASSETTE_FORMAT(orao_cassette_format)
+CASSETTE_FORMATLIST_END