Add tests for Hoa\String\Search.

Test/Unit/Search.php

@@ -0,0 +1,88 @@
+<?php
+
+/**
+ * Hoa
+ *
+ *
+ * @license
+ *
+ * New BSD License
+ *
+ * Copyright © 2007-2014, Ivan Enderlin. All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions are met:
+ *     * Redistributions of source code must retain the above copyright
+ *       notice, this list of conditions and the following disclaimer.
+ *     * Redistributions in binary form must reproduce the above copyright
+ *       notice, this list of conditions and the following disclaimer in the
+ *       documentation and/or other materials provided with the distribution.
+ *     * Neither the name of the Hoa nor the names of its contributors may be
+ *       used to endorse or promote products derived from this software without
+ *       specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS AND CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+ * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+ * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+ * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+ * POSSIBILITY OF SUCH DAMAGE.
+ */
+
+namespace Hoa\String\Test\Unit;
+
+use Hoa\Test;
+use Hoa\String as LUT;
+
+/**
+ * Class \Hoa\String\Test\Unit\Search.
+ *
+ * Test suite of the search algorithms.
+ *
+ * @author     Ivan Enderlin <[email protected]>
+ * @copyright  Copyright © 2007-2014 Ivan Enderlin.
+ * @license    New BSD License
+ */
+
+class Search extends Test\Unit\Suite {
+
+    public function case_approximated ( ) {
+
+        $this
+            ->given(
+                $x = 'GATAA',
+                $y = 'CAGATAAGAGAA',
+                $k = 1
+            )
+            ->when($result = LUT\Search::approximated($y, $x, $k))
+            ->then
+                ->array($result)
+                    ->isEqualTo([
+                        0 => [
+                            'i' => 1,
+                            'j' => 6,
+                            'l' => 5
+                        ],
+                        1 => [
+                            'i' => 2,
+                            'j' => 7,
+                            'l' => 5
+                        ],
+                        2 => [
+                            'i' => 3,
+                            'j' => 8,
+                            'l' => 5
+                        ],
+                        3 => [
+                            'i' => 7,
+                            'j' => 12,
+                            'l' => 5
+                        ]
+                    ]);
+    }
+}