source: svn/newcon3bcm2_21bu/dst/dlib/src/si/DLIB_PSI_Utils.c

/**
        @file
                DLIB_PSI_Utils.c

        @brief
                PHOENIX HAL library

        ÀÌ ¸ðµâ¿¡ ´ëÇÑ °£´ÜÇÑ ¼³¸í.. 
        ex: AudioVideo decoding/capture/output implementation

        Copyright 2006~2010 Digital STREAM Technology, Inc.
        All Rights Reserved
*/


#include "DHL_Types.h"
#include "DHL_DBG.h"

#include "DLIB_PSIP.h"
#include "DLIB_PSI_Utils.h"
#include "DLIB_PSI_Parser.h"
#include "DLIB_PSIP_Parser.h"

//#include <ctype.h>
////#include <string.h>


#ifndef min
  #define min(a,b) ((a)<(b)?(a):(b))
#endif


/*
        ¸ðµç Çì´õ ÆÄÀÏÀ» Æ÷ÇÔÇÏÁö´Â ¾ÊÀ¸¸ç, compile timeÀ» ÁÙÀ̱â À§ÇØ
        °¢ ¸ðµâÀº ÇÊ¿äÇÑ ¸¸Å­ÀÇ Çì´õ¸¦ ¼±¾ðÇϵµ·Ï ÇÔ.
*/



/*
        DHL µð¹ö±× ¸ðµâ À̸§ Á¤ÀÇ ·ê Âü°í:

        DHL ¸ðµâµéÀº ¸ðµÎ * ·Î ½ÃÀÛ.
        API´Â ´ë¹®ÀÚ, Platform ¹× ±âŸ´Â ¼Ò¹®ÀÚ »ç¿ë.

        µðÆúÆ® ·¹º§Àº 0À¸·Î ¼³Á¤ÇÑ´Ù. (0: ¿¡·¯ ¸Þ½ÃÁö¸¸ Ãâ·Â)
        
        
*/

DHL_MODULE("*MMM", 0);



#if COMMENT
____Config____(){}
#endif

/*
        ÀÌ ¸ðµâ ³»ºÎ¿¡¼­ »ç¿ëµÇ´Â °¢Á¾ configuration Á¤ÀÇ.
*/
        
#define _U      0x01    /* upper */
#define _L      0x02    /* lower */
#define _D      0x04    /* digit */
#define _C      0x08    /* cntrl */
#define _P      0x10    /* punct */
#define _S      0x20    /* white space (space/lf/tab) */
#define _X      0x40    /* hex digit */
#define _SP     0x80    /* hard space (0x20) */

extern unsigned char _ctype[];

#define __ismask(x) (_ctype[(int)(unsigned char)(x)])
        
#define isalnum(c)      ((__ismask(c)&(_U|_L|_D)) != 0)
#define isalpha(c)      ((__ismask(c)&(_U|_L)) != 0)
#define iscntrl(c)      ((__ismask(c)&(_C)) != 0)
#define isdigit(c)      ((__ismask(c)&(_D)) != 0)
#define isgraph(c)      ((__ismask(c)&(_P|_U|_L|_D)) != 0)
#define islower(c)      ((__ismask(c)&(_L)) != 0)
#define isprint(c)      ((__ismask(c)&(_P|_U|_L|_D|_SP)) != 0)
#define ispunct(c)      ((__ismask(c)&(_P)) != 0)
#define isspace(c)      ((__ismask(c)&(_S)) != 0)
#define isupper(c)      ((__ismask(c)&(_U)) != 0)
#define isxdigit(c)     ((__ismask(c)&(_D|_X)) != 0)
        
#define isascii(c) (((unsigned char)(c))<=0x7f)
#define toascii(c) (((unsigned char)(c))&0x7f)
        
        static inline unsigned char __tolower(unsigned char c)
        {
                if (isupper(c))
                        c -= 'A'-'a';
                return c;
        }
        
        static inline unsigned char __toupper(unsigned char c)
        {
                if (islower(c))
                        c -= 'a'-'A';
                return c;
        }
        
#define tolower(c) __tolower(c)
#ifdef toupper
#undef toupper
#endif
#define toupper(c) __toupper(c)



/* #define SUPPORT_FAST_SWITCHING_OPTIMIZATION 1 */
/* #define FUNC_MONITOR_TIMER_ID TIMER_ID_FUNC_MONITOR */


/*
        DLIB Àº DMW Äڵ带 ÂüÁ¶ÇÏ¸é ¾ÈµÇ´Âµ¥, ¾ÆÁ÷ Æ÷ÆÃÀÌ ¿ÏÀüÇÏÁö ¾ÊÀº »óÅÂ¶ó¼­ 
        ÀϺΠÇÔ¼ö¸¦ Âü°íÇÏ°í ÀÖÀ½.

        todo: CodeConv ÀÚüµµ DLIB À¸·Î ¿Å±â´Â °ÍÀÌ ¹Ù¶÷Á÷ÇØ º¸ÀÓ.
*/
extern UINT16 *DMW_GetKs2UcTable(void);



#if COMMENT
____Types____(){}
#endif

/*
        ÀÌ ¸ðµâ ³»ºÎ¿¡¼­ »ç¿ëµÇ´Â structure ¹× enumerations.
*/



#if COMMENT
____Variables____(){}
#endif

