|
181
|
1 package IMPL::Web::View::TTDocument;
|
|
|
2 use strict;
|
|
|
3
|
|
|
4 use IMPL::lang qw(:declare :constants);
|
|
|
5 use IMPL::DOM::Property qw(_dom);
|
|
|
6 use IMPL::Web::View::TTFactory();
|
|
|
7 use IMPL::Web::View::TTControl();
|
|
|
8
|
|
|
9
|
|
|
10 use parent qw(
|
|
|
11 IMPL::DOM::Document
|
|
|
12 IMPL::Web::View::TTControl
|
|
|
13 );
|
|
|
14
|
|
|
15 BEGIN {
|
|
|
16 public _dom property layout => PROP_ALL;
|
|
|
17 public property opts => PROP_GET | PROP_OWNERSET;
|
|
|
18 public property loader => PROP_GET | PROP_OWNERSET;
|
|
|
19 public property controls => PROP_GET | PROP_OWNERSET;
|
|
|
20 }
|
|
|
21
|
|
|
22 sub CTOR {
|
|
|
23 my ($this,$template,$refOpts,%args) = @_;
|
|
|
24
|
|
|
25 $this->controls({});
|
|
|
26 $this->loader($args{loader}) if $args{loader};
|
|
|
27
|
|
|
28 $this->layout( $template->layout ) unless $this->layout;
|
|
|
29
|
|
|
30 $this->opts($refOpts);
|
|
|
31 }
|
|
|
32
|
|
|
33 our %CTOR = (
|
|
|
34 'IMPL::Web::View::TTControl' => sub {
|
|
|
35 'document',
|
|
|
36 $_[0], # template
|
|
|
37 new Template::Context($_[1]) # context
|
|
|
38 },
|
|
|
39 'IMPL::DOM::Document' => sub {
|
|
|
40 nodeName => 'document'
|
|
|
41 }
|
|
|
42 );
|
|
|
43
|
|
|
44 sub require {
|
|
|
45 my ($this, $control) = @_;
|
|
|
46
|
|
186
|
47 if (my $factory = $this->controls->{$control}) {
|
|
|
48 return $factory;
|
|
|
49 } else {
|
|
181
|
50
|
|
186
|
51 my $path = $control;
|
|
181
|
52 if ( my $template = $this->loader->template($path) ) {
|
|
186
|
53 my $opts = { %{$this->opts} };
|
|
181
|
54 $opts->{STASH} = $this->context->stash->clone();
|
|
|
55
|
|
|
56 my $ctx = new Template::Context($opts);
|
|
|
57
|
|
186
|
58 $factory = new IMPL::Web::View::TTFactory(
|
|
181
|
59 typeof IMPL::Web::View::TTControl,
|
|
|
60 $template,
|
|
|
61 $ctx,
|
|
|
62 $opts
|
|
|
63 );
|
|
|
64
|
|
186
|
65 my @parts = split(/\/+/,$control);
|
|
181
|
66
|
|
186
|
67 $this->controls->{$control} = $factory;
|
|
181
|
68 $this->context->stash->set([map { $_, 0 } @parts], $factory);
|
|
186
|
69
|
|
|
70 return $factory;
|
|
181
|
71 } else {
|
|
|
72 die new IMPL::KeyNotFoundException($control);
|
|
|
73 }
|
|
|
74
|
|
|
75 }
|
|
|
76 }
|
|
|
77
|
|
187
|
78 sub renderBlock {
|
|
|
79 $_[0]->template;
|
|
|
80 }
|
|
|
81
|
|
181
|
82 sub Render {
|
|
187
|
83 my ($this,$args) = @_;
|
|
181
|
84
|
|
187
|
85 my $output = $this->IMPL::Web::TTControl::Render( { document => $this } );
|
|
181
|
86
|
|
|
87 if ($this->layout) {
|
|
187
|
88 $output = $this->context->include($this->layout, { content => $output } );
|
|
181
|
89 }
|
|
|
90
|
|
|
91 return $output;
|
|
|
92 }
|
|
|
93
|
|
|
94
|
|
|
95 1;
|
|
|
96
|
|
|
97 __END__
|
|
|
98
|
|
|
99 =pod
|
|
|
100
|
|
|
101 =head1 NAME
|
|
|
102
|
|
|
103 C<IMPL::Web::View::TTDocument> - документ для построения HTML страницы на основе шаблонов TT.
|
|
|
104
|
|
|
105 =head1 SYNOPSIS
|
|
|
106
|
|
|
107 =begin code
|
|
|
108
|
|
|
109 use IMPL::Web::View::TTDocument();
|
|
|
110
|
|
|
111 my $doc = new IMPL::Wbe::View::TTDocument($template,$ttOptions);
|
|
|
112
|
|
|
113 return $doc->Render();
|
|
|
114
|
|
|
115 =end code
|
|
|
116
|
|
|
117 Однако, более предпочтительный способ использовать C<IMPL::Web::View::TTLoader>.
|
|
|
118
|
|
|
119 =head1 DESCRIPTION
|
|
|
120
|
|
|
121 Документ для представления данных. Документы представляют собой иерархически организованные данные,
|
|
|
122 элементами данного документа являются данные для отображения, такие как
|
|
|
123
|
|
|
124 =over
|
|
|
125
|
|
|
126 =item * Объекты из БД
|
|
|
127
|
|
|
128 =item * Навигационные цепочки
|
|
|
129
|
|
|
130 =item * Меню и т.п.
|
|
|
131
|
|
|
132 =back
|
|
|
133
|
|
|
134 Скприт шаблона формирует структуру документа, затем сформированная структура форматируется в готовый документ.
|
|
|
135 Процесс преобразования объектной модели в готовый документ может быть выполнена как вручную, так и при помощи
|
|
|
136 вспомогательного шаблона - обертки. Если у шаблона документа указан C<wrapper> в метаданных, то он будет
|
|
|
137 использован как шаблон для форматирования объектной модели, вывод самого шаблона будет проигнорирован. Если
|
|
|
138 обертка не задана, то результатом будет вывод самого скрипта шаблона.
|
|
|
139
|
|
|
140 Каждый документ имеет свое собственное пространство имен, которое может быть вложенным в некоторое внешнее,
|
|
|
141 указанное при создании документа.
|
|
185
|
142 =head2 Порядок обработки документа
|
|
|
143
|
|
|
144 =over
|
|
|
145
|
|
|
146 =item 1 Создается документ при помощи метода C<TTLoader::document()>
|
|
|
147
|
|
|
148 =item 1 При создании документа (в конструкторе), происходит выполнение блока C<CTOR>
|
|
|
149
|
|
|
150 =item 1 При вызове метода C<TTDocument::Render()> устанавливаются переменные C<this>, C<document>
|
|
|
151 и шаблон обрабатывается при помощи метода C<process()> контекста документа.
|
|
|
152
|
|
|
153 =back
|
|
181
|
154
|
|
|
155 =head2 Загрузка элемента управления
|
|
|
156
|
|
|
157 =over
|
|
|
158
|
|
185
|
159 =item 1 C<document.require('my/org/input')>
|
|
181
|
160
|
|
|
161 =item 1 Загружает шаблон C<my/org/input.tt>
|
|
|
162
|
|
|
163 =item 1 Создает фабрику элементов управления с собственным контекстом, вложенным в контекст документа.
|
|
|
164
|
|
|
165 =item 1 Выполняет шаблон в пространстве имен фабрики
|
|
|
166
|
|
|
167 =item 1 Регистритует фабрику в контексте документа по пути C<my.org.input>
|
|
|
168
|
|
|
169 =back
|
|
|
170
|
|
|
171 =head2 Создание элемента управления
|
|
|
172
|
|
|
173 =over
|
|
|
174
|
|
|
175 =item 1 C<< my.org.input.new('login') >>
|
|
|
176
|
|
|
177 =item 1 Если это первый элемент управления, то выполняетя статический конструктор в контексте фабрики
|
|
|
178
|
|
|
179 =item 1 Создается новый дочерний контекст к контексту фабрики
|
|
|
180
|
|
|
181 =item 1 Создается экземпляр элемента управления
|
|
|
182
|
|
|
183 =item 1 Выполняется блок конструктора в контексте элемента управления, параметр C<this> имеет значение
|
|
|
184 нового экземпляра элемента управления
|
|
|
185
|
|
|
186 =back
|
|
|
187
|
|
|
188 =head1 MEMBERS
|
|
|
189
|
|
|
190 =over
|
|
|
191
|
|
|
192 =item C<CTOR($template, %options)>
|
|
|
193
|
|
|
194 Создает экземпляр документа с указанным шаблоном и параметрами, параметры
|
|
|
195
|
|
|
196 =back
|
|
|
197
|
|
|
198 =cut |
