build-graph 2.1.0 → 2.2.0

data/spec/build/graph/graph_spec.rb

@@ -1,172 +0,0 @@
-#!/usr/bin/env rspec
-# Copyright, 2012, by Samuel G. D. Williams. <http://www.codeotaku.com>
-# 
-# Permission is hereby granted, free of charge, to any person obtaining a copy
-# of this software and associated documentation files (the "Software"), to deal
-# in the Software without restriction, including without limitation the rights
-# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-# copies of the Software, and to permit persons to whom the Software is
-# furnished to do so, subject to the following conditions:
-# 
-# The above copyright notice and this permission notice shall be included in
-# all copies or substantial portions of the Software.
-# 
-# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
-# THE SOFTWARE.
-
-require_relative 'process_graph'
-
-RSpec.describe Build::Graph do
-	let(:group) {Process::Group.new}
-	
-	it "shouldn't update mtime" do
-		test_glob = Build::Files::Glob.new(__dir__, "*.rb")
-		listing_output = Build::Files::Paths.directory(__dir__, ["listing.txt"])
-		
-		FileUtils.rm_f listing_output.to_a
-		
-		walker = Build::Graph::Walker.for(ProcessTask, group)
-		
-		top = ProcessNode.top do
-			process test_glob, listing_output do
-				run("ls", "-la", *inputs, :out => outputs.first.for_writing)
-			end
-		end
-		
-		group.wait do
-			walker.update(top)
-		end
-		
-		first_modified_time = listing_output.first.modified_time
-		
-		group.wait do
-			walker.update(top)
-		end
-		
-		# The output file shouldn't have been changed because already exists and the input files haven't changed either:
-		second_modified_time = listing_output.first.modified_time
-		
-		# The granularity of mtime on some systems is a bit weird:
-		expect(second_modified_time.to_f).to be_within(0.001).of(first_modified_time.to_f)
-		
-		FileUtils.rm_f listing_output.to_a
-		walker.monitor.update(listing_output.roots)
-		
-		# The granularity of modification times isn't that great, so we use >= below.
-		# sleep 1
-		
-		group.wait do
-			walker.update(top)
-		end
-		
-		expect(listing_output.first.modified_time).to be >= first_modified_time
-		
-		FileUtils.rm_f listing_output.to_a
-	end
-	
-	it "should compile program and respond to changes in source code" do
-		program_root = Build::Files::Path.join(__dir__, "program")
-		code_glob = Build::Files::Glob.new(program_root, "*.cpp")
-		program_path = Build::Files::Path.join(program_root, "dictionary-sort")
-		
-		walker = Build::Graph::Walker.for(ProcessTask, group)
-		
-		#FileUtils.touch(code_glob.first)
-		
-		top = ProcessNode.top do
-			process code_glob, program_path do
-				object_files = inputs.with(extension: ".o") do |input_path, output_path|
-					depfile_path = input_path + ".d"
-					
-					dependencies = Build::Files::Paths.new(input_path)
-					
-					if File.exist? depfile_path
-						depfile = Build::Makefile.load_file(depfile_path)
-						
-						dependencies = depfile[output_path] || dependencies
-					end
-					
-					process dependencies, output_path do
-						run("clang++", "-MMD", "-O3",
-							"-o", output_path.shortest_path(input_path.root),
-							"-c", input_path.relative_path, "-std=c++11",
-							chdir: input_path.root
-						)
-					end
-				end
-				
-				process object_files, program_path do
-					run("clang++", "-O3", "-o", program_path, *object_files.to_a, "-lm", "-pthread")
-				end
-			end
-			
-			process program_path do
-				run("./" + program_path.relative_path, chdir: program_path.root)
-			end
-		end
-		
-		group.wait do
-			walker.update(top)
-		end
-		
-		expect(program_path).to be_exist
-		expect(code_glob.first.modified_time).to be <= program_path.modified_time
-	end
-	
-	it "should copy files incrementally" do
-		program_root = Build::Files::Path.join(__dir__, "program")
-		files = Build::Files::Glob.new(program_root, "*.cpp")
-		destination = Build::Files::Path.new(__dir__) + "tmp"
-		
-		walker = Build::Graph::Walker.for(ProcessTask, group)
-		
-		top = ProcessNode.top files do
-			mkpath destination
-			
-			inputs.each do |source_path|
-				destination_path = source_path.rebase(destination)
-				
-				process source_path, destination_path do
-					$stderr.puts "Copying #{inputs.first} -> #{outputs.first}"
-					install inputs.first, outputs.first
-				end
-			end
-		end
-		
-		mutex = Mutex.new
-		files_deleted = false
-		
-		thread = Thread.new do
-			sleep 1
-			
-			mutex.synchronize do
-				destination.glob("*.cpp").delete
-				
-				files_deleted = true
-			end
-		end
-		
-		walker.run do
-			mutex.synchronize do
-				group.wait do
-					walker.update(top)
-				end
-			end
-			
-			break if files_deleted
-		end
-		
-		thread.join
-		
-		expect(destination).to be_exist
-		# This line failed, may still be a race condition:
-		expect(destination.glob("*.cpp").count).to be == 2
-		
-		destination.delete
-	end
-end

