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