/*
        global·Î Àû¿ëµÇ´Â variable Á¤ÀÇ.
        °¢ function º°·Î Ư¼öÇÑ ¿ëµµÀÇ variableÀº °¢ functionX block ¿¡¼­ Á¤ÀÇ °¡´É.
*/




#if COMMENT
____Group1____(){}
#endif

/*
// 000 - 000, alb, bre, cat, scr, 
// 005 - cym, ces, dan, deu, eng, 
// 010 - esl, epo, est, baq, fao, 
// 015 - fra, fry, gai, gae, 001, 
// 020 - ice, ita, 002, lat, lav, 
// 025 - 003, lit, hun, mlt, dut, 
// 030 - nor, 004, pol, por, ron, 
// 035 - 005, 006, slk, 007, fin, 
// 040 - sve, tur, 008, 009, und, 
// 045 - mis, mul, ina, xxx, xxx, 
// 050 - xxx, xxx, xxx, xxx, xxx, 
// 055 - xxx, xxx, xxx, xxx, xxx, 
// 060 - xxx, xxx, xxx, xxx, xxx, 
// 065 - int, art, fre, zho, zul, 
// 070 - vie, uzb, urd, ukr, tha, 
// 075 - tel, tat, tam, xxx, swa, 
// 080 - xxx, som, xxx, sna, scr, 
// 085 - xxx, rus, que, pus, pan, 
// 090 - fas, xxx, ori, nep, nde, 
// 095 - mar, mol, xxx, mlg, mac, 
// 100 - xxx, kor, khm, kaz, kan, 
// 105 - jpn, ind, hin, heb, hau, 
// 110 - grn, guj, ell, geo, xxx, 
// 115 - xxx, xxx, chi, bur, bul, 
// 120 - ben, xxx, bam, aze, asm, 
// 125 - arm, ara, amh,           <-- up to here, within spec.
//                      spa, nno, <-- from here, this is out of spec.
// 130 - nla, ger, gre, iri, isl, 
// 135 - wel, haw, inc, peo, ota, 
// 140 - swe, per, rum, sqi, abk, 
// 145 - ace, ach, ada, aar, afh, 
// 150 - afr, afa, aka, akk, ale, 
// 155 - alg, tut, apa, arc, arp, 
// 160 - arn, arw, hye, ath, map, 
// 165 - ava, ave, awa, aym, nah, 
// 170 - ban, bat, bal, bai, bad, 
// 175 - bnt, bas, bak, eus, bej, 
// 180 - bem, ber, bho, bih, bik, 
// 185 - bin, bis, bra, bug, bua, 
// 190 - mya, bel, cad, car, cau, 
// 195 - ceb, cel, cai, chg, cha, 
// 200 - che, chr, chy, cnb, chn, 
// 205 - cho, chu, chv, cop, cor, 
// 210 - cos, cre, mus, crp, cpe, 
// 215 - cpf, cpp, cus, cze, dak, 
// 220 - del, din, div, doi, dra, 
// 225 - dua, dum, dyu, dzo, efi, 
// 230 - egy, eka, elx, enm, ang, 
// 235 - esk, ewe, ewo, fan, fat, 
// 240 - fij, fiu, fon, frm, fro, 
// 245 - ful, gaa, gdh, glg, lug, 
// 250 - gay, gez, kat, gmh, goh, 
// 255 - gem, gil, gon, got, grc, 
// 260 - grb, kal, hai, her, hil, 
// 265 - him, hmo, hup, iba, ibo, 
// 270 - ijo, ilo, ine, iku, ipk, 
// 275 - ira, sga, mga, iro, jav, 
// 280 - jaw, jrb, jpr, kab, kac, 
// 285 - kam, kau, kaa, kar, kas, 
// 290 - kaw, kha, khi, kho, kik, 
// 295 - kin, kir, kom, kon, kok, 
// 300 - kpe, kro, kua, kum, kur, 
// 305 - kru, kus, kut, lad, lah, 
// 310 - lam, oci, lao, ltz, lez, 
// 315 - lin, loz, lub, lui, lun, 
// 320 - luo, mak, mad, mag, mai, 
// 325 - mak, may, msa, mal, man, 
// 330 - mni, mno, max, mao, mri, 
// 335 - chm, mah, mwr, mas, myn, 
// 340 - men, mic, min, moh, mkh, 
// 345 - lol, mon, mos, mun, nau, 
// 350 - nav, nbl, ndo, new, nic, 
// 355 - ssa, niu, non, nai, nub, 
// 360 - nym, nya, nyn, nyo, nzi, 
// 365 - oji, orm, osa, oss, oto, 
// 370 - pal, pau, pli, pam, pag, 
// 375 - pap, paa, phn, pon, pra, 
// 380 - pro, roh, raj, rar, roa, 
// 385 - rom, run, sal, sam, smi, 
// 390 - smo, sad, sag, san, srd, 
// 395 - sco, sel, sem, srr, shn, 
// 400 - sid, bla, snd, sin, sit, 
// 405 - sio, sla, ssw, slo, slv, 
// 410 - sog, son, wen, nso, sot, 
// 415 - sai, suk, sux, sun, sus, 
// 420 - ssw, syr, tgl, tah, tgk, 
// 425 - tmh, ter, bod, tib, tig, 
// 430 - tir, tem, tiv, tli, tog, 
// 435 - ton, tru, tsi, tso, tsn, 
// 440 - tum, tuk, tyv, twi, uga, 
// 445 - uig, umb, vai, ven, vol, 
// 450 - vot, wak, wal, war, was, 
// 455 - wol, xho, sah, yao, yap, 
// 460 - yid, yor, zap, zen, zha, 
// 465 - zun, SPA
*/



