Refactor Bioconductor getPackages

getPackages.php

@@ -72,7 +72,7 @@ if(strpos($distrib, ':') !== false) {
     else if($distrib == "CPAN") {
         $result = findCPANPackage($distrib, $version_num, $version_name, $filter, $limit, false);
     }
-    else if($distrib == "CRAN") {
+    else if($distrib == "CRAN" || $distrib == "Bioconductor") {
         $result = findRPackage($distrib, $version_num, $version_name, $filter, $limit, false);
     }
     else {

package.php

@@ -295,6 +295,44 @@ function findRPackage($os_name, $version_num, $version_name, $keyword, $limit, $
           fclose($h);
         }
 
+    }
+    else if($repos == "bioc") {
+
+        $url_packages = "https://www.bioconductor.org/packages/release/bioc/";
+
+        $doc = getDocument($url_packages);
+
+        $trs = $doc->getElementsByTagName('tr');
+
+        $size = $trs->length - 1;
+
+        $index = 0;
+
+        for ($i = 1; $i <= $size; $i++) {
+            $name = $trs[$i]->childNodes[1]->nodeValue;
+
+            if(strpos($name, $keyword) !== false) {
+
+                $description = $trs[$i]->childNodes[5]->nodeValue;
+
+                $version = "";
+
+                $link = "https://www.bioconductor.org/packages/release/bioc/html/".$name.".html";
+
+                $other =  $trs[$i]->childNodes[3]->nodeValue;
+
+                $package = new Package($name, $version, $description, $link, $other);
+                $results[] = $package;
+                
+                $index++;
+
+            }
+
+            if($index == $limit) {
+                break;
+            }
+        }
+
     }
 
     return $results;