source\lib\gtpublisher\styles\h-chm\default.g
1 /******************************************************************************
2 *
3 * Copyright (C) 2007, The Gentee Group. All rights reserved.
4 * This file is part of the Gentee open source project - http://www.gentee.com.
5 *
6 * THIS FILE IS PROVIDED UNDER THE TERMS OF THE GENTEE LICENSE ("AGREEMENT").
7 * ANY USE, REPRODUCTION OR DISTRIBUTION OF THIS FILE CONSTITUTES RECIPIENTS
8 * ACCEPTANCE OF THE AGREEMENT.
9 *
10 * ID: default 28.11.07 0.0.A.
11 *
12 * Author: Alexey Krivonogov ( gentee )
13 *
14 ******************************************************************************/
15
16 text chmimages( arrstr params )
17 \{
18 str output
19 ffind fd
20
21 _gtp.prj.get( "project/output", output )
22 output.faddname( "css\\img\\*.*" )
23
24 fd.init( output, $FIND_FILE )
25 foreach curfile, fd
26 {
27 @"#img(\"css/img/\( curfile.name )\")\l"
28 }
29 }\!
30
31 text chmitem( gtitem gti, uint keyword )
32 \{
33 arrstr names
34 str url title keys
35
36 _gtp.geturl( gti, url )
37 gti.getsubitem( "urlname", title )
38 if !*title : gti.getsubitem( "title", title )
39 if keyword
40 {
41 gti.getsubitem( "keywords", keys )
42 keys.split( names, ',', $SPLIT_NOSYS )
43 }
44 names += title
45 foreach curname, names
46 {
47 @" <LI><OBJECT type=\"text/sitemap\">\l"
48 @" <param name=\"Name\" value=\"\(curname)\">\l"
49 if gti.findrel( "/content" )
50 {
51 @" <param name=\"Local\" value=\"\(url)\">\l"
52 }
53 @" </OBJECT>\l"
54 }
55 }\!
56
57 text buildhhk( arrstr params )
58 \{
59 foreach curitem, _gtp.root()
60 {
61 str out cstyle
62 ustr ustemp
63 curitem as gtitem
64
65 curitem.get( "style", cstyle )
66 cstyle.upper()
67 if cstyle.findch( 'H' ) >= *cstyle : continue
68 if curitem.find("text") : continue
69
70 out@chmitem( curitem, 1 )
71 // ustemp.fromutf8( out )
72 // @( out = ustemp )
73 @out
74 }
75 }\!
76
77 text hhcitem( gtitem owner )
78 \{
79 foreach curitem, owner
80 {
81 str out link
82 ustr ustemp
83
84 curitem as gtitem
85 out@chmitem( _gtp.find( curitem.name ), 0 )
86 // ustemp.fromutf8( out )
87 // @( out = ustemp )
88 @out
89
90 curitem.get( "link", link )
91 if curitem.haschild() || *link
92 {
93 @"<UL>\l"
94 hhcitem( ?( *link, _gtp.find( link ), curitem ))
95 @"</UL>\l"
96 }
97 }
98 }\!
99
100 text buildhhc( arrstr params )
101 \{
102 hhcitem( _gtp.find("chmmenu"))
103 }\!
104
105 text H_default( gtitem gti )
106 \{
107 str desc title lang prjname url keys
108
109 _gtp.prj.get("project/lang", lang )
110 _gtp.prj.get("project/name", prjname )
111
112 gti.getsubitem( "desc", desc )
113 if !*desc : desc = "#/title#"
114
115 gti.getsubitem( "keywords", keys )
116 if !*keys : keys = "#/title#"
117
118 title = "\( prjname ): #/title#"
119 _gtp.geturl( gti, url )
120
121 }<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/strict.dtd"><html>
122 <head>
123 <meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=#chm/code#">
124 <!--meta http-equiv="Content-Language" content="\( lang )"-->
125 <meta NAME="KEYWORDS" CONTENT="\( keys )">
126 <meta NAME="DESCRIPTION" CONTENT="\( desc )">
127 <link rel="stylesheet" type="text/css" href="/css/styles.css">
128 <title>\( title )</title></head>
129 <body>
130 <div class="content">
131 <div class="box">\@content( gti )
132 \@related( gti.name )
133 </div>
134 </div>
135 <!--br style="clear:left"-->
136 <!--hr>
137 Copyright © 2004-06 Gentee, Inc., 2006-08 <a href = #gentee/url# target= "_blank" >The Gentee Group</a>. All rights reserved.
138 <br style="clear:left"-->
139
140
141 </body></html>
142 \!
143