Action($SQL); return(0); } // Install() /** * \brief Customize submenus. */ function RegisterMenus() { // For all other menus, permit coming back here. $URI = $this->Name . Traceback_parm_keep(array("show","format","page","upload","item")); $Item = GetParm("item",PARM_INTEGER); $Upload = GetParm("upload",PARM_INTEGER); if (!empty($Item) && !empty($Upload)) { if (GetParm("mod",PARM_STRING) == $this->Name) { menu_insert("Browse::bsam License",-5); menu_insert("Browse::[BREAK]",-3); $text = _("Clear"); menu_insert("Browse::Clear",-4,NULL,NULL,NULL,"$text"); } else { $text = _("View bsam license histogram"); menu_insert("Browse::[BREAK]",-3); menu_insert("Browse::bsam License",-5,$URI,$text); } } } // RegisterMenus() /** * \brief This is called before the plugin is used. * It should assume that Install() was already run one time * (possibly years ago and not during this object's creation). * * \return true on success, false on failure. * A failed initialize is not used by the system. * \note This function must NOT assume that other plugins are installed. */ function Initialize() { global $_GET; if ($this->State != PLUGIN_STATE_INVALID) { return(1); } // don't re-run if ($this->Name !== "") // Name must be defined { global $Plugins; $this->State=PLUGIN_STATE_VALID; array_push($Plugins,$this); } /* Remove "updcache" from the GET args and set $this->UpdCache * This way all the url's based on the input args won't be * polluted with updcache */ if ($_GET['updcache']) { $this->UpdCache = $_GET['updcache']; $_SERVER['REQUEST_URI'] = preg_replace("/&updcache=[0-9]*/","",$_SERVER['REQUEST_URI']); unset($_GET['updcache']); } else { $this->UpdCache = 0; } return($this->State == PLUGIN_STATE_VALID); } // Initialize() /** * \brief Given two elements sort them by name. * Callback Used for sorting the histogram. */ function SortName ($a,$b) { list($A0,$A1,$A2) = explode("\|",$a,3); list($B0,$B1,$B2) = explode("\|",$b,3); /* Sort by count */ if ($A0 < $B0) { return(1); } if ($A0 > $B0) { return(-1); } /* Same count? sort by root name. Same root? place real before style before partial. */ $A0 = str_replace('-partial$',"",$A1); if ($A0 != $A1) { $A1 = '-partial'; } else { $A0 = str_replace('-style',"",$A1); if ($A0 != $A1) { $A1 = '-style'; } else { $A1=''; } } $B0 = str_replace('-partial$',"",$B1); if ($B0 != $B1) { $B1 = '-partial'; } else { $B0 = str_replace('-style',"",$B1); if ($B0 != $B1) { $B1 = '-style'; } else { $B1=''; } } if ($A0 != $B0) { return(strcmp($A0,$B0)); } if ($A1 == "") { return(-1); } if ($B1 == "") { return(1); } if ($A1 == "-partial") { return(-1); } if ($B1 == "-partial") { return(1); } return(strcmp($A1,$B1)); } // SortName() /** * \brief Given an Upload and UploadtreePk item, display: * - The histogram for the directory BY LICENSE. * - The file listing for the directory, with license navigation. */ function ShowUploadHist($Upload,$Item,$Uri) { /***** Get all the licenses PER item (file or directory) under this UploadtreePk. Save the data 3 ways: - Number of licenses PER item. - Number of items PER license. - Number of items PER license family. *****/ $VF=""; // return values for file listing $VH=""; // return values for license histogram $V=""; // total return value global $Plugins; global $PG_CONN; $Lics = array(); // license summary for an item in the directory $ModLicView = &$Plugins[plugin_find_id("view-license")]; /* Arrays for storying item->license and license->item mappings */ $LicGID2Item = array(); $LicItem2GID = array(); $MapLic2GID = array(); /* every license should have an ID number */ /* Get the counts for each license under this UploadtreePk*/ LicenseGetAll($Item,$Lics); // key is license name, value is count $LicTotal = $Lics[' Total ']; /* Ensure that every license is associated with an ID */ /* MapLic2Gid key is license name, value is a sequence number (GID) */ $MapNext=0; foreach($Lics as $Key => $Val) $MapLic2GID[$Key] = $MapNext++; /****************************************/ /* Get ALL the items under this UploadtreePk */ $Children = DirGetList($Upload,$Item); $ChildCount=0; $ChildLicCount=0; $ChildDirCount=0; /* total number of directory or containers */ foreach($Children as $C) { if (Iscontainer($C['ufile_mode'])) { $ChildDirCount++; } } $VF .= ""; foreach($Children as $C) { if (empty($C)) { continue; } /* Store the item information */ $IsDir = Isdir($C['ufile_mode']); $IsContainer = Iscontainer($C['ufile_mode']); /* Determine the hyperlinks */ if (!empty($C['pfile_fk']) && !empty($ModLicView)) { $LinkUri = "$Uri&item=" . $C['uploadtree_pk']; $LinkUri = preg_replace("/mod=license/","mod=view-license",$LinkUri); } else { $LinkUri = NULL; } if (Iscontainer($C['ufile_mode'])) { $uploadtree_pk = DirGetNonArtifact($C['uploadtree_pk']); $LicUri = "$Uri&item=" . $uploadtree_pk; } else { $LicUri = NULL; } /* Populate the output ($VF) - file list */ /* Find number of licenses in child */ // if (($ChildDirCount < 20) || (!$IsContainer)) // { $LicCount = LicenseCount($C['uploadtree_pk']); } // else { $LicCount=0; } $LicCount=0; $VF .= '"; $VF .= "\n"; $ChildCount++; } $VF .= "
'; $HasHref=0; $HasBold=0; if ($IsContainer) { $VF .= ""; $HasHref=1; $VF .= ""; $HasBold=1; } else if (!empty($LinkUri)) // && ($LicCount > 0)) { $VF .= ""; $HasHref=1; } $VF .= $C['ufile_name']; if ($IsDir) { $VF .= "/"; }; if ($HasBold) { $VF .= ""; } if ($HasHref) { $VF .= ""; } $VF .= ""; if ($LicCount) { $VF .= "[" . number_format($LicCount,0,"",",") . " "; //$VF .= ""; $VF .= "license" . ($LicCount == 1 ? "" : "s"); $VF .= ""; $VF .= "]"; $ChildLicCount += $LicCount; } $VF .= "
\n"; // print "ChildCount=$ChildCount ChildLicCount=$ChildLicCount\n"; /*************************************** Problem: $ChildCount can be zero! This happens if you have a container that does not unpack to a directory. For example: file.gz extracts to archive.txt that contains a license. Same problem seen with .pdf and .Z files. Solution: if $ChildCount == 0, then just view the license! $ChildCount can also be zero if the directory is empty. ***************************************/ if ($ChildCount == 0) { $sql = "SELECT * FROM uploadtree WHERE uploadtree_pk = '$Item';"; $result = pg_query($PG_CONN, $sql); DBCheckResult($result, $sql, __FILE__, __LINE__); $row = pg_fetch_assoc($result); pg_free_result($result); if (IsDir($row['ufile_mode'])) { return; } $ModLicView = &$Plugins[plugin_find_id("view-license")]; return($ModLicView->Output() ); } /****************************************/ /* List the licenses */ $VH .= "\n"; $SFbL = plugin_find_id("search_file_by_license"); $text = _("Count"); $VH .= ""; $text = _("Files"); if ($SFbL >= 0) { $VH .= ""; } $text = _("License"); $VH .= "\n"; /* krsort + arsort = consistent sorting order */ arsort($Lics); /* Redo the sorting */ $SortOrder=array(); foreach($Lics as $Key => $Val) { if (empty($Val)) { continue; } $SortOrder[] = $Val . "|" . str_replace("'","",$Key) . "|" . $Key; } usort($SortOrder,array($this,"SortName")); $LicsTotal = array(); foreach($SortOrder as $Key => $Val) { if (empty($Val)) { continue; } list($x,$y,$z) = explode("\|",$Val,3); $LicsTotal[$z]=$x; } $Total=0; foreach($Lics as $Key => $Val) { if ($Key != ' Total ') { $GID = $MapLic2GID[$Key]; $VH .= ""; $Total += $Val; if ($SFbL >= 0) { $VH .= ""; } $VH .= "\n"; } } $VH .= "
$text$text$text
$Val$text"; $Uri = Traceback_uri() . "?mod=license_listing&item=$Item&lic=$GID"; // $VH .= ""; $VH .= htmlentities($Key); $VH .= ""; $VH .= "
\n"; $VH .= "
\n"; $text = _("Total licenses"); $VH .= "$text: $Total\n"; /****************************************/ /* Licenses use Javascript to highlight */ $VJ = ""; // return values for the javascript $VJ .= "\n"; /* Combine VF and VH */ $V .= "\n"; $V .= "\n"; $V .= "
$VH$VF
\n"; $V .= "
\n"; $V .= $VJ; return($V); } // ShowUploadHist() /** * \brief This function returns the scheduler status. */ function Output() { $uTime = microtime(true); if ($this->State != PLUGIN_STATE_READY) { return(0); } $V=""; $Folder = GetParm("folder",PARM_INTEGER); $Upload = GetParm("upload",PARM_INTEGER); $Item = GetParm("item",PARM_INTEGER); switch(GetParm("show",PARM_STRING)) { case 'detail': $Show='detail'; break; case 'summary': default: $Show='summary'; break; } /* Use Traceback_parm_keep to ensure that all parameters are in order */ $CacheKey = "?mod=" . $this->Name . Traceback_parm_keep(array("upload","item","folder")) . "&show=$Show"; if ($this->UpdCache != 0) { $V = ""; $Err = ReportCachePurgeByKey($CacheKey); } else $V = ReportCacheGet($CacheKey); if (empty($V) ) // no cache exists { switch($this->OutputType) { case "XML": break; case "HTML": $V .= "\n"; /************************/ /* Show the folder path */ /************************/ $V .= Dir2Browse($this->Name,$Item,NULL,1,"Browse") . "

\n"; /******************************/ /* Get the folder description */ /******************************/ if (!empty($Folder)) { // $V .= $this->ShowFolder($Folder); } if (!empty($Upload)) { $Uri = preg_replace("/&item=([0-9]*)/","",Traceback()); $V .= $this->ShowUploadHist($Upload,$Item,$Uri); } $V .= "\n"; break; case "Text": break; default: break; } $Cached = false; /* Cache Report if this took longer than 1 seconds */ if ($Time > 1) ReportCachePut($CacheKey, $V); } else $Cached = true; if (!$this->OutputToStdout) { return($V); } print "$V"; $Time = microtime(true) - $uTime; // convert usecs to secs $text = _("Elapsed time: %.2f seconds"); printf( "$text", $Time); $text = _("cached"); $text1 = _("Update"); if ($Cached) echo " $text $text1 "; return; } }; $NewPlugin = new ui_browse_license; $NewPlugin->Initialize(); ?>