DPaste - Paste #894 - pastebin, online compiler and collaboration tool dedicated to D Programming Language

Code

import std.stdio : writeln, writefln;
import std.regex;
import std.algorithm : countUntil;
import std.array : split, join, replace;
import std.file : readText, write;
import std.string : format;
import std.conv : to;

version (none) {
	version = Test;
} else {
	version = Finish;
}

const string operator  = "?";
const string error_msg = "\"Null Object.\"";
const string condition = "in {\n\tif (%s is null) throw new Exception(%s, filename, line);\n} body {";

void main(string[] args) {
	//writeln(args);
	const string buffer = readText(args[1]);
	string[] lines = buffer.split("\n");
	//writeln(lines);

bool dec = args.length > 2 && args[2] == "#t";
	uint decl = void;

if (dec) {
		decl = 0;
	}

uint[string] class_names;
	uint[string] func_names;
	
	foreach (line_nr, line; lines) {
		if (auto m = match(line, regex(r"class\s*(\w+)\s*\{"))) {
			auto c = m.captures;
			class_names[c[1]] = line_nr;
		}
	}
	
	version (Test) {
		writeln(class_names);
		writeln(lines);
		writeln("----");
	}

uint counter = 0;
	foreach (uint line_nr, ref string line; lines) {
		if (auto m = match(line, r"(\w+)\s*\" ~ operator ~ r"\s*(\w+)")) {
			auto c = m.captures;

version (Test) {
				writeln(c);
			}
			
			if (c.length >= 3 && c[1] in class_names && class_names[c[1]] != line_nr) {
				uint pos = countUntil(line, '(');

// try to extract function name
				string func_name;
				try {
					func_name = split(line[0 .. pos])[1];
				} catch (Throwable t) {
					// something went wrong? -> maybe no valid function
					continue;
				}

// no function name? -> no valid function
				if (func_name.length == 0) {
					continue;
				}
				
				func_names[func_name] = line_nr;
				
				//writeln("foo");
				++counter;

// Replace operator
				pos = countUntil(line, c[1]);
				line = line.replace(operator, "");//line[0 .. pos + c[1].length] ~ line[pos + c[1].length + 1 .. $];

// insert debug assertions
				pos = countUntil(line, '{');
				line = line[0 .. pos] ~ format(condition, c[2], error_msg);

// add important paramaters for filename and line number
				pos = countUntil(line, ')');
				line = line[0 .. pos] ~ ", string filename = __FILE__, uint line = __LINE__)" ~ line[pos + 1 .. $];
				
				if (dec) {
					decl++;
				}
			}
		}
	}
	
	if (dec && decl > 0) {
		decl += 2;
		
		foreach (string func_name, uint index; func_names) {
			//writeln(func_name);
			foreach (uint line_nr, ref string line; lines) {
				if (auto m = match(line, func_name ~ r"$.*$") && index != line_nr) {
					const uint start = countUntil(line, '(');
					
					const uint pos = countUntil(line, ')');

line = line[0 .. pos] ~ ((pos - start) > 0 ? ", " : "") ~ "__FILE__, __LINE__ - " ~ to!string(decl) ~ line[pos .. $];
				}
			}
		}
	}

version (Test) {
		writefln(" > %d Replacements.", counter);
		writeln(join(lines, "\n"));
		writeln("----");
		writeln(func_names);
	}
	
	version (Finish) {
		write(args[1], join(lines, "\n"));

if (dec) {
			write("clone_" ~ args[1], buffer);
		}
	}
}

Compilation output:

/home/c6/c997.d(41): Error: cannot implicitly convert expression (line_nr) of type ulong to uint
/home/c6/c997.d(61): Error: cannot implicitly convert expression (countUntil(line, '(')) of type long to uint
/home/c6/c997.d(83): Error: cannot implicitly convert expression (countUntil(line, c.opIndex(1LU))) of type long to uint
/home/c6/c997.d(87): Error: cannot implicitly convert expression (countUntil(line, '{')) of type long to uint
/home/c6/c997.d(91): Error: cannot implicitly convert expression (countUntil(line, ')')) of type long to uint
/home/c6/c997.d(108): Error: cannot implicitly convert expression (countUntil(line, '(')) of type long to const(uint)
/home/c6/c997.d(110): Error: cannot implicitly convert expression (countUntil(line, ')')) of type long to const(uint)

Paste info

Author: Namespace

Views: 138

Private: no

Expires: Never

Uploaded: 28.07.12 0:58

Votes: 0

Compilation

Compiler: DMD 2.062

Pointer size: m64

Code

Compilation output:

Paste info

Compilation

Actions

Confirm

Confirm