annotate trunk/src/cmd/Statistics.d @ 363:2b387a3c6b58

- Added package cmd. - Moved code from main.d to cmd.Generate. - Added command stats/statistics (implemented in cmd.Statistics.)
author aziz
date Thu, 30 Aug 2007 12:02:04 +0000
parents
children 1059295c2727
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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.Statistics;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
6 import dil.Token;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
7 import dil.File;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
8 import dil.Lexer;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
9 import std.stdio;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
10
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
11 struct Statistics
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
12 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
13 uint whitespaceCount;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
14 uint wsTokenCount;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
15 uint keywordCount;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
16 uint identCount;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
17 uint numberCount;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
18 uint commentCount;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
19 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
20
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
21 void statistics(string fileName)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
22 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
23 auto sourceText = loadFile(fileName);
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
24 auto lx = new Lexer(sourceText, fileName);
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
25
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
26 auto token = lx.getTokens();
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
27 char* end = lx.text.ptr;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
28
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
29 Statistics stats;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
30 // Traverse linked list.
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
31 while (token.type != TOK.EOF)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
32 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
33 token = token.next;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
34
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
35 // Count whitespace characters
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
36 if (end != token.start)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
37 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
38 stats.whitespaceCount += token.start - end;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
39 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
40
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
41 switch (token.type)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
42 {
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
43 case TOK.Identifier:
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
44 stats.identCount++;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
45 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
46 case TOK.Comment:
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
47 stats.commentCount++;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
48 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
49 case TOK.Int32, TOK.Int64, TOK.Uint32, TOK.Uint64,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
50 TOK.Float32, TOK.Float64, TOK.Float80,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
51 TOK.Imaginary32, TOK.Imaginary64, TOK.Imaginary80:
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
52 stats.numberCount++;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
53 break;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
54 default:
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
55 if (token.isKeyword)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
56 stats.keywordCount++;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
57 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
58
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
59 if (token.isWhitespace)
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
60 stats.wsTokenCount++;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
61
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
62 end = token.end;
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
63 }
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
64 writefln("Whitespace character count: %s\n"
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
65 "Whitespace token count: %s\n"
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
66 "Keyword count: %s\n"
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
67 "Identifier count: %s\n"
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
68 "Number count: %s\n"
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
69 "Comment count: %s\n"
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
70 "Lines of code: %s",
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
71 stats.whitespaceCount,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
72 stats.wsTokenCount,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
73 stats.keywordCount,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
74 stats.identCount,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
75 stats.numberCount,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
76 stats.commentCount,
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
77 lx.loc);
2b387a3c6b58 - Added package cmd.
aziz
parents:
diff changeset
78 }