switch_core_file.c File Reference

#include <switch.h>
#include "private/switch_core_pvt.h"

Include dependency graph for switch_core_file.c:

Go to the source code of this file.

Functions
switch_status_t	switch_core_perform_file_open (const char *file, const char *func, int line, switch_file_handle_t *fh, const char *file_path, uint32_t channels, uint32_t rate, unsigned int flags, switch_memory_pool_t *pool)
switch_status_t	switch_core_file_read (switch_file_handle_t *fh, void *data, switch_size_t *len)
switch_bool_t	switch_core_file_has_video (switch_file_handle_t *fh, switch_bool_t check_open)
switch_status_t	switch_core_file_write (switch_file_handle_t *fh, void *data, switch_size_t *len)
switch_status_t	switch_core_file_write_video (switch_file_handle_t *fh, switch_frame_t *frame)
switch_status_t	switch_core_file_read_video (switch_file_handle_t *fh, switch_frame_t *frame, switch_video_read_flag_t flags)
switch_status_t	switch_core_file_seek (switch_file_handle_t *fh, unsigned int *cur_pos, int64_t samples, int whence)
switch_status_t	switch_core_file_set_string (switch_file_handle_t *fh, switch_audio_col_t col, const char *string)
switch_status_t	switch_core_file_get_string (switch_file_handle_t *fh, switch_audio_col_t col, const char **string)
switch_status_t	switch_core_file_truncate (switch_file_handle_t *fh, int64_t offset)
switch_status_t	switch_core_file_command (switch_file_handle_t *fh, switch_file_command_t command)
switch_status_t	switch_core_file_close (switch_file_handle_t *fh)

Function Documentation

switch_status_t switch_core_file_close

(

switch_file_handle_t *

fh

)

Definition at line 774 of file switch_core_file.c.

References switch_assert, switch_buffer_destroy(), switch_buffer_inuse(), switch_buffer_read(), SWITCH_CHANNEL_LOG, switch_clear_flag_locked, switch_core_destroy_memory_pool, switch_event_destroy(), SWITCH_FILE_FLAG_FREE_POOL, SWITCH_FILE_FLAG_WRITE, SWITCH_FILE_NATIVE, SWITCH_FILE_OPEN, SWITCH_LOG_DEBUG, SWITCH_LOG_ERROR, switch_log_printf(), switch_mprintf(), switch_resample_destroy(), switch_safe_free, SWITCH_STATUS_FALSE, SWITCH_STATUS_SUCCESS, switch_test_flag, and UNPROTECT_INTERFACE.

{
        switch_status_t status;

        switch_assert(fh != NULL);
        switch_assert(fh->file_interface != NULL);

        if (!switch_test_flag(fh, SWITCH_FILE_OPEN)) {
                return SWITCH_STATUS_FALSE;
        }

        if (fh->pre_buffer) {
                if (switch_test_flag(fh, SWITCH_FILE_FLAG_WRITE)) {
                        switch_size_t rlen, blen;
                        int asis = switch_test_flag(fh, SWITCH_FILE_NATIVE);

                        while ((rlen = switch_buffer_inuse(fh->pre_buffer))) {
                                if ((blen = switch_buffer_read(fh->pre_buffer, fh->pre_buffer_data, fh->pre_buffer_datalen))) {
                                        if (!asis)
                                                blen /= 2;
                                        if (fh->channels > 1)
                                                blen /= fh->channels;

                                        if (fh->file_interface->file_write(fh, fh->pre_buffer_data, &blen) != SWITCH_STATUS_SUCCESS) {
                                                break;
                                        }
                                }
                        }
                }

                switch_buffer_destroy(&fh->pre_buffer);
        }

        switch_clear_flag_locked(fh, SWITCH_FILE_OPEN);
        status = fh->file_interface->file_close(fh);

        if (fh->params) {
                switch_event_destroy(&fh->params);
        }

        fh->samples_in = 0;
        fh->max_samples = 0;

        if (fh->buffer) {
                switch_buffer_destroy(&fh->buffer);
        }

        switch_resample_destroy(&fh->resampler);

        if (switch_test_flag(fh, SWITCH_FILE_FLAG_FREE_POOL)) {
                switch_core_destroy_memory_pool(&fh->memory_pool);
        }

        fh->memory_pool = NULL;

        switch_safe_free(fh->dbuf);

        if (fh->spool_path) {
                char *command;

#ifdef _MSC_VER
                command = switch_mprintf("move %s %s", fh->spool_path, fh->file_path);
#else
                command = switch_mprintf("/bin/mv %s %s", fh->spool_path, fh->file_path);
#endif
                if (system(command) == -1) {
                        switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Failed to copy spooled file [%s] to [%s] because of a command error : %s\n", fh->spool_path, fh->file_path, command);
                } else {
                        switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_DEBUG, "Copy spooled file [%s] to [%s]\n", fh->spool_path, fh->file_path);
                }
                free(command);
        }

        UNPROTECT_INTERFACE(fh->file_interface);
        fh->file_interface = NULL;

        return status;
}