static UINT32 ac3lang_to_iso639[] = {

/* 000 */
0x000000, 0x616c62, 0x627265, 0x636174, 0x736372, 
/* 005 */
0x63796d, 0x636573, 0x64616e, 0x646575, 0x656e67, 
/* 010 */
0x65736c, 0x65706f, 0x657374, 0x626171, 0x66616f, 
/* 015 */
0x667261, 0x667279, 0x676169, 0x676165, 0x000001, 
/* 020 */
0x696365, 0x697461, 0x000002, 0x6c6174, 0x6c6176, 
/* 025 */
0x000003, 0x6c6974, 0x68756e, 0x6d6c74, 0x647574, 
/* 030 */
0x6e6f72, 0x000004, 0x706f6c, 0x706f72, 0x726f6e, 
/* 035 */
0x000005, 0x000006, 0x736c6b, 0x000007, 0x66696e, 
/* 040 */
0x737665, 0x747572, 0x000008, 0x000009, 0x756e64, 
/* 045 */
0x6d6973, 0x6d756c, 0x696e61, 0x787878, 0x787878, 
/* 050 */
0x787878, 0x787878, 0x787878, 0x787878, 0x787878, 
/* 055 */
0x787878, 0x787878, 0x787878, 0x787878, 0x787878, 
/* 060 */
0x787878, 0x787878, 0x787878, 0x787878, 0x787878, 
/* 065 */
0x696e74, 0x617274, 0x667265, 0x7a686f, 0x7a756c, 
/* 070 */
0x766965, 0x757a62, 0x757264, 0x756b72, 0x746861, 
/* 075 */
0x74656c, 0x746174, 0x74616d, 0x787878, 0x737761, 
/* 080 */
0x787878, 0x736f6d, 0x787878, 0x736e61, 0x736372, 
/* 085 */
0x787878, 0x727573, 0x717565, 0x707573, 0x70616e, 
/* 090 */
0x666173, 0x787878, 0x6f7269, 0x6e6570, 0x6e6465, 
/* 095 */
0x6d6172, 0x6d6f6c, 0x787878, 0x6d6c67, 0x6d6163, 
/* 100 */
0x787878, 0x6b6f72, 0x6b686d, 0x6b617a, 0x6b616e, 
/* 105 */
0x6a706e, 0x696e64, 0x68696e, 0x686562, 0x686175, 
/* 110 */
0x67726e, 0x67756a, 0x656c6c, 0x67656f, 0x787878, 
/* 115 */
0x787878, 0x787878, 0x636869, 0x627572, 0x62756c, 
/* 120 */
0x62656e, 0x787878, 0x62616d, 0x617a65, 0x61736d, 
/* 125 */
0x61726d, 0x617261, 0x616d68, 0x737061, 0x6e6e6f, 
/* 130 */
0x6e6c61, 0x676572, 0x677265, 0x697269, 0x69736c, 
/* 135 */
0x77656c, 0x686177, 0x696e63, 0x70656f, 0x6f7461, 
/* 140 */
0x737765, 0x706572, 0x72756d, 0x737169, 0x61626b, 
/* 145 */
0x616365, 0x616368, 0x616461, 0x616172, 0x616668, 
/* 150 */
0x616672, 0x616661, 0x616b61, 0x616b6b, 0x616c65, 
/* 155 */
0x616c67, 0x747574, 0x617061, 0x617263, 0x617270, 
/* 160 */
0x61726e, 0x617277, 0x687965, 0x617468, 0x6d6170, 
/* 165 */
0x617661, 0x617665, 0x617761, 0x61796d, 0x6e6168, 
/* 170 */
0x62616e, 0x626174, 0x62616c, 0x626169, 0x626164, 
/* 175 */
0x626e74, 0x626173, 0x62616b, 0x657573, 0x62656a, 
/* 180 */
0x62656d, 0x626572, 0x62686f, 0x626968, 0x62696b, 
/* 185 */
0x62696e, 0x626973, 0x627261, 0x627567, 0x627561, 
/* 190 */
0x6d7961, 0x62656c, 0x636164, 0x636172, 0x636175, 
/* 195 */
0x636562, 0x63656c, 0x636169, 0x636867, 0x636861, 
/* 200 */
0x636865, 0x636872, 0x636879, 0x636e62, 0x63686e, 
/* 205 */
0x63686f, 0x636875, 0x636876, 0x636f70, 0x636f72, 
/* 210 */
0x636f73, 0x637265, 0x6d7573, 0x637270, 0x637065, 
/* 215 */
0x637066, 0x637070, 0x637573, 0x637a65, 0x64616b, 
/* 220 */
0x64656c, 0x64696e, 0x646976, 0x646f69, 0x647261, 
/* 225 */
0x647561, 0x64756d, 0x647975, 0x647a6f, 0x656669, 
/* 230 */
0x656779, 0x656b61, 0x656c78, 0x656e6d, 0x616e67, 
/* 235 */
0x65736b, 0x657765, 0x65776f, 0x66616e, 0x666174, 
/* 240 */
0x66696a, 0x666975, 0x666f6e, 0x66726d, 0x66726f, 
/* 245 */
0x66756c, 0x676161, 0x676468, 0x676c67, 0x6c7567, 
/* 250 */
0x676179, 0x67657a, 0x6b6174, 0x676d68, 0x676f68, 
/* 255 */
0x67656d, 0x67696c, 0x676f6e, 0x676f74, 0x677263, 
/* 260 */
0x677262, 0x6b616c, 0x686169, 0x686572, 0x68696c, 
/* 265 */
0x68696d, 0x686d6f, 0x687570, 0x696261, 0x69626f, 
/* 270 */
0x696a6f, 0x696c6f, 0x696e65, 0x696b75, 0x69706b, 
/* 275 */
0x697261, 0x736761, 0x6d6761, 0x69726f, 0x6a6176, 
/* 280 */
0x6a6177, 0x6a7262, 0x6a7072, 0x6b6162, 0x6b6163, 
/* 285 */
0x6b616d, 0x6b6175, 0x6b6161, 0x6b6172, 0x6b6173, 
/* 290 */
0x6b6177, 0x6b6861, 0x6b6869, 0x6b686f, 0x6b696b, 
/* 295 */
0x6b696e, 0x6b6972, 0x6b6f6d, 0x6b6f6e, 0x6b6f6b, 
/* 300 */
0x6b7065, 0x6b726f, 0x6b7561, 0x6b756d, 0x6b7572, 
/* 305 */
0x6b7275, 0x6b7573, 0x6b7574, 0x6c6164, 0x6c6168, 
/* 310 */
0x6c616d, 0x6f6369, 0x6c616f, 0x6c747a, 0x6c657a, 
/* 315 */
0x6c696e, 0x6c6f7a, 0x6c7562, 0x6c7569, 0x6c756e, 
/* 320 */
0x6c756f, 0x6d616b, 0x6d6164, 0x6d6167, 0x6d6169, 
/* 325 */
0x6d616b, 0x6d6179, 0x6d7361, 0x6d616c, 0x6d616e, 
/* 330 */
0x6d6e69, 0x6d6e6f, 0x6d6178, 0x6d616f, 0x6d7269, 
/* 335 */
0x63686d, 0x6d6168, 0x6d7772, 0x6d6173, 0x6d796e, 
/* 340 */
0x6d656e, 0x6d6963, 0x6d696e, 0x6d6f68, 0x6d6b68, 
/* 345 */
0x6c6f6c, 0x6d6f6e, 0x6d6f73, 0x6d756e, 0x6e6175, 
/* 350 */
0x6e6176, 0x6e626c, 0x6e646f, 0x6e6577, 0x6e6963, 
/* 355 */
0x737361, 0x6e6975, 0x6e6f6e, 0x6e6169, 0x6e7562, 
/* 360 */
0x6e796d, 0x6e7961, 0x6e796e, 0x6e796f, 0x6e7a69, 
/* 365 */
0x6f6a69, 0x6f726d, 0x6f7361, 0x6f7373, 0x6f746f, 
/* 370 */
0x70616c, 0x706175, 0x706c69, 0x70616d, 0x706167, 
/* 375 */
0x706170, 0x706161, 0x70686e, 0x706f6e, 0x707261, 
/* 380 */
0x70726f, 0x726f68, 0x72616a, 0x726172, 0x726f61, 
/* 385 */
0x726f6d, 0x72756e, 0x73616c, 0x73616d, 0x736d69, 
/* 390 */
0x736d6f, 0x736164, 0x736167, 0x73616e, 0x737264, 
/* 395 */
0x73636f, 0x73656c, 0x73656d, 0x737272, 0x73686e, 
/* 400 */
0x736964, 0x626c61, 0x736e64, 0x73696e, 0x736974, 
/* 405 */
0x73696f, 0x736c61, 0x737377, 0x736c6f, 0x736c76, 
/* 410 */
0x736f67, 0x736f6e, 0x77656e, 0x6e736f, 0x736f74, 
/* 415 */
0x736169, 0x73756b, 0x737578, 0x73756e, 0x737573, 
/* 420 */
0x737377, 0x737972, 0x74676c, 0x746168, 0x74676b, 
/* 425 */
0x746d68, 0x746572, 0x626f64, 0x746962, 0x746967, 
/* 430 */
0x746972, 0x74656d, 0x746976, 0x746c69, 0x746f67, 
/* 435 */
0x746f6e, 0x747275, 0x747369, 0x74736f, 0x74736e, 
/* 440 */
0x74756d, 0x74756b, 0x747976, 0x747769, 0x756761, 
/* 445 */
0x756967, 0x756d62, 0x766169, 0x76656e, 0x766f6c, 
/* 450 */
0x766f74, 0x77616b, 0x77616c, 0x776172, 0x776173, 
/* 455 */
0x776f6c, 0x78686f, 0x736168, 0x79616f, 0x796170, 
/* 460 */
0x796964, 0x796f72, 0x7a6170, 0x7a656e, 0x7a6861, 
/* 465 */
0x7a756e

};



