gacl/admin/acl_test2.php

   1 <?php
   2 /*
   3 if (!empty($_GET['debug'])) {
   4         $debug = $_GET['debug'];
   5 }
   6 */
   7 //First make sure user has access
   8 require_once("../../interface/globals.php");
   9
  10 use OpenEMR\Common\Acl\AclMain;
  11 use OpenEMR\Common\Twig\TwigContainer;
  12
  13 //ensure user has proper access
  14 if (!AclMain::aclCheckCore('admin', 'acl')) {
  15     echo (new TwigContainer(null, $GLOBALS['kernel']))->getTwig()->render('core/unauthorized.html.twig', ['pageTitle' => xl("ACL Administration")]);
  16     exit;
  17 }
  18
  19 @set_time_limit(600);
  20
  21 require_once('../profiler.inc.php');
  22 $profiler = new Profiler(true,true);
  23
  24 require_once("gacl_admin.inc.php");
  25
  26 $query = '
  27         SELECT          a.value AS a_value, a.name AS a_name,
  28                                 b.value AS b_value, b.name AS b_name,
  29                                 c.value AS c_value, c.name AS c_name,
  30                                 d.value AS d_value, d.name AS d_name
  31         FROM            '. $gacl_api->_db_table_prefix .'aco_sections a
  32         LEFT JOIN       '. $gacl_api->_db_table_prefix .'aco b ON a.value=b.section_value,
  33                                 '. $gacl_api->_db_table_prefix .'aro_sections c
  34         LEFT JOIN       '. $gacl_api->_db_table_prefix .'aro d ON c.value=d.section_value
  35         ORDER BY        a.value, b.value, c.value, d.value';
  36
  37 //$rs = $db->Execute($query);
  38 $rs = $db->pageexecute($query, $gacl_api->_items_per_page, ($_GET['page'] ?? null));
  39 $rows = $rs->GetRows();
  40
  41 /*
  42 echo("<pre>");
  43 print_r($rows);
  44 echo("</pre>");
  45 */
  46
  47 $total_rows = count($rows);
  48
  49 $total_acl_check_time = 0;
  50
  51 foreach ($rows as $row) {
  52     list(       $aco_section_value,
  53                         $aco_section_name,
  54                         $aco_value,
  55                         $aco_name,
  56
  57                         $aro_section_value,
  58                         $aro_section_name,
  59                         $aro_value,
  60                         $aro_name
  61                 ) = $row;
  62
  63         $acl_check_begin_time = $profiler->getMicroTime();
  64         $acl_result = $gacl->acl_query($aco_section_value, $aco_value, $aro_section_value, $aro_value);
  65         $acl_check_end_time = $profiler->getMicroTime();
  66
  67         $access = &$acl_result['allow'];
  68         $return_value = &$acl_result['return_value'];
  69
  70         $acl_check_time = ($acl_check_end_time - $acl_check_begin_time) * 1000;
  71         $total_acl_check_time += $acl_check_time;
  72
  73         if (empty($tmp_aco_section_name) OR $aco_section_name != $tmp_aco_section_name OR $aco_name != $tmp_aco_name) {
  74                 $display_aco_name = "$aco_section_name > $aco_name";
  75         } else {
  76                 $display_aco_name = "";
  77         }
  78
  79         $acls[] = array(
  80                                                 'aco_section_value' => $aco_section_value,
  81                                                 'aco_section_name' => $aco_section_name,
  82                                                 'aco_value' => $aco_value,
  83                                                 'aco_name' => $aco_name,
  84
  85                                                 'aro_section_value' => $aro_section_value,
  86                                                 'aro_section_name' => $aro_section_name,
  87                                                 'aro_value' => $aro_value,
  88                                                 'aro_name' => $aro_name,
  89
  90                                                 'access' => $access,
  91                                                 'return_value' => $return_value,
  92                                                 'acl_check_time' => number_format($acl_check_time, 2),
  93
  94                                                 'display_aco_name' => $display_aco_name,
  95                                         );
  96
  97         $tmp_aco_section_name = $aco_section_name;
  98         $tmp_aco_name = $aco_name;
  99 }
 100
 101 //echo "<br /><br />$x ACL_CHECK()'s<br />\n";
 102
 103 $smarty->assign("acls", $acls);
 104
 105 $smarty->assign("total_acl_checks", $total_rows);
 106 $smarty->assign("total_acl_check_time", $total_acl_check_time);
 107
 108 if ($total_rows > 0) {
 109         $avg_acl_check_time = $total_acl_check_time / $total_rows;
 110 }
 111 $smarty->assign("avg_acl_check_time", number_format( ($avg_acl_check_time + 0) ,2));
 112
 113 $smarty->assign("paging_data", $gacl_api->get_paging_data($rs));
 114
 115 $smarty->assign("return_page", $_SERVER['PHP_SELF'] );
 116
 117 $smarty->assign('current','acl_test');
 118 $smarty->assign('page_title', '2-dim. ACL Test');
 119
 120 $smarty->assign("phpgacl_version", $gacl_api->get_version() );
 121 $smarty->assign("phpgacl_schema_version", $gacl_api->get_schema_version() );
 122
 123 $smarty->display('phpgacl/acl_test2.tpl');
 124 ?>