trackler 2.2.1.33 → 2.2.1.34

data/tracks/coldfusion/tasks/ScaffoldExercise.cfc

@@ -0,0 +1,85 @@
+/**
+* I scaffold a new exercise from the template.
+*/
+component {
+	
+	function run(
+		slug,
+		difficulty,
+		uuid=createGUID()
+	) {
+		var repoRootPath = expandPath( getDirectoryFromPath( getCurrentTemplatePath() ) & '../' );
+		
+		// Acquire slug
+		if( isNull( arguments.slug ) ) {
+			arguments.slug = ask( 'Exercise slug as defined by Excercism. Ex: "hello-world": ' );
+		}
+		
+		// Slug of hello-world defaults to name of HelloWorld
+		var exerciseName = arguments.slug
+			.listToArray( '-' )
+			.map( function( i ){
+				return i.left( 1 ).uCase() & i.right( -1 ).lCase();
+			} )
+			.toList( '' );
+		
+		// Acquire diffculty
+		if( isNull( arguments.difficulty ) ) {
+			arguments.difficulty = ask( message='Difficulty: ', defaultResponse=1 );
+		}
+
+		// Validation to prevent duplicate runs
+		var exerciseDirectory = repoRootPath & 'exercises/' & arguments.slug;
+		if( directoryExists( exerciseDirectory ) ) {
+			error( 'An exercise named [#arguments.slug#] already exists!' );
+		}
+
+		// Add this exercise to config.json
+		var configJSON = deserializeJSON( fileRead( repoRootPath & '/config.json' ) );
+		configJSON.exercises.append( {
+			"uuid": arguments.uuid,
+			"difficulty": arguments.difficulty+0,
+			"slug": arguments.slug,
+			"topics": []
+		} );		
+		fileWrite( repoRootPath & '/config.json', formatterUtil.formatJSON( json=configJSON, indent='  ' , lineEnding=chr( 10 ) ) );
+
+		// Create exercise scaffold
+		directoryCreate( exerciseDirectory );
+		directoryCopy( repoRootPath & '/tasks/exercise_template', exerciseDirectory, true );
+		
+		// Perform Token replacements
+		command( 'tokenReplace' )
+			.params( '**', '@@name@@', exerciseName )
+			.inWorkingDirectory( exerciseDirectory )
+			.run();
+		
+		directoryList( exerciseDirectory, true )
+			.each( function( path ){
+				if( path.findNoCase( '@@name@@' ) ) {
+					fileMove( path, path.replaceNoCase( '@@name@@', exerciseName, 'all' ) );
+				}
+			} );
+		
+		print.boldGreenLine( 'New exercise created!' )
+			.line()
+			.greenLine( 'The exercise is located here: ' )
+			.indentedYellowLine( exerciseDirectory )
+			.line()
+			.greenLine( 'Create a sample solution here: ' )
+			.indentedYellowLine( exerciseDirectory & '/Solution.cfc' )
+			.line()
+			.greenLine( 'Test your solution with this command: ' )
+			.indentedYellowLine( 'box task run TestRunner --solution' )
+			.line()
+			.toConsole();
+
+		// Generate test suite
+		command( 'task run' )
+			.params( 'GenerateTests', 'run', slug )
+			.inWorkingDirectory( repoRootPath & '/tasks' )
+			.run();
+		
+	}
+	
+}

data/tracks/coldfusion/tasks/TestAllSolutions.cfc

@@ -0,0 +1,24 @@
+/**
+* I test all the solutions in each exercise to make sure they all pass.  
+*/
+component {
+	
+	function run() {
+		// Get an array of all the excercise names
+		var exercises = directoryList( expandPath( getDirectoryFromPath( getCurrentTemplatePath() ) & '../exercises' ) );
+		
+		// If there's a testrunner task in them, run it.  If any of the tasks fail, the exit code will come back as 1
+		exercises.each( function( path ) {
+			if( fileExists( path & '/TestRunner.cfc' ) ) {
+				command( 'task run' )
+					.params( 'TestRunner' )
+					// Specifically as the task runners to run the SolutionTest
+					.flags( 'solution' )
+					.inWorkingDirectory( path )
+					.run();
+			}
+		} );
+		
+	}
+	
+}

data/tracks/coldfusion/tasks/exercise_template/@@name@@.cfc

@@ -0,0 +1,13 @@
+/**
+* Your implmentation of the @@name@@ exercise
+*/
+component {
+	
+	/**
+	* @returns 
+	*/
+	function stubMethodName() {
+		// Implement me here
+	}
+	
+}

data/tracks/coldfusion/tasks/exercise_template/@@name@@Test.cfc

@@ -0,0 +1,15 @@
+component extends="testbox.system.BaseSpec" {
+
+	function beforeAll(){
+	  SUT = createObject( '@@name@@' );
+	}
+
+	function run(){
+	
+		describe( "My @@name@@ class", function(){			
+@@testCases@@
+		});
+		
+	}
+ 
+}