switch_status_t switch_core_file_get_string	(	switch_file_handle_t *	fh,
		switch_audio_col_t	col,
		const char **	string
	)

Definition at line 697 of file switch_core_file.c.

References switch_assert, SWITCH_FILE_OPEN, SWITCH_STATUS_FALSE, and switch_test_flag.

{
        switch_assert(fh != NULL);
        switch_assert(fh->file_interface != NULL);

        if (!switch_test_flag(fh, SWITCH_FILE_OPEN)) {
                return SWITCH_STATUS_FALSE;
        }

        if (!fh->file_interface->file_get_string) {
                return SWITCH_STATUS_FALSE;
        }

        return fh->file_interface->file_get_string(fh, col, string);
}

switch_status_t switch_core_file_read	(	switch_file_handle_t *	fh,
		void *	data,
		switch_size_t *	len
	)

Definition at line 372 of file switch_core_file.c.

References switch_assert, switch_buffer_create_dynamic(), switch_buffer_inuse(), switch_buffer_read(), switch_buffer_write(), SWITCH_CHANNEL_LOG, switch_clear_flag_locked, SWITCH_FILE_BUFFER_DONE, SWITCH_FILE_DONE, SWITCH_FILE_NATIVE, SWITCH_FILE_NOMUX, SWITCH_FILE_OPEN, SWITCH_LOG_CRIT, switch_log_printf(), switch_mux_channels(), switch_resample_create, switch_resample_process(), SWITCH_RESAMPLE_QUALITY, switch_set_flag_locked, SWITCH_STATUS_BREAK, SWITCH_STATUS_FALSE, SWITCH_STATUS_GENERR, SWITCH_STATUS_SUCCESS, and switch_test_flag.

