语音通话

-- 检查是否有活动的通话  
local isCallExist = cc.anyCallExist()  
if isCallExist then  
    print("存在活动的通话")  
else  
    print("没有活动的通话")  
end

local  CC_STATE_IDLE = 0    -- 无通话  
local  CC_STATE_INCOMING = 1     -- 来电  
local  CC_STATE_DIALING = 2     -- 正在拨打  
local  CC_STATE_CONNECTED = 3    -- 已接通  
local  CC_STATE_HELD   = 4         -- 保持状态  

-- 获取通话状态  
local state = cc.getState(callHandle)  
if state == CC_STATE_CONNECTED then  
    print("通话已接通")  
elseif state == CC_STATE_INCOMING then  
    print("有来电")  
else  
    print("通话状态：" .. state)  
end

-- 立即拨打号码  
cc.dial("110086")  

-- 或在3秒后拨打号码  
cc.dial("10086", 30)

-- 挂断通话  
cc.hangUp("10086")

cc.dtmfDetect(true, 2)

-- 接听来电  
cc.accept("10086")

-- 传输语音数据（具体参数和用途可能因实现而异）  
cc.transVoice(voiceData, true, false)

-- 发送DTMF信号“1234”，每个字符播放500毫秒，间隔100毫秒  
cc.sendDtmf("1234", 500, 100)

-- LuaTools需要PROJECT和VERSION这两个信息
PROJECT = "call_demo"
VERSION = "1.0.0"

require "sim"
require "sys"
require"cc"
require"audio"
require"common"
require "net"
require"powerKey"
require "netLed"

--每1分钟查询一次GSM信号强度
--每1分钟查询一次基站信息
net.startQueryAll(60000, 60000)

--此处关闭RNDIS网卡功能
--否则，模块通过USB连接电脑后，会在电脑的网络适配器中枚举一个RNDIS网卡，电脑默认使用此网卡上网，导致模块使用的sim卡流量流失
--如果项目中需要打开此功能，把ril.request("AT+RNDISCALL=0,1")修改为ril.request("AT+RNDISCALL=1,1")即可
--注意：core固件：V0030以及之后的版本、V3028以及之后的版本，才以稳定地支持此功能
ril.request("AT+RNDISCALL=0,1")
--打开 VOLTE功能
ril.request("AT+SETVOLTE=1")

--加载网络指示灯和LTE指示灯功能模块
--根据自己的项目需求和硬件配置决定：1、是否加载此功能模块；2、配置指示灯引脚
--合宙官方出售的Air720U开发板上的网络指示灯引脚为pio.P0_1，LTE指示灯引脚为pio.P0_4

pmd.ldoset(2,pmd.LDO_VLCD)
netLed.setup(true,pio.P0_1,pio.P0_4)
--网络指示灯功能模块中，默认配置了各种工作状态下指示灯的闪烁规律，参考netLed.lua中ledBlinkTime配置的默认值
--如果默认值满足不了需求，此处调用netLed.updateBlinkTime去配置闪烁时长

powerKey.setup(3000,function() end, function() sys.publish("POWER_KEY_IND") end)

--来电铃声播放协程ID
local coIncoming

local function callVolTest()
    local curVol = audio.getCallVolume()
    curVol = (curVol>=7) and 1 or (curVol+1)
    log.info("testCall.setCallVolume",curVol)
    audio.setCallVolume(curVol)
end
-- audiocore.streamplay
--通话中向对方播放音频回调函数
local function testAudioStream(streamType)
    sys.taskInit(
        function()
            while true do
                tStreamType = streamType
                log.info("AudioTest.AudioStreamTest", "AudioStreamPlay Start", streamType)
                local tAudioFile =
                {
                    [audiocore.AMR] = "tip.amr",
                    [audiocore.SPX] = "record.spx",
                    [audiocore.PCM] = "alarm_door.pcm",
                    [audiocore.MP3] = "sms.mp3"
                }
                local fileHandle = io.open("/lua/" .. tAudioFile[streamType], "rb")
                if not fileHandle then
                    log.error("AudioTest.AudioStreamTest", "Open file error")
                    return
                end

                while true do
                    local data = fileHandle:read(streamType == audiocore.SPX and 1200 or 1024)
                    if not data then 
                        fileHandle:close() 
                        while audiocore.streamremain() ~= 0 do
                            sys.wait(20)    
                        end
                        sys.wait(1000)
                        audiocore.stop() --添加audiocore.stop()接口，否则再次播放会播放不出来
                        log.warn("AudioTest.AudioStreamTest", "AudioStreamPlay Over")
                        return 
                    end

                    local data_len = string.len(data)
                    local curr_len = 1
                    while true do
                        curr_len = curr_len + audiocore.streamplay(tStreamType,string.sub(data,curr_len,-1),audiocore.PLAY_VOLTE)
                        if curr_len>=data_len then
                            break
                        elseif curr_len == 0 then
                            log.error("AudioTest.AudioStreamTest", "AudioStreamPlay Error", streamType)
                            return
                        end
                        sys.wait(10)
                    end
                    sys.wait(10)
                end  
            end
        end
    )
