Lines Matching defs:psf
70 static int rf64_read_header (SF_PRIVATE *psf, int *blockalign, int *framesperblock) ;
71 static int rf64_write_header (SF_PRIVATE *psf, int calc_length) ;
72 static int rf64_write_tailer (SF_PRIVATE *psf) ;
73 static int rf64_close (SF_PRIVATE *psf) ;
74 static int rf64_command (SF_PRIVATE *psf, int command, void * UNUSED (data), int datasize) ;
76 static int rf64_set_chunk (SF_PRIVATE *psf, const SF_CHUNK_INFO * chunk_info) ;
77 static SF_CHUNK_ITERATOR * rf64_next_chunk_iterator (SF_PRIVATE *psf, SF_CHUNK_ITERATOR * iterator) ;
78 static int rf64_get_chunk_size (SF_PRIVATE *psf, const SF_CHUNK_ITERATOR * iterator, SF_CHUNK_INFO * chunk_info) ;
79 static int rf64_get_chunk_data (SF_PRIVATE *psf, const SF_CHUNK_ITERATOR * iterator, SF_CHUNK_INFO * chunk_info) ;
86 rf64_open (SF_PRIVATE *psf)
93 psf->container_data = wpriv ;
97 psf->endian = SF_ENDIAN_LITTLE ;
99 psf->strings.flags = SF_STR_ALLOW_START | SF_STR_ALLOW_END ;
101 if (psf->file.mode == SFM_READ || (psf->file.mode == SFM_RDWR && psf->filelength > 0))
102 { if ((error = rf64_read_header (psf, &blockalign, &framesperblock)) != 0)
105 psf->next_chunk_iterator = rf64_next_chunk_iterator ;
106 psf->get_chunk_size = rf64_get_chunk_size ;
107 psf->get_chunk_data = rf64_get_chunk_data ;
110 if ((psf->sf.format & SF_FORMAT_TYPEMASK) != SF_FORMAT_RF64)
113 subformat = psf->sf.format & SF_FORMAT_SUBMASK ;
115 if (psf->file.mode == SFM_WRITE || psf->file.mode == SFM_RDWR)
116 { if (psf->is_pipe)
119 psf->blockwidth = psf->bytewidth * psf->sf.channels ;
121 if ((error = rf64_write_header (psf, SF_FALSE)))
124 psf->write_header = rf64_write_header ;
125 psf->set_chunk = rf64_set_chunk ;
128 psf->container_close = rf64_close ;
129 psf->command = rf64_command ;
136 error = pcm_init (psf) ;
140 error = ulaw_init (psf) ;
144 error = alaw_init (psf) ;
149 error = float32_init (psf) ;
153 error = double64_init (psf) ;
179 rf64_read_header (SF_PRIVATE *psf, int *blockalign, int *framesperblock)
186 if ((wpriv = psf->container_data) == NULL)
191 psf_binheader_readf (psf, "pmmm", 0, &marker, marks, marks + 1) ;
196 psf_log_printf (psf, "%M\n %M\n", RF64_MARKER, WAVE_MARKER) ;
198 psf_log_printf (psf, "%M : 0x%x (should be 0xFFFFFFFF)\n %M\n", RF64_MARKER, WAVE_MARKER) ;
203 psf_binheader_readf (psf, "em4", &marker, &chunk_size) ;
206 { sf_count_t pos = psf_ftell (psf) ;
207 psf_log_printf (psf, "Have 0 marker at position %D (0x%x).\n", pos, pos) ;
211 psf_store_read_chunk_u32 (&psf->rchunks, marker, psf_ftell (psf), chunk_size) ;
216 { psf_log_printf (psf, "*** Second 'ds64' chunk?\n") ;
223 bytesread = psf_binheader_readf (psf, "888", &riff_size, &ds64_datalength, &frame_count) ;
226 bytesread += psf_binheader_readf (psf, "4", &table_len) ;
228 bytesread += psf_binheader_readf (psf, "j", table_len) ;
231 psf_log_printf (psf, "%M : %u\n", marker, chunk_size) ;
234 psf_binheader_readf (psf, "m", &next) ;
236 { psf_log_printf (psf, "%M : %u (should be %u)\n", marker, chunk_size, bytesread) ;
237 psf_binheader_readf (psf, "j", -4) ;
240 { psf_log_printf (psf, "%M : %u\n", marker, chunk_size) ;
241 psf_binheader_readf (psf, "j", chunk_size - bytesread - 4) ;
245 if (psf->filelength != riff_size + 8)
246 psf_log_printf (psf, " Riff size : %D (should be %D)\n", riff_size, psf->filelength - 8) ;
248 psf_log_printf (psf, " Riff size : %D\n", riff_size) ;
250 psf_log_printf (psf, " Data size : %D\n", ds64_datalength) ;
252 psf_log_printf (psf, " Frames : %D\n", frame_count) ;
253 psf_log_printf (psf, " Table length : %u\n", table_len) ;
260 psf_log_printf (psf, "%M : %u\n", marker, chunk_size) ;
261 if ((error = wavlike_read_fmt_chunk (psf, chunk_size)) != 0)
268 if ((error = wavlike_read_bext_chunk (psf, chunk_size)) != 0)
274 if ((error = wavlike_read_cart_chunk (psf, chunk_size)) != 0)
281 if ((error = wavlike_subchunk_parse (psf, marker, chunk_size)) != 0)
292 psf_log_printf (psf, "%M : %u\n", marker, chunk_size) ;
293 if ((error = wavlike_read_peak_chunk (psf, chunk_size)) != 0)
295 psf->peak_info->peak_loc = ((parsestage & HAVE_data) == 0) ? SF_PEAK_START : SF_PEAK_END ;
303 psf_log_printf (psf, "%M : 0x%x\n", marker, chunk_size) ;
305 psf_log_printf (psf, "%M : 0x%x (should be 0xffffffff\n", marker, chunk_size) ;
306 psf->datalength = ds64_datalength ;
310 { psf_log_printf (psf, "%M : 0x%x\n", marker, chunk_size) ;
311 psf_log_printf (psf, " *** Data length not specified no 'ds64' chunk.\n") ;
314 { psf_log_printf (psf, "%M : 0x%x\n**** Weird, RF64 file without a 'ds64' chunk and no valid 'data' size.\n", marker, chunk_size) ;
315 psf->datalength = chunk_size ;
319 psf->dataoffset = psf_ftell (psf) ;
321 if (psf->dataoffset > 0)
322 { if (chunk_size == 0 && riff_size == 8 && psf->filelength > 44)
323 { psf_log_printf (psf, " *** Looks like a WAV file which wasn't closed properly. Fixing it.\n") ;
324 psf->datalength = psf->filelength - psf->dataoffset ;
328 if (psf->datalength + psf->dataoffset < psf->filelength)
329 psf->dataend = psf->datalength + psf->dataoffset ;
331 if (!psf->sf.seekable || psf->dataoffset < 0)
335 psf_fseek (psf, psf->datalength, SEEK_CUR) ;
337 if (psf_ftell (psf) != psf->datalength + psf->dataoffset)
338 psf_log_printf (psf, " *** psf_fseek past end error ***\n") ;
344 psf_log_printf (psf, "%M : %d\n", marker, chunk_size) ;
345 psf_binheader_readf (psf, "j", chunk_size) ;
350 { psf_log_printf (psf, "*** Unknown chunk marker (%X) at position %D with length %u. Exiting parser.\n", marker, psf_ftell (psf) - 8, chunk_size) ;
357 { psf_log_printf (psf, "*** %M : %d (unknown marker)\n", marker, chunk_size) ;
358 psf_binheader_readf (psf, "j", chunk_size) ;
361 if (psf_ftell (psf) & 0x03)
362 { psf_log_printf (psf, " Unknown chunk marker at position 0x%x. Resynching.\n", chunk_size - 4) ;
363 psf_binheader_readf (psf, "j", -3) ;
366 psf_log_printf (psf, "*** Unknown chunk marker (0x%X) at position 0x%X. Exiting parser.\n", marker, psf_ftell (psf) - 4) ;
374 if (marker != data_MARKER && chunk_size >= psf->filelength)
375 { psf_log_printf (psf, "*** Chunk size %u > file length %D. Exiting parser.\n", chunk_size, psf->filelength) ;
379 if (psf_ftell (psf) >= psf->filelength - SIGNED_SIZEOF (marker))
380 { psf_log_printf (psf, "End\n") ;
385 if (psf->dataoffset <= 0)
388 if (psf->sf.channels < 1)
391 if (psf->sf.channels > SF_MAX_CHANNELS)
395 psf->endian = psf->rwf_endian ;
397 psf_fseek (psf, psf->dataoffset, SEEK_SET) ;
399 if (psf->is_pipe == 0)
404 psf_binheader_readf (psf, "4", &marker) ;
410 psf_fseek (psf, psf->dataoffset, SEEK_SET) ;
412 if (psf->blockwidth)
413 { if (psf->filelength - psf->dataoffset < psf->datalength)
414 psf->sf.frames = (psf->filelength - psf->dataoffset) / psf->blockwidth ;
416 psf->sf.frames = psf->datalength / psf->blockwidth ;
419 if (frame_count != psf->sf.frames)
420 psf_log_printf (psf, "*** Calculated frame count %d does not match value from 'ds64' chunk of %d.\n", psf->sf.frames, frame_count) ;
426 /* with WAVE_FORMAT_EXTENSIBLE the psf->sf.format field is already set. We just have to set the major to rf64 */
427 psf->sf.format = (psf->sf.format & ~SF_FORMAT_TYPEMASK) | SF_FORMAT_RF64 ;
429 if (psf->sf.format == (SF_FORMAT_WAVEX | SF_FORMAT_MS_ADPCM))
436 psf->sf.format = SF_FORMAT_RF64 | u_bitwidth_to_subformat (psf->bytewidth * 8) ;
441 psf->sf.format = (SF_FORMAT_RF64 | SF_FORMAT_ULAW) ;
446 psf->sf.format = (SF_FORMAT_RF64 | SF_FORMAT_ALAW) ;
450 psf->sf.format = (SF_FORMAT_RF64 | SF_FORMAT_MS_ADPCM) ;
456 psf->sf.format = (SF_FORMAT_RF64 | SF_FORMAT_IMA_ADPCM) ;
462 psf->sf.format = (SF_FORMAT_RF64 | SF_FORMAT_GSM610) ;
466 psf->sf.format = SF_FORMAT_RF64 ;
467 psf->sf.format |= (psf->bytewidth == 8) ? SF_FORMAT_DOUBLE : SF_FORMAT_FLOAT ;
471 psf->sf.format = SF_FORMAT_RF64 | SF_FORMAT_G721_32 ;
478 wavlike_analyze (psf) ;
481 if (psf->endian == SF_ENDIAN_BIG)
482 psf->sf.format |= SF_ENDIAN_BIG ;
524 rf64_write_fmt_chunk (SF_PRIVATE *psf)
528 if ((wpriv = psf->container_data) == NULL)
531 subformat = psf->sf.format & SF_FORMAT_SUBMASK ;
546 psf_binheader_writef (psf, "4224", BHW4 (fmt_size), BHW2 (WAVE_FORMAT_EXTENSIBLE), BHW2 (psf->sf.channels), BHW4 (psf->sf.samplerate)) ;
548 psf_binheader_writef (psf, "4", BHW4 (psf->sf.samplerate * psf->bytewidth * psf->sf.channels)) ;
550 psf_binheader_writef (psf, "22", BHW2 (psf->bytewidth * psf->sf.channels), BHW2 (psf->bytewidth * 8)) ;
553 psf_binheader_writef (psf, "2", BHW2 (22)) ;
556 psf_binheader_writef (psf, "2", BHW2 (psf->bytewidth * 8)) ;
562 psf_binheader_writef (psf, "4", BHW4 (0)) ;
564 psf_binheader_writef (psf, "4", BHW4 (wpriv->wavex_channelmask)) ;
571 switch (psf->sf.channels)
573 psf_binheader_writef (psf, "4", BHW4 (0x4)) ;
577 psf_binheader_writef (psf, "4", BHW4 (0x1 | 0x2)) ;
581 psf_binheader_writef (psf, "4", BHW4 (0x1 | 0x2 | 0x10 | 0x20)) ;
585 psf_binheader_writef (psf, "4", BHW4 (0x1 | 0x2 | 0x4 | 0x8 | 0x10 | 0x20)) ;
589 psf_binheader_writef (psf, "4", BHW4 (0x1 | 0x2 | 0x4 | 0x8 | 0x10 | 0x20 | 0x40 | 0x80)) ;
593 psf_binheader_writef (psf, "4", BHW4 (0x0)) ;
611 wavlike_write_guid (psf, wpriv->wavex_ambisonic == SF_AMBISONIC_NONE ?
617 wavlike_write_guid (psf, wpriv->wavex_ambisonic == SF_AMBISONIC_NONE ?
622 wavlike_write_guid (psf, &MSGUID_SUBTYPE_MULAW) ;
626 wavlike_write_guid (psf, &MSGUID_SUBTYPE_ALAW) ;
637 rf64_write_header (SF_PRIVATE *psf, int calc_length)
642 if ((wpriv = psf->container_data) == NULL)
645 current = psf_ftell (psf) ;
647 if (psf->dataoffset > 0 && current > psf->dataoffset)
651 { psf->filelength = psf_get_filelen (psf) ;
652 psf->datalength = psf->filelength - psf->dataoffset ;
654 if (psf->dataend)
655 psf->datalength -= psf->filelength - psf->dataend ;
657 if (psf->bytewidth > 0)
658 psf->sf.frames = psf->datalength / (psf->bytewidth * psf->sf.channels) ;
662 psf->header.ptr [0] = 0 ;
663 psf->header.indx = 0 ;
664 psf_fseek (psf, 0, SEEK_SET) ;
666 if (wpriv->rf64_downgrade && psf->filelength < RIFF_DOWNGRADE_BYTES)
667 { psf_binheader_writef (psf, "etm8m", BHWm (RIFF_MARKER), BHW8 ((psf->filelength < 8) ? 8 : psf->filelength - 8), BHWm (WAVE_MARKER)) ;
668 psf_binheader_writef (psf, "m4z", BHWm (JUNK_MARKER), BHW4 (24), BHWz (24)) ;
672 { psf_binheader_writef (psf, "em4m", BHWm (RF64_MARKER), BHW4 (0xffffffff), BHWm (WAVE_MARKER)) ;
674 psf_binheader_writef (psf, "m48884", BHWm (ds64_MARKER), BHW4 (28), BHW8 (psf->filelength - 8), BHW8 (psf->datalength), BHW8 (psf->sf.frames), BHW4 (0)) ;
678 psf_binheader_writef (psf, "m", BHWm (fmt_MARKER)) ;
681 switch (psf->sf.format & SF_FORMAT_TYPEMASK)
683 psf_log_printf (psf, "ooops SF_FORMAT_WAV\n") ;
689 if ((error = rf64_write_fmt_chunk (psf)) != 0)
692 psf_binheader_writef (psf, "tm48", BHWm (fact_MARKER), BHW4 (4), BHW8 (psf->sf.frames)) ;
699 if (psf->broadcast_16k != NULL)
700 wavlike_write_bext_chunk (psf) ;
702 if (psf->cart_16k != NULL)
703 wavlike_write_cart_chunk (psf) ;
706 if (psf->strings.flags & SF_STR_LOCATE_START)
707 wavlike_write_strings (psf, SF_STR_LOCATE_START) ;
709 if (psf->peak_info != NULL && psf->peak_info->peak_loc == SF_PEAK_START)
710 wavlike_write_peak_chunk (psf) ;
713 if (psf->wchunks.used > 0)
714 wavlike_write_custom_chunks (psf) ;
717 if (psf->instrument != NULL)
721 psf_binheader_writef (psf, "m4", BHWm (smpl_MARKER), BHW4 (9 * 4 + psf->instrument->loop_count * 6 * 4)) ;
722 psf_binheader_writef (psf, "44", BHW4 (0), BHW4 (0)) ; /* Manufacturer zero is everyone */
723 tmp = (int) (1.0e9 / psf->sf.samplerate) ; /* Sample period in nano seconds */
724 psf_binheader_writef (psf, "44", BHW4 (tmp), BHW4 (psf->instrument->basenote)) ;
725 tmp = (unsigned int) (psf->instrument->detune * dtune + 0.5) ;
726 psf_binheader_writef (psf, "4", BHW4 (tmp)) ;
727 psf_binheader_writef (psf, "44", BHW4 (0), BHW4 (0)) ; /* SMTPE format */
728 psf_binheader_writef (psf, "44", BHW4 (psf->instrument->loop_count), BHW4 (0)) ;
730 for (tmp = 0 ; tmp < psf->instrument->loop_count ; tmp++)
733 type = psf->instrument->loops [tmp].mode ;
736 psf_binheader_writef (psf, "44", BHW4 (tmp), BHW4 (type)) ;
737 psf_binheader_writef (psf, "44", BHW4 (psf->instrument->loops [tmp].start), BHW4 (psf->instrument->loops [tmp].end)) ;
738 psf_binheader_writef (psf, "44", BHW4 (0), BHW4 (psf->instrument->loops [tmp].count)) ;
745 pad_size = psf->dataoffset - 16 - psf->header.indx ;
747 psf_binheader_writef (psf, "m4z", BHWm (PAD_MARKER), BHW4 ((unsigned int) pad_size), BHWz (pad_size)) ;
749 if (wpriv->rf64_downgrade && (psf->filelength < RIFF_DOWNGRADE_BYTES))
750 psf_binheader_writef (psf, "tm8", BHWm (data_MARKER), BHW8 (psf->datalength)) ;
752 psf_binheader_writef (psf, "m4", BHWm (data_MARKER), BHW4 (0xffffffff)) ;
754 psf_fwrite (psf->header.ptr, psf->header.indx, 1, psf) ;
755 if (psf->error)
756 return psf->error ;
758 if (has_data && psf->dataoffset != psf->header.indx)
759 { psf_log_printf (psf, "Oooops : has_data && psf->dataoffset != psf->header.indx\n") ;
760 return psf->error = SFE_INTERNAL ;
763 psf->dataoffset = psf->header.indx ;
766 psf_fseek (psf, psf->dataoffset, SEEK_SET) ;
768 psf_fseek (psf, current, SEEK_SET) ;
770 return psf->error ;
774 rf64_write_tailer (SF_PRIVATE *psf)
777 psf->header.ptr [0] = 0 ;
778 psf->header.indx = 0 ;
780 if (psf->bytewidth > 0 && psf->sf.seekable == SF_TRUE)
781 { psf->datalength = psf->sf.frames * psf->bytewidth * psf->sf.channels ;
782 psf->dataend = psf->dataoffset + psf->datalength ;
785 if (psf->dataend > 0)
786 psf_fseek (psf, psf->dataend, SEEK_SET) ;
788 psf->dataend = psf_fseek (psf, 0, SEEK_END) ;
790 if (psf->dataend & 1)
791 psf_binheader_writef (psf, "z", BHWz (1)) ;
793 if (psf->strings.flags & SF_STR_LOCATE_END)
794 wavlike_write_strings (psf, SF_STR_LOCATE_END) ;
797 if (psf->header.indx > 0)
798 psf_fwrite (psf->header.ptr, psf->header.indx, 1, psf) ;
804 rf64_close (SF_PRIVATE *psf)
806 if (psf->file.mode == SFM_WRITE || psf->file.mode == SFM_RDWR)
807 { rf64_write_tailer (psf) ;
808 rf64_write_header (psf, SF_TRUE) ;
815 rf64_command (SF_PRIVATE *psf, int command, void * UNUSED (data), int datasize)
818 if ((wpriv = psf->container_data) == NULL)
823 if ((SF_CONTAINER (psf->sf.format)) == SF_FORMAT_WAVEX)
837 wpriv->wavex_channelmask = wavlike_gen_channel_mask (psf->channel_map, psf->sf.channels) ;
841 if (psf->have_written == 0)
853 rf64_set_chunk (SF_PRIVATE *psf, const SF_CHUNK_INFO * chunk_info)
854 { return psf_save_write_chunk (&psf->wchunks, chunk_info) ;
858 rf64_next_chunk_iterator (SF_PRIVATE *psf, SF_CHUNK_ITERATOR * iterator)
859 { return psf_next_chunk_iterator (&psf->rchunks, iterator) ;
863 rf64_get_chunk_size (SF_PRIVATE *psf, const SF_CHUNK_ITERATOR * iterator, SF_CHUNK_INFO * chunk_info)
866 if ((indx = psf_find_read_chunk_iterator (&psf->rchunks, iterator)) < 0)
869 chunk_info->datalen = psf->rchunks.chunks [indx].len ;
875 rf64_get_chunk_data (SF_PRIVATE *psf, const SF_CHUNK_ITERATOR * iterator, SF_CHUNK_INFO * chunk_info)
879 if ((indx = psf_find_read_chunk_iterator (&psf->rchunks, iterator)) < 0)
885 chunk_info->id_size = psf->rchunks.chunks [indx].id_size ;
886 memcpy (chunk_info->id, psf->rchunks.chunks [indx].id, sizeof (chunk_info->id) / sizeof (*chunk_info->id)) ;
888 pos = psf_ftell (psf) ;
889 psf_fseek (psf, psf->rchunks.chunks [indx].offset, SEEK_SET) ;
890 psf_fread (chunk_info->data, SF_MIN (chunk_info->datalen, psf->rchunks.chunks [indx].len), 1, psf) ;
891 psf_fseek (psf, pos, SEEK_SET) ;