#if COMMENT
____Group1____(){}
#endif


#define StreamTypeToAudioType(t) ( \
        (t) == StreamType_AC3Audio ? eDHL_AUDIO_TYPE_AC3: \
        (t) == StreamType_MPEG2Audio ? eDHL_AUDIO_TYPE_MPEG_2 : eDHL_AUDIO_TYPE_UNKNOWN )


/* cafrii 050816 add
         cafrii 061214 add comment
           0x00, 0x2C~0x44 ´Â AC3 spec (A/52, 1995)¿¡¼­ reserved Á¤ÀǵǾî ÀÖ°í,
           0x80~ ÀÌ»óÀÇ °ªÀº »ç¿ëµÇÁö ¾Ê´Â´Ù.
           0x80~Àº ac3lang_to_iso639 table¿¡´Â Á¤ÀÇÇØ ³õ¾ÒÁö¸¸ ÀÓÀÇ ¹èÄ¡¿¡ Áö³ªÁö ¾ÊÀ½.
*/
static BOOL IsValidAc3LangCode(int code)
{
        if ((code == 0x00) ||
                (code >= 0x2c && code <= 0x44) ||
                (code >= 0x80))
                return FALSE;           /* invalid.. */
        
        return TRUE;
}



#if COMMENT
____API____(){}
#endif