end

--- “通话已建立”消息处理函数
-- @string num，建立通话的对方号码
-- @return 无
local function connected(num)
    log.info("testCall.connected")
    coIncoming = nil
    --通话中设置mic增益，必须在通话建立以后设置
    --audio.setMicGain("call",7)
    --通话中音量测试
    sys.timerLoopStart(callVolTest,5000)
    --通话中向对方播放TTS测试
    audio.play(7,"TTS","通话中TTS测试",7,nil,true,2000)
    --通话中向对方播放音频
    --[[
    audio.setVolume(2)
    log.info("AudioTest.AudioStreamTest.AMRFilePlayTest", "Start")
    testAudioStream(audiocore.AMR)   
    ]] 
    --110秒之后主动结束通话
    sys.timerStart(cc.hangUp,110000,num)
end

--- “通话已结束”消息处理函数
-- @string discReason，通话结束原因值，取值范围如下：
--                                     "CHUP"表示本端调用cc.hungUp()接口主动挂断
--                                     "NO ANSWER"表示呼出后，到达对方，对方无应答，通话超时断开
--                                     "BUSY"表示呼出后，到达对方，对方主动挂断
--                                     "NO CARRIER"表示通话未建立或者其他未知原因的断开
--                                     nil表示没有检测到原因值
-- @return 无
local function disconnected(discReason)
    coIncoming = nil
    log.info("testCall.disconnected",discReason)
    sys.timerStopAll(cc.hangUp)
    sys.timerStop(callVolTest)
    audio.stop()
end

--- “来电”消息处理函数
-- @string num，来电号码
-- @return 无
local function incoming(num)
    log.info("testCall.incoming:"..num)

    if not coIncoming then
        coIncoming = sys.taskInit(function()
            --audio.play(1,"TTS","来电话啦",4,function() sys.publish("PLAY_INCOMING_RING_IND") end,true)
            audio.play(1,"FILE","/lua/call.mp3",4,function() sys.publish("PLAY_INCOMING_RING_IND") end,true)
            sys.waitUntil("PLAY_INCOMING_RING_IND")
        end)
        sys.subscribe("POWER_KEY_IND",function() audio.stop(function() cc.accept(num) end) end)
    end

    --[[
    if not coIncoming then
        coIncoming = sys.taskInit(function()
            for i=1,7 do
                --audio.play(1,"TTS","来电话啦",i,function() sys.publish("PLAY_INCOMING_RING_IND") end)
                audio.play(1,"FILE","/lua/call.mp3",i,function() sys.publish("PLAY_INCOMING_RING_IND") end)
                sys.waitUntil("PLAY_INCOMING_RING_IND")
            end
            --接听来电
            --cc.accept(num)
        end)

    end]]
    --接听来电
    --cc.accept(num)


end
-- "此处填写自己要拨打的电话号码"
mynumber =  "10086" 
--- “通话功能模块准备就绪””消息处理函数
-- @return 无
local function ready()
    log.info("tesCall.ready")
    --呼叫10086
    sys.timerStart(cc.dial,10000,mynumber)
end

--- “通话中收到对方的DTMF”消息处理函数
-- @string dtmf，收到的DTMF字符
-- @return 无
local function dtmfDetected(dtmf)
    log.info("testCall.dtmfDetected",dtmf)
end

--订阅消息的用户回调函数
--sys.subscribe("CALL_READY",ready)
sys.subscribe("NET_STATE_REGISTERED",ready)
sys.subscribe("CALL_INCOMING",incoming)
sys.subscribe("CALL_CONNECTED",connected)
sys.subscribe("CALL_DISCONNECTED",disconnected)
cc.dtmfDetect(true)
sys.subscribe("CALL_DTMF_DETECT",dtmfDetected)

--启动系统框架
sys.init(0, 0)

-- 用户代码已结束---------------------------------------------
-- 结尾总是这一句
sys.run()
-- sys.run()之后后面不要加任何语句!!!!!