data/spec/build/graph/inherit_spec.rb

@@ -1,51 +0,0 @@
-#!/usr/bin/env rspec
-# Copyright, 2012, by Samuel G. D. Williams. <http://www.codeotaku.com>
-# 
-# Permission is hereby granted, free of charge, to any person obtaining a copy
-# of this software and associated documentation files (the "Software"), to deal
-# in the Software without restriction, including without limitation the rights
-# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-# copies of the Software, and to permit persons to whom the Software is
-# furnished to do so, subject to the following conditions:
-# 
-# The above copyright notice and this permission notice shall be included in
-# all copies or substantial portions of the Software.
-# 
-# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
-# THE SOFTWARE.
-
-require 'build/graph/walker'
-require 'build/graph/task'
-require 'build/files'
-
-RSpec.describe Build::Graph::Walker do
-	it "should inherit children outputs", :focus do
-		test_glob = Build::Files::Glob.new(__dir__, "*.rb")
-		listing_output = Build::Files::Paths.directory(__dir__, ["listing.txt"])
-		
-		node_a = Build::Graph::Node.new(Build::Files::Paths::NONE, :inherit)
-		node_b = Build::Graph::Node.new(test_glob, listing_output)
-		
-		walker = Build::Graph::Walker.new do |walker, node|
-			task = Build::Graph::Task.new(walker, node)
-			
-			task.visit do
-				if node == node_a
-					task.invoke(node_b)
-				end
-			end
-		end
-		
-		walker.update([node_a])
-		
-		task_a = walker.tasks[node_a]
-		task_b = walker.tasks[node_b]
-		
-		expect(task_a.outputs.to_a).to be == task_b.outputs.to_a
-	end
-end

data/spec/build/graph/node_spec.rb

@@ -1,80 +0,0 @@
-#!/usr/bin/env rspec
-# Copyright, 2012, by Samuel G. D. Williams. <http://www.codeotaku.com>
-# 
-# Permission is hereby granted, free of charge, to any person obtaining a copy
-# of this software and associated documentation files (the "Software"), to deal
-# in the Software without restriction, including without limitation the rights
-# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-# copies of the Software, and to permit persons to whom the Software is
-# furnished to do so, subject to the following conditions:
-# 
-# The above copyright notice and this permission notice shall be included in
-# all copies or substantial portions of the Software.
-# 
-# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
-# THE SOFTWARE.
-
-require 'build/graph/node'
-require 'build/files/glob'
-require 'build/files/system'
-
-RSpec.describe Build::Graph::Node do
-	include Build::Graph
-	include Build::Files
-	
-	let(:test_glob) {Build::Files::Glob.new(__dir__, "*.rb")}
-	let(:listing_output) {Build::Files::Paths.directory(__dir__, ["listing.txt"])}
-	
-	it "should be unique" do
-		node_a = Build::Graph::Node.new(test_glob, listing_output)
-		node_b = Build::Graph::Node.new(listing_output, Build::Files::Paths::NONE)
-		
-		expect(node_a).to be_eql node_a
-		expect(node_a).to_not be_eql node_b
-		
-		node_c = Build::Graph::Node.new(test_glob, listing_output)
-		
-		expect(node_a).to be_eql node_c
-	end
-	
-	it "should be dirty" do
-		node_a = Build::Graph::Node.new(test_glob, listing_output)
-		
-		expect(node_a.dirty?).to be true
-	end
-	
-	it "should be clean" do
-		listing_output.first.touch
-		
-		node_a = Build::Graph::Node.new(test_glob, listing_output)
-		
-		expect(node_a.dirty?).to be false
-		
-		listing_output.first.delete
-	end
-	
-	it "should be dirty if input files are missing" do
-		input = Build::Files::Paths.directory(__dir__, ["missing-input.txt"])
-		output = Build::Files::Glob.new(__dir__, "*.rb")
-		
-		node = Build::Graph::Node.new(input, output)
-		
-		expect(node.missing?).to be true
-		expect(node.dirty?).to be true
-	end
-	
-	it "should be dirty if output files are missing" do
-		input = Build::Files::Glob.new(__dir__, "*.rb")
-		output = Build::Files::Paths.directory(__dir__, ["missing-output.txt"])
-		
-		node = Build::Graph::Node.new(input, output)
-		
-		expect(node.missing?).to be true
-		expect(node.dirty?).to be true
-	end
-end

data/spec/build/graph/process_graph.rb