{
        switch_status_t status = SWITCH_STATUS_FALSE;
        switch_size_t want, orig_len = *len;

        switch_assert(fh != NULL);
        switch_assert(fh->file_interface != NULL);

        if (!switch_test_flag(fh, SWITCH_FILE_OPEN)) {
                return SWITCH_STATUS_FALSE;
        }

  top:

        if (fh->max_samples > 0 && fh->samples_in >= (switch_size_t)fh->max_samples) {
                *len = 0;
                return SWITCH_STATUS_FALSE;
        }

        if (fh->buffer && switch_buffer_inuse(fh->buffer) >= *len * 2 * fh->channels) {
                *len = switch_buffer_read(fh->buffer, data, orig_len * 2 * fh->channels) / 2 / fh->channels;
                return *len == 0 ? SWITCH_STATUS_FALSE : SWITCH_STATUS_SUCCESS;
        }

        if (switch_test_flag(fh, SWITCH_FILE_DONE)) {
                switch_clear_flag_locked(fh, SWITCH_FILE_DONE);
                *len = 0;
                return SWITCH_STATUS_FALSE;
        }

        want = *len;

  more:

        if (fh->pre_buffer) {
                switch_size_t rlen;
                int asis = switch_test_flag(fh, SWITCH_FILE_NATIVE);

                if (!switch_test_flag(fh, SWITCH_FILE_BUFFER_DONE)) {
                        rlen = asis ? fh->pre_buffer_datalen : fh->pre_buffer_datalen / 2 / fh->real_channels;

                        if (switch_buffer_inuse(fh->pre_buffer) < rlen * 2 * fh->channels) {
                                if ((status = fh->file_interface->file_read(fh, fh->pre_buffer_data, &rlen)) == SWITCH_STATUS_BREAK) {
                                        return SWITCH_STATUS_BREAK;
                                }
                                

                                if (status != SWITCH_STATUS_SUCCESS || !rlen) {
                                        switch_set_flag_locked(fh, SWITCH_FILE_BUFFER_DONE);
                                } else {
                                        fh->samples_in += rlen;
                                        if (fh->real_channels != fh->channels && !switch_test_flag(fh, SWITCH_FILE_NOMUX)) {
                                                switch_mux_channels((int16_t *) fh->pre_buffer_data, rlen, fh->real_channels, fh->channels);
                                        }
                                        switch_buffer_write(fh->pre_buffer, fh->pre_buffer_data, asis ? rlen : rlen * 2 * fh->channels);
                                }
                        }
                }

                rlen = switch_buffer_read(fh->pre_buffer, data, asis ? *len : *len * 2 * fh->channels);
                *len = asis ? rlen : rlen / 2 / fh->channels;

                if (*len == 0) {
                        switch_set_flag_locked(fh, SWITCH_FILE_DONE);
                        goto top;
                } else {
                        status = SWITCH_STATUS_SUCCESS;
                }

        } else {

                if ((status = fh->file_interface->file_read(fh, data, len)) == SWITCH_STATUS_BREAK) {
                        return SWITCH_STATUS_BREAK;
                }

                if (status != SWITCH_STATUS_SUCCESS || !*len) {
                        switch_set_flag_locked(fh, SWITCH_FILE_DONE);
                        goto top;
                }

                fh->samples_in += *len;

                if (fh->real_channels != fh->channels && !switch_test_flag(fh, SWITCH_FILE_NOMUX)) {
                        switch_mux_channels((int16_t *) data, *len, fh->real_channels, fh->channels);
                }
        }

        if (!switch_test_flag(fh, SWITCH_FILE_NATIVE) && fh->native_rate != fh->samplerate) {
                if (!fh->resampler) {
                        if (switch_resample_create(&fh->resampler,
                                                                           fh->native_rate, fh->samplerate, (uint32_t) orig_len, SWITCH_RESAMPLE_QUALITY, fh->channels) != SWITCH_STATUS_SUCCESS) {
                                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_CRIT, "Unable to create resampler!\n");
                                return SWITCH_STATUS_GENERR;
                        }
                }

                switch_resample_process(fh->resampler, data, (uint32_t) *len);

                if (fh->resampler->to_len < want || fh->resampler->to_len > orig_len) {
                        if (!fh->buffer) {
                                int factor = fh->resampler->to_len * fh->samplerate / 1000;
                                switch_buffer_create_dynamic(&fh->buffer, factor, factor, 0);
                                switch_assert(fh->buffer);
                        }
                        if (!fh->dbuf || fh->dbuflen < fh->resampler->to_len * 2 * fh->channels) {
                                void *mem;
                                fh->dbuflen = fh->resampler->to_len * 2 * fh->channels;
                                mem = realloc(fh->dbuf, fh->dbuflen);
                                switch_assert(mem);
                                fh->dbuf = mem;
                        }
                        switch_assert(fh->resampler->to_len * 2 * fh->channels <= fh->dbuflen);
                        memcpy((int16_t *) fh->dbuf, fh->resampler->to, fh->resampler->to_len * 2 * fh->channels);
                        switch_buffer_write(fh->buffer, fh->dbuf, fh->resampler->to_len * 2 * fh->channels);

                        if (switch_buffer_inuse(fh->buffer) < want * 2 * fh->channels) {
                                *len = want;
                                goto more;
                        }
                        *len = switch_buffer_read(fh->buffer, data, orig_len * 2 * fh->channels) / 2 / fh->channels;
                } else {
                        memcpy(data, fh->resampler->to, fh->resampler->to_len * 2 * fh->channels);
                        *len = fh->resampler->to_len;
                }


        }

        return status;
}

switch_status_t switch_core_file_seek	(	switch_file_handle_t *	fh,
		unsigned int *	cur_pos,
		int64_t	samples,
		int	whence
	)

Definition at line 630 of file switch_core_file.c.