/*
         descriptor list ¿¡¼­ language °ü·Ã Á¤º¸¸¦ ÃßÃâÇÏ¿© ¸®ÅÏÇÑ´Ù.
         
         audio play¸¦ ½ÃÀÛÇÒ ¶§ audio language ¼±ÅÃÀ» ÇÒ ¶§ »ç¿ëµÈ´Ù.
         
          Rule
            - µÎ°³ÀÇ descriptor¸¦ ÂüÁ¶ÇÑ´Ù. ISO 639, AC3 Audio
            - µÎ descriptor Áß¿¡ ¿ì¼± ¼øÀ§´Â ¾ø´Ù. ¸ÕÀú ¹ß°ßµÇ´Â °ÍºÎÅÍ instance ¹øÈ£ ÇÒ´ç.
            - 639 language code 0Àº ¾ø´Â °ÍÀ¸·Î °£ÁֵȴÙ.
            - AC3 langcode 0µµ ¾ø´Â °ÍÀ¸·Î °£ÁֵȴÙ.
*/    
DHL_RESULT DLIB_PSI_GetLanguageCodeFromDescriptors(UINT8 *pDescriptors, int nDescLen, 
                                int instance, UINT32 *pLangCode, int *pServiceType)
{
        /* cafrii 061213 add
                
                 A/53 ±Ô°ÝÀÌ º¯°æµÇ¾î¼­ ÂüÁ¶ÇØ¾ß ÇÏ´Â descriptor¿¡ º¯°æÀÌ ÀÖ´Ù.

                 ´õÀÌ»ó 'instance'´Â Áö¿øÇÏÁö ¾Ê´Â´Ù. 
                 ¿ì¼± ¼øÀ§ °³³äÀÌ µé¾î°¡±â ¶§¹®¿¡ ¼ø¼­°¡ Àǹ̰¡ ¾ø´Ù.
        */
        UINT32 lang_code = 0;
        DHL_RESULT err;
        ac3AudioStreamDescriptor_t *ac3_desc = NULL;
        UINT32 iso639_code;
        UINT8 *ptr;

        /* find AC3 descriptor */
        err = GetMpegDescriptor(pDescriptors, nDescLen, 
                                        AC3_audio_stream_tag, 0, &ptr); /* get only first instance */
        if (err == DHL_OK) {
                err = ParseAc3AudioStreamDescriptor(ptr, &ac3_desc);
                if (err)
                        ac3_desc = NULL;
        }

        /* find ISO 639 descriptor */
        err = GetMpegDescriptor(pDescriptors, nDescLen, 
                                        ISO_639_language_tag, 0, &ptr); /* first instance */
        if (err != DHL_OK ||
                ptr[0] != ISO_639_language_tag ||
                ptr[1] < 4)             /* ISO 639 descriptor length is 4. */
                iso639_code = 0;
        else {
                /* updated by Chan Hun Jeon 2007.05.29 */
                /* lang_code ´ë¹®ÀÚ¸¦ ¼Ò¹®ÀڷΠġȯ */
                iso639_code = tolower(ptr[2])<<16UL | tolower(ptr[3])<<8UL | tolower(ptr[4]);
        }       

        /* decide langugae code */
        if (ac3_desc && ac3_desc->langflag && ac3_desc->language)
        {
                /* this is new stream. */
                lang_code = ac3_desc->language;
        }
        else if (ac3_desc && ac3_desc->langflag_2 && ac3_desc->language2)
        {
                /* this is new stream. */
                lang_code = ac3_desc->language2;
        }
        else if (iso639_code)
        {
                lang_code = iso639_code;
        }
        else if (ac3_desc)
        {
                if (IsValidAc3LangCode(ac3_desc->langcod)) {
                        lang_code = ac3lang_to_iso639[ac3_desc->langcod];
                }
                else if (IsValidAc3LangCode(ac3_desc->langcod2)) {
                        lang_code = ac3lang_to_iso639[ac3_desc->langcod2];                              
                }
        }

        /* Updated by Chan Hun Jeon 2007.05.29 */
        /* ´ë¹®ÀÚ´Â ¼Ò¹®ÀڷΠġȯ  */
        lang_code = (tolower( (lang_code>>16UL)&0xff ) << 16UL) | ((tolower( (lang_code>>8UL)&0xff) ) << 8UL) | tolower(lang_code&0xff);        

        if (ac3_desc) {
                FreeMpegDescriptor(ac3_desc);
                ac3_desc = NULL;
        }

        if (pLangCode) *pLangCode = lang_code;
        
        if (lang_code == 0)
                return DHL_FAIL_NOT_FOUND;

        return DHL_OK;

}



