55 static	int		mpc2k_close		(SF_PRIVATE *psf) ;
57 static int		mpc2k_write_header (SF_PRIVATE *psf, int calc_length) ;
58 static int		mpc2k_read_header (SF_PRIVATE *psf) ;
65 mpc2k_open	(SF_PRIVATE *psf)  in mpc2k_open()  argument
68 	if (psf->file.mode == SFM_READ || (psf->file.mode == SFM_RDWR && psf->filelength > 0))  in mpc2k_open()
69 	{	if ((error = mpc2k_read_header (psf)))  in mpc2k_open()
73 	if ((SF_CONTAINER (psf->sf.format)) != SF_FORMAT_MPC2K)  in mpc2k_open()
76 	if (psf->file.mode == SFM_WRITE || psf->file.mode == SFM_RDWR)  in mpc2k_open()
77 	{	if (mpc2k_write_header (psf, SF_FALSE))  in mpc2k_open()
78 			return psf->error ;  in mpc2k_open()
80 		psf->write_header = mpc2k_write_header ;  in mpc2k_open()
83 	psf->container_close = mpc2k_close ;  in mpc2k_open()
85 	psf->blockwidth = psf->bytewidth * psf->sf.channels ;  in mpc2k_open()
87 	error = pcm_init (psf) ;  in mpc2k_open()
96 mpc2k_close	(SF_PRIVATE *psf)  in mpc2k_close()  argument
98 	if (psf->file.mode == SFM_WRITE || psf->file.mode == SFM_RDWR)  in mpc2k_close()
99 		mpc2k_write_header (psf, SF_TRUE) ;  in mpc2k_close()
105 mpc2k_write_header (SF_PRIVATE *psf, int calc_length)  in mpc2k_write_header()  argument
109 	if (psf->pipeoffset > 0)  in mpc2k_write_header()
112 	current = psf_ftell (psf) ;  in mpc2k_write_header()
115 	{	psf->filelength = psf_get_filelen (psf) ;  in mpc2k_write_header()
117 		psf->dataoffset = HEADER_LENGTH ;  in mpc2k_write_header()
118 		psf->datalength = psf->filelength - psf->dataoffset ;  in mpc2k_write_header()
120 		psf->sf.frames = psf->datalength / (psf->bytewidth * psf->sf.channels) ;  in mpc2k_write_header()
124 	psf->header.ptr [0] = 0 ;  in mpc2k_write_header()
125 	psf->header.indx = 0 ;  in mpc2k_write_header()
131 	if (psf->is_pipe == SF_FALSE)  in mpc2k_write_header()
132 		psf_fseek (psf, 0, SEEK_SET) ;  in mpc2k_write_header()
134 …snprintf (sample_name, sizeof (sample_name), "%-*.*s", HEADER_NAME_LEN, HEADER_NAME_LEN, psf->file…  in mpc2k_write_header()
136 …psf_binheader_writef (psf, "e11b", BHW1 (1), BHW1 (4), BHWv (sample_name), BHWz (HEADER_NAME_LEN))…  in mpc2k_write_header()
137 	psf_binheader_writef (psf, "e111", BHW1 (100), BHW1 (0), BHW1 ((psf->sf.channels - 1) & 1)) ;  in mpc2k_write_header()
138 …psf_binheader_writef (psf, "et4888", BHW4 (0), BHW8 (psf->sf.frames), BHW8 (psf->sf.frames), BHW8 …  in mpc2k_write_header()
139 	psf_binheader_writef (psf, "e112", BHW1 (0), BHW1 (1), BHW2 ((uint16_t) psf->sf.samplerate)) ;  in mpc2k_write_header()
142 	psf->bytewidth = 2 ;  in mpc2k_write_header()
143 	psf->endian = SF_ENDIAN_LITTLE ;  in mpc2k_write_header()
145 	psf_fwrite (psf->header.ptr, psf->header.indx, 1, psf) ;  in mpc2k_write_header()
147 	if (psf->error)  in mpc2k_write_header()
148 		return psf->error ;  in mpc2k_write_header()
150 	psf->dataoffset = psf->header.indx ;  in mpc2k_write_header()
153 		psf_fseek (psf, current, SEEK_SET) ;  in mpc2k_write_header()
155 	return psf->error ;  in mpc2k_write_header()
159 mpc2k_read_header (SF_PRIVATE *psf)  in mpc2k_read_header()  argument
165 	psf_binheader_readf (psf, "pebb", 0, bytes, 2, sample_name, make_size_t (HEADER_NAME_LEN)) ;  in mpc2k_read_header()
172 	psf_log_printf (psf, "MPC2000\n  Name         : %s\n", sample_name) ;  in mpc2k_read_header()
174 …psf_binheader_readf (psf, "eb4444", bytes, 3, &sample_start, &loop_end, &sample_frames, &loop_leng…  in mpc2k_read_header()
176 	psf->sf.channels = bytes [2] ? 2 : 1 ;  in mpc2k_read_header()
178 …psf_log_printf (psf, "  Level        : %d\n  Tune         : %d\n  Stereo       : %s\n", bytes [0],…  in mpc2k_read_header()
180 …psf_log_printf (psf, "  Sample start : %d\n  Loop end     : %d\n  Frames       : %d\n  Length     …  in mpc2k_read_header()
182 	psf_binheader_readf (psf, "eb2", bytes, 2, &sample_rate) ;  in mpc2k_read_header()
184 …psf_log_printf (psf, "  Loop mode    : %s\n  Beats        : %d\n  Sample rate  : %d\nEnd\n", bytes…  in mpc2k_read_header()
186 	psf->sf.samplerate = sample_rate ;  in mpc2k_read_header()
188 	psf->sf.format = SF_FORMAT_MPC2K | SF_FORMAT_PCM_16 ;  in mpc2k_read_header()
190 	psf->dataoffset = psf_ftell (psf) ;  in mpc2k_read_header()
193 	psf->bytewidth = 2 ;  in mpc2k_read_header()
194 	psf->endian = SF_ENDIAN_LITTLE ;  in mpc2k_read_header()
196 	psf->datalength = psf->filelength - psf->dataoffset ;  in mpc2k_read_header()
197 	psf->blockwidth = psf->sf.channels * psf->bytewidth ;  in mpc2k_read_header()
198 	psf->sf.frames = psf->datalength / psf->blockwidth ;  in mpc2k_read_header()
200 	psf->sf.frames = (psf->filelength - psf->dataoffset) / psf->blockwidth ;  in mpc2k_read_header()