References cur, switch_assert, switch_buffer_zero(), SWITCH_FILE_FLAG_READ, SWITCH_FILE_FLAG_WRITE, SWITCH_FILE_OPEN, SWITCH_FILE_SEEK, SWITCH_FILE_WRITE_APPEND, SWITCH_FILE_WRITE_OVER, SWITCH_SEEK_CUR, switch_set_flag_locked, SWITCH_STATUS_FALSE, and switch_test_flag.

{
        switch_status_t status;
        int ok = 1;
        
        switch_assert(fh != NULL);

        if (!switch_test_flag(fh, SWITCH_FILE_OPEN) || !fh->file_interface->file_seek) {
                ok = 0;
        } else if (switch_test_flag(fh, SWITCH_FILE_FLAG_WRITE)) {
                if (!(switch_test_flag(fh, SWITCH_FILE_WRITE_APPEND) || switch_test_flag(fh, SWITCH_FILE_WRITE_OVER))) {
                        ok = 0;
                }
        } else if (!switch_test_flag(fh, SWITCH_FILE_FLAG_READ)) {
                ok = 0;
        }
        
        if (!ok) {
                return SWITCH_STATUS_FALSE;
        }
        
        if (fh->buffer) {
                switch_buffer_zero(fh->buffer);
        }

        if (fh->pre_buffer) {
                switch_buffer_zero(fh->pre_buffer);
        }

        if (whence == SWITCH_SEEK_CUR) {
                unsigned int cur = 0;

                if (switch_test_flag(fh, SWITCH_FILE_FLAG_WRITE)) {
                        fh->file_interface->file_seek(fh, &cur, fh->samples_out, SEEK_SET);
                } else {
                        fh->file_interface->file_seek(fh, &cur, fh->offset_pos, SEEK_SET);
                }
        }

        switch_set_flag_locked(fh, SWITCH_FILE_SEEK);
        status = fh->file_interface->file_seek(fh, cur_pos, samples, whence);

        fh->offset_pos = *cur_pos;

        if (switch_test_flag(fh, SWITCH_FILE_FLAG_WRITE)) {
                fh->samples_out = *cur_pos;
        }

        return status;
}

switch_status_t switch_core_file_set_string	(	switch_file_handle_t *	fh,
		switch_audio_col_t	col,
		const char *	string
	)

Definition at line 681 of file switch_core_file.c.

References switch_assert, SWITCH_FILE_OPEN, SWITCH_STATUS_FALSE, and switch_test_flag.

{
        switch_assert(fh != NULL);
        switch_assert(fh->file_interface != NULL);

        if (!switch_test_flag(fh, SWITCH_FILE_OPEN)) {
                return SWITCH_STATUS_FALSE;
        }

        if (!fh->file_interface->file_set_string) {
                return SWITCH_STATUS_FALSE;
        }

        return fh->file_interface->file_set_string(fh, col, string);
}

switch_status_t switch_core_file_write	(	switch_file_handle_t *	fh,
		void *	data,
		switch_size_t *	len
	)

Definition at line 508 of file switch_core_file.c.

References switch_assert, switch_buffer_inuse(), switch_buffer_read(), switch_buffer_write(), SWITCH_CHANNEL_LOG, SWITCH_FILE_NATIVE, SWITCH_FILE_OPEN, SWITCH_LOG_CRIT, switch_log_printf(), switch_resample_create, switch_resample_process(), SWITCH_RESAMPLE_QUALITY, SWITCH_STATUS_FALSE, SWITCH_STATUS_GENERR, SWITCH_STATUS_SUCCESS, and switch_test_flag.

