projects/dil: trunk/src/cmd/Generate.d annotate

annotate trunk/src/cmd/Generate.d @ 581:61f9784aaf2a

Improved function getShortClassName().

author	Aziz K?ksal <aziz.koeksal@gmail.com>
date	Sat, 05 Jan 2008 18:40:10 +0100
parents	fa6d3c52757d
children	724603deed37

rev	line source
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	1 /++
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	2 Author: Aziz Köksal
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	3 License: GPL3
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	4 +/
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	5 module cmd.Generate;
578 c769bc239006 Moved Parser.d to new package 'parser'. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 576 diff changeset	6
580 fa6d3c52757d Moved SyntaxTree.d to new package 'ast'. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 578 diff changeset	7 import dil.ast.Node;
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	8 import dil.Token;
578 c769bc239006 Moved Parser.d to new package 'parser'. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 576 diff changeset	9 import dil.parser.Parser;
c769bc239006 Moved Parser.d to new package 'parser'. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 576 diff changeset	10 import dil.lexer.Lexer;
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	11 import dil.File;
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	12 import tango.io.Print;
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	13 import common;
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	14
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	15 enum DocOption
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	16 {
392 bb935c6f9b7a Applied fixes and improvements to the Lexer class. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 391 diff changeset	17 Empty,
bb935c6f9b7a Applied fixes and improvements to the Lexer class. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 391 diff changeset	18 Tokens = 1,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	19 Syntax = 1<<1,
392 bb935c6f9b7a Applied fixes and improvements to the Lexer class. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 391 diff changeset	20 HTML = 1<<2,
bb935c6f9b7a Applied fixes and improvements to the Lexer class. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 391 diff changeset	21 XML = 1<<3
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	22 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	23
364 1059295c2727 - Every command module has an execute method now. aziz parents: 363 diff changeset	24 void execute(string fileName, DocOption options)
1059295c2727 - Every command module has an execute method now. aziz parents: 363 diff changeset	25 {
392 bb935c6f9b7a Applied fixes and improvements to the Lexer class. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 391 diff changeset	26 assert(options != DocOption.Empty);
364 1059295c2727 - Every command module has an execute method now. aziz parents: 363 diff changeset	27 if (options & DocOption.Syntax)
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	28 syntaxToDoc(fileName, Stdout, options);
364 1059295c2727 - Every command module has an execute method now. aziz parents: 363 diff changeset	29 else
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	30 tokensToDoc(fileName, Stdout, options);
364 1059295c2727 - Every command module has an execute method now. aziz parents: 363 diff changeset	31 }
1059295c2727 - Every command module has an execute method now. aziz parents: 363 diff changeset	32
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	33 char[] xml_escape(char[] text)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	34 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	35 char[] result;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	36 foreach(c; text)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	37 switch(c)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	38 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	39 case '<': result ~= "<"; break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	40 case '>': result ~= ">"; break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	41 case '&': result ~= "&"; break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	42 default: result ~= c;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	43 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	44 return result;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	45 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	46
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	47
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	48 /// Find object in subject and return position.
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	49 /// Returns -1 if no match was found.
581 61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	50 /+int find(char[] subject, char[] object)
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	51 {
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	52 if (object.length > subject.length)
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	53 return -1;
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	54 foreach (i, c; subject)
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	55 {
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	56 if (c == object[0])
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	57 {
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	58 if (object.length > (subject.length - i))
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	59 return -1;
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	60 if (object == subject[i..i+object.length])
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	61 return i;
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	62 }
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	63 }
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	64 return -1;
581 61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	65 }+/
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	66
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	67 int rfind(char[] subject, char object)
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	68 {
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	69 foreach_reverse(i, c; subject)
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	70 if (c == object)
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	71 return i;
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	72 return -1;
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	73 }
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	74
581 61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	75 char[] getShortClassName(Node node)
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	76 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	77 static char[][] name_table;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	78 if (name_table is null)
581 61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	79 name_table = new char[][NodeKind.max+1]; // Create a new table.
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	80 // Look up in table.
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	81 char[] name = name_table[node.kind];
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	82 if (name !is null)
581 61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	83 return name; // Return cached name.
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	84
581 61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	85 name = node.classinfo.name;
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	86 name = name[rfind(name, '.')+1 .. $]; // Remove package and module name
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	87
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	88 uint suffixLength;
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	89 switch (node.category)
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	90 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	91 alias NodeCategory NC;
485 ea8c7459f1c4 Changed a lot of things in the Lexer. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 422 diff changeset	92 case NC.Declaration:
581 61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	93 if (node.kind == NodeKind.Declarations)
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	94 break;
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	95 suffixLength = "Declaration".length;
485 ea8c7459f1c4 Changed a lot of things in the Lexer. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 422 diff changeset	96 break;
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	97 case NC.Statement:
581 61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	98 if (node.kind == NodeKind.Statements)
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	99 break;
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	100 suffixLength = "Statement".length;
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	101 break;
581 61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	102 case NC.Expression:
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	103 suffixLength = "Expression".length;
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	104 break;
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	105 case NC.Type:
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	106 suffixLength = "Type".length;
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	107 break;
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	108 case NC.Other:
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	109 default:
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	110 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	111 // Remove common suffix.
581 61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	112 name = name[0 .. $ - suffixLength];
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	113 // Store the name in the table.
61f9784aaf2a Improved function getShortClassName(). Aziz K?ksal <aziz.koeksal@gmail.com> parents: 580 diff changeset	114 name_table[node.kind] = name;
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	115 return name;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	116 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	117
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	118 enum DocPart
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	119 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	120 Head,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	121 CompBegin,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	122 CompEnd,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	123 Error,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	124 SyntaxBegin,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	125 SyntaxEnd,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	126 SrcBegin,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	127 SrcEnd,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	128 Tail,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	129 // Tokens:
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	130 Identifier,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	131 Comment,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	132 StringLiteral,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	133 CharLiteral,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	134 Operator,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	135 LorG,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	136 LessEqual,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	137 GreaterEqual,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	138 AndLogical,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	139 OrLogical,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	140 NotEqual,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	141 Not,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	142 Number,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	143 Bracket,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	144 SpecialToken,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	145 Shebang,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	146 Keyword,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	147 HLineBegin,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	148 HLineEnd,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	149 Filespec,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	150 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	151
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	152 auto html_tags = [
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	153 // Head
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	154 `<html>`\n
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	155 `<head>`\n
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	156 `<meta http-equiv="Content-Type" content="text/html; charset=utf-8">`\n
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	157 `<link href="dil_html.css" rel="stylesheet" type="text/css">`\n
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	158 `</head>`\n
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	159 `<body>`[],
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	160 // CompBegin
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	161 `<div class="compilerinfo">`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	162 // CompEnd
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	163 `</div>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	164 // Error
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	165 `<p class="error {0}">{1}({2}){3}: {4}</p>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	166 // SyntaxBegin
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	167 `<span class="{0} {1}">`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	168 // SyntaxEnd
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	169 `</span>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	170 // SrcBegin
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	171 `<pre class="sourcecode">`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	172 // SrcEnd
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	173 `</pre>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	174 // Tail
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	175 `</html>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	176 // Identifier
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	177 `<span class="i">{0}</span>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	178 // Comment
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	179 `<span class="c{0}">{1}</span>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	180 // StringLiteral
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	181 `<span class="sl">{0}</span>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	182 // CharLiteral
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	183 `<span class="cl">{0}</span>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	184 // Operator
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	185 `<span class="op">{0}</span>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	186 // LorG
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	187 `<span class="oplg"><></span>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	188 // LessEqual
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	189 `<span class="ople"><=</span>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	190 // GreaterEqual
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	191 `<span class="opge">>=</span>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	192 // AndLogical
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	193 `<span class="opaa">&&</span>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	194 // OrLogical
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	195 `<span class="opoo">\|\|</span>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	196 // NotEqual
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	197 `<span class="opne">!=</span>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	198 // Not
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	199 `<span class="opn">!</span>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	200 // Number
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	201 `<span class="n">{0}</span>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	202 // Bracket
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	203 `<span class="br">{0}</span>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	204 // SpecialToken
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	205 `<span class="st">{0}</span>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	206 // Shebang
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	207 `<span class="shebang">{0}</span>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	208 // Keyword
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	209 `<span class="k">{0}</span>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	210 // HLineBegin
388 ae154eceba65 Applied some fixes to scanning and printing #line tokens. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 379 diff changeset	211 `<span class="hl">`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	212 // HLineEnd
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	213 "</span>",
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	214 // Filespec
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	215 `<span class="fs">{0}</span>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	216 ];
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	217
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	218 auto xml_tags = [
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	219 // Head
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	220 `<?xml version="1.0"?>`\n
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	221 `<?xml-stylesheet href="dil_xml.css" type="text/css"?>`\n
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	222 `<root>`[],
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	223 // CompBegin
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	224 `<compilerinfo>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	225 // CompEnd
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	226 `</compilerinfo>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	227 // Error
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	228 `<error t="{0}">{1}({2}){3}: {4}</error>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	229 // SyntaxBegin
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	230 `<{0} t="{1}">`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	231 // SyntaxEnd
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	232 `</{0}>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	233 // SrcBegin
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	234 `<sourcecode>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	235 // SrcEnd
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	236 `</sourcecode>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	237 // Tail
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	238 `</root>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	239 // Identifier
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	240 "<i>{0}</i>",
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	241 // Comment
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	242 `<c t="{0}">{1}</c>`,
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	243 // StringLiteral
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	244 "<sl>{0}</sl>",
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	245 // CharLiteral
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	246 "<cl>{0}</cl>",
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	247 // Operator
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	248 "<op>{0}</op>",
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	249 // LorG
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	250 `<op t="lg"><></op>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	251 // LessEqual
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	252 `<op t="le"><=</op>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	253 // GreaterEqual
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	254 `<op t="ge">>=</op>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	255 // AndLogical
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	256 `<op t="aa">&&</op>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	257 // OrLogical
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	258 `<op t="oo">\|\|</op>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	259 // NotEqual
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	260 `<op t="ne">!=</op>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	261 // Not
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	262 `<op t="n">!</op>`,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	263 // Number
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	264 "<n>{0}</n>",
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	265 // Bracket
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	266 "<br>{0}</br>",
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	267 // SpecialToken
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	268 "<st>{0}</st>",
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	269 // Shebang
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	270 "<shebang>{0}</shebang>",
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	271 // Keyword
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	272 "<k>{0}</k>",
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	273 // HLineBegin
388 ae154eceba65 Applied some fixes to scanning and printing #line tokens. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 379 diff changeset	274 "<hl>",
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	275 // HLineEnd
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	276 "</hl>",
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	277 // Filespec
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	278 "<fs>{0}</fs>",
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	279 ];
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	280
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	281 static assert(html_tags.length == DocPart.max+1);
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	282 static assert(xml_tags.length == DocPart.max+1);
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	283
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	284 void syntaxToDoc(string fileName, Print!(char) print, DocOption options)
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	285 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	286 auto tags = options & DocOption.HTML ? html_tags : xml_tags;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	287 auto sourceText = loadFile(fileName);
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	288 auto parser = new Parser(sourceText, fileName);
368 2adf808343d6 - Renamed method start() to init() in Parser. aziz parents: 364 diff changeset	289 auto root = parser.start();
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	290 auto lx = parser.lx;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	291
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	292 auto token = lx.head;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	293
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	294 print(tags[DocPart.Head]~\n);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	295 // Output error messages.
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	296 if (lx.errors.length \|\| parser.errors.length)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	297 {
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	298 print(tags[DocPart.CompBegin]~\n);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	299 foreach (error; lx.errors)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	300 {
422 ad7977fe315a Added support for column numbers in error messages. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 396 diff changeset	301 print.formatln(tags[DocPart.Error], "L", error.filePath, Format("{0},{1}", error.loc, error.col), "L", xml_escape(error.getMsg));
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	302 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	303 foreach (error; parser.errors)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	304 {
422 ad7977fe315a Added support for column numbers in error messages. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 396 diff changeset	305 print.formatln(tags[DocPart.Error], "P", error.filePath, Format("{0},{1}", error.loc, error.col), "P", xml_escape(error.getMsg));
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	306 }
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	307 print(tags[DocPart.CompEnd]~\n);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	308 }
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	309 print(tags[DocPart.SrcBegin]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	310
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	311 Node[][Token*] beginNodes, endNodes;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	312
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	313 void populateAAs(Node[] nodes)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	314 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	315 foreach (node; nodes)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	316 {
396 0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	317 assert(delegate bool(){
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	318 foreach (child; node.children)
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	319 if (child is null)
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	320 return false;
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	321 return true;
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	322 }() == true, Format("Node '{0}' has a null child", node.classinfo.name)
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	323 );
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	324 auto begin = node.begin;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	325 if (begin)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	326 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	327 auto end = node.end;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	328 assert(end);
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	329 beginNodes[begin] ~= node;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	330 endNodes[end] ~= node;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	331 }
396 0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	332
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	333 if (node.children.length)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	334 populateAAs(node.children);
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	335 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	336 }
396 0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	337 assert(delegate bool(){
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	338 foreach (child; root.children)
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	339 if (child is null)
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	340 return false;
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	341 return true;
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	342 }() == true, Format("Root node has a null child")
0a4619735ce9 Applied fixes to Lexer, Parser and other classes. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 394 diff changeset	343 );
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	344 populateAAs(root.children);
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	345
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	346 char[] getTag(NodeCategory nc)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	347 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	348 char[] tag;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	349 switch (nc)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	350 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	351 alias NodeCategory NC;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	352 case NC.Declaration: tag = "d"; break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	353 case NC.Statement: tag = "s"; break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	354 case NC.Expression: tag = "e"; break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	355 case NC.Type: tag = "t"; break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	356 case NC.Other: tag = "o"; break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	357 default:
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	358 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	359 return tag;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	360 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	361
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	362 // Traverse linked list and print tokens.
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	363 while (token.type != TOK.EOF)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	364 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	365 token = token.next;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	366
394 6440da4adb07 Fixed forward references of enum MID complaints by compiler. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 392 diff changeset	367 // Print whitespace.
6440da4adb07 Fixed forward references of enum MID complaints by compiler. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 392 diff changeset	368 if (token.ws)
6440da4adb07 Fixed forward references of enum MID complaints by compiler. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 392 diff changeset	369 print(token.ws[0..token.start - token.ws]);
6440da4adb07 Fixed forward references of enum MID complaints by compiler. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 392 diff changeset	370
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	371 Node[]* nodes = token in beginNodes;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	372
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	373 if (nodes)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	374 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	375 foreach (node; *nodes)
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	376 print.format(tags[DocPart.SyntaxBegin], getTag(node.category), getShortClassName(node));
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	377 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	378
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	379 printToken(token, tags, print);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	380
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	381 nodes = token in endNodes;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	382
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	383 if (nodes)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	384 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	385 foreach_reverse (node; *nodes)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	386 if (options & DocOption.HTML)
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	387 print(tags[DocPart.SyntaxEnd]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	388 else
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	389 print.format(tags[DocPart.SyntaxEnd], getTag(node.category));
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	390 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	391 }
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	392 print(\n~tags[DocPart.SrcEnd])(\n~tags[DocPart.Tail]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	393 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	394
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	395 void tokensToDoc(string fileName, Print!(char) print, DocOption options)
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	396 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	397 auto tags = options & DocOption.HTML ? html_tags : xml_tags;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	398 auto sourceText = loadFile(fileName);
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	399 auto lx = new Lexer(sourceText, fileName);
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	400
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	401 auto token = lx.getTokens();
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	402
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	403 print(tags[DocPart.Head]~\n);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	404
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	405 if (lx.errors.length)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	406 {
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	407 print(tags[DocPart.CompBegin]~\n);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	408 foreach (error; lx.errors)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	409 {
422 ad7977fe315a Added support for column numbers in error messages. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 396 diff changeset	410 print.formatln(tags[DocPart.Error], "L", error.filePath, Format("{0},{1}", error.loc, error.col), "L", xml_escape(error.getMsg));
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	411 }
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	412 print(tags[DocPart.CompEnd]~\n);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	413 }
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	414 print(tags[DocPart.SrcBegin]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	415
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	416 // Traverse linked list and print tokens.
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	417 while (token.type != TOK.EOF)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	418 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	419 token = token.next;
394 6440da4adb07 Fixed forward references of enum MID complaints by compiler. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 392 diff changeset	420 // Print whitespace.
6440da4adb07 Fixed forward references of enum MID complaints by compiler. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 392 diff changeset	421 if (token.ws)
6440da4adb07 Fixed forward references of enum MID complaints by compiler. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 392 diff changeset	422 print(token.ws[0..token.start - token.ws]);
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	423 printToken(token, tags, print);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	424 }
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	425 print(\n~tags[DocPart.SrcEnd])(\n~tags[DocPart.Tail]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	426 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	427
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	428 void printToken(Token* token, string[] tags, Print!(char) print)
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	429 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	430 alias DocPart DP;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	431 string srcText = xml_escape(token.srcText);
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	432
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	433 switch(token.type)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	434 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	435 case TOK.Identifier:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	436 print.format(tags[DP.Identifier], srcText);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	437 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	438 case TOK.Comment:
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	439 string t;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	440 switch (token.start[1])
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	441 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	442 case '/': t = "l"; break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	443 case '*': t = "b"; break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	444 case '+': t = "n"; break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	445 default:
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	446 assert(0);
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	447 }
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	448 print.format(tags[DP.Comment], t, srcText);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	449 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	450 case TOK.String:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	451 print.format(tags[DP.StringLiteral], srcText);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	452 break;
507 996041463028 Removed TOK.WCharLiteral and TOK.DCharLiteral. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 485 diff changeset	453 case TOK.CharLiteral:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	454 print.format(tags[DP.CharLiteral], srcText);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	455 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	456 case TOK.Assign, TOK.Equal,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	457 TOK.Less, TOK.Greater,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	458 TOK.LShiftAssign, TOK.LShift,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	459 TOK.RShiftAssign, TOK.RShift,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	460 TOK.URShiftAssign, TOK.URShift,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	461 TOK.OrAssign, TOK.OrBinary,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	462 TOK.AndAssign, TOK.AndBinary,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	463 TOK.PlusAssign, TOK.PlusPlus, TOK.Plus,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	464 TOK.MinusAssign, TOK.MinusMinus, TOK.Minus,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	465 TOK.DivAssign, TOK.Div,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	466 TOK.MulAssign, TOK.Mul,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	467 TOK.ModAssign, TOK.Mod,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	468 TOK.XorAssign, TOK.Xor,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	469 TOK.CatAssign,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	470 TOK.Tilde,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	471 TOK.Unordered,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	472 TOK.UorE,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	473 TOK.UorG,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	474 TOK.UorGorE,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	475 TOK.UorL,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	476 TOK.UorLorE,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	477 TOK.LorEorG:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	478 print.format(tags[DP.Operator], srcText);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	479 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	480 case TOK.LorG:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	481 print(tags[DP.LorG]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	482 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	483 case TOK.LessEqual:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	484 print(tags[DP.LessEqual]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	485 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	486 case TOK.GreaterEqual:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	487 print(tags[DP.GreaterEqual]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	488 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	489 case TOK.AndLogical:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	490 print(tags[DP.AndLogical]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	491 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	492 case TOK.OrLogical:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	493 print(tags[DP.OrLogical]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	494 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	495 case TOK.NotEqual:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	496 print(tags[DP.NotEqual]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	497 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	498 case TOK.Not:
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	499 // Check if this is part of a template instantiation.
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	500 // TODO: comments aren't skipped. Use Token.nextNWS and Token.prevNWS
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	501 if (token.prev.type == TOK.Identifier && token.next.type == TOK.LParen)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	502 goto default;
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	503 print(tags[DP.Not]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	504 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	505 case TOK.Int32, TOK.Int64, TOK.Uint32, TOK.Uint64,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	506 TOK.Float32, TOK.Float64, TOK.Float80,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	507 TOK.Imaginary32, TOK.Imaginary64, TOK.Imaginary80:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	508 print.format(tags[DP.Number], srcText);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	509 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	510 case TOK.LParen, TOK.RParen, TOK.LBracket,
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	511 TOK.RBracket, TOK.LBrace, TOK.RBrace:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	512 print.format(tags[DP.Bracket], srcText);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	513 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	514 case TOK.Shebang:
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	515 print.format(tags[DP.Shebang], srcText);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	516 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	517 case TOK.HashLine:
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	518 void printWS(char* start, char* end)
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	519 {
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	520 if (start != end)
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	521 print(start[0 .. end - start]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	522 }
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	523 print(tags[DP.HLineBegin]);
485 ea8c7459f1c4 Changed a lot of things in the Lexer. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 422 diff changeset	524 auto num = token.tokLineNum;
388 ae154eceba65 Applied some fixes to scanning and printing #line tokens. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 379 diff changeset	525 if (num is null)
ae154eceba65 Applied some fixes to scanning and printing #line tokens. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 379 diff changeset	526 {
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	527 print(token.srcText);
33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	528 print(tags[DP.HLineEnd]);
388 ae154eceba65 Applied some fixes to scanning and printing #line tokens. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 379 diff changeset	529 break;
ae154eceba65 Applied some fixes to scanning and printing #line tokens. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 379 diff changeset	530 }
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	531 // Print whitespace between #line and number
388 ae154eceba65 Applied some fixes to scanning and printing #line tokens. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 379 diff changeset	532 auto ptr = token.start;
ae154eceba65 Applied some fixes to scanning and printing #line tokens. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 379 diff changeset	533 printWS(ptr, num.start); // prints "#line" as well
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	534 printToken(num, tags, print);
485 ea8c7459f1c4 Changed a lot of things in the Lexer. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 422 diff changeset	535 if (token.tokLineFilespec)
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	536 {
485 ea8c7459f1c4 Changed a lot of things in the Lexer. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 422 diff changeset	537 auto filespec = token.tokLineFilespec;
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	538 // Print whitespace between number and filespec
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	539 printWS(num.end, filespec.start);
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	540 print.format(tags[DP.Filespec], xml_escape(filespec.srcText));
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	541
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	542 ptr = filespec.end;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	543 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	544 else
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	545 ptr = num.end;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	546 // Print remaining whitespace
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	547 printWS(ptr, token.end);
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	548 print(tags[DP.HLineEnd]);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	549 break;
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	550 default:
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	551 if (token.isKeyword())
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	552 print.format(tags[DP.Keyword], srcText);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	553 else if (token.isSpecialToken)
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	554 print.format(tags[DP.SpecialToken], srcText);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	555 else
391 33b566df6af4 Migrated project to Tango. Aziz K?ksal <aziz.koeksal@gmail.com> parents: 390 diff changeset	556 print(srcText);
363 2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	557 }
2b387a3c6b58 - Added package cmd. aziz parents: diff changeset	558 }

Mercurial > projects > dil

annotate trunk/src/cmd/Generate.d @ 581:61f9784aaf2a