首頁>>廠商>>CT中間件廠商>>朗深技術

UniMedia 6S級電話語音中間件典型應用-電話QQ [附源碼]

2009/05/11

1.應用場景
  電信增值應用。客戶打電話進入系統,按鍵選擇聊天室,或者自動查找匹配的用戶,進行一對一的聊天。

2.源碼片段

  假定呼入電話,聽到提示音,按鍵為1的為等待聊天用戶,電話呼入按鍵為2的為主動尋找等待聊天的用戶

//全局變量定義

SCPMANAGER g_SCPManager
CALL g_TheCall
int g_iTaskID

sub main(LIST& cpl)
{
int iCallID, iRet

//注冊系統錯誤處理函數
EventMap(INF_SYS_ERROR, OnSysError, 0)
//注冊掛機通知處理函數
EventMap(INF_CTI_ONHOOK, OnCallEndInform, 0)
//注冊被路由通知處理函數
EventMap(INF_CTI_ROUTED, OnRoutedInform, 0)
//注冊取消路由通知處理函數
EventMap(INF_CTI_UNROUTED, OnUnroutedInform, 0)
//注冊異步結束通知處理函數
EventMap(INF_SYS_ASYNCFINISHED, OnAsyncFinishedInform, 0)

//在BOOT進程啟動該進程時,參數是按照CALLID、ANO、BNO,UUD順序先后存放在參數列表cpl中
//根據業(yè)務需要取出參數值

//獲得命令行參數的callid
cpl.GetItem(0, iCallID, iRet)
Log(DBG, "Call Income: CallID=", iCallID)

//根據對象ID獲得當前Call對象
g_SCPManager.FindCallByID(iCallID, g_TheCall, iRet)
//設置Call對象的業(yè)務處理進程ID為當前進程
g_TheCall.AttachCurrentProcess(iRet)
//應答CALL
g_TheCall.Answer(iRet)


//來話聊天業(yè)務處理過程:
//來話應答成功后,首先進行放音收碼,在分析用戶的按鍵
// 如果用戶按鍵為"1",則假定用戶為等候交談的客戶,設置業(yè)務參數名值對為("Number"、"Waiting"),用戶聽音樂等待其它用戶的交談申請
// 如果用戶按鍵為"2",則假定用戶為主動尋找交談的客戶,則從業(yè)務參數名值對為("Number"、"Waiting")的等待用戶中查找一個進行交談,并把等待呼叫的名值對該為("Number"、"Connecting")
// 如果用戶按鍵為其它,則在循環(huán)播放收碼
while(true)
{
//同步循環(huán)放音收碼
string sDigits,sTermChar
g_TheCall.PlayReceiveDTMF(true, "welcome.vox", 1, "*", sTermChar, sDigits, -1, iRet)

switch(sDigits)
{
case("1")
//等待被連接
Log(DBG, "Playing wait music to Income Call(", iCallID, ").")
g_TheCall.Play(true, true, "musichold.vox", g_iTaskID, iRet)
//設置呼叫對象的業(yè)務名值對
g_TheCall.SetParam("Number", sDigits, iRet)
//注冊被連接事件函數
EventMap(INF_CTI_ROUTED, OnRoutedInform, 1)

//無限等待(直到用戶主動掛機)
Wait(-1)
break

case("2")
//設置呼叫對象為查找用戶的標志
g_TheCall.SetParam("Number", sDigits, iRet)
//查找空閑等候用戶,主動進行連接
Log(DBG, "Matching user(", iCallID, ")...")

//查找交談對象并進行連接操作,實現通話交流
MatchWaitingUser(g_TheCall)

//無限等待(直到用戶主動掛機)
Wait(-1)
break

default
Log(DBG, "用戶按鍵其它碼,需重新收碼,Digits=", sDigits)
break
}//end of Switch
}// end of While

Log(DBG, "Finished. Bye.")
}

//查找函數的業(yè)務處理過程:
//首先給主動查找用戶播放等待提示語音
//然后根據呼叫對象的名值對從全局呼叫對象實例管理器中查找等待呼叫
//如果成功找到,則停止當前呼叫的提示語音,主動進行連接通話操作
//如果沒有找到,則等待1秒鐘在循環(huán)查找
sub MatchWaitingUser(CALL& call)
{
int iRet,iTaskID

//異步循環(huán)放音
call.Play(true, true, "waiting.vox", iTaskID, iRet)


while(true)
{
CALL callWait
//根據名值對查找等待呼叫對象
g_SCPManager.FindCallByParam("Number", "1", callWait, iRet)
if (iRet == RET_SUCC)
{
//重新設置等待連接呼叫的名值對
callWait.SetParam("Number","Connecting",iRet)

//找到等待用戶,停止當前呼叫的語音提示
call.StopOP(iTaskID, iRet)

//主動連接兩個CALL
call.ConnectCall(callWait, iRet)
break
}
else
{
//沒有找到,1000毫秒后繼續(xù)尋找
Wait(1000)
}
}//end of while
}

//Chat工程中所有事件處理函數實現

//錯誤處理函數
sub OnSysError(int tag)
{
Log(ERR, "System error: ", __LASTERRSTR__)
}

//掛機通知處理函數
sub OnCallEndInform(int tag, CALL& call)
{
Log(INF, "OnHooked. CallID=", call.CallID)
Log(INF, "Exit...")
Exit("掛機退出")
}

//被路由通知處理函數
sub OnRoutedInform(int tag, CALL& call1, CALL& call2)
{
Log(INF, "Routed. CallID1=", call1.CallID, " CallID2=", call2.CallID)

int iRet
string paraValue
//在連接前已經把等待呼叫的名值對的值由1改為Connecting
call1.GetParam("Number", paraValue, iRet)
if (paraValue == "Connecting")
{
//call1如果是被連接的等待用戶,需要停止它已經在播放的等候音樂
call1.StopOP(g_iTaskID, iRet)
}
}

//取消路由通知處理函數
sub OnUnroutedInform(int tag, CALL& call1, CALL& call2)
{
Log(INF, "Unrouted. CallID1=", call1.CallID, " CallID2=", call2.CallID)
}

//異步結束通知處理函數
sub OnAsyncFinishedInform(int tag, CALL& call, int optype, int taskid, int ret)
{
if (ret == RET_SUCC)
{
Log(INF, "異步結束OK. CallID=", call.CallID, " optype=", optype, " taskid=", taskid)
}
else
{
Log(INF, "異步結束FAIL. CallID=", call.CallID, " optype=", optype, " taskid=", taskid)
}
}

CTI論壇報道


相關鏈接:
UniMedia 6S級電話語音中間件典型應用-B/S呼叫中心 2009-05-11
UniMedia 6S級電話語音中間件典型應用-企話通 2009-05-08
UniMedia 6S級電話語音中間件典型應用-C/S呼叫中心 2009-05-07
朗深技術 UniMedia——6S級電話語音中間件 2009-05-06