{
        switch_size_t orig_len = *len;

        switch_assert(fh != NULL);
        switch_assert(fh->file_interface != NULL);

        if (!switch_test_flag(fh, SWITCH_FILE_OPEN)) {
                return SWITCH_STATUS_FALSE;
        }

        if (!fh->file_interface->file_write) {
                return SWITCH_STATUS_FALSE;
        }

        if (!switch_test_flag(fh, SWITCH_FILE_NATIVE) && fh->native_rate != fh->samplerate) {
                if (!fh->resampler) {
                        if (switch_resample_create(&fh->resampler,
                                                                           fh->native_rate,
                                                                           fh->samplerate,
                                                                           (uint32_t) orig_len * 2 * fh->channels, SWITCH_RESAMPLE_QUALITY, fh->channels) != SWITCH_STATUS_SUCCESS) {
                                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_CRIT, "Unable to create resampler!\n");
                                return SWITCH_STATUS_GENERR;
                        }
                }

                switch_resample_process(fh->resampler, data, (uint32_t) * len);

                if (fh->resampler->to_len > orig_len) {
                        if (!fh->dbuf || (fh->dbuflen < fh->resampler->to_len * 2 * fh->channels)) {
                                void *mem;
                                fh->dbuflen = fh->resampler->to_len * 2 * fh->channels;
                                mem = realloc(fh->dbuf, fh->dbuflen);
                                switch_assert(mem);
                                fh->dbuf = mem;
                        }
                        switch_assert(fh->resampler->to_len * 2 * fh->channels <= fh->dbuflen);
                        memcpy(fh->dbuf, fh->resampler->to, fh->resampler->to_len * 2 * fh->channels);
                        data = fh->dbuf;
                } else {
                        memcpy(data, fh->resampler->to, fh->resampler->to_len * 2 * fh->channels);
                }

                *len = fh->resampler->to_len;
        }

        if (!*len) {
                return SWITCH_STATUS_SUCCESS;
        }

        if (fh->pre_buffer) {
                switch_size_t rlen, blen;
                switch_status_t status = SWITCH_STATUS_SUCCESS;
                int asis = switch_test_flag(fh, SWITCH_FILE_NATIVE);

                switch_buffer_write(fh->pre_buffer, data, (asis ? *len : *len * 2) * fh->channels);

                rlen = switch_buffer_inuse(fh->pre_buffer);

                if (rlen >= fh->pre_buffer_datalen) {
                        if ((blen = switch_buffer_read(fh->pre_buffer, fh->pre_buffer_data, fh->pre_buffer_datalen))) {
                                if (!asis)
                                        blen /= 2;
                                if (fh->channels > 1)
                                        blen /= fh->channels;
                                if ((status = fh->file_interface->file_write(fh, fh->pre_buffer_data, &blen)) != SWITCH_STATUS_SUCCESS) {
                                        *len = 0;
                                }
                        }
                }
                fh->samples_out += orig_len;
                return status;
        } else {
                switch_status_t status;
                if ((status = fh->file_interface->file_write(fh, data, len)) == SWITCH_STATUS_SUCCESS) {
                        fh->samples_out += orig_len;
                }
                return status;
        }
}

switch_status_t switch_core_file_write_video	(	switch_file_handle_t *	fh,
		switch_frame_t *	frame
	)

Definition at line 589 of file switch_core_file.c.

References switch_assert, SWITCH_FILE_OPEN, SWITCH_STATUS_FALSE, SWITCH_STATUS_GENERR, and switch_test_flag.

{
        switch_assert(fh != NULL);
        switch_assert(fh->file_interface != NULL);

        if (!switch_test_flag(fh, SWITCH_FILE_OPEN)) {
                return SWITCH_STATUS_GENERR;
        }

        if (!fh->file_interface->file_write_video) {
                return SWITCH_STATUS_FALSE;
        }

        return fh->file_interface->file_write_video(fh, frame);

}

switch_status_t switch_core_perform_file_open	(	const char *	file,
		const char *	func,
		int	line,
		switch_file_handle_t *	fh,
		const char *	file_path,
		uint32_t	channels,
		uint32_t	rate,
		unsigned int	flags,
		switch_memory_pool_t *	pool
	)

Definition at line 39 of file switch_core_file.c.