@@ -1,89 +0,0 @@
-
-require 'process/group'
-require 'build/files'
-require 'build/graph'
-
-require 'console/event/spawn'
-
-class ProcessNode < Build::Graph::Node
-	def initialize(inputs, outputs, block, title: nil)
-		super(inputs, outputs)
-		
-		if title
-			@title = title
-		else
-			@title = block.source_location
-		end
-		
-		@block = block
-	end
-	
-	def == other
-		super and
-			@title == other.title and
-			@block == other.block
-	end
-	
-	def hash
-		super ^ @title.hash ^ @block.hash
-	end
-	
-	def evaluate(context)
-		context.instance_eval(&@block)
-	end
-	
-	attr :title
-end
-
-class ProcessTask < Build::Graph::Task
-	def initialize(walker, node, group)
-		super(walker, node)
-		
-		@group = group
-	end
-	
-	def process(inputs, outputs = :inherit, **options, &block)
-		inputs = Build::Files::List.coerce(inputs)
-		outputs = Build::Files::List.coerce(outputs) unless outputs.kind_of? Symbol
-		
-		node = ProcessNode.new(inputs, outputs, block, **options)
-		
-		self.invoke(node)
-	end
-	
-	def wet?
-		@node.dirty?
-	end
-	
-	def run(*arguments)
-		if wet?
-			@walker.logger.debug(self) {Console::Event::Spawn.for(*arguments)}
-			
-			status = @group.spawn(*arguments)
-			
-			if status != 0
-				raise CommandError.new(status)
-			end
-		end
-	end
-	
-	def mkpath(*args)
-		return unless wet?
-		
-		FileUtils.mkpath(*args)
-	end
-	
-	def install(*args)
-		return unless wet?
-		
-		FileUtils.install(*args)
-	end
-	
-	# This function is called to finish the invocation of the task within the graph.
-	# There are two possible ways this function can generally proceed.
-	# 1/ The node this task is running for is clean, and thus no actual processing needs to take place, but children should probably be executed.
-	# 2/ The node this task is running for is dirty, and the execution of commands should work as expected.
-	def update
-		@node.evaluate(self)
-	end
-end

data/spec/build/graph/program/Benchmark.cpp

@@ -1,72 +0,0 @@
-//
-//  Benchmark.cpp
-//  DictionarySort
-//
-//  Created by Samuel Williams on 2/11/11.
-//  Copyright, 2014, by Samuel G. D. Williams. <http://www.codeotaku.com>
-//
-
-#include "Benchmark.h"
-
-#include <sys/time.h>
-
-// A timer class for quickly checking the wall-clock performance of code.
-namespace Benchmark
-{
-	static TimeT system_time () {
-		static struct timeval t;
-		gettimeofday (&t, (struct timezone*)0);
-		return ((TimeT)t.tv_sec) + ((TimeT)t.tv_usec / 1000000.0);
-	}
-
-	WallTime::WallTime () {
-		this->reset();
-	}
-
-	void WallTime::reset () {
-		this->_last = system_time();
-		this->_total = 0.0;
-	}
-
-	TimeT WallTime::total () const {
-		TimeT current = system_time();
-		this->_total += current - this->_last;
-		this->_last = current;
-		return this->_total;
-	}
-
-	ProcessorTime::ProcessorTime()
-	{
-		this->reset();
-	}
-
-	void ProcessorTime::reset ()
-	{
-		this->_last = std::clock();
-		this->_total = 0;
-	}
-
-	TimeT ProcessorTime::total () const
-	{
-		std::clock_t current = std::clock();
-		this->_total += std::clock() - this->_last;
-		this->_last = current;
-		
-		return TimeT(this->_total) / TimeT(CLOCKS_PER_SEC);
-	}
-
-	Timer::Timer()
-	{
-	}
-
-	void Timer::reset ()
-	{
-		_wall_time.reset();
-		_processor_time.reset();
-	}
-
-	Timer::Sample Timer::sample() const
-	{
-		return {_wall_time.total(), _processor_time.total()};
-	}
-}

data/spec/build/graph/program/Benchmark.h

@@ -1,65 +0,0 @@
-//
-//  Benchmark.h
-//  DictionarySort
-//
-//  Created by Samuel Williams on 2/11/11.
-//  Copyright, 2014, by Samuel G. D. Williams. <http://www.codeotaku.com>
-//
-
-#pragma once
-
-#include <ctime>
-
-// A timer class for quickly checking the wall-clock performance of code.
-namespace Benchmark
-{
-	typedef double TimeT;
-
-	class WallTime {
-	protected:
-		mutable TimeT _last, _total;
-
-	public:
-		WallTime ();
-
-		void reset ();
-		TimeT total () const;
-	};
-
-	class ProcessorTime {
-	protected:
-		mutable std::clock_t _last, _total;
-
-	public:
-		ProcessorTime();
-
-		void reset ();
-		TimeT total () const;
-	};
-
-	class Timer {
-	protected:
-		WallTime _wall_time;
-		ProcessorTime _processor_time;
-
-	public:
-		Timer();
-
-		const WallTime & wall_time() const { return _wall_time; }
-		const ProcessorTime & processor_time() const { return _processor_time; }
-
-		void reset ();
-
-		struct Sample {
-			TimeT wall_time_total;
-			TimeT processor_time_total;
-
-			TimeT approximate_processor_usage() const {
-				return processor_time_total / wall_time_total;
-			}
-		};
-
-		Sample sample() const;
-	};
-	
-}