Ti IPNC Web网页之ActiveX控件

Ti IPNC Web网页之ActiveX控件

本篇介绍关于TI IPNC网页中播放器相关的东西。

gStudio工程中添加播放器并控制播放器

打开IPNC网页时首先会自动下载ActiveX控件并安装。在这个基础上我们在gStudio工程中调用ActiveX控件留下的API就能顺利的控制播放器了。

在gStudio中有一个特殊的控件叫做gdo container。

GDO is a special Loadable module that has predefined exported methods that let

GoDB VM introspect and identify the methods and properties and exposing

it as a component to the GBasic.

也就是这个控件是用于添加外部模块，使之成为GoDB的一个组件。

TI IPNC RTSP播放器就是以这种方式添加进去的。

在原有的工程中，播放器是以调用函数的方式创建的。而非显示的将gdo控件加入到frm文件中。

在common.inc中

function createGDOControl(dims ctrlname$, dimi gdoCurX, dimi gdoCurY, dimi gdoCurWidth, dimi gdoCurHeight)
	createobject("GDO", ctrlname$, " x='" + gdoCurX + "' y='" + gdoCurY + "' w='" + gdoCurWidth + "' h='" + gdoCurHeight +"' ProgID='Gffx.GFFMpeg.1'" )
	#{ctrlName$}.scrollable=0
End Function

其中ProgID是根据我们播放器ActiveX控件来设置的，这里固定不变。

让我们看liveVideo.frm页面，在liveVideo.bas文件的from_load中

你会看到

createGDOControl("gdoVideo",GDO_X,GDO_Y,GDO_W,GDO_H)

这样这就是创建了一个播放器，这个控件名字叫做gdoVideo，使用#gdoVideo.method这样的方式来调用这个控件的方法。

你在当前页面搜索gdovideo，你会发现liveVideo页面使用若干ActiveX的api，比如说Play,Audio,Stop等。

比如说，当liveVideo页面加载完毕时，自动播放rtsp流，这时调用form_complete全局事件函数。

在这个函数中，调用call disp_streams

sub disp_streams()

    ".......
	a = #gdovideo.stop(1)	

	if playVideoFlag = 1 then
		dispStr$ = ~Unable_To_Display_Msg$
		#lblload.hidden = 0
		#gdovideo.hidden = 1
	else
		dispStr$ = "Loading . . . . "
		'Play stream
		#gdovideo.hidden = 0
		a = #gdovideo.play(value$)
	end if

    "....

End Sub

sub setAudioControl

	if flagAudio=1 then
		#gdovideo.Audio(1)
	elseif flagAudio=0 then
		#gdovideo.Audio(0)
	endif

	'#gdoVideo.hidden=0
	'#lblLoad.hidden=1
End Sub

这个在Guide for gffx code.pdf中的API是一一对应的，只不过里面的多了一些前缀put_和get_。这里暂时不理其中原理，我们要知道是如何使用。

	STDMETHOD(get_Audio)(/*[out, retval]*/ long *pVal);
	STDMETHOD(put_Audio)(/*[in]*/ long newVal);
	STDMETHOD(get_Stop)(long TimeOut, /*[out, retval]*/ long *pVal);
	STDMETHOD(get_Play)(BSTR Url, /*[out, retval]*/ long *pVal);

问题来了，这里的Audio是调用put_Audio还是get_Audio？为什么put_play函数明明有两个参数这里只有一个？

其实get_前缀的，后面那个long *pVal是作为返回值out retval的，所以你看到如果你在gstdio中调用get_前缀的，一般需要显示的返回，二调用put_前缀的则不需要..有多少参数填多少参数。

a = #gdovideo.play(value$)

所以这里的Audio调用时调用put_前缀的那个函数。

TI IPNC网页中部分功能严重依赖于这个ActiveX播放器，不少功能是依赖这个播放器的，所以你想用html完全复制IPNC网页的功能，播放器是个大问题。

比如说IPNC网页中有一个功能划定感兴趣区域这个功能是在UIMode(2)的情况下...

修改gffx工程，并打包ActiveX.

请用Visual Studio 2008来编译此工程，以上的版本编译无法通过。

编译成功之后生成gffx.dll文件。我们拷贝原来的IPNCWebDlls.CAB文件，解压释放出里面的其它dll，用于制作新的IPNCWebDlls.CAB

其中的cabarc.exe程序在Windows XP下是自带的，在Windows7及其以上，你需要另外下载。

这是make_cab_no_cer.bat的内容

@echo off
set path=%path%;D:\Program Files (x86)\Microsoft Visual Studio 9.0\SmartDevices\SDK\SDKTools;D:\Program Files\Microsoft SDKs\Windows\v6.0A\Bin\

echo "打包..."
del /s /q tracyone.pvk tracyone.cer tracyone.spc tracyone.pfx IPNCWebDlls.CAB gffx.dll
xcopy /y ..\gffx\Debug\gffx.dll .

.\cabarc.exe -s 6144 N IPNCWebDlls.CAB FFMPEG_LICENSE.txt GDOBRIDGE.DLL GoDBATL.DLL gffx.dll GIPNC.INF
if %errorlevel% NEQ 0 (echo Failed
	pause
	exit
) else (
	echo cararc successfully
)

del /s /q tracyone.pvk tracyone.cer tracyone.spc tracyone.pfx
move IPNCWebDlls.CAB "c:\virtual_machine\share"
echo "结束..."

这是make_cab.bat的内容

@echo off
set path=%path%;D:\Program Files (x86)\Microsoft Visual Studio 9.0\SmartDevices\SDK\SDKTools;D:\Program Files\Microsoft SDKs\Windows\v6.0A\Bin\

echo "打包..."
del /s /q tracyone.pvk tracyone.cer tracyone.spc tracyone.pfx IPNCWebDlls.CAB gffx.dll
xcopy /y ..\gffx\Debug\gffx.dll .

.\cabarc.exe -s 6144 N IPNCWebDlls.CAB FFMPEG_LICENSE.txt GDOBRIDGE.DLL GoDBATL.DLL gffx.dll GIPNC.INF
if %errorlevel% NEQ 0 (echo Failed
	pause
	exit
) else (
	echo cararc successfully
)

echo "生成证书..."
makecert -ss tracyone  -n "CN=tracyone"  -sv tracyone.pvk -r tracyone.cer
cert2spc tracyone.cer tracyone.spc
pvk2pfx -pvk tracyone.pvk -pi 123 -spc tracyone.spc -pfx tracyone.pfx -f
echo "双击pfx文件导入到：受信任的根证书颁发机构，然后按任意键继续"
pause
signtool signwizard
signtool timestamp /t "http://timestamp.wosign.com/timestamp" IPNCWebDlls.CAB
del /s /q tracyone.pvk tracyone.cer tracyone.spc tracyone.pfx
xcopy /y /r IPNCWebDlls.CAB "c:\virtual_machine\share"
echo "结束..."
pause

我们知道首次打开IPNC设备的网页需要下载加载这个ActiveX控件，然后最原始的这个ActiveX控件是已经申请证书了，只有那些申请证书的ActiveX控件才可以顺利的加载。否则你需要改变IE的设置，取消那些关于ActiveX的安全设置。

申请证书是要钱的，所以这就是make_cab_no_cer.bat脚本存在的意义..因为其实我们只要设置过一次IE，降低其安全性，然后加载成功后，下次就不要拉，所以申请证书的意义不大。