00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027 #include "asterisk.h"
00028
00029 ASTERISK_FILE_VERSION(__FILE__, "$Revision: 66074 $")
00030
00031 #include <string.h>
00032
00033 #include "asterisk/frame.h"
00034 #include "asterisk/slinfactory.h"
00035 #include "asterisk/logger.h"
00036 #include "asterisk/translate.h"
00037
00038 void ast_slinfactory_init(struct ast_slinfactory *sf)
00039 {
00040 memset(sf, 0, sizeof(*sf));
00041 sf->offset = sf->hold;
00042 }
00043
00044 void ast_slinfactory_destroy(struct ast_slinfactory *sf)
00045 {
00046 struct ast_frame *f;
00047
00048 if (sf->trans) {
00049 ast_translator_free_path(sf->trans);
00050 sf->trans = NULL;
00051 }
00052
00053 while ((f = AST_LIST_REMOVE_HEAD(&sf->queue, frame_list)))
00054 ast_frfree(f);
00055 }
00056
00057 int ast_slinfactory_feed(struct ast_slinfactory *sf, struct ast_frame *f)
00058 {
00059 struct ast_frame *begin_frame = f, *duped_frame = NULL, *frame_ptr;
00060 unsigned int x;
00061
00062 if (f->subclass != AST_FORMAT_SLINEAR) {
00063 if (sf->trans && f->subclass != sf->format) {
00064 ast_translator_free_path(sf->trans);
00065 sf->trans = NULL;
00066 }
00067 if (!sf->trans) {
00068 if ((sf->trans = ast_translator_build_path(AST_FORMAT_SLINEAR, f->subclass)) == NULL) {
00069 ast_log(LOG_WARNING, "Cannot build a path from %s to slin\n", ast_getformatname(f->subclass));
00070 return 0;
00071 } else {
00072 sf->format = f->subclass;
00073 }
00074 }
00075 if (!(begin_frame = ast_translate(sf->trans, f, 0)) || !(duped_frame = ast_frdup(begin_frame)))
00076 return 0;
00077 } else {
00078 if (!(duped_frame = ast_frdup(f)))
00079 return 0;
00080 }
00081
00082 x = 0;
00083 AST_LIST_TRAVERSE(&sf->queue, frame_ptr, frame_list)
00084 x++;
00085
00086 AST_LIST_INSERT_TAIL(&sf->queue, duped_frame, frame_list);
00087
00088 sf->size += duped_frame->samples;
00089
00090 return x;
00091 }
00092
00093 int ast_slinfactory_read(struct ast_slinfactory *sf, short *buf, size_t samples)
00094 {
00095 struct ast_frame *frame_ptr;
00096 unsigned int sofar = 0, ineed, remain;
00097 short *frame_data, *offset = buf;
00098
00099 while (sofar < samples) {
00100 ineed = samples - sofar;
00101
00102 if (sf->holdlen) {
00103 if ((sofar + sf->holdlen) <= ineed) {
00104 memcpy(offset, sf->hold, sf->holdlen * sizeof(*offset));
00105 sofar += sf->holdlen;
00106 offset += sf->holdlen;
00107 sf->holdlen = 0;
00108 sf->offset = sf->hold;
00109 } else {
00110 remain = sf->holdlen - ineed;
00111 memcpy(offset, sf->offset, ineed * sizeof(*offset));
00112 sofar += ineed;
00113 sf->offset += ineed;
00114 sf->holdlen = remain;
00115 }
00116 continue;
00117 }
00118
00119 if ((frame_ptr = AST_LIST_REMOVE_HEAD(&sf->queue, frame_list))) {
00120 frame_data = frame_ptr->data;
00121
00122 if ((sofar + frame_ptr->samples) <= ineed) {
00123 memcpy(offset, frame_data, frame_ptr->samples * sizeof(*offset));
00124 sofar += frame_ptr->samples;
00125 offset += frame_ptr->samples;
00126 } else {
00127 remain = frame_ptr->samples - ineed;
00128 memcpy(offset, frame_data, ineed * sizeof(*offset));
00129 sofar += ineed;
00130 frame_data += ineed;
00131 memcpy(sf->hold, frame_data, remain * sizeof(*offset));
00132 sf->holdlen = remain;
00133 }
00134 ast_frfree(frame_ptr);
00135 } else {
00136 break;
00137 }
00138 }
00139
00140 sf->size -= sofar;
00141 return sofar;
00142 }
00143
00144 unsigned int ast_slinfactory_available(const struct ast_slinfactory *sf)
00145 {
00146 return sf->size;
00147 }