Click here to Skip to main content
14,216,467 members
Click here to Skip to main content
Articles » Languages » C# » Applications » Downloads

Tagged as

Stats

69K views
2.2K downloads
108 bookmarked

Building .NET Coverage Tool

,
Rate this:
4.94 (33 votes)
Please Sign up or sign in to vote.
4.94 (33 votes)
25 Aug 2009     MIT    
This article is a walkthrough for building a .NET coverage tool
TestApp
TestApp.exe
TestApp.pdb
Tool
Coverage.Counter.dll
Coverage.exe
Mono.Cecil.dll
Mono.Tools.Pdb2Mdb.dll
Coverage
Common
Instrument
Properties
Report
Coverage.Counter
Properties
Mono.Cecil
src
AUTHORS
ChangeLog
CodeGen
cecil-update-rev
templates
configure
default.build
Makefile
mono-cecil.pc.in
Mono.Cecil
Mono.Cecil.Binary
Mono.Cecil.Cil
Mono.Cecil.dll.sources
Mono.Cecil.Metadata
Mono.Cecil.Signatures
Mono.Xml
ChangeLog
NEWS
README
standalone.make
TODO
Mono.Tools.Pdb2Mdb
Properties
src
ChangeLog
LICENSE
Makefile
pdb2mdb.exe.sources
# types used in templates

