如何在Perl中使用带有Inline :: C的VTD-XML?

时间:2011-06-08 09:21:10

标签: c xml perl vtd-xml

我最近发现了VTD-XML方法对XML解析的强大功能,主要是它的速度。 具体来说,我已经构建了C版本2.10(也有Java,C ++和C#实现)。

我的目标很简单:我想使用VTD-XML从XML中提取数据进行解析,并使用Perl处理数据。 简单的方法可能是使用我制作的C程序转储数据,并通过管道将它们发送到Perl程序。也许不优雅,但它有效。

另一种不太简单的方法是使用Perl程序,它使用Inline :: C调用C数据收集器子例程。

所以我开始研究Inline :: C并设法做基本的事情,我需要使用Perl C API函数将数据从C子程序传递回Perl。 当我在Inline :: C控件下的C源代码中编写C collector子例程时,在编译阶段会出现问题。

有这样的符号冲突:bind()在socket.h(Perl)和autoPilot.h(VTD-XML)中定义。可以避免符号冲突将VTD-XML构建为具有显式导出映射的共享库(gcc -Wl,-version-script = foo.map)......这是正确的方法吗? 还有更好的方法吗?

1 个答案:

答案 0 :(得分:4)

我确实通过添加一个间接层实现了我的目标:可怕,因为在我看来它是有效的。

首先,我创建了一个包含VTD-XML API的共享库。构建这个共享对象时,我必须避免全局范围污染,只导出所需的符号。

然后我构建了另一个共享库。第二个共享库隐藏了VTD-XML API,应该通过Inline :: C从Perl中使用。在这个共享对象中,我使用了libvtd.so部分公开的API编写了一些函数。

这个想法看起来像这样:

Perl -> Inline::C dynamic loader -> wrapper_API.so -> libvtd.so 

主要问题来自共享库的运行时加载和符号冲突/解决。

以下是我构建libvtd.so的方法,使所谓的wrapper_API.so可以轻松使用它。

不幸的是,VTD-XML没有构建libvtd.so共享对象,因此我必须自己构建它,将几个.o目标文件与gcc链接在一起:

gcc -shared -fPIC -Wl,-soname,libvtd.so.2.10 -Wl,--version-script=vtd-xml.map \
-o libvtd.so.2.10 libvtd.o arrayList.o fastIntBuffer.o fastLongBuffer.o \
contextBuffer.o vtdNav.o vtdGen.o autoPilot.o XMLChar.o XMLModifier.o intHash.o \
 bookMark.o indexHandler.o transcoder.o elementFragmentNs.o

使用链接器选项-Wl,--version-script=vtd-xml.map调整符号可见性,其中映射文件为:

{
    global:
        the_exception_context;
        toString;
        getText;
        getCurrentIndex;
        toNormalizedString;
        toElement;
        toElement2;
        createVTDGen;
        setDoc;    
        parse;
        getNav;
        freeVTDGen;
        freeVTDNav;
        getTokenCount;
    local:
        *;  
};

全局(“导出”)符号位于global:部分下,而本地下的cat *表示所有其他符号仅在本地已知。

所有对象模块都来自VTD-XML发行版,但libvtd.o除外:需要此自定义对象来解决异常处理库cexept.h的问题。 libvtd.c只有两行代码。

#include "customTypes.h"
struct exception_context the_exception_context[ 1 ];

在编译阶段,我必须调整CFLAGS来制作位置无关代码(gcc -fPIC选项),以便制作共享对象。

readelf工具可用于检查符号可见性:

readelf --syms libvtd.so.2.10

Symbol table '.dynsym' contains 35 entries:
   Num:    Value          Size Type    Bind   Vis      Ndx Name
   ...
   280: 000000000000d010   117 FUNC    LOCAL  DEFAULT   12 writeIndex
   281: 000000000003c5d0   154 FUNC    LOCAL  DEFAULT   12 setCursorPosition
   282: 000000000003c1f0    56 FUNC    LOCAL  DEFAULT   12 resetIntHash
   ...
   331: 0000000000004f50  3545 FUNC    GLOBAL DEFAULT   12 toElement
   332: 00000000000071e0   224 FUNC    GLOBAL DEFAULT   12 getText
   333: 000000000000d420   114 FUNC    GLOBAL DEFAULT   12 freeVTDGen
   ...
   339: 000000000000b600   731 FUNC    GLOBAL DEFAULT   12 toElement2
   340: 000000000000e650   120 FUNC    GLOBAL DEFAULT   12 getNav
   341: 0000000000025750 70567 FUNC    GLOBAL DEFAULT   12 parse

wrapperAPI.so由几个使用VTD-XML API及其自定义类型的函数组成,但只接受和返回标准C类型和/或结构。 包装器直接来自以前的独立C程序。