043space « cpp - mu - Soul of a tiny new machine. More thorough tests → More comprehensible and rewrite-friendly software → More resilient society.

blob: 1bb91b8e23d6c955011705b65626db12a597ffea (plain) (tree)

7da71d03 ^

2f5f7919 ^

7da71d03 ^

2f5f7919 ^

7da71d03 ^

75845d2b ^

7da71d03 ^

75845d2b ^

7da71d03 ^

4b79c627 ^

ca01193d ^

7da71d03 ^

82ac0b7e ^

4b79c627 ^

7da71d03 ^

82ac0b7e ^

7da71d03 ^

7da71d03 ^

4b79c627 ^

7da71d03 ^

4b79c627 ^

82ac0b7e ^

0edf822f ^

8f1db754 ^

75845d2b ^

82ac0b7e ^

2f5f7919 ^

75845d2b ^

7da71d03 ^

0edf822f ^

7da71d03 ^

e0584755 ^

0edf822f ^

e0584755 ^

7
8

38
39
40

52
53

58
59

60
61

63
64
65
generated by cgit-pink 1.4.1-2-gfad0 (git 2.36.2.497.gbbea4dcf42) at 2024-11-27 01:02:21 +0000

pan class="o">--s.end(); while (last != s.begin() && isspace(*last)) --last; ++last; return string(first, last); } bool starts_with(const string& s, const string& pat) { string::const_iterator a=s.begin(), b=pat.begin(); for (/*nada*/; a!=s.end() && b!=pat.end(); ++a, ++b) if (*a != *b) return false; return b == pat.end(); } bool has_data(istream& in) { return in && !in.eof(); } void slurp(const string& filename, vector<string>& lines) { lines.clear(); ifstream in(filename.c_str()); while (has_data(in)) { string curr_line; getline(in, curr_line); lines.push_back(curr_line); } } size_t slurp_some_functions(const vector<string>& in, size_t start, vector<string>& out, bool first) { out.clear(); if (start >= in.size()) return start; out.push_back("#include \"header\""); if (first) out.push_back("#include \"global_definitions_list\""); else out.push_back("#include \"global_declarations_list\""); out.push_back(""); size_t curr = start; while (true) { if (curr >= in.size()) break; if (out.size() >= in.size()/Num_compilation_units) break; while (curr < in.size()) { // read functions -- lines until unindented '}' while (curr < in.size()) { const string& line = in.at(curr); //? cerr << curr << ": adding to function: " << line << '\n'; out.push_back(line); ++curr; if (!line.empty() && line.at(0) == '}') break; } // now look for a '#line' directive before the next non-comment non-empty // line while (curr < in.size()) { const string& line = in.at(curr); if (starts_with(line, "#line ")) goto try_return; out.push_back(line); ++curr; if (trim(line).empty()) continue; if (starts_with(trim(line), "//")) continue; break; } } try_return:; } return curr; } // compare contents of a file with a list of lines, ignoring #line directives // on both sides bool no_change(const vector<string>& lines, const string& output_filename) { vector<string> old_lines; slurp(output_filename, old_lines); size_t l=0, o=0; while (true) { while (l < lines.size() && (lines.at(l).empty() || starts_with(lines.at(l), "#line "))) { ++l; } while (o < old_lines.size() && (old_lines.at(o).empty() || starts_with(old_lines.at(o), "#line "))) { ++o; } if (l >= lines.size() && o >= old_lines.size()) return true; // no change if (l >= lines.size() || o >= old_lines.size()) return false; // contents changed //? cerr << "comparing\n"; //? cerr << o << ": " << old_lines.at(o) << '\n'; //? cerr << l << ": " << lines.at(l) << '\n'; if (lines.at(l) != old_lines.at(o)) return false; // contents changed ++l; ++o; } assert(false); } string next_output_filename(const string& output_directory) { static int file_count = 0; ostringstream out; out << output_directory << "/mu_" << file_count << ".cc"; file_count++; return out.str(); } void emit_file(const vector<string>& lines, const string& output_filename) { if (no_change(lines, output_filename)) return; cerr << " updating " << output_filename << '\n'; ofstream out(output_filename.c_str()); for (size_t i = 0; i < lines.size(); ++i) out << lines.at(i) << '\n'; } void emit_compilation_unit(const vector<string>& lines, const string& output_directory) { string output_filename = next_output_filename(output_directory); emit_file(lines, output_filename); } int main(int argc, const char* argv[]) { if (argc != 3) { cerr << "usage: cleave [input .cc file] [output directory]\n"; exit(0); } // read input vector<string> lines; slurp(argv[1], lines); // write header until but excluding '// Global' delimiter string output_directory = argv[2]; size_t line_num = 0; { vector<string> out; while (line_num < lines.size()) { const string& line = lines.at(line_num); if (trim(line) == "// Globals") break; // todo: #line directive for delimiters out.push_back(line); ++line_num; } emit_file(out, output_directory+"/header"); } // write global_definitions_list (including delimiters) { vector<string> out; while (line_num < lines.size()) { const string& line = lines.at(line_num); out.push_back(line); ++line_num; if (trim(line) == "// End Globals") break; } emit_file(out, output_directory+"/global_definitions_list"); } // segment functions // first one is special if (line_num < lines.size()) { vector<string> function; line_num = slurp_some_functions(lines, line_num, function, true); emit_compilation_unit(function, output_directory); } while (line_num < lines.size()) { vector<string> function; line_num = slurp_some_functions(lines, line_num, function, false); emit_compilation_unit(function, output_directory); } }