module Cecil

	class Evolutive # abstract

		attr_reader(:requ)

		def initialize(requ)
			@requ = requ
		end
	end

	class FieldWorker # abstract

		attr_reader(:field_name)
		attr_reader(:property_name)
		attr_reader(:type)
		attr_reader(:ns)
		attr_reader(:size)
		attr_reader(:target)

		def initialize(name, type, target)
			@property_name = name
			@target = target
			@field_name = to_field(name)

			@objtype = type

			ar = type.name.split(".")
			@type = ar.pop()
			@ns = ar.join(".")

			@size = type.size
		end

		def to_field(name)
			name = String.new(name)
			name[0] = name[0].chr.downcase
			return "m_" + name
		end

		def write_binary(inst, writer)
			pre = writer + ".Write ("
			prp = inst + "." + @property_name
			suf = ")"
			return case @type
				when "byte", "ushort", "short", "uint", "int"
					pre + prp + suf
				when "RVA"
					pre + prp + ".Value" + suf
				when "DataDirectory"
					pre + prp + ".VirtualAddress" + suf + ";\n\t\t\t" + pre + prp + ".Size" + suf
				else
					pre + "(" + @objtype.underlying + ") " + prp + suf
			end
		end

		def read_binary(inst)
			return case @type
				when "byte"
					inst + ".ReadByte ()"
				when "ushort"
					inst + ".ReadUInt16 ()";
				when "short"
					inst + ".ReadInt16 ()";
				when "uint"
					inst + ".ReadUInt32 ()";
				when "int"
					inst + ".ReadInt32 ()";
				when "RVA"
					"new RVA (" + inst + ".ReadUInt32 ())"
				when "DataDirectory"
					"new DataDirectory (\n				new RVA (" + inst + ".ReadUInt32 ()),\n				" + inst + ".ReadUInt32 ())"
				else
					"(" + @objtype.name + ") " + case @objtype.underlying
						when "int"
							inst + ".ReadInt32 ()";
						when "short"
							inst + ".ReadInt16 ()";
						when "ushort"
							inst + ".ReadUInt16 ()";
						when "uint"
							inst + ".ReadUInt32 ()";
					end
			end
		end
	end

	class Type

		attr_reader(:name)
		attr_reader(:size)
		attr_reader(:underlying)

		def initialize(name, size, underlying = nil)
			@name = name
			@size = size
			@underlying = underlying
		end
	end

	class Table < Evolutive

		attr_reader(:ref_ns)
		attr_reader(:rid)
		attr_reader(:name)
		attr_reader(:table_name)
		attr_reader(:row_name)
		attr_reader(:columns)

		def initialize(name, rid, requ)
			super(requ)
			@name = name
			@table_name = name + "Table"
			@row_name = name + "Row"
			@rid = rid
			@ref_ns = Array.new
			@columns = Array.new
		end

		def add_column(col)
			if (!@ref_ns.include?(col.ns) && col.ns.length != 0 && col.ns != "Mono.Cecil.Metadata") then
				@ref_ns.push(col.ns)
				@ref_ns.sort!()
			end
			@columns.push(col)
		end

		def row_size()
			size = 0
			@columns.each { |col|
				size += col.size
			}
			return size
		end
	end

	class Column < FieldWorker

		def initialize(name, type, target)
			super(name, type, target)
		end

	end

	class Collection

		attr_reader(:type)
		attr_reader(:intf)
		attr_reader(:name)
		attr_reader(:container)
		attr_reader(:container_impl)
		attr_reader(:item_name)
		attr_reader(:visitable)
		attr_reader(:visitor)
		attr_reader(:visitThis)
		attr_reader(:visitItem)
		attr_reader(:lazyload)
		attr_reader(:pathtoloader)
		attr_reader(:target)
		attr_reader(:indexed)

		def initialize(type, container, visit, name, lazyload, pathtoloader, target, indexed = false, usecntintf = false)
			@type = type
			basename = (name.nil? ? type : name)
			@intf = "I" + basename + "Collection"
			@name = @intf[1..@intf.length]
			@item_name = basename[0..basename.length]
			@container = container
			@container_impl = usecntintf ? @container : @container[0..@container.length]
			if (!visit.nil?) then
				@visitable = visit + "Visitable"
				@visitor = visit + "Visitor"
				@visitThis = "Visit" + @name
				@visitItem = "Visit" + @item_name
			end
			@lazyload = lazyload
			@pathtoloader = pathtoloader
			@target = target
			@indexed = indexed
		end
	end

	class OpCode < Evolutive

		attr_reader(:name)
		attr_reader(:field_name)
		attr_reader(:op1)
		attr_reader(:op2)
		attr_reader(:size)
		attr_reader(:flowcontrol)
		attr_reader(:opcodetype)
		attr_reader(:operandtype)
		attr_reader(:stackbehaviourpop)
		attr_reader(:stackbehaviourpush)

		def initialize(name, op1, op2, flowcontrol, opcodetype, operandtype, stackbehaviourpop, stackbehaviourpush, requ)
			super(requ)
			@name = name
			@field_name = name_to_prop(name)
			@op1 = op1 ; @op2 = op2
			@size = @op1 == "0xff" ? 1 : 2
			@flowcontrol = "FlowControl." + flowcontrol
			@opcodetype = "OpCodeType." + opcodetype
			@operandtype = "OperandType." + operandtype
			@stackbehaviourpop = "StackBehaviour." + stackbehaviourpop
			@stackbehaviourpush = "StackBehaviour." + stackbehaviourpush
		end

		def name_to_prop(name)
			field = ""
			ar = name.split(".")
			ar.each { |part|
				field += part.capitalize()
				field += "_" unless ar.last == part
			}
			return field
		end
	end

	class Field < FieldWorker

		attr_reader(:default)

		def initialize(name, type, default)
			super(name, type, nil)
			@default = default
		end
	end

	class CodedIndexTable

		attr_reader(:name)
		attr_reader(:tag)

		def initialize(name, tag)
			@name = name
			@tag = tag
		end
	end

	class CodedIndex < Evolutive

		attr_reader(:name)
		attr_reader(:size)
		attr_reader(:tables)

		def initialize(name, size, requ)
			super(requ)
			@name = name
			@size = size
			@tables = Array.new
		end

		def add_table(name, tag)
			@tables.push(CodedIndexTable.new(name, tag))
		end
	end

end

By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.

If a file you wish to view isn't highlighted, and is a text file (not binary), please let us know and we'll add colourisation support for it.

License

This article, along with any associated source code and files, is licensed under The MIT License

Share

About the Author

Sergiy Sakharov
Software Developer (Senior)
United Kingdom United Kingdom
No Biography provided