Slide T04: Dùng DFA để phân tích từ vựng

1 bình luận cho Slide T04: Dùng DFA để phân tích từ vựng

• 

  26/07/2016 - 09:24

  admin  says:

  Mã nguồn bài phân tích từ vựng trên lớp

  C#

  using System; using System.Collections.Generic; // định nghĩa các từ loại của bộ PTTV enum WordType { TYPE_EOF, // loại kết thúc đầu vào TYPE_ERROR, // loại đầu vào lỗi TYPE_SPACE, // dấu trống, tab,... TYPE_EQ, // dấu bằng TYPE_VAR, // tên biến TYPE_INTEGER, // số nguyên TYPE_OPERATOR, // phép toán TYPE_PARETHESIS // ngoặc } // lớp chứa thông tin của 1 từ class Word { public WordType wordType; // chứa từ loại của từ public string wordContent; // chứa nội dung của từ public Word(WordType t, string c) { wordType = t; wordContent = c; } } // lớp automata thực hiện PTTV class PTTV { string input; int pos; public List<Word> process(string a) { List<Word> list = new List<Word>(); input = a; pos = 0; do { Word x = getNextWord(); list.Add(x); if (x.wordType == WordType.TYPE_EOF) break; if (x.wordType == WordType.TYPE_ERROR) break; pos += x.wordContent.Length; } while (true); return list; } // lấy ra từ tiếp theo Word getNextWord() { Word x = new Word(WordType.TYPE_EOF, ""); if (pos >= input.Length) return x; x = nextIsSpace(); if (x != null) return x; x = nextIsEq(); if (x != null) return x; x = nextIsOperator(); if (x != null) return x; x = nextIsVar(); if (x != null) return x; x = new Word(WordType.TYPE_ERROR, ""); return x; } // từ tiếp theo có phải kí hiệu trống, tab,...? Word nextIsSpace() { if (input[pos]==' ') return new Word(WordType.TYPE_SPACE, " "); return null; } // từ tiếp theo có phải dấu bằng Word nextIsEq() { if (input[pos]=='=') return new Word(WordType.TYPE_EQ, "="); return null; } // từ tiếp theo có phải kí hiệu phép toán? Word nextIsOperator() { if ((input[pos]=='+') || (input[pos]=='-') || (input[pos]=='*') || (input[pos]=='/') || (input[pos]=='%')) return new Word(WordType.TYPE_OPERATOR, "" + input[pos]); return null; } bool isLetter(char x) { return ((x >= 'a') && (x <= 'z')) || ((x >= 'A') && (x <= 'Z')); } bool isDigit(char x) { return (x >= '0') && (x <= '9'); } // từ tiếp theo có phải tên biến? Word nextIsVar() { if (!isLetter(input[pos])) return null; string x = "" + input[pos]; for (int i = pos+1; i < input.Length; i++) { if (!isLetter(input[i]) && !isDigit(input[i])) break; x += input[i]; } if (x.Length > 0) return new Word(WordType.TYPE_VAR, x); return null; } } // hàm chính thử nghiệm bộ PTTV class MyApp { public static void Main() { string str = "abc=a+bc"; PTTV scanner = new PTTV(); List<Word> x = scanner.process(str); Console.WriteLine("Input string = {0}\n", str); foreach (Word w in x) Console.WriteLine("{0}: {1}", w.wordType, w.wordContent); } }

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103

  using System; using System.Collections.Generic;   // định nghĩa các từ loại của bộ PTTV enum WordType {     TYPE_EOF,        // loại kết thúc đầu vào     TYPE_ERROR,      // loại đầu vào lỗi     TYPE_SPACE,      // dấu trống, tab,...     TYPE_EQ,         // dấu bằng     TYPE_VAR,        // tên biến     TYPE_INTEGER,    // số nguyên     TYPE_OPERATOR,   // phép toán     TYPE_PARETHESIS  // ngoặc } // lớp chứa thông tin của 1 từ class Word {     public WordType wordType;             // chứa từ loại của từ     public string wordContent;            // chứa nội dung của từ     public Word(WordType t, string c) {         wordType = t; wordContent = c;     } } // lớp automata thực hiện PTTV class PTTV {     string input;     int pos;     public List<Word> process(string a) {         List<Word> list = new List<Word>();         input = a;         pos = 0;         do {             Word x = getNextWord();             list.Add(x);             if (x.wordType == WordType.TYPE_EOF) break;             if (x.wordType == WordType.TYPE_ERROR) break;             pos += x.wordContent.Length;         } while (true);         return list;     }     // lấy ra từ tiếp theo     Word getNextWord() {         Word x = new Word(WordType.TYPE_EOF, "");         if (pos >= input.Length) return x;         x = nextIsSpace();         if (x != null) return x;         x = nextIsEq();         if (x != null) return x;                 x = nextIsOperator();         if (x != null) return x;         x = nextIsVar();         if (x != null) return x;         x = new Word(WordType.TYPE_ERROR, "");         return x;     }    // từ tiếp theo có phải kí hiệu trống, tab,...?    Word nextIsSpace() {       if (input[pos]==' ') return new Word(WordType.TYPE_SPACE, " ");       return null;    }    // từ tiếp theo có phải dấu bằng    Word nextIsEq() {       if (input[pos]=='=') return new Word(WordType.TYPE_EQ, "=");       return null;    }    // từ tiếp theo có phải kí hiệu phép toán?    Word nextIsOperator() {       if ((input[pos]=='+') || (input[pos]=='-') ||          (input[pos]=='*') || (input[pos]=='/') || (input[pos]=='%'))          return new Word(WordType.TYPE_OPERATOR, "" + input[pos]);       return null;    }    bool isLetter(char x) {        return ((x >= 'a') && (x <= 'z')) || ((x >= 'A') && (x <= 'Z'));    }    bool isDigit(char x) {        return (x >= '0') && (x <= '9');    }    // từ tiếp theo có phải tên biến?    Word nextIsVar() {        if (!isLetter(input[pos])) return null;               string x = "" + input[pos];        for (int i = pos+1; i < input.Length; i++) {            if (!isLetter(input[i]) && !isDigit(input[i])) break;            x += input[i];        }        if (x.Length > 0)            return new Word(WordType.TYPE_VAR, x);         return null;    } } // hàm chính thử nghiệm bộ PTTV class MyApp {    public static void Main() {       string str = "abc=a+bc";       PTTV scanner = new PTTV();       List<Word> x = scanner.process(str);       Console.WriteLine("Input string = {0}\n", str);       foreach (Word w in x)          Console.WriteLine("{0}: {1}", w.wordType, w.wordContent);    } }

  Trả lời