← Back to branch summary

~ubuntu-branches/ubuntu/hardy/php5/hardy-updates

« back to all changes in this revision

Viewing changes to Zend/zend_highlight.c

  • Committer: Bazaar Package Importer
  • Author(s): Adam Conrad
  • Date: 2005-10-09 03:14:32 UTC
  • Revision ID: james.westby@ubuntu.com-20051009031432-kspik3lobxstafv9
Tags: upstream-5.0.5
Import upstream version 5.0.5

Show diffs side-by-side

added added

removed removed

Lines of Context:
Zend/zend_highlight.c
 
1
/*
 
2
   +----------------------------------------------------------------------+
 
3
   | Zend Engine                                                          |
 
4
   +----------------------------------------------------------------------+
 
5
   | Copyright (c) 1998-2004 Zend Technologies Ltd. (http://www.zend.com) |
 
6
   +----------------------------------------------------------------------+
 
7
   | This source file is subject to version 2.00 of the Zend license,     |
 
8
   | that is bundled with this package in the file LICENSE, and is        | 
 
9
   | available through the world-wide-web at the following url:           |
 
10
   | http://www.zend.com/license/2_00.txt.                                |
 
11
   | If you did not receive a copy of the Zend license and are unable to  |
 
12
   | obtain it through the world-wide-web, please send a note to          |
 
13
   | license@zend.com so we can mail you a copy immediately.              |
 
14
   +----------------------------------------------------------------------+
 
15
   | Authors: Andi Gutmans <andi@zend.com>                                |
 
16
   |          Zeev Suraski <zeev@zend.com>                                |
 
17
   +----------------------------------------------------------------------+
 
18
*/
 
19
 
 
20
/* $Id: zend_highlight.c,v 1.43.2.5 2005/05/22 16:40:49 iliaa Exp $ */
 
21
 
 
22
#include "zend.h"
 
23
#include <zend_language_parser.h>
 
24
#include "zend_compile.h"
 
25
#include "zend_highlight.h"
 
26
#include "zend_ptr_stack.h"
 
27
#include "zend_globals.h"
 
28
 
 
29
ZEND_API void zend_html_putc(char c)
 
30
{
 
31
        switch (c) {
 
32
                case '\n':
 
33
                        ZEND_PUTS("<br />");
 
34
                        break;
 
35
                case '<':
 
36
                        ZEND_PUTS("&lt;");
 
37
                        break;
 
38
                case '>':
 
39
                        ZEND_PUTS("&gt;");
 
40
                        break;
 
41
                case '&':
 
42
                        ZEND_PUTS("&amp;");
 
43
                        break;
 
44
                case ' ':
 
45
                        ZEND_PUTS("&nbsp;");
 
46
                        break;
 
47
                case '\t':
 
48
                        ZEND_PUTS("&nbsp;&nbsp;&nbsp;&nbsp;");
 
49
                        break;
 
50
                default:
 
51
                        ZEND_PUTC(c);
 
52
                        break;
 
53
        }
 
54
}
 
55
 
 
56
 
 
57
ZEND_API void zend_html_puts(const char *s, uint len TSRMLS_DC)
 
58
{
 
59
        const char *ptr=s, *end=s+len;
 
60
 
 
61
#ifdef ZEND_MULTIBYTE
 
62
        char *filtered;
 
63
        int filtered_len;
 
64
 
 
65
        if (LANG_SCNG(output_filter)) {
 
66
                LANG_SCNG(output_filter)(&filtered, &filtered_len, s, len TSRMLS_CC);
 
67
                ptr = filtered;
 
68
                end = filtered + filtered_len;
 
69
        }
 
70
#endif /* ZEND_MULTIBYTE */
 
71
        
 
72
        while (ptr<end) {
 
73
                if (*ptr==' ') {
 
74
                        do {
 
75
                                zend_html_putc(*ptr);
 
76
                        } while ((++ptr < end) && (*ptr==' '));
 
77
                } else {
 
78
                        zend_html_putc(*ptr++);
 
79
                }
 
80
        }
 
81
 
 
82
#ifdef ZEND_MULTIBYTE
 
83
        if (LANG_SCNG(output_filter)) {
 
84
                efree(filtered);
 
85
        }
 
86
#endif /* ZEND_MULTIBYTE */
 
87
}
 
88
 
 
89
 
 
90
 
 
91
ZEND_API void zend_highlight(zend_syntax_highlighter_ini *syntax_highlighter_ini TSRMLS_DC)
 
