ILIAS  Release_4_3_x_branch Revision 61807
 All Data Structures Namespaces Files Functions Variables Groups Pages
HFile_vbdotnet.php
Go to the documentation of this file.
1 <?php
2 
3 $BEAUT_PATH = realpath(".")."/Services/COPage/syntax_highlight/php";
4 if (!isset ($BEAUT_PATH)) return;
5 require_once("$BEAUT_PATH/Beautifier/HFile.php");
6  class HFile_vbdotnet extends HFile{
7  function HFile_vbdotnet(){
8  $this->HFile();
9 
10 /*************************************/
11 // Beautifier Highlighting Configuration File
12 // VB.NET
13 /*************************************/
14 // Flags
15 
16 $this->nocase = "1";
17 $this->notrim = "0";
18 $this->perl = "0";
19 
20 // Colours
21 
22 $this->colours = array("blue", "gray", "purple", "gray", "brown", "blue", "purple", "brown");
23 $this->quotecolour = "blue";
24 $this->blockcommentcolour = "green";
25 $this->linecommentcolour = "green";
26 
27 // Indent Strings
28 
29 $this->indent = array("Public Sub", "Private Sub", "Sub", "Public Class", "Private Class", "Public Module", "Try");
30 $this->unindent = array("End Sub", "End Class", "End Module", "End Try");
31 
32 // String characters and delimiters
33 
34 $this->stringchars = array("\"");
35 $this->delimiters = array("~", "!", "@", "%", "^", "&", "*", "(", ")", "-", "+", "=", "|", "\\", "/", "{", "}", "[", "]", ":", ";", "\"", "'", "<", ">", " ", ",", " ", ".", "?");
36 $this->escchar = "";
37 
38 // Comment settings
39 
40 $this->linecommenton = array("'");
41 $this->blockcommenton = array("");
42 $this->blockcommentoff = array("");
43 
44 // Keywords (keyword mapping to colour number)
45 
46 $this->keywords = array(
47  "3DDKSHADOW" => "1",
48  "3DHIGHLIGHT" => "1",
49  "3DLIGHT" => "1",
50  "ABORT" => "1",
51  "ABORTRETRYIGNORE" => "1",
52  "ACTIVEBORDER" => "1",
53  "ACTIVETITLEBAR" => "1",
54  "ALIAS" => "1",
55  "APPLICATIONMODAL" => "1",
56  "APPLICATIONWORKSPACE" => "1",
57  "ARCHIVE" => "1",
58  "BACK" => "1",
59  "BINARYCOMPARE" => "1",
60  "BLACK" => "1",
61  "BLUE" => "1",
62  "BUTTONFACE" => "1",
63  "BUTTONSHADOW" => "1",
64  "BUTTONTEXT" => "1",
65  "CANCEL" => "1",
66  "CDROM" => "1",
67  "CR" => "1",
68  "CRITICAL" => "1",
69  "CRLF" => "1",
70  "CYAN" => "1",
71  "DEFAULT" => "1",
72  "DEFAULTBUTTON1" => "1",
73  "DEFAULTBUTTON2" => "1",
74  "DEFAULTBUTTON3" => "1",
75  "DESKTOP" => "1",
76  "DIRECTORY" => "1",
77  "EXCLAMATION" => "1",
78  "FALSE" => "1",
79  "FIXED" => "1",
80  "FORAPPENDING" => "1",
81  "FORMFEED" => "1",
82  "FORREADING" => "1",
83  "FORWRITING" => "1",
84  "FROMUNICODE" => "1",
85  "GRAYTEXT" => "1",
86  "GREEN" => "1",
87  "HIDDEN" => "1",
88  "HIDE" => "1",
89  "HIGHLIGHT" => "1",
90  "HIGHLIGHTTEXT" => "1",
91  "HIRAGANA" => "1",
92  "IGNORE" => "1",
93  "INACTIVEBORDER" => "1",
94  "INACTIVECAPTIONTEXT" => "1",
95  "INACTIVETITLEBAR" => "1",
96  "INFOBACKGROUND" => "1",
97  "INFORMATION" => "1",
98  "INFOTEXT" => "1",
99  "KATAKANA" => "1",
100  "LF" => "1",
101  "LOWERCASE" => "1",
102  "MAGENTA" => "1",
103  "MAXIMIZEDFOCUS" => "1",
104  "MENUBAR" => "1",
105  "MENUTEXT" => "1",
106  "METHOD" => "1",
107  "MINIMIZEDFOCUS" => "1",
108  "MINIMIZEDNOFOCUS" => "1",
109  "MSGBOXRIGHT" => "1",
110  "MSGBOXRTLREADING" => "1",
111  "MSGBOXSETFOREGROUND" => "1",
112  "NARROW" => "1",
113  "NEWLINE" => "1",
114  "NO" => "1",
115  "NORMAL" => "1",
116  "NORMALFOCUS" => "1",
117  "NORMALNOFOCUS" => "1",
118  "NULLSTRING" => "1",
119  "OBJECTERROR" => "1",
120  "OK" => "1",
121  "OKCANCEL" => "1",
122  "OKONLY" => "1",
123  "PROPERCASE" => "1",
124  "QUESTION" => "1",
125  "RAMDISK" => "1",
126  "READONLY" => "1",
127  "RED" => "1",
128  "REMOTE" => "1",
129  "REMOVABLE" => "1",
130  "RETRY" => "1",
131  "RETRYCANCEL" => "1",
132  "SCROLLBARS" => "1",
133  "SYSTEMFOLDER" => "1",
134  "SYSTEMMODAL" => "1",
135  "TAB" => "7",
136  "TEMPORARYFOLDER" => "1",
137  "TEXTCOMPARE" => "1",
138  "TITLEBARTEXT" => "1",
139  "TRUE" => "1",
140  "UNICODE" => "1",
141  "UNKNOWN" => "1",
142  "UPPERCASE" => "1",
143  "VERTICALTAB" => "1",
144  "VOLUME" => "1",
145  "WHITE" => "1",
146  "WIDE" => "1",
147  "WIN16" => "1",
148  "WIN32" => "1",
149  "WINDOWBACKGROUND" => "1",
150  "WINDOWFRAME" => "1",
151  "WINDOWSFOLDER" => "1",
152  "WINDOWTEXT" => "1",
153  "YELLOW" => "1",
154  "YES" => "1",
155  "YESNO" => "1",
156  "YESNOCANCEL" => "1",
157  "BOOLEAN" => "2",
158  "BYTE" => "2",
159  "DATE" => "2",
160  "DECIMIAL" => "2",
161  "DOUBLE" => "2",
162  "INTEGER" => "2",
163  "LONG" => "2",
164  "OBJECT" => "2",
165  "SINGLE" => "2",
166  "STRING" => "2",
167  "As" => "3",
168  "ADDHANDLER" => "3",
169  "ASSEMBLY" => "3",
170  "AUTO" => "3",
171  "Binary" => "3",
172  "ByRef" => "3",
173  "ByVal" => "3",
174  "BEGINEPILOGUE" => "3",
175  "Else" => "3",
176  "Empty" => "3",
177  "Error" => "3",
178  "ENDPROLOGUE" => "3",
179  "EXTERNALSOURCE" => "3",
180  "ENVIRON" => "3",
181  "For" => "3",
182  "Friend" => "3",
183  "GET" => "3",
184  "HANDLES" => "3",
185  "Input" => "3",
186  "Is" => "3",
187  "Len" => "3",
188  "Lock" => "3",
189  "Me" => "3",
190  "Mid" => "3",
191  "MUSTINHERIT" => "3",
192  "MYBASE" => "3",
193  "MYCLASS" => "3",
194  "New" => "3",
195  "Next" => "3",
196  "Nothing" => "3",
197  "Null" => "3",
198  "NOTINHERITABLE" => "3",
199  "NOTOVERRIDABLE" => "3",
200  "OFF" => "3",
201  "On" => "3",
202  "Option" => "3",
203  "Optional" => "3",
204  "OVERRIDABLE" => "3",
205  "ParamArray" => "3",
206  "Print" => "3",
207  "Private" => "3",
208  "Property" => "3",
209  "Public" => "3",
210  "Resume" => "3",
211  "Seek" => "3",
212  "Static" => "3",
213  "Step" => "3",
214  "String" => "3",
215  "SHELL" => "3",
216  "SENDKEYS" => "3",
217  "SET" => "3",
218  "Then" => "3",
219  "Time" => "3",
220  "To" => "3",
221  "THROW" => "3",
222  "WithEvents" => "3",
223  "COLLECTION" => "4",
224  "DEBUG" => "4",
225  "DICTIONARY" => "4",
226  "DRIVE" => "4",
227  "DRIVES" => "4",
228  "ERR" => "4",
229  "FILE" => "4",
230  "FILES" => "4",
231  "FILESYSTEMOBJECT" => "4",
232  "FOLDER" => "4",
233  "FOLDERS" => "4",
234  "TEXTSTREAM" => "4",
235  "&" => "5",
236  "&=" => "5",
237  "*" => "5",
238  "*=" => "5",
239  "+" => "5",
240  "+=" => "5",
241  "-" => "5",
242  "-=" => "5",
243  "//" => "5",
244  "/" => "5",
245  "/=" => "5",
246  "=" => "5",
247  "\\" => "5",
248  "\\=" => "5",
249  "^" => "5",
250  "^=" => "5",
251  "ADDRESSOF" => "5",
252  "AND" => "5",
253  "BITAND" => "5",
254  "BITNOT" => "5",
255  "BITOR" => "5",
256  "BITXOR" => "5",
257  "GETTYPE" => "5",
258  "LIKE" => "5",
259  "MOD" => "5",
260  "NOT" => "5",
261  "OR" => "5",
262  "XOR" => "5",
263  "APPACTIVATE" => "6",
264  "BEEP" => "6",
265  "CALL" => "6",
266  "CHDIR" => "6",
267  "CHDRIVE" => "6",
268  "CLASS" => "6",
269  "CASE" => "6",
270  "CATCH" => "6",
271  "DECLARE" => "6",
272  "DELEGATE" => "6",
273  "DELETESETTING" => "6",
274  "DIM" => "6",
275  "DO" => "6",
276  "DOEVENTS" => "6",
277  "END" => "6",
278  "ENUM" => "6",
279  "EVENT" => "6",
280  "EXIT" => "6",
281  "EACH" => "6",
282  "FUNCTION" => "6",
283  "FINALLY" => "6",
284  "IF" => "6",
285  "IMPORTS" => "6",
286  "INHERITS" => "6",
287  "INTERFACE" => "6",
288  "IMPLEMENTS" => "6",
289  "KILL" => "6",
290  "LOOP" => "6",
291  "MIDB" => "7",
292  "MODULE" => "6",
293  "NAMESPACE" => "6",
294  "OPEN" => "6",
295  "PUT" => "6",
296  "RAISEEVENT" => "6",
297  "RANDOMIZE" => "6",
298  "REDIM" => "6",
299  "REM" => "6",
300  "RESET" => "6",
301  "SAVESETTING" => "6",
302  "SELECT" => "6",
303  "SETATTR" => "6",
304  "STOP" => "6",
305  "SUB" => "6",
306  "SYNCLOCK" => "6",
307  "STRUCTURE" => "6",
308  "SHADOWS" => "6",
309  "SWITCH" => "6",
310  "TIMEOFDAY" => "7",
311  "TODAY" => "7",
312  "TRY" => "6",
313  "WIDTH" => "6",
314  "WITH" => "6",
315  "WRITE" => "6",
316  "WHILE" => "6",
317  "ABS" => "7",
318  "ARRAY" => "7",
319  "ASC" => "7",
320  "ASCB" => "7",
321  "ASCW" => "7",
322  "CALLBYNAME" => "7",
323  "CBOOL" => "7",
324  "CBYTE" => "7",
325  "CCHAR" => "7",
326  "CCHR" => "7",
327  "CDATE" => "7",
328  "CDBL" => "7",
329  "CDEC" => "7",
330  "CHOOSE" => "7",
331  "CHR" => "7",
332  "CHR$" => "7",
333  "CHRB" => "7",
334  "CHRB$" => "7",
335  "CHRW" => "7",
336  "CINT" => "7",
337  "CLNG" => "7",
338  "CLNG8" => "7",
339  "CLOSE" => "7",
340  "COBJ" => "7",
341  "COMMAND" => "7",
342  "COMMAND$" => "7",
343  "CONVERSION" => "7",
344  "COS" => "7",
345  "CREATEOBJECT" => "7",
346  "CSHORT" => "7",
347  "CSTR" => "7",
348  "CURDIR" => "7",
349  "CTYPE" => "7",
350  "CVDATE" => "7",
351  "DATEADD" => "7",
352  "DATEDIFF" => "7",
353  "DATEPART" => "7",
354  "DATESERIAL" => "7",
355  "DATEVALUE" => "7",
356  "DAY" => "7",
357  "DDB" => "7",
358  "DIR" => "7",
359  "DIR$" => "7",
360  "EOF" => "7",
361  "ERROR$" => "7",
362  "EXP" => "7",
363  "FILEATTR" => "7",
364  "FILECOPY" => "7",
365  "FILEDATATIME" => "7",
366  "FILELEN" => "7",
367  "FILTER" => "7",
368  "FIX" => "7",
369  "FORMAT" => "7",
370  "FORMAT$" => "7",
371  "FORMATCURRENCY" => "7",
372  "FORMATDATETIME" => "7",
373  "FORMATNUMBER" => "7",
374  "FORMATPERCENT" => "7",
375  "FREEFILE" => "7",
376  "FV" => "7",
377  "GETALLSETTINGS" => "7",
378  "GETATTRGETOBJECT" => "7",
379  "GETSETTING" => "7",
380  "HEX" => "7",
381  "HEX$" => "7",
382  "HOUR" => "7",
383  "IIF" => "7",
384  "IMESTATUS" => "7",
385  "INPUT$" => "7",
386  "INPUTB" => "7",
387  "INPUTB$" => "7",
388  "INPUTBOX" => "7",
389  "INSTR" => "7",
390  "INSTRB" => "7",
391  "INSTRREV" => "7",
392  "INT" => "7",
393  "IPMT" => "7",
394  "IRR" => "7",
395  "ISARRAY" => "7",
396  "ISDATE" => "7",
397  "ISEMPTY" => "7",
398  "ISERROR" => "7",
399  "ISNULL" => "7",
400  "ISNUMERIC" => "7",
401  "ISOBJECT" => "7",
402  "JOIN" => "7",
403  "LBOUND" => "7",
404  "LCASE" => "7",
405  "LCASE$" => "7",
406  "LEFT" => "7",
407  "LEFT$" => "7",
408  "LEFTB" => "7",
409  "LEFTB$" => "7",
410  "LENB" => "7",
411  "LINEINPUT" => "7",
412  "LOC" => "7",
413  "LOF" => "7",
414  "LOG" => "7",
415  "LTRIM" => "7",
416  "LTRIM$" => "7",
417  "MID$" => "7",
418  "MIDB$" => "7",
419  "MINUTE" => "7",
420  "MIRR" => "7",
421  "MKDIR" => "7",
422  "MONTH" => "7",
423  "MONTHNAME" => "7",
424  "MSGBOX" => "7",
425  "NOW" => "7",
426  "NPER" => "7",
427  "NPV" => "7",
428  "OCT" => "7",
429  "OCT$" => "7",
430  "PARTITION" => "7",
431  "PMT" => "7",
432  "PPMT" => "7",
433  "PV" => "7",
434  "RATE" => "7",
435  "REPLACE" => "7",
436  "RIGHT" => "7",
437  "RIGHT$" => "7",
438  "RIGHTB" => "7",
439  "RIGHTB$" => "7",
440  "RMDIR" => "7",
441  "RND" => "7",
442  "RTRIM" => "7",
443  "RTRIM$" => "7",
444  "SECOND" => "7",
445  "SIN" => "7",
446  "SLN" => "7",
447  "SPACE" => "7",
448  "SPACE$" => "7",
449  "SPC" => "7",
450  "SPLIT" => "7",
451  "STR" => "7",
452  "STR$" => "7",
453  "STRCOMP" => "7",
454  "STRCONV" => "7",
455  "STRING$" => "7",
456  "STRREVERSE" => "7",
457  "SYD" => "7",
458  "TAN" => "7",
459  "TIMER" => "7",
460  "TIMESERIAL" => "7",
461  "TIMEVALUE" => "7",
462  "TRIM" => "7",
463  "TRIM$" => "7",
464  "TYPENAME" => "7",
465  "UBOUND" => "7",
466  "UCASE" => "7",
467  "UCASE$" => "7",
468  "VAL" => "7",
469  "WEEKDAY" => "7",
470  "WEEKDAYNAME" => "7",
471  "YEAR" => "7",
472  "ANY" => "8",
473  "ATN" => "8",
474  "CALENDAR" => "8",
475  "CIRCLE" => "8",
476  "CURRENCY" => "8",
477  "DEFBOOL" => "8",
478  "DEFBYTE" => "8",
479  "DEFCUR" => "8",
480  "DEFDATE" => "8",
481  "DEFDBL" => "8",
482  "DEFDEC" => "8",
483  "DEFINT" => "8",
484  "DEFLNG" => "8",
485  "DEFOBJ" => "8",
486  "DEFSNG" => "8",
487  "DEFSTR" => "8",
488  "DEFVAR" => "8",
489  "EQV" => "8",
490  "GOSUB" => "8",
491  "IMP" => "8",
492  "INITIALIZE" => "8",
493  "ISMISSING" => "8",
494  "LET" => "8",
495  "LINE" => "8",
496  "LSET" => "8",
497  "RSET" => "8",
498  "SGN" => "8",
499  "SQR" => "8",
500  "TERMINATE" => "8",
501  "VARIANT" => "8",
502  "VARTYPE" => "8",
503  "WEND" => "8");
504 
505 // Special extensions
506 
507 // Each category can specify a PHP function that returns an altered
508 // version of the keyword.
509 
510 
511 
512 $this->linkscripts = array(
513  "1" => "donothing",
514  "7" => "donothing",
515  "2" => "donothing",
516  "3" => "donothing",
517  "4" => "donothing",
518  "5" => "donothing",
519  "6" => "donothing",
520  "8" => "donothing");
521 }
522 
523 
524 
525 function donothing($keywordin)
526 {
527  return $keywordin;
528 }
529 
530 }
531 
532 ?>