#if COMMENT
____API2____(){}
#endif

/*
        ±âÁ¸ ÇÔ¼ö À̸§: DMW_Decode_MultipleStringStructure
*/
UINT16 DLIB_PSI_DecodeMultipleStringStructure(
        UINT8   text_length,                    /* MSSÀÇ ±æÀÌ */
        UINT8   *text_p,                                        /* MSSÀÇ text pointer */
        char    *lang,                                          /* ISO 639.2B language code (3 bytes) */
        UINT16  max_dec_length, /* decoding textÀÇ ÃÖ´ë ±æÀÌ */
        UINT16  *decoded_text)  /* decoding °á°ú text (unicode·Î ÀúÀåµÊ)  */
{

        UINT16  *cktouk;        /* cafrii 060616, use API instead of direct importing. */
        UINT8   *text;
        UINT8   number_strings;
        UINT8   number_segments;
        UINT8   compression_type;
        UINT8   mode;
        UINT8   number_bytes, number_chars;
        int             found_match_lang;
        char    iso_lang_code[3];
        int             i, j, k;
        UINT16  tmp_decoded_length;
        UINT16  *tmp_decoded_text;
        UINT16  ucode;
        int             left_text_room;
        UINT16  decoded_length = 0;
        BOOL    fStringDecodeDone;
        UINT8   *string = DHL_OS_Malloc( sizeof(UINT8) * 4096 );

        if( string == NULL )
                return 0;
        memset(string, 0, sizeof(UINT8) * 4096); 

        if ((cktouk = DMW_GetKs2UcTable()) == NULL)     /* cafrii 060616 add */
                return 0;

        text = text_p;  /* ¾ÕÀ¸·Î ÀÌ pointer¸¦ »ç¿ëÇÒ °ÍÀÓ. */
        number_strings = (UINT8)*text++;

        for(i=0; i<number_strings; i++)
        {
                tmp_decoded_text = decoded_text;
                iso_lang_code[0] = *text++;
                iso_lang_code[1] = *text++;
                iso_lang_code[2] = *text++;

#ifdef _EPG_DEBUG_
                epgPrintf("iso_lang_code : %c%c%c\n" , iso_lang_code[0] , iso_lang_code[1] , iso_lang_code[2]);
#endif

                /* ¿øÇÏ´Â languageÀÇ character¸¦ decode. */
                found_match_lang=strncmp(lang, iso_lang_code, 3);


                number_segments = *text++;
                tmp_decoded_length = 0; /* °¢ segment¸¶´Ù decoded_length¸¦ ±¸ÇÑ´Ù. */
                fStringDecodeDone = 0;  /* ¾ð¾îº° string decodingÀÌ ¿Ï·áµÇ¾ú´Â Áö °Ë»çÇÏ´Â flag. */

                for(j=0;j<number_segments;j++)
                {
                        compression_type = *text++;
                        mode = *text++;                                         /* mode<0x3f:8-bit unicode, 0x3f:16-bit unicode */
                        number_bytes = *text++;
                        if(fStringDecodeDone==1)        /* ¾ð¾îº° string decodingÀÌ ¿Ï·áµÇ¾úÀ½. */
                        {
                                text += number_bytes;
                        }
                        else
                        {
#ifdef _EPG_UPDATE_DEBUG_
                                epgPrintf("compression_type = 0x%x\n" , compression_type);
#endif
                                if(compression_type==0x00)
                                {
                                        if(mode==0)     /* select ISO/IEC 10646-1 Page 0x00 : ASCII, ISO Latin-1 (Roman) */
                                        {
                                                number_chars = number_bytes;
                                                tmp_decoded_length += number_chars;
                                                if(tmp_decoded_length > max_dec_length) /* ¹öÆÛÅ©±âº¸´Ù ¸¹Àº ¾çÀÌ decodingµÇ¾ú³ª? */
                                                {
                                                        left_text_room = max_dec_length + number_chars - tmp_decoded_length;
                                                        for(k=0; k<left_text_room; k++)
                                                                *tmp_decoded_text++ = (UINT16)(*(text+k));
                                                        tmp_decoded_length = max_dec_length;    /* ´õÀÌ»ó decodingÇÒ ÇÊ¿ä°¡ ¾ø´Ù. */
                                                        //neverdai. 100818 ¹ö±×Àεí. decoded_length°¡ ¾÷µ¥ÀÌÆ®µÇÁö ¾Ê¾Æ 0ÀÌ ¸®ÅϵÊ
                                                        decoded_length=max_dec_length;
                                                        fStringDecodeDone = 1;
                                                        break;                                                          /* segment level decoding stop. */
                                                }
                                                else    /* copyÇÒ ÃæºÐÇÑ °ø°£ÀÌ ³²¾ÆÀÖ´Ù. */
                                                {
                                                        for(k=0; k<number_chars; k++)
                                                                *tmp_decoded_text++ = (UINT16)(*(text+k));
                                                }
                                                text += number_bytes;   /* 8bit pointer Áõ°¡ */
                                        }
                                        else if(mode<0x3f)                      /* select ISO/IEC 10646-1 Page 0x0 */
                                        {
#ifdef _EPG_DEBUG_
                                                epgPrintf("Unsupported language code, skip\n");
#endif
                                                text += number_bytes;   /* 8bit pointer Áõ°¡ */
                                        }
                                        else if(mode==0x3f)                     /* select ISO/IEC 10646-1 mode (all) - KOREAN mode only */
                                        {
                                                number_chars = number_bytes/2;

                                                tmp_decoded_length += number_chars;
                                                if(tmp_decoded_length > max_dec_length) /* ¹öÆÛÅ©±âº¸´Ù ¸¹Àº ¾çÀÌ decodingµÇ¾ú³ª? */
                                                {
                                                        left_text_room = max_dec_length + number_chars - tmp_decoded_length;
#if 1   /* neverdai 080902 endian ¹®Á¦·Î 2byte ±Û²ÃÀÌ ÂïÈ÷Áö ¾Ê´Â ¹®Á¦ ÀÖÀ½ */
                                                        for(k=0; k<left_text_room; k++)
                                                                *tmp_decoded_text++ = (text[k*2]<<8) | text[k*2+1];
#else
                                                        memcpy((char *)tmp_decoded_text, text, left_text_room*2);
#endif
                                                        tmp_decoded_length = max_dec_length;    /* ´õÀÌ»ó decodingÇÒ ÇÊ¿ä°¡ ¾ø´Ù. */
                                                        //neverdai. 100818 ¹ö±×Àεí. decoded_length°¡ ¾÷µ¥ÀÌÆ®µÇÁö ¾Ê¾Æ 0ÀÌ ¸®ÅϵÊ
                                                        decoded_length=max_dec_length;
                                                        fStringDecodeDone = 1;
                                                        break;                                                          /* segment level decoding stop. */
                                                }
                                                else    /* copyÇÒ ÃæºÐÇÑ °ø°£ÀÌ ³²¾ÆÀÖ´Ù. */
                                                {
#if 1   /* neverdai 080902 endian ¹®Á¦·Î 2byte ±Û²ÃÀÌ ÂïÈ÷Áö ¾Ê´Â ¹®Á¦ ÀÖÀ½ */
                                                        for(k=0; k<number_chars; k++)
                                                                *tmp_decoded_text++ = (text[k*2]<<8) | text[k*2+1];;
#else
                                                        memcpy((char *)tmp_decoded_text, text, number_bytes);
                                                        tmp_decoded_text += number_chars;
#endif

                                                        tmp_decoded_text += number_chars;
                                                }
                                                text += number_bytes;   /* 8bit pointer Áõ°¡ */
                                        }
                                        else if(mode==0x48)                     /* ¿Ï¼ºÇü ÇѱÛ. */
                                        {
                                                for(k=0; k<number_bytes; k++)
                                                {
                                                        ucode = *text++;
                                                        if(ucode >= 0xb0)               /* ¿Ï¼ºÇü ÇѱÛÀÓ. */
                                                        {
                                                                ucode = (ucode << 8) | (*text);
                                                                text++;
                                                                k++;
                                                        }
                                                        /* ¿Ï¼ºÇüÀ» unicode Çѱ۷Π¹Ù²Û´Ù. */
                                                        if((ucode>=45217)&&(ucode<=51454))
                                                        {
                                                                ucode -= 45217;
                                                                ucode = (ucode/256)*94 + (ucode%256);
                                                                ucode = cktouk[ucode];
                                                        }
                                                        tmp_decoded_length++;
                                                        *tmp_decoded_text++ = ucode;
                                                        if(tmp_decoded_length > max_dec_length) /* ¹öÆÛÅ©±âº¸´Ù ¸¹Àº ¾çÀÌ decodingµÇ¾ú³ª? */
                                                        {
                                                                text += (number_bytes-k);       /* ´ÙÀ½ string±îÁö pointer Áõ°¡ */
                                                                fStringDecodeDone = 1;          /* ÇØ´ç¾ð¾î string decode done!! */
                                                                break;                                                                          /* segment level decoding stop. */
                                                        }
                                                }
                                        }
                                        else
                                        {
#ifdef _EPG_DEBUG_
                                                epgPrintf("Reserved, User private, or Not applicable mode, skip\n");
#endif
                                                text += number_bytes;
                                        }
                                }
                                else if(compression_type==0x01)         /* ASCII range(1-127)¿¡¸¸ Àû¿ëµÊ. */
                                {
                                        DecodeHuffmanString (text, number_bytes, cm_Huffman_C4C5,
                                                (char *)string, max_dec_length);
                                        for(k=0; string[k]!='\0'; k++)
                                        {
                                                *tmp_decoded_text++ = (UINT16)string[k];        /* 8-bit ascii¸¦ unicode·Î ¹Ù²Þ */
                                                tmp_decoded_length++;
                                                if(tmp_decoded_length == max_dec_length)        /* ¹öÆÛ¿¡ ³²Àº °ø°£ÀÌ ¾ø´Â°¡? */
                                                {
                                                        fStringDecodeDone = 1;
                                                        break;                                                          /* segment level decoding stop. */
                                                }
                                        }
                                        text += number_bytes;                   /* 8bit pointer Áõ°¡ */
                                }
                                else if(compression_type==0x02) /* ASCII range(1-127)¿¡¸¸ Àû¿ëµÊ. */
                                {
                                        DecodeHuffmanString (text, number_bytes, cm_Huffman_C6C7,
                                                (char *)string, max_dec_length);
                                        for(k=0; string[k]!='\0'; k++)
                                        {
                                                *tmp_decoded_text++ = (UINT16)string[k];        /* 8-bit ascii¸¦ unicode·Î ¹Ù²Þ */
                                                tmp_decoded_length++;
                                                if(tmp_decoded_length == max_dec_length)        /* ¹öÆÛ¿¡ ³²Àº °ø°£ÀÌ ¾ø´Â°¡? */
                                                {
                                                        fStringDecodeDone = 1;
                                                        break;                                                          /* segment level decoding stop. */
                                                }
                                        }
                                        text += number_bytes;                   /* 8bit pointer Áõ°¡ */
                                }
                                else
                                {
#ifdef _EPG_DEBUG_
                                        epgPrintf("unexpected compression_type error(lang:0x%02x%02x%02x, comp_type:0x%02x)\n",
                                        iso_lang_code[0], iso_lang_code[1], iso_lang_code[2], compression_type);
#endif
                                        text += number_bytes;                   /* 8bit pointer Áõ°¡ */
                                        continue;
                                }
                        }       /* end fStringDecodeDone==0 */
                                /* end for(j=0;j<number_segments;j++) */
                }
                decoded_length = tmp_decoded_length;
                if(found_match_lang==0)                                 /* ´õÀÌ»ó parsingÇÒ ÇÊ¿ä°¡ ¾ø´Ù. */
                        break;
        }

        if(string)
                DHL_OS_Free((void**)&string);

        return decoded_length;                                          /* decoding °á°ú textÀÇ ±æÀÌ */
}



