Remove deprecated CLI apps from the core
[asterisk/asterisk.git] / main / translate.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 1999 - 2006, Digium, Inc.
5  *
6  * Mark Spencer <markster@digium.com>
7  *
8  * See http://www.asterisk.org for more information about
9  * the Asterisk project. Please do not directly contact
10  * any of the maintainers of this project for assistance;
11  * the project provides a web site, mailing lists and IRC
12  * channels for your use.
13  *
14  * This program is free software, distributed under the terms of
15  * the GNU General Public License Version 2. See the LICENSE file
16  * at the top of the source tree.
17  */
18
19 /*! \file
20  *
21  * \brief Translate via the use of pseudo channels
22  *
23  * \author Mark Spencer <markster@digium.com> 
24  */
25
26 #include "asterisk.h"
27
28 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
29
30 #include <sys/types.h>
31 #include <sys/socket.h>
32 #include <sys/time.h>
33 #include <unistd.h>
34 #include <stdlib.h>
35 #include <string.h>
36 #include <stdio.h>
37
38 #include "asterisk/lock.h"
39 #include "asterisk/channel.h"
40 #include "asterisk/logger.h"
41 #include "asterisk/translate.h"
42 #include "asterisk/module.h"
43 #include "asterisk/options.h"
44 #include "asterisk/frame.h"
45 #include "asterisk/sched.h"
46 #include "asterisk/cli.h"
47 #include "asterisk/term.h"
48
49 #define MAX_RECALC 200 /* max sample recalc */
50
51 /*! \brief the list of translators */
52 static AST_LIST_HEAD_STATIC(translators, ast_translator);
53
54 struct translator_path {
55         struct ast_translator *step;    /*!< Next step translator */
56         unsigned int cost;              /*!< Complete cost to destination */
57         unsigned int multistep;         /*!< Multiple conversions required for this translation */
58 };
59
60 /*! \brief a matrix that, for any pair of supported formats,
61  * indicates the total cost of translation and the first step.
62  * The full path can be reconstricted iterating on the matrix
63  * until step->dstfmt == desired_format.
64  *
65  * Array indexes are 'src' and 'dest', in that order.
66  */
67 static struct translator_path tr_matrix[MAX_FORMAT][MAX_FORMAT];
68
69 /*! \todo
70  * TODO: sample frames for each supported input format.
71  * We build this on the fly, by taking an SLIN frame and using
72  * the existing converter to play with it.
73  */
74
75 /*! \brief returns the index of the lowest bit set */
76 static force_inline int powerof(unsigned int d)
77 {
78         int x = ffs(d);
79
80         if (x)
81                 return x - 1;
82
83         ast_log(LOG_WARNING, "No bits set? %d\n", d);
84
85         return -1;
86 }
87
88 /*
89  * wrappers around the translator routines.
90  */
91
92 /*!
93  * \brief Allocate the descriptor, required outbuf space,
94  * and possibly also plc and desc.
95  */
96 static void *newpvt(struct ast_translator *t)
97 {
98         struct ast_trans_pvt *pvt;
99         int len;
100         int useplc = t->plc_samples > 0 && t->useplc;   /* cache, because it can change on the fly */
101         char *ofs;
102
103         /*
104          * compute the required size adding private descriptor,
105          * plc, buffer, AST_FRIENDLY_OFFSET.
106          */
107         len = sizeof(*pvt) + t->desc_size;
108         if (useplc)
109                 len += sizeof(plc_state_t);
110         if (t->buf_size)
111                 len += AST_FRIENDLY_OFFSET + t->buf_size;
112         pvt = ast_calloc(1, len);
113         if (!pvt)
114                 return NULL;
115         pvt->t = t;
116         ofs = (char *)(pvt + 1);        /* pointer to data space */
117         if (t->desc_size) {             /* first comes the descriptor */
118                 pvt->pvt = ofs;
119                 ofs += t->desc_size;
120         }
121         if (useplc) {                   /* then plc state */
122                 pvt->plc = (plc_state_t *)ofs;
123                 ofs += sizeof(plc_state_t);
124         }
125         if (t->buf_size)                /* finally buffer and header */
126                 pvt->outbuf = ofs + AST_FRIENDLY_OFFSET;
127         /* call local init routine, if present */
128         if (t->newpvt && t->newpvt(pvt)) {
129                 free(pvt);
130                 return NULL;
131         }
132         ast_module_ref(t->module);
133         return pvt;
134 }
135
136 static void destroy(struct ast_trans_pvt *pvt)
137 {
138         struct ast_translator *t = pvt->t;
139
140         if (t->destroy)
141                 t->destroy(pvt);
142         free(pvt);
143         ast_module_unref(t->module);
144 }
145
146 /*! \brief framein wrapper, deals with plc and bound checks.  */
147 static int framein(struct ast_trans_pvt *pvt, struct ast_frame *f)
148 {
149         int16_t *dst = (int16_t *)pvt->outbuf;
150         int ret;
151         int samples = pvt->samples;     /* initial value */
152         
153         /* Copy the last in jb timing info to the pvt */
154         pvt->f.has_timing_info = f->has_timing_info;
155         pvt->f.ts = f->ts;
156         pvt->f.len = f->len;
157         pvt->f.seqno = f->seqno;
158
159         if (f->samples == 0) {
160                 ast_log(LOG_WARNING, "no samples for %s\n", pvt->t->name);
161         }
162         if (pvt->t->buffer_samples) {   /* do not pass empty frames to callback */
163                 if (f->datalen == 0) { /* perform PLC with nominal framesize of 20ms/160 samples */
164                         if (pvt->plc) {
165                                 int l = pvt->t->plc_samples;
166                                 if (pvt->samples + l > pvt->t->buffer_samples) {
167                                         ast_log(LOG_WARNING, "Out of buffer space\n");
168                                         return -1;
169                                 }
170                                 l = plc_fillin(pvt->plc, dst + pvt->samples, l);
171                                 pvt->samples += l;
172                         }
173                         return 0;
174                 }
175                 if (pvt->samples + f->samples > pvt->t->buffer_samples) {
176                         ast_log(LOG_WARNING, "Out of buffer space\n");
177                         return -1;
178                 }
179         }
180         /* we require a framein routine, wouldn't know how to do
181          * it otherwise.
182          */
183         ret = pvt->t->framein(pvt, f);
184         /* possibly store data for plc */
185         if (!ret && pvt->plc) {
186                 int l = pvt->t->plc_samples;
187                 if (pvt->samples < l)
188                         l = pvt->samples;
189                 plc_rx(pvt->plc, dst + pvt->samples - l, l);
190         }
191         /* diagnostic ... */
192         if (pvt->samples == samples)
193                 ast_log(LOG_WARNING, "%s did not update samples %d\n",
194                         pvt->t->name, pvt->samples);
195         return ret;
196 }
197
198 /*! \brief generic frameout routine.
199  * If samples and datalen are 0, take whatever is in pvt
200  * and reset them, otherwise take the values in the caller and
201  * leave alone the pvt values.
202  */
203 struct ast_frame *ast_trans_frameout(struct ast_trans_pvt *pvt,
204         int datalen, int samples)
205 {
206         struct ast_frame *f = &pvt->f;
207
208         if (samples)
209                 f->samples = samples;
210         else {
211                 if (pvt->samples == 0)
212                         return NULL;
213                 f->samples = pvt->samples;
214                 pvt->samples = 0;
215         }
216         if (datalen)
217                 f->datalen = datalen;
218         else {
219                 f->datalen = pvt->datalen;
220                 pvt->datalen = 0;
221         }
222
223         f->frametype = AST_FRAME_VOICE;
224         f->subclass = 1 << (pvt->t->dstfmt);
225         f->mallocd = 0;
226         f->offset = AST_FRIENDLY_OFFSET;
227         f->src = pvt->t->name;
228         f->data = pvt->outbuf;
229         return f;
230 }
231
232 static struct ast_frame *default_frameout(struct ast_trans_pvt *pvt)
233 {
234         return ast_trans_frameout(pvt, 0, 0);
235 }
236
237 /* end of callback wrappers and helpers */
238
239 void ast_translator_free_path(struct ast_trans_pvt *p)
240 {
241         struct ast_trans_pvt *pn = p;
242         while ( (p = pn) ) {
243                 pn = p->next;
244                 destroy(p);
245         }
246 }
247
248 /*! \brief Build a chain of translators based upon the given source and dest formats */
249 struct ast_trans_pvt *ast_translator_build_path(int dest, int source)
250 {
251         struct ast_trans_pvt *head = NULL, *tail = NULL;
252         
253         source = powerof(source);
254         dest = powerof(dest);
255         
256         while (source != dest) {
257                 struct ast_trans_pvt *cur;
258                 struct ast_translator *t = tr_matrix[source][dest].step;
259                 if (!t) {
260                         ast_log(LOG_WARNING, "No translator path from %s to %s\n", 
261                                 ast_getformatname(source), ast_getformatname(dest));
262                         return NULL;
263                 }
264                 if (!(cur = newpvt(t))) {
265                         ast_log(LOG_WARNING, "Failed to build translator step from %d to %d\n", source, dest);
266                         if (head)
267                                 ast_translator_free_path(head); 
268                         return NULL;
269                 }
270                 if (!head)
271                         head = cur;
272                 else
273                         tail->next = cur;
274                 tail = cur;
275                 cur->nextin = cur->nextout = ast_tv(0, 0);
276                 /* Keep going if this isn't the final destination */
277                 source = cur->t->dstfmt;
278         }
279         return head;
280 }
281
282 /*! \brief do the actual translation */
283 struct ast_frame *ast_translate(struct ast_trans_pvt *path, struct ast_frame *f, int consume)
284 {
285         struct ast_trans_pvt *p = path;
286         struct ast_frame *out = f;
287         struct timeval delivery;
288         int has_timing_info;
289         long ts;
290         long len;
291         int seqno;
292
293         has_timing_info = f->has_timing_info;
294         ts = f->ts;
295         len = f->len;
296         seqno = f->seqno;
297
298         /* XXX hmmm... check this below */
299         if (!ast_tvzero(f->delivery)) {
300                 if (!ast_tvzero(path->nextin)) {
301                         /* Make sure this is in line with what we were expecting */
302                         if (!ast_tveq(path->nextin, f->delivery)) {
303                                 /* The time has changed between what we expected and this
304                                    most recent time on the new packet.  If we have a
305                                    valid prediction adjust our output time appropriately */
306                                 if (!ast_tvzero(path->nextout)) {
307                                         path->nextout = ast_tvadd(path->nextout,
308                                                                   ast_tvsub(f->delivery, path->nextin));
309                                 }
310                                 path->nextin = f->delivery;
311                         }
312                 } else {
313                         /* This is our first pass.  Make sure the timing looks good */
314                         path->nextin = f->delivery;
315                         path->nextout = f->delivery;
316                 }
317                 /* Predict next incoming sample */
318                 path->nextin = ast_tvadd(path->nextin, ast_samp2tv(f->samples, 8000));
319         }
320         delivery = f->delivery;
321         for ( ; out && p ; p = p->next) {
322                 framein(p, out);
323                 out = p->t->frameout(p);
324         }
325         if (consume)
326                 ast_frfree(f);
327         if (out == NULL)
328                 return NULL;
329         /* we have a frame, play with times */
330         if (!ast_tvzero(delivery)) {
331                 /* Regenerate prediction after a discontinuity */
332                 if (ast_tvzero(path->nextout))
333                         path->nextout = ast_tvnow();
334
335                 /* Use next predicted outgoing timestamp */
336                 out->delivery = path->nextout;
337                 
338                 /* Predict next outgoing timestamp from samples in this
339                    frame. */
340                 path->nextout = ast_tvadd(path->nextout, ast_samp2tv( out->samples, 8000));
341         } else {
342                 out->delivery = ast_tv(0, 0);
343                 out->has_timing_info = has_timing_info;
344                 if (has_timing_info) {
345                         out->ts = ts;
346                         out->len = len;
347                         out->seqno = seqno;
348                 }
349         }
350         /* Invalidate prediction if we're entering a silence period */
351         if (out->frametype == AST_FRAME_CNG)
352                 path->nextout = ast_tv(0, 0);
353         return out;
354 }
355
356 /*! \brief compute the cost of a single translation step */
357 static void calc_cost(struct ast_translator *t, int seconds)
358 {
359         int sofar=0;
360         struct ast_trans_pvt *pvt;
361         struct timeval start;
362         int cost;
363
364         if (!seconds)
365                 seconds = 1;
366         
367         /* If they don't make samples, give them a terrible score */
368         if (!t->sample) {
369                 ast_log(LOG_WARNING, "Translator '%s' does not produce sample frames.\n", t->name);
370                 t->cost = 99999;
371                 return;
372         }
373         pvt = newpvt(t);
374         if (!pvt) {
375                 ast_log(LOG_WARNING, "Translator '%s' appears to be broken and will probably fail.\n", t->name);
376                 t->cost = 99999;
377                 return;
378         }
379         start = ast_tvnow();
380         /* Call the encoder until we've processed the required number of samples */
381         while (sofar < seconds * 8000) {
382                 struct ast_frame *f = t->sample();
383                 if (!f) {
384                         ast_log(LOG_WARNING, "Translator '%s' failed to produce a sample frame.\n", t->name);
385                         destroy(pvt);
386                         t->cost = 99999;
387                         return;
388                 }
389                 framein(pvt, f);
390                 ast_frfree(f);
391                 while ((f = t->frameout(pvt))) {
392                         sofar += f->samples;
393                         ast_frfree(f);
394                 }
395         }
396         cost = ast_tvdiff_ms(ast_tvnow(), start);
397         destroy(pvt);
398         t->cost = cost / seconds;
399         if (!t->cost)
400                 t->cost = 1;
401 }
402
403 /*!
404  * \brief rebuild a translation matrix.
405  * \note This function expects the list of translators to be locked
406 */
407 static void rebuild_matrix(int samples)
408 {
409         struct ast_translator *t;
410         int x;      /* source format index */
411         int y;      /* intermediate format index */
412         int z;      /* destination format index */
413
414         if (option_debug)
415                 ast_log(LOG_DEBUG, "Resetting translation matrix\n");
416
417         bzero(tr_matrix, sizeof(tr_matrix));
418
419         /* first, compute all direct costs */
420         AST_LIST_TRAVERSE(&translators, t, list) {
421                 x = t->srcfmt;
422                 z = t->dstfmt;
423
424                 if (samples)
425                         calc_cost(t, samples);
426           
427                 if (!tr_matrix[x][z].step || t->cost < tr_matrix[x][z].cost) {
428                         tr_matrix[x][z].step = t;
429                         tr_matrix[x][z].cost = t->cost;
430                 }
431         }
432
433         /*
434          * For each triple x, y, z of distinct formats, check if there is
435          * a path from x to z through y which is cheaper than what is
436          * currently known, and in case, update the matrix.
437          * Repeat until the matrix is stable.
438          */
439         for (;;) {
440                 int changed = 0;
441                 for (x = 0; x < MAX_FORMAT; x++) {      /* source format */
442                         for (y=0; y < MAX_FORMAT; y++) {    /* intermediate format */
443                                 if (x == y)                     /* skip ourselves */
444                                         continue;
445
446                                 for (z=0; z<MAX_FORMAT; z++) {  /* dst format */
447                                         int newcost;
448
449                                         if (z == x || z == y)       /* skip null conversions */
450                                                 continue;
451                                         if (!tr_matrix[x][y].step)  /* no path from x to y */
452                                                 continue;
453                                         if (!tr_matrix[y][z].step)  /* no path from y to z */
454                                                 continue;
455                                         newcost = tr_matrix[x][y].cost + tr_matrix[y][z].cost;
456                                         if (tr_matrix[x][z].step && newcost >= tr_matrix[x][z].cost)
457                                                 continue;               /* x->y->z is more expensive than
458                                                                          * the existing path */
459                                         /* ok, we can get from x to z via y with a cost that
460                                            is the sum of the transition from x to y and
461                                            from y to z */
462                                                  
463                                         tr_matrix[x][z].step = tr_matrix[x][y].step;
464                                         tr_matrix[x][z].cost = newcost;
465                                         tr_matrix[x][z].multistep = 1;
466                                         if (option_debug)
467                                                 ast_log(LOG_DEBUG, "Discovered %d cost path from %s to %s, via %d\n", tr_matrix[x][z].cost, ast_getformatname(x), ast_getformatname(z), y);
468                                         changed++;
469                                 }
470                         }
471                 }
472                 if (!changed)
473                         break;
474         }
475 }
476
477 static int show_translation(int fd, int argc, char *argv[])
478 {
479 #define SHOW_TRANS 12
480         int x, y, z;
481         int curlen = 0, longest = 0;
482
483         if (argc > 5)
484                 return RESULT_SHOWUSAGE;
485
486         AST_LIST_LOCK(&translators);    
487         
488         if (argv[3] && !strcasecmp(argv[3], "recalc")) {
489                 z = argv[4] ? atoi(argv[4]) : 1;
490
491                 if (z <= 0) {
492                         ast_cli(fd, "         C'mon let's be serious here... defaulting to 1.\n");
493                         z = 1;
494                 }
495
496                 if (z > MAX_RECALC) {
497                         ast_cli(fd, "         Maximum limit of recalc exceeded by %d, truncating value to %d\n", z - MAX_RECALC, MAX_RECALC);
498                         z = MAX_RECALC;
499                 }
500                 ast_cli(fd, "         Recalculating Codec Translation (number of sample seconds: %d)\n\n", z);
501                 rebuild_matrix(z);
502         }
503
504         ast_cli(fd, "         Translation times between formats (in milliseconds) for one second of data\n");
505         ast_cli(fd, "          Source Format (Rows) Destination Format (Columns)\n\n");
506         /* Get the length of the longest (usable?) codec name, so we know how wide the left side should be */
507         for (x = 0; x < SHOW_TRANS; x++) {
508                 curlen = strlen(ast_getformatname(1 << (x + 1)));
509                 if (curlen > longest)
510                         longest = curlen;
511         }
512         for (x = -1; x < SHOW_TRANS; x++) {
513                 char line[80];
514                 char *buf = line;
515                 size_t left = sizeof(line) - 1; /* one initial space */
516                 /* next 2 lines run faster than using ast_build_string() */
517                 *buf++ = ' ';
518                 *buf = '\0';
519                 for (y = -1; y < SHOW_TRANS; y++) {
520                         curlen = strlen(ast_getformatname(1 << (y)));
521
522                         if (x >= 0 && y >= 0 && tr_matrix[x][y].step) {
523                                 /* XXX 999 is a little hackish
524                                    We don't want this number being larger than the shortest (or current) codec
525                                    For now, that is "gsm" */
526                                 ast_build_string(&buf, &left, "%*d", curlen + 1, tr_matrix[x][y].cost > 999 ? 0 : tr_matrix[x][y].cost);
527                         } else if (x == -1 && y >= 0) {
528                                 /* Top row - use a dynamic size */
529                                 ast_build_string(&buf, &left, "%*s", curlen + 1, ast_getformatname(1 << (x + y + 1)) );
530                         } else if (y == -1 && x >= 0) {
531                                 /* Left column - use a static size. */
532                                 ast_build_string(&buf, &left, "%*s", longest, ast_getformatname(1 << (x + y + 1)) );
533                         } else if (x >= 0 && y >= 0) {
534                                 ast_build_string(&buf, &left, "%*s", curlen + 1, "-");
535                         } else {
536                                 ast_build_string(&buf, &left, "%*s", longest, "");
537                         }
538                 }
539                 ast_build_string(&buf, &left, "\n");
540                 ast_cli(fd, line);                      
541         }
542         AST_LIST_UNLOCK(&translators);
543         return RESULT_SUCCESS;
544 }
545
546 static char show_trans_usage[] =
547 "Usage: core show translation [recalc] [<recalc seconds>]\n"
548 "       Displays known codec translators and the cost associated\n"
549 "with each conversion.  If the argument 'recalc' is supplied along\n"
550 "with optional number of seconds to test a new test will be performed\n"
551 "as the chart is being displayed.\n";
552
553 static struct ast_cli_entry cli_translate[] = {
554         { { "core", "show", "translation", NULL },
555         show_translation, "Display translation matrix",
556         show_trans_usage, NULL, NULL },
557 };
558
559 /*! \brief register codec translator */
560 int __ast_register_translator(struct ast_translator *t, struct ast_module *mod)
561 {
562         static int added_cli = 0;
563
564         if (!mod) {
565                 ast_log(LOG_WARNING, "Missing module pointer, you need to supply one\n");
566                 return -1;
567         }
568
569         if (!t->buf_size) {
570                 ast_log(LOG_WARNING, "empty buf size, you need to supply one\n");
571                 return -1;
572         }
573
574         t->module = mod;
575         if (t->plc_samples) {
576                 if (t->buffer_samples < t->plc_samples) {
577                         ast_log(LOG_WARNING, "plc_samples %d buffer_samples %d\n",
578                                 t->plc_samples, t->buffer_samples);
579                         return -1;
580                 }
581                 if (t->dstfmt != AST_FORMAT_SLINEAR)
582                         ast_log(LOG_WARNING, "plc_samples %d format %x\n",
583                                 t->plc_samples, t->dstfmt);
584         }
585         t->srcfmt = powerof(t->srcfmt);
586         t->dstfmt = powerof(t->dstfmt);
587         /* XXX maybe check that it is not existing yet ? */
588         if (t->srcfmt >= MAX_FORMAT) {
589                 ast_log(LOG_WARNING, "Source format %s is larger than MAX_FORMAT\n", ast_getformatname(t->srcfmt));
590                 return -1;
591         }
592         if (t->dstfmt >= MAX_FORMAT) {
593                 ast_log(LOG_WARNING, "Destination format %s is larger than MAX_FORMAT\n", ast_getformatname(t->dstfmt));
594                 return -1;
595         }
596         if (t->buf_size) {
597                /*
598                 * Align buf_size properly, rounding up to the machine-specific
599                 * alignment for pointers.
600                 */
601                 struct _test_align { void *a, *b; } p;
602                 int align = (char *)&p.b - (char *)&p.a;
603                 t->buf_size = ((t->buf_size + align - 1) / align) * align;
604         }
605         if (t->frameout == NULL)
606                 t->frameout = default_frameout;
607   
608         calc_cost(t, 1);
609         if (option_verbose > 1) {
610                 char tmp[80];
611                 ast_verbose(VERBOSE_PREFIX_2 "Registered translator '%s' from format %s to %s, cost %d\n",
612                         term_color(tmp, t->name, COLOR_MAGENTA, COLOR_BLACK, sizeof(tmp)),
613                         ast_getformatname(1 << t->srcfmt), ast_getformatname(1 << t->dstfmt), t->cost);
614         }
615         AST_LIST_LOCK(&translators);
616         if (!added_cli) {
617                 ast_cli_register_multiple(cli_translate, sizeof(cli_translate) / sizeof(struct ast_cli_entry));
618                 added_cli++;
619         }
620         AST_LIST_INSERT_HEAD(&translators, t, list);
621         rebuild_matrix(0);
622         AST_LIST_UNLOCK(&translators);
623         return 0;
624 }
625
626 /*! \brief unregister codec translator */
627 int ast_unregister_translator(struct ast_translator *t)
628 {
629         char tmp[80];
630         struct ast_translator *u;
631         AST_LIST_LOCK(&translators);
632         AST_LIST_TRAVERSE_SAFE_BEGIN(&translators, u, list) {
633                 if (u == t) {
634                         AST_LIST_REMOVE_CURRENT(&translators, list);
635                         if (option_verbose > 1)
636                                 ast_verbose(VERBOSE_PREFIX_2 "Unregistered translator '%s' from format %s to %s\n", term_color(tmp, t->name, COLOR_MAGENTA, COLOR_BLACK, sizeof(tmp)), ast_getformatname(1 << t->srcfmt), ast_getformatname(1 << t->dstfmt));
637                         break;
638                 }
639         }
640         AST_LIST_TRAVERSE_SAFE_END
641         rebuild_matrix(0);
642         AST_LIST_UNLOCK(&translators);
643         return (u ? 0 : -1);
644 }
645
646 /*! \brief Calculate our best translator source format, given costs, and a desired destination */
647 int ast_translator_best_choice(int *dst, int *srcs)
648 {
649         int x,y;
650         int best = -1;
651         int bestdst = 0;
652         int cur, cursrc;
653         int besttime = INT_MAX;
654         int beststeps = INT_MAX;
655         int common = (*dst) & (*srcs);  /* are there common formats ? */
656
657         if (common) { /* yes, pick one and return */
658                 for (cur = 1, y = 0; y < MAX_FORMAT; cur <<= 1, y++) {
659                         if (cur & common)       /* guaranteed to find one */
660                                 break;
661                 }
662                 /* We are done, this is a common format to both. */
663                 *srcs = *dst = cur;
664                 return 0;
665         } else {        /* No, we will need to translate */
666                 AST_LIST_LOCK(&translators);
667                 for (cur = 1, y = 0; y < MAX_FORMAT; cur <<= 1, y++) {
668                         if (! (cur & *dst))
669                                 continue;
670                         for (cursrc = 1, x = 0; x < MAX_FORMAT; cursrc <<= 1, x++) {
671                                 if (!(*srcs & cursrc) || !tr_matrix[x][y].step ||
672                                     tr_matrix[x][y].cost >  besttime)
673                                         continue;       /* not existing or no better */
674                                 if (tr_matrix[x][y].cost < besttime ||
675                                     tr_matrix[x][y].multistep < beststeps) {
676                                         /* better than what we have so far */
677                                         best = cursrc;
678                                         bestdst = cur;
679                                         besttime = tr_matrix[x][y].cost;
680                                         beststeps = tr_matrix[x][y].multistep;
681                                 }
682                         }
683                 }
684                 AST_LIST_UNLOCK(&translators);
685                 if (best > -1) {
686                         *srcs = best;
687                         *dst = bestdst;
688                         best = 0;
689                 }
690                 return best;
691         }
692 }
693
694 unsigned int ast_translate_path_steps(unsigned int dest, unsigned int src)
695 {
696         /* convert bitwise format numbers into array indices */
697         src = powerof(src);
698         dest = powerof(dest);
699         if (!tr_matrix[src][dest].step)
700                 return -1;
701         else
702                 return tr_matrix[src][dest].multistep + 1;
703 }
704