data/tracks/coldfusion/tasks/exercise_template/Solution.cfc

@@ -0,0 +1,6 @@
+/**
+* Here is an example solution for the @@name@@ exercise
+*/
+component {
+		
+}

data/tracks/coldfusion/tasks/exercise_template/SolutionTest.cfc

@@ -0,0 +1,7 @@
+component extends="@@name@@Test" {
+
+	function beforeAll(){
+	  SUT = createObject( 'Solution' );
+	}
+
+}

data/tracks/coldfusion/tasks/exercise_template/TestRunner.cfc

@@ -0,0 +1,103 @@
+/**
+* I am a CommandBox task runner which you can use to test your implementation of this exercise against the 
+* provided test suite.  To use me, open the CommandBox CLI and run this:
+* 
+* CommandBox> task run TestRunner
+*
+* To start up a test watcher that will automatically rerun the test suite every time you save a file change, run this:
+*
+* CommandBox> task run TestRunner --watcher
+*
+*/
+component {
+	
+	/**
+	* @solution Runs the tests against the solution
+	* @watcher Start up a file watch that re-runs the tests on file changes. Use Ctrl-C to stop
+	*/
+	function run( boolean solution=false, boolean watcher=false ) {
+		
+		ensureTestBox();
+
+		if( watcher ) {
+		
+			// Tabula rasa
+			command( 'cls' ).run();
+				
+			// Start watcher
+			watch()
+				.paths( '*.cfc' )
+				.inDirectory( getCWD() )
+				.withDelay( 500 )
+				.onChange( function() {
+	
+					// Clear the screen
+					command( 'cls' )
+						.run();
+
+					// This is neccessary so changes to tests get picked up right away.
+					pagePoolClear();	
+					
+					runTests( solution );
+	
+				} )
+				.start();
+					
+		} else {
+			runTests( solution );
+		}			
+
+	}
+
+	/**
+	* Make sure the TestBox framework is installed
+	*/
+	private function ensureTestBox() {
+		var excerciseRoot = getCWD();
+		var testBoxRoot = excerciseRoot & '/testbox';
+		
+		if( !directoryExists( testBoxRoot ) ) {
+			
+			print.boldYellowLine( 'Installing some missing dependencies for you!' ).toConsole();
+			command( 'install' )
+				.inWorkingDirectory( excerciseRoot )
+				.run();
+		}
+		
+		// Bootstrap TestBox framework
+		filesystemUtil.createMapping( '/testbox', testBoxRoot );
+	}
+
+	/**
+	* Invoke TestBox to run the test suite
+	*/
+	private function runTests( boolean solution=false ) {
+		
+		// Create TestBox and run the tests
+		testData = new testbox.system.TestBox()
+			.runRaw( directory = {
+				// Find all CFCs...
+				mapping = filesystemUtil.makePathRelative( getCWD() ),
+				// ... in this directory ...
+				recurse = false,
+				// ... whose name ends in "test"
+				filter = function( path ) {
+					return path.reFind( ( solution ? 'Solution' : '' ) & 'Test.cfc$' );
+				 }
+			} )
+			.getMemento();
+		
+		// Print out the results with ANSI formatting for the CLI
+		getInstance( 'CLIRenderer@testbox-commands' )
+			.render( print, testData, true );
+			
+		print.toConsole();
+		
+		// Set proper exit code
+		if( testData.totalFail || testData.totalError ) {
+			setExitCode( 1 );
+		}
+	}
+
+}
+

data/tracks/coldfusion/tasks/exercise_template/box.json

@@ -0,0 +1,8 @@
+{
+    "dependencies":{
+        "testbox":"^2.5.0+107"
+    },
+    "installPaths":{
+        "testbox":"testbox"
+    }
+}

data/tracks/coldfusion/tasks/exercise_template/index.cfm

@@ -0,0 +1,37 @@
+<!--- 
+
+This file will only be used if you want to start up a web server in this directory.  You can do so by running:
+
+$> box
+CommandBox> install
+CommandBox> server start
+
+However, this is not necessary unless you really just want to use the HTML reporters on TestBox.  
+Ideally, you'll skip the need for this file entirely and just run the tests directly frm the CLI like this:
+
+CommandBox> task run TestRunner
+
+ --->
+<cfsetting showDebugOutput="false">
+<cfparam name="url.reporter" 		default="simple">
+<cfscript>
+	// get a list of all CFCs in this folder whose name looks like "XXXTest.cfc"
+	// And turn it into compnent path relative to the web root
+	url.bundles = directoryList(
+			path=expandPath( '/' ),
+			filter='*Test.cfc' )
+		.map( function( path ) {
+			return path
+					.replaceNoCase( expandPath( '/' ), '' )
+					.left( -4 )
+		} )
+		.toList();
+</cfscript>
+
+<!--- Ensure TestBox --->
+<cfif fileExists( "/testbox/system/runners/HTMLRunner.cfm" )>
+	<!--- Include the TestBox HTML Runner --->
+	<cfinclude template="/testbox/system/runners/HTMLRunner.cfm">
+<cfelse>
+	Oops, you don't have TestBox installed yet! Please run <b>box install</b> from the root of your excercise folder and refresh this page.	
+</cfif>