92
{
 
93
        zval token;
 
94
        int token_type;
 
95
        char *last_color = syntax_highlighter_ini->highlight_html;
 
96
        char *next_color;
 
97
        int in_string=0, post_heredoc = 0;
 
98
 
 
99
        zend_printf("<code>");
 
100
        zend_printf("<span style=\"color: %s\">\n", last_color);
 
101
        /* highlight stuff coming back from zendlex() */
 
102
        token.type = 0;
 
103
        while ((token_type=lex_scan(&token TSRMLS_CC))) {
 
104
                switch (token_type) {
 
105
                        case T_INLINE_HTML:
 
106
                                next_color = syntax_highlighter_ini->highlight_html;
 
107
                                break;
 
108
                        case T_COMMENT:
 
109
                        case T_DOC_COMMENT:
 
110
                                next_color = syntax_highlighter_ini->highlight_comment;
 
111
                                break;
 
112
                        case T_OPEN_TAG:
 
113
                        case T_OPEN_TAG_WITH_ECHO:
 
114
                                next_color = syntax_highlighter_ini->highlight_default;
 
115
                                break;
 
116
                        case T_CLOSE_TAG:
 
117
                                next_color = syntax_highlighter_ini->highlight_default;
 
118
                                break;
 
119
                        case T_CONSTANT_ENCAPSED_STRING:
 
120
                                next_color = syntax_highlighter_ini->highlight_string;
 
121
                                break;
 
122
                        case '"':
 
123
                                next_color = syntax_highlighter_ini->highlight_string;
 
124
                                in_string = !in_string;
 
125
                                break;                          
 
126
                        case T_WHITESPACE:
 
127
                                zend_html_puts(LANG_SCNG(yy_text), LANG_SCNG(yy_leng) TSRMLS_CC);  /* no color needed */
 
128
                                token.type = 0;
 
129
                                continue;
 
130
                                break;
 
131
                        default:
 
132
                                if (in_string) {
 
133
                                        next_color = syntax_highlighter_ini->highlight_string;
 
134
                                } else if (token.type == 0) {
 
135
                                        next_color = syntax_highlighter_ini->highlight_keyword;
 
136
                                } else {
 
137
                                        next_color = syntax_highlighter_ini->highlight_default;
 
138
                                }
 
139
                                break;
 
140
                }
 
141
 
 
142
                if (last_color != next_color) {
 
143
                        if (last_color != syntax_highlighter_ini->highlight_html) {
 
144
                                zend_printf("</span>");
 
145
                        }
 
146
                        last_color = next_color;
 
147
                        if (last_color != syntax_highlighter_ini->highlight_html) {
 
148
                                zend_printf("<span style=\"color: %s\">", last_color);
 
149
                        }
 
150
                }
 
151
                switch (token_type) {
 
152
                        case T_END_HEREDOC:
 
153
                                zend_html_puts(token.value.str.val, token.value.str.len TSRMLS_CC);
 
154
                                post_heredoc = 1;
 
155
                                break;
 
156
                        default:
 
157
                                zend_html_puts(LANG_SCNG(yy_text), LANG_SCNG(yy_leng) TSRMLS_CC);
 
158
                                if (post_heredoc) {
 
159
                                         zend_html_putc('\n');
 
160
                                         post_heredoc = 0;
 
161
                                }
 
162
                                break;
 
163
                }
 
164
 
 
165
                if (token.type == IS_STRING) {
 
166
                        switch (token_type) {
 
167
                                case T_OPEN_TAG:
 
168
                                case T_OPEN_TAG_WITH_ECHO:
 
169
                                case T_CLOSE_TAG:
 
170
                                case T_WHITESPACE:
 
171
                                case T_COMMENT:
 
172
                                case T_DOC_COMMENT:
 
173
                                        break;
 
174
                                default:
 
175
                                        efree(token.value.str.val);
 
176
                                        break;
 
177
                        }
 
178
                } else if (token_type == T_END_HEREDOC) {
 
179
                        efree(token.value.str.val);
 
180
                }
 
181
                token.type = 0;
 
182
        }
 
183
        if (last_color != syntax_highlighter_ini->highlight_html) {
 
184
                zend_printf("</span>\n");
 
185
        }
 
186
        zend_printf("</span>\n");
 
187
        zend_printf("</code>");
 
188
}
 
189
 
 
190
 
 
191
 
 
192
ZEND_API void zend_strip(TSRMLS_D)
 
193
{
 
194
        zval token;
 
195
        int token_type;
 
196
        int prev_space = 0;
 
197
 
 
198
        token.type = 0;
 
199
        while ((token_type=lex_scan(&token TSRMLS_CC))) {
 
200
                switch (token_type) {
 
201
                        case T_WHITESPACE:
 
202
                                if (!prev_space) {
 
203
                                        zend_write(" ", sizeof(" ") - 1);
 
204
                                        prev_space = 1;
 
205
                                }
 
206
                                                /* lack of break; is intentional */
 
207
                        case T_COMMENT:
 
208
                        case T_DOC_COMMENT:
 
209
                                token.type = 0;
 
210
                                continue;
 
211
                        
 
212
                        case T_END_HEREDOC: {
 
213
                                        char *ptr = LANG_SCNG(yy_text);
 
214
 
 
215
                                        zend_write(ptr, LANG_SCNG(yy_leng) - 1);
 
216
                                        /* The ensure that we only write one ; and that it followed by the required newline */
 
217
                                        zend_write("\n", sizeof("\n") - 1);
 
218
                                        if (ptr[LANG_SCNG(yy_leng) - 1] == ';') {
 
219
                                                lex_scan(&token TSRMLS_CC);
 
220
                                        }
 
221
                                        efree(token.value.str.val);
 
222
                                }
 
223
                                break;
 
224
                        
 
225
                        default:
 
226
                                zend_write(LANG_SCNG(yy_text), LANG_SCNG(yy_leng));
 
227
                                break;
 
228
                }
 
229
 
 
230
                if (token.type == IS_STRING) {
 
231
                        switch (token_type) {
 
232
                                case T_OPEN_TAG:
 
233
                                case T_OPEN_TAG_WITH_ECHO:
 
234
                                case T_CLOSE_TAG:
 
235
                                case T_WHITESPACE:
 
236
                                case T_COMMENT:
 
237
                                case T_DOC_COMMENT:
 
238
                                        break;
 
239
 
 
240
                                default:
 
241
                                        efree(token.value.str.val);
 
242
                                        break;
 
243
                        }
 
244
                }
 
245
                prev_space = token.type = 0;
 
246
        }
 
247
}
 
248
 
 
249
/*
 
250
 * Local variables:
 
251
 * tab-width: 4
 
252
 * c-basic-offset: 4
 
253
 * indent-tabs-mode: t
 
254
 * End:
 
255
 */
 
256