Алексей Валиков - Технология XSLT

try

xmlStylesheet.load('stylesheet.xsl');

memoStylesheet.Text := xmlStylesheet.xml;

except

on e: EOleException do

memoStylesheet.Text := e.Message;

end;

Для выполнения самого преобразования нам будет нужно использовать функцию transformNode:

try

memoResult.Text := xmlSource.transformNode(xmlStylesheet);

except

on e: EOleException do

memoResult.Text := e.Message;

end;

Для удобства мы можем также добавить диалоги для загрузки файлов и многое другое, но эти усовершенствования мы здесь разбирать не будем. Ограничимся тем, что приведем главную часть исходного кода этого проекта.

unit source;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,

StdCtrls, ComCtrls, MSXML2_TLB, comobj;

type

TMain = class(TForm)

{ Компоненты формы и обработчики событий }

private

public

end;

var

xmlSource: DOMDocument;

xmlStylesheet: DOMDocument;

Main: TMain;

implementation

{$R *.DFM}

procedure TMain.FormCreate(Sender: Tobject);

begin

xmlSource := CoDOMDocument.Create;

xmlStylesheet := CoDOMDocument.Create;

try

xmlSource.load('source.xml');

memoSource.Text := xmlSource.xml;

except

on e: EOleException do

memoSource.Text := e.Message;

end;

try

xmlStylesheet.load('stylesheet.xsl');

memoStylesheet.Text := xmlStylesheet.xml;

except

on e: EOleException do

memoStylesheet.Text := e.Message;

end;

end;

procedure TMain.pcMainChange(Sender: TObject);

begin

if pcMain.ActivePage = sheetResult then

try

memoResult.Text := xmlSource.transformNode(xmlStylesheet);

except

on e: EOleException do

memoResult.Text := e.Message;

end;

end;

{ Прочие процедуры и функции }

end.

Процесс использования нашего приложения приведен на следующих рисунках (рис. 9.4–9.6).

Рис. 9.4. Входящий документ

Рис. 9.5. Преобразование

Рис. 9.6. Выходящий документ

В качестве примера использования XSLT в языках С и С++ мы приведем очень простую программу, которая выполняет над документом source.xmlпреобразование stylesheet.xslи выводит результат в файл document.out. На этот раз в качестве процессора мы будем использовать Xalan-C++, а в качестве среды разработки — Microsoft Visual С++.

Для того чтобы использовать библиотеки Xalan в своем проекте, прежде всего, необходимо включить в исходный код файлы заголовков:

#include "util/PlatformUtils.hpp"

#include "XalanTransformer/XalanTransformer.hpp"

Файл PlatformUtils.hppотносится к библиотеке Xerces-C++, который используется в Xalan в качестве парсера XML-документов. Файл заголовка XalanTransformer.hppотносится к классу XalanTransformer, который мы и будем использовать для преобразования нашего документа.

Заголовочные файлы Xalan и Xerces могут быть найдены в поставке Xalan в каталогах xml-xalan\c\srcи xml-xerces\c\srcсоответственно. Для того чтобы они могли быть обнаружены компилятором, эти пути следует явным образом прописать в настройках среды (меню Tools/Options), как показано на рис. 9.7.

Рис. 9.7. Настройка путей Xalan в MSVC

Для того чтобы скомпилированный объектный код мог быть скомпонован, в проекте также должны быть указаны пути к библиотечным файлам Xalan (рис. 9.8).

Рис. 9.8. Настройка путей библиотек в проекте

Теперь, когда мы разобрались со всякого рода настройками, можно заняться самой программой. Типичный сценарий использования Xalan в программе можно проиллюстрировать следующим кодом.

// Инициализируем Xerces

XMLPlatformUtils::Initialize();

// Инициализируем класс XalanTransformer

XalanTransformer::initialize();

// Создаем экземпляр класса XalanTransformer

XalanTransformer theXalanTransformer;

...

// Выполняем преобразование

theXalanTransformer.transform( ... );

...

// Освобождаем XalanTransformer

XalanTransformer::terminate();

// Освобождаем Xerces

XMLPlatformUtils::Terminate();

В соответствии с этим сценарием наша программа будет выглядеть следующим образом:

#include "StdAfx.h"

#include "util/PlatformUtils.hpp"

#include "XalanTransformer/XalanTransformer.hpp"

#include "strstream"

int main(int argc, const char* argv[]) {

using std::cerr;

// Инициализируем Xerces

XMLPlatformUtils::Initialize();

// Инициализируем класс XalanTransformer

XalanTransformer::initialize();

// Создаем экземпляр класса XalanTransformer

XalanTransformer theXalanTransformer;

// Выполняем преобразование

int theResult = theXalanTransformer.transform("source.xml",

"stylesheet.xsl", "document.out");

// В случае, если произошла ошибка, выводим, информацию о ней

if (theResult != 0) {

cerr << "XalanError: \n" << theXalanTransformer.getLastError();

}

// Освобождаем XalanTransformer

XalanTransformer::terminate();

// Освобождаем Xerces

XMLPlatformUtils::Terminate();

return theResult;

}

Начиная с четвертых версий, PHP поставляется вместе с XSLT-процессором Sablotron, который включен в РНР в качестве расширения.

Для того чтобы использовать Sablotron в PHP-скриптах, следует выполнить следующие действия:

1. Убедиться, что файл php_sablot.dll присутствует в каталоге расширений.

2. Убедиться, что в файле php.ini присутствует строка extension=php_sablot.dll.

3. Убедиться, что библиотеки expat.dll и sablot.dll находятся в каталоге, указанном в переменной окружения PATH.

Приведенное описание касается только использования Sablotron на платформе Windows32. На других платформах потребуется сконфигурировать РНР с флагом --with-sablot. В остальном установка совершенно аналогична.

Теперь, когда библиотека Sablotron подключена, мы сможем написать небольшую программу, которая будет выводить страницу гостевой книги.

Предположим, что мы храним (или экспортируем) данные гостевой книги в следующем формате.

18/08/2001

1