data/tracks/common-lisp/config.json

@@ -204,6 +204,18 @@
         "Sorting"
       ]
     },
+    {
+      "uuid": "b3ad38c2-2962-4b47-9b14-20ca262ebff6",
+      "slug": "collatz-conjecture",
+      "core": false,
+      "unlocked_by": null,
+      "difficulty": 1,
+      "topics": [
+        "Integer",
+        "Recursivity",
+        "Mathematics"
+      ]
+    },
     {
       "uuid": "6c702aa9-70f3-41d0-bc76-4323a08f8fbf",
       "slug": "meetup",

data/tracks/common-lisp/exercises/collatz-conjecture/README.md

@@ -0,0 +1,84 @@
+## Collatz Conjecture.
+
+The Collatz Conjecture or 3x+1 problem can be summarized as follows:
+
+Take any positive integer n. If n is even, divide n by 2 to get n / 2. If n is
+odd, multiply n by 3 and add 1 to get 3n + 1. Repeat the process indefinitely.
+The conjecture states that no matter which number you start with, you will
+always reach 1 eventually.
+
+Given a number n, return the number of steps required to reach 1.
+
+## Examples
+Starting with n = 12, the steps would be as follows:
+
+0. 12
+1. 6
+2. 3
+3. 10
+4. 5
+5. 16
+6. 8
+7. 4
+8. 2
+9. 1
+
+Resulting in 9 steps. So for input n = 12, the return value would be 9.
+
+
+## Submitting Incomplete Solutions
+It's possible to submit an incomplete solution so you can see how others have completed the exercise.
+
+## Setup
+
+Check out [Exercism Help](http://exercism.io/languages/lisp) for instructions to
+get started writing Common Lisp. That page will explain how to install and setup
+a Lisp implementation and how to run the tests.
+
+## Formatting
+
+While Common Lisp doesn't care about indentation and layout of code,
+nor whether you use spaces or tabs, this is an important consideration
+for submissions to exercism.io. Excercism.io's code widget cannot
+handle mixing of tab and space characters well so using only spaces is recommended to make
+the code more readable to the human reviewers. Please review your
+editors settings on how to accomplish this. Below are instructions for
+popular editors for Common Lisp.
+
+### VIM
+
+Use the following commands to ensure VIM uses only spaces for
+indentation:
+
+```vimscript
+:set tabstop=2
+:set shiftwidth=2
+:set expandtab
+```
+
+(or as a oneliner `:set tabstop=2 shiftwidth=2 expandtab`). This can
+be added to your `~/.vimrc` file to use it all the time.
+
+### Emacs
+
+Emacs is very well suited for editing Common Lisp and has many
+powerful add-on packages available. The only thing that one needs to
+do with a stock emacs to make it work well with exercism.io is to
+evaluate the following code:
+
+`(setq indent-tab-mode nil)`
+
+This can be placed in your `~/.emacs` (or `~/.emacs.d/init.el`) in
+order to have it set whenever Emacs is launched.
+
+One suggested add-on for Emacs and Common Lisp is
+[SLIME](https://github.com/slime/slime) which offers tight integration
+with the REPL; making iterative coding and testing very easy.
+
+
+## Source
+An unsolved problem in mathematics named after mathematician Lothar Collatz
+see more at [collatz conjecture wikipedia]("https://en.wikipedia.org/wiki/3x_%2B_1_problem")
+
+## Submitting Incomplete Solutions
+It's possible to submit an incomplete solution so you can see how others have completed the exercise.

data/tracks/common-lisp/exercises/collatz-conjecture/collatz-conjecture-test.lisp

@@ -0,0 +1,31 @@
+(ql:quickload "lisp-unit")
+#-xlisp-test (load "collatz-conjecture")
+
+(defpackage #:collatz-conjecture-test
+  (:use #:common-lisp #:lisp-unit))
+
+(in-package #:collatz-conjecture-test)
+
+(define-test steps-for-1
+  (assert-equal 0 (collatz-conjecture:collatz 1)))
+
+(define-test steps-for-16
+  (assert-equal 4 (collatz-conjecture:collatz 16)))
+
+(define-test steps-for-12
+  (assert-equal 9 (collatz-conjecture:collatz 12)))
+
+(define-test steps-for-1000000
+  (assert-equal 152 (collatz-conjecture:collatz 1000000)))
+
+(define-test steps-for-0
+  (assert-equal NIL (collatz-conjecture:collatz 0)))
+
+(define-test steps-for-negative
+  (assert-equal NIL (collatz-conjecture:collatz (- 0 15))))
+
+
+#-xlisp-test
+(let ((*print-errors* t)
+      (*print-failures* t))
+  (run-tests :all))