#if COMMENT
____Debug____(){}
#endif


void DLIB_PSI_MemDump(void *ptr, UINT32 size, UINT32 width, UINT8 indent)
{
        UINT32 addr = (UINT32)ptr;
        UINT32 offset, k;
        UINT8 *buf, buf0[16+4]; // include safe-guard.
        UINT32 data;
        char ib[33]; // indent buffer

        buf = (UINT8 *)(((UINT32)buf0 + 3) & ~3); // make 4 byte alignment.

        if (width != 2 && width != 4) width = 1;

        if (addr & (width-1)) {
                DHL_OS_Printf("!! addr %x not aligned to %d\n", addr, width);
                return;
        }
        memset(ib, 0, sizeof(ib));
        ib[min(indent, 32)] = 0;
        
        for (offset=0; offset<size; offset+=16) 
        {
                int len = min(16, size-offset); // dump size of this line. 1~16

                memset(buf, 0, 16);
                
                // hex dump 
                //dprint("%08x: ", addr+offset);
                DHL_OS_Printf("%s", ib);
                
                for (k=0; k<len; k+=width) {
                        if (width == 1) {
                                *(UINT8 *)(&buf[k]) = data = *(UINT8 *)(addr+offset+k);
                                DHL_OS_Printf("%02x ", data);
                        }
                        else if (width == 2) {
                                *(UINT16 *)(&buf[k]) = data = *(UINT16 *)(addr+offset+k);
                                DHL_OS_Printf("%04x ", data);
                        }
                        else if (width == 4) {
                                *(UINT32 *)(&buf[k]) = data = *(UINT32 *)(addr+offset+k);
                                DHL_OS_Printf("%08x ", data);
                        }
                }

                for (; k<16; k+=width) {
                        if (width == 1)
                                DHL_OS_Printf("__ ");
                        else if (width == 2)
                                DHL_OS_Printf("____ ");
                        else if (width == 4)
                                DHL_OS_Printf("________ ");
                }
                DHL_OS_Printf("  ");

                // ascii dump
                for (k=0; k<16; k++) {
                        DHL_OS_Printf("%c", buf[k]>=0x20 && buf[k]<0x7f ? buf[k] : '.');
                }
                DHL_OS_Printf("\n");

        }
        DHL_OS_Printf("\n");
        
}




#if COMMENT
____Debug____(){}
#endif




#if COMMENT
____Symbol____(){}
#endif


#if 0 //DHL_REGISTER_DEUBG_SYMBOLS

static DHL_SymbolTable _XxxxSymbols[] =
{
        /* however, if you want typing short-cut, it is good usage.
        DHL_FNC_SYM_ENTRY2("epg_start", App_EpgUpdateStart),
        DHL_FNC_SYM_ENTRY2("epg_stop", App_EpgUpdateCancel),
        DHL_FNC_SYM_ENTRY2("epg_list", Dmc_EpgPrintAllTables),
        DHL_FNC_SYM_ENTRY2("epg_delete", App_EpgDeleteAll),

        DHL_VAR_SYM_ENTRY(g_XX_TestMode),
        */
        0,
};

#endif  /* DHL_REGISTER_DEUBG_SYMBOLS */



#if COMMENT
____Init____(){}
#endif



/* end of file */