References fail, pool, SWITCH_AUDIO_SPOOL_PATH_VARIABLE, switch_buffer_create_dynamic(), SWITCH_CHANNEL_LOG, switch_clear_flag_locked, switch_copy_string(), switch_core_alloc, switch_core_destroy_memory_pool, switch_core_get_variable_pdup(), switch_core_new_memory_pool, switch_core_sprintf(), switch_core_strdup, switch_directory_exists(), switch_event_create_brackets(), switch_event_destroy(), switch_event_get_header, SWITCH_FALSE, switch_file_exists(), SWITCH_FILE_FLAG_FREE_POOL, SWITCH_FILE_FLAG_READ, SWITCH_FILE_FLAG_VIDEO, SWITCH_FILE_FLAG_WRITE, SWITCH_FILE_NOMUX, SWITCH_FILE_OPEN, switch_goto_status, switch_loadable_module_get_file_interface(), SWITCH_LOG_DEBUG, SWITCH_LOG_ERROR, switch_log_printf(), SWITCH_LOG_WARNING, switch_mutex_init(), SWITCH_MUTEX_NESTED, SWITCH_PATH_SEPARATOR, switch_set_flag, switch_set_flag_locked, SWITCH_STATUS_FALSE, SWITCH_STATUS_GENERR, SWITCH_STATUS_SUCCESS, switch_test_flag, switch_true(), SWITCH_URL_SEPARATOR, switch_uuid_format(), SWITCH_UUID_FORMATTED_LENGTH, switch_uuid_get(), SWITCH_VIDEO_ENCODE_SPEED_DEFAULT, SWITCH_VIDEO_ENCODE_SPEED_FAST, SWITCH_VIDEO_ENCODE_SPEED_MEDIUM, SWITCH_VIDEO_ENCODE_SPEED_SLOW, SWITCH_VIDEO_PROFILE_BASELINE, SWITCH_VIDEO_PROFILE_HIGH, SWITCH_VIDEO_PROFILE_MAIN, UNPROTECT_INTERFACE, and zstr.

{
        char *ext;
        switch_status_t status = SWITCH_STATUS_FALSE;
        char stream_name[128] = "";
        char *rhs = NULL;
        const char *spool_path = NULL;
        int is_stream = 0;
        char *fp = NULL;
        int to = 0;

        if (switch_test_flag(fh, SWITCH_FILE_OPEN)) {
                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Handle already open\n");
                return SWITCH_STATUS_FALSE;
        }

        fh->samples_in = 0;

        if (!fh->samplerate) {
                if (!(fh->samplerate = rate)) {
                        fh->samplerate = 8000;
                }
        }

        if (zstr(file_path)) {
                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Invalid Filename\n");
                return SWITCH_STATUS_FALSE;
        }

        fh->flags = flags;

        if (pool) {
                fh->memory_pool = pool;
        } else {
                if ((status = switch_core_new_memory_pool(&fh->memory_pool)) != SWITCH_STATUS_SUCCESS) {
                        UNPROTECT_INTERFACE(fh->file_interface);
                        return status;
                }
                switch_set_flag(fh, SWITCH_FILE_FLAG_FREE_POOL);
        }

        switch_mutex_init(&fh->flag_mutex, SWITCH_MUTEX_NESTED, fh->memory_pool);

        fh->mm.samplerate = 44100;
        fh->mm.channels = 1;
        fh->mm.keyint = 60;
        fh->mm.ab = 128;
        fh->mm.vencspd = SWITCH_VIDEO_ENCODE_SPEED_DEFAULT;
        fh->mm.vprofile = SWITCH_VIDEO_PROFILE_BASELINE;
        fh->mm.try_hardware_encoder = 1;

        if (*file_path == '{') {
                char *timeout;
                char *modname;
                const char *val;
                int tmp;
                
                fp = switch_core_strdup(fh->memory_pool, file_path);

                while (*fp == '{') {
                        char *parsed = NULL;
                        
                        if (switch_event_create_brackets(fp, '{', '}', ',', &fh->params, &parsed, SWITCH_FALSE) != SWITCH_STATUS_SUCCESS || !parsed) {
                                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Parse Error!\n");
                                goto fail;
                        }
                        
                        fp = parsed;
                }

                file_path = fp;
                
                if ((timeout = switch_event_get_header(fh->params, "timeout"))) {
                        if ((to = atoi(timeout)) < 1) {
                                to = 0;
                        }
                }

                if ((modname = switch_event_get_header(fh->params, "modname"))) {
                        fh->modname = switch_core_strdup(fh->memory_pool, modname);
                }

                if ((val = switch_event_get_header(fh->params, "samplerate"))) {
                        tmp = atoi(val);
                        if (tmp > 8000) {
                                fh->mm.samplerate = tmp;
                        }
                }

                if ((val = switch_event_get_header(fh->params, "channels"))) {
                        tmp = atoi(val);
                        if (tmp == 1 || tmp == 2) {
                                fh->mm.channels = tmp;
                        }
                }

                if ((val = switch_event_get_header(fh->params, "ab"))) {
                        tmp = atoi(val);
                        if (tmp > 16) {
                                fh->mm.ab = tmp;
                        }
                }


                if ((val = switch_event_get_header(fh->params, "vb"))) {
                        tmp = atoi(val);
                        
                        if (strrchr(val, 'k')) {
                                tmp *= 1024;
                        } else if (strrchr(val, 'm')) {
                                tmp *= 1048576;
                        }

                        fh->mm.vb = tmp;
                }

                if ((val = switch_event_get_header(fh->params, "vw"))) {
                        tmp = atoi(val);
                        if (tmp > 0) {
                                fh->mm.vw = tmp;
                        }
                }

                if ((val = switch_event_get_header(fh->params, "vh"))) {
                        tmp = atoi(val);
                        if (tmp > 0) {
                                fh->mm.vh = tmp;
                        }
                }

                if ((val = switch_event_get_header(fh->params, "try_hardware_encoder"))) {
                        fh->mm.try_hardware_encoder = switch_true(val);
                }

                if ((val = switch_event_get_header(fh->params, "fps"))) {
                        float ftmp = atof(val);
                        if (ftmp > 0.0f) {
                                fh->mm.fps = ftmp;
                        }
                }

                if ((val = switch_event_get_header(fh->params, "vbuf"))) {
                        tmp = atoi(val);

                        if (strrchr(val, 'k')) {
                                tmp *= 1024;
                        } else if (strrchr(val, 'm')) {
                                tmp *= 1048576;
                        }
                        
                        if (tmp > 0 && tmp < 104857600 /*100mb*/) {
                                fh->mm.vbuf = tmp;
                        } else {
                                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Invalid buffer size: %d\n", tmp);
                        }
                }

                if ((val = switch_event_get_header(fh->params, "vencspd"))) {
                        if (!strcasecmp(val, "slow")) {
                                fh->mm.vencspd = SWITCH_VIDEO_ENCODE_SPEED_SLOW;
                        } else if (!strcasecmp(val, "medium")) {
                                fh->mm.vencspd = SWITCH_VIDEO_ENCODE_SPEED_MEDIUM;
                        } else if (!strcasecmp(val, "fast")) {
                                fh->mm.vencspd = SWITCH_VIDEO_ENCODE_SPEED_FAST;
                        } else {
                                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Invalid video encode speed: %s\n", val);
                        }
                }

                if ((val = switch_event_get_header(fh->params, "vprofile"))) {
                        if (!strcasecmp(val, "baseline")) {
                                fh->mm.vprofile = SWITCH_VIDEO_PROFILE_BASELINE;
                        } else if (!strcasecmp(val, "main")) {
                                fh->mm.vprofile = SWITCH_VIDEO_PROFILE_MAIN;
                        } else if (!strcasecmp(val, "high")) {
                                fh->mm.vprofile = SWITCH_VIDEO_PROFILE_HIGH;
                        } else {
                                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Invalid video profile: %s\n", val);
                        }
                }
        }

        if (switch_directory_exists(file_path, fh->memory_pool) == SWITCH_STATUS_SUCCESS) {
                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "File [%s] is a directory not a file.\n", file_path);
                status = SWITCH_STATUS_GENERR;
                goto fail;
        }

        if ((rhs = strstr(file_path, SWITCH_URL_SEPARATOR))) {
                switch_copy_string(stream_name, file_path, (rhs + 1) - file_path);
                ext = stream_name;
                file_path = rhs + 3;
                fh->stream_name = switch_core_strdup(fh->memory_pool, stream_name);
                fh->file_path = switch_core_strdup(fh->memory_pool, file_path);
                is_stream = 1;
        } else {
                if ((flags & SWITCH_FILE_FLAG_WRITE)) {

                        if (fh->params) {
                                spool_path = switch_event_get_header(fh->params, "spool_path");
                        }

                        if (!spool_path) {
                                spool_path = switch_core_get_variable_pdup(SWITCH_AUDIO_SPOOL_PATH_VARIABLE, fh->memory_pool);
                        }
                }

                if ((ext = strrchr(file_path, '.')) == 0) {
                        switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Unknown file Format [%s]\n", file_path);
                        switch_goto_status(SWITCH_STATUS_FALSE, fail);
                }
                ext++;
                fh->file_path = switch_core_strdup(fh->memory_pool, file_path);
        }



        if ((fh->file_interface = switch_loadable_module_get_file_interface(ext, fh->modname)) == 0) {
                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "Invalid file format [%s] for [%s]!\n", ext, file_path);
                switch_goto_status(SWITCH_STATUS_GENERR, fail);
        }

        fh->file = file;
        fh->func = func;
        fh->line = line;

        if (switch_test_flag(fh, SWITCH_FILE_FLAG_VIDEO) && !fh->file_interface->file_read_video) {
                switch_clear_flag_locked(fh, SWITCH_FILE_FLAG_VIDEO);
        }

        if (spool_path) {
                char uuid_str[SWITCH_UUID_FORMATTED_LENGTH + 1];
                switch_uuid_t uuid;
                switch_uuid_get(&uuid);
                switch_uuid_format(uuid_str, &uuid);

                fh->spool_path = switch_core_sprintf(fh->memory_pool, "%s%s%s.%s", spool_path, SWITCH_PATH_SEPARATOR, uuid_str, ext);
        } else {
                fh->spool_path = NULL;
        }

        if (rhs) {
                fh->handler = switch_core_strdup(fh->memory_pool, rhs);
        } else {
                fh->handler = NULL;
        }

        if (channels) {
                fh->channels = channels;
        } else {
                fh->channels = 1;
        }

        file_path = fh->spool_path ? fh->spool_path : fh->file_path;

        if ((status = fh->file_interface->file_open(fh, file_path)) != SWITCH_STATUS_SUCCESS) {
                if (fh->spool_path) {
                        switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_WARNING, "Spool dir is set.  Make sure [%s] is also a valid path\n", fh->spool_path);
                }
                UNPROTECT_INTERFACE(fh->file_interface);
                goto fail;
        }

        fh->real_channels = fh->channels;

        if (channels) {
                fh->channels = channels;
        }

        if ((flags & SWITCH_FILE_FLAG_WRITE) && !is_stream && (status = switch_file_exists(file_path, fh->memory_pool)) != SWITCH_STATUS_SUCCESS) {
                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_ERROR, "File [%s] not created!\n", file_path);
                fh->file_interface->file_close(fh);
                UNPROTECT_INTERFACE(fh->file_interface);
                goto fail;
        }

        if (to) {
                fh->max_samples = (fh->samplerate / 1000) * to;
        }


        if ((flags & SWITCH_FILE_FLAG_READ)) {
                fh->native_rate = fh->samplerate;
        } else {
                fh->native_rate = rate;
        }

        if (fh->samplerate && rate && fh->samplerate != rate) {
                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_DEBUG, "File %s sample rate %d doesn't match requested rate %d\n", file_path, fh->samplerate, rate);
                if ((flags & SWITCH_FILE_FLAG_READ)) {
                        fh->samplerate = rate;
                }
        }

        if (switch_test_flag(fh, SWITCH_FILE_FLAG_VIDEO)) {
                fh->pre_buffer_datalen = 0;
        }

        if (fh->pre_buffer_datalen) {
                //switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_DEBUG, "Prebuffering %d bytes\n", (int)fh->pre_buffer_datalen);
                switch_buffer_create_dynamic(&fh->pre_buffer, fh->pre_buffer_datalen * fh->channels, fh->pre_buffer_datalen * fh->channels, 0);
                fh->pre_buffer_data = switch_core_alloc(fh->memory_pool, fh->pre_buffer_datalen * fh->channels);
        }


        if (fh->real_channels != fh->channels && (flags & SWITCH_FILE_FLAG_READ) && !(fh->flags & SWITCH_FILE_NOMUX)) {
                switch_log_printf(SWITCH_CHANNEL_LOG, SWITCH_LOG_WARNING, "File has %d channels, muxing to %d channel%s will occur.\n", fh->real_channels, fh->channels, fh->channels == 1 ? "" : "s");
        }

        switch_set_flag_locked(fh, SWITCH_FILE_OPEN);
        return status;

  fail:

        switch_clear_flag_locked(fh, SWITCH_FILE_OPEN);

        if (fh->params) {
                switch_event_destroy(&fh->params);
        }

        fh->samples_in = 0;
        fh->max_samples = 0;
        
        if (switch_test_flag(fh, SWITCH_FILE_FLAG_FREE_POOL)) {
                switch_core_destroy_memory_pool(&fh->memory_pool);
        }

        return status;
}