1:    2:    3:    4:    5:    6:    7:    8:    9:   10:   11:   12:   13:   14:   15:   16:   17:   18:   19:   20:   21:   22:   23:   24:   25:   26:   27:   28:   29:   30:   31:   32:   33:   34:   35:   36:   37:   38:   39:   40:   41:   42:   43:   44:   45:   46:   47:   48:   49:   50:   51:   52:   53:   54:   55:   56:   57:   58:   59:   60:   61:   62:   63:   64:   65:   66:   67:   68:   69:   70:   71:   72:   73:   74:   75:   76:   77:   78:   79:   80:   81:   82:   83:   84:   85:   86:   87:   88:   89:   90:   91:   92:   93:   94:   95:   96:   97:   98:   99:  100:  101:  102:  103:  104:  105:  106:  107:  108:  109:  110:  111:  112:  113:  114:  115:  116:  117:  118:  119:  120:  121:  122:  123:  124:  125:  126:  127:  128:  129:  130:  131:  132:  133:  134:  135:  136:  137:  138:  139:  140:  141:  142:  143:  144:  145:  146:  147:  148:  149:  150:  151:  152:  153:  154:  155:  156:  157:  158:  159:  160:  161:  162:  163:  164:  165:  166:  167:  168:  169:  170:  171:  172:  173:  174:  175:  176:  177:  178:  179:  180:  181:  182:  183:  184:  185:  186:  187:  188:  189:  190:  191:  192:  193:  194:  195:  196:  197:  198:  199:  200:  201:  202:  203:  204:  205:  206:  207:  208:  209:  210:  211:  212:  213:  214:  215:  216:  217:  218:  219:  220:  221:  222:  223:  224:  225:  226:  227:  228:  229:  230:  231:  232:  233:  234:  235:  236:  237:  238:  239:  240:  241:  242:  243:  244:  245:  246:  247:  248:  249:  250:  251:  252:  253:  254:  255:  256:  257:  258:  259:  260:  261:  262:  263:  264:  265:  266:  267:  268:  269:  270:  271:  272:  273:  274:  275:  276:  277:  278:  279:  280:  281:  282:  283:  284:  285:  286:  287:  288:  289:  290:  291:  292:  293:  294:  295:  296:  297:  298:  299:  300:  301:  302:  303:  304:  305:  306:  307:  308:  309:  310:  311:  312:  313:  314:  315:  316:  317:  318:  319:  320:  321:  322:  323:  324:  325:  326:  327:  328:  329:  330:  331:  332:  333:  334:  335:  336:  337:  338:  339:  340:  341:  342:  343:  344:  345:  346:  347:  348:  349:  350:  351:  352:  353:  354:  355:  356:  357:  358:  359:  360:  361:  362:  363:  364:  365:  366:  367:  368:  369:  370:  371:  372:  373:  374:  375:  376:  377:  378:  379:  380:  381:  382:  383:  384:  385:  386:  387:  388:  389:  390:  391:  392:  393:  394:  395:  396:  397:  398:  399:  400:  401:  402:  403:  404:  405:  406:  407:  408:  409:  410:  411:  412:  413:  414:  415:  416:  417:  418:  419:  420:  421:  422:  423:  424:  425:  426:  427:  428:  429:  430:  431:  432:  433:  434:  435:  436:  437:  438:  439:  440:  441:  442:  443:  444:  445:  446:  447:  448:  449:  450:  451:  452:  453:  454:  455:  456:  457:  458:  459:  460:  461:  462:  463:  464:  465:  466:  467:  468:  469:  470:  471:  472:  473:  474:  475:  476:  477:  478:  479:  480:  481:  482:  483:  484:  485:  486:  487:  488:  489:  490:  491:  492:  493:  494:  495:  496:  497:  498:  499:  500:  501:  502:  503:  504:  505:  506:  507:  508:  509:  510:  511:  512:  513:  514:  515:  516:  517:  518:  519:  520:  521:  522:  523:  524:  525:  526:  527:  528:  529:  530:  531:  532:  533:  534:  535:  536:  537:  538:  539:  540:  541:  542:  543:  544:  545:  546:  547:  548:  549:  550:  551:  552:  553:  554:  555:  556:  557:  558:  559:  560:  561:  562:  563:  564:  565:  566:  567:  568:  569:  570:  571:  572:  573:  574:  575:  576:  577:  578:  579:  580:  581:  582:  583:  584:  585:  586:  587:  588:  589:  590:  591:  592:  593:  594:  595:  596:  597:  598:  599:  600:  601:  602:  603:  604:  605:  606:  607:  608:  609:  610:  611:  612:  613:  614:  615:  616:  617:  618:  619:  620:  621:  622:  623:  624:  625:  626:  627:  628:  629:  630:  631:  632:  633:  634:  635:  636:  637:  638:  639:  640:  641:  642:  643:  644:  645:  646:  647:  648:  649:  650:  651:  652:  653:  654:  655:  656:  657:  658:  659:  660:  661:  662:  663:  664:  665:  666:  667:  668:  669:  670:  671:  672:  673:  674:  675:  676:  677:  678:  679:  680:  681:  682:  683:  684:  685:  686:  687:  688:  689:  690:  691:  692:  693:  694:  695:  696:  697:  698:  699:  700:  701:  702:  703:  704:  705:  706:  707:  708:  709:  710:  711:  712:  713:  714:  715:  716:  717:  718:  719:  720:  721:  722:  723:  724:  725:  726:  727:  728:  729:  730:  731:  732:  733:  734:  735:  736:  737:  738:  739:  740:  741:  742:  743:  744:  745:  746:  747:  748:  749:  750:  751:  752:  753:  754:  755:  756:  757:  758:  759:  760:  761:  762:  763:  764:  765:  766:  767:  768:  769:  770:  771:  772:  773:  774:  775:  776:  777:  778:  779:  780:  781:  782:  783:  784:  785:  786:  787:  788:  789:  790:  791:  792:  793:  794:  795:  796:  797:  798:  799:  800:  801:  802:  803:  804:  805:  806:  807:  808:  809:  810:  811:  812:  813:  814:  815:  816:  817:  818:  819:  820:  821:  822:  823:  824:  825:  826:  827:  828:  829:  830:  831:  832:  833:  834:  835:  836:  837:  838:  839:  840:  841:  842:  843:  844:  845:  846:  847:  848:  849:  850:  851:  852:  853:  854:  855:  856:  857:  858:  859:  860:  861:  862:  863:  864:  865:  866:  867:  868:  869:  870:  871:  872:  873:  874:  875:  876:  877:  878:  879:  880:  881:  882:  883:  884:  885:  886:  887:  888:  889:  890:  891:  892:  893:  894:  895:  896:  897:  898:  899:  900:  901:  902:  903:  904:  905:  906:  907:  908:  909:  910:  911:  912:  913:  914:  915:  916:  917:  918:  919:  920:  921:  922:  923:  924:  925:  926:  927:  928:  929:  930:  931:  932:  933:  934:  935:  936:  937:  938:  939:  940:  941:  942:  943:  944:  945:  946:  947:  948:  949:  950:  951:  952:  953:  954:  955:  956:  957:  958:  959:  960:  961:  962:  963:  964:  965:  966:  967:  968:  969:  970:  971:  972:  973:  974:  975:  976:  977:  978:  979:  980:  981:  982:  983:  984:  985:  986:  987:  988:  989:  990:  991:  992:  993:  994:  995:  996:  997:  998:  999: 1000: 1001: 1002: 1003: 1004: 1005: 1006: 1007: 1008: 1009: 1010: 1011: 1012: 1013: 1014: 1015: 1016: 1017: 1018: 1019: 1020: 1021: 1022: 1023: 1024: 1025: 1026: 1027: 1028: 1029: 1030: 1031: 1032: 1033: 1034: 1035: 1036: 1037: 1038: 1039: 1040: 1041: 1042: 1043: 1044: 1045: 1046: 1047: 1048: 1049: 1050: 1051: 1052: 1053: 1054: 1055: 1056: 1057: 1058: 1059: 1060: 1061: 1062: 1063: 1064: 1065: 1066: 1067: 1068: 1069: 1070: 1071: 1072: 1073: 1074: 1075: 1076: 1077: 1078: 1079: 1080: 1081: 1082: 1083: 1084: 1085: 1086: 1087: 1088: 1089: 1090: 1091: 1092: 1093: 1094: 1095: 1096: 1097: 1098: 1099: 1100: 1101: 1102: 1103: 1104: 

<?php

/**
 * This file is exclusively for generating reports to help assist forum
 * administrators keep track of their forum configuration and state. The
 * core report generation is done in two areas. Firstly, a report "generator"
 * will fill context with relevant data. Secondly, the choice of sub-template
 * will determine how this data is shown to the user
 *
 * Functions ending with "Report" are responsible for generating data for reporting.
 * They are all called from ReportsMain.
 * Never access the context directly, but use the data handling functions to do so.
 *
 * Simple Machines Forum (SMF)
 *
 * @package SMF
 * @author Simple Machines http://www.simplemachines.org
 * @copyright 2019 Simple Machines and individual contributors
 * @license http://www.simplemachines.org/about/smf/license.php BSD
 *
 * @version 2.1 RC1
 */

if (!defined('SMF'))
    die('No direct access...');

/**
 * Handling function for generating reports.
 * Requires the admin_forum permission.
 * Loads the Reports template and language files.
 * Decides which type of report to generate, if this isn't passed
 * through the querystring it will set the report_type sub-template to
 * force the user to choose which type.
 * When generating a report chooses which sub_template to use.
 * Depends on the cal_enabled setting, and many of the other cal_
 * settings.
 * Will call the relevant report generation function.
 * If generating report will call finishTables before returning.
 * Accessed through ?action=admin;area=reports.
 */
function ReportsMain()
{
    global $txt, $context, $scripturl;

    // Only admins, only EVER admins!
    isAllowedTo('admin_forum');

    // Let's get our things running...
    loadTemplate('Reports');
    loadLanguage('Reports');

    $context['page_title'] = $txt['generate_reports'];

    // These are the types of reports which exist - and the functions to generate them.
    $context['report_types'] = array(
        'boards' => 'BoardReport',
        'board_perms' => 'BoardPermissionsReport',
        'member_groups' => 'MemberGroupsReport',
        'group_perms' => 'GroupPermissionsReport',
        'staff' => 'StaffReport',
    );

    call_integration_hook('integrate_report_types');
    // Load up all the tabs...
    $context[$context['admin_menu_name']]['tab_data'] = array(
        'title' => $txt['generate_reports'],
        'help' => '',
        'description' => $txt['generate_reports_desc'],
    );

    $is_first = 0;
    foreach ($context['report_types'] as $k => $temp)
        $context['report_types'][$k] = array(
            'id' => $k,
            'title' => isset($txt['gr_type_' . $k]) ? $txt['gr_type_' . $k] : $k,
            'description' => isset($txt['gr_type_desc_' . $k]) ? $txt['gr_type_desc_' . $k] : null,
            'function' => $temp,
            'is_first' => $is_first++ == 0,
        );

    // If they haven't chosen a report type which is valid, send them off to the report type chooser!
    if (empty($_REQUEST['rt']) || !isset($context['report_types'][$_REQUEST['rt']]))
    {
        $context['sub_template'] = 'report_type';
        return;
    }
    $context['report_type'] = $_REQUEST['rt'];

    // What are valid templates for showing reports?
    $reportTemplates = array(
        'main' => array(
            'layers' => null,
        ),
        'print' => array(
            'layers' => array('print'),
        ),
    );

    // Specific template? Use that instead of main!
    if (isset($_REQUEST['st']) && isset($reportTemplates[$_REQUEST['st']]))
    {
        $context['sub_template'] = $_REQUEST['st'];

        // Are we disabling the other layers - print friendly for example?
        if ($reportTemplates[$_REQUEST['st']]['layers'] !== null)
            $context['template_layers'] = $reportTemplates[$_REQUEST['st']]['layers'];
    }

    // Make the page title more descriptive.
    $context['page_title'] .= ' - ' . (isset($txt['gr_type_' . $context['report_type']]) ? $txt['gr_type_' . $context['report_type']] : $context['report_type']);

    // Build the reports button array.
    $context['report_buttons'] = array(
        'generate_reports' => array('text' => 'generate_reports', 'image' => 'print.png', 'url' => $scripturl . '?action=admin;area=reports', 'active' => true),
        'print' => array('text' => 'print', 'image' => 'print.png', 'url' => $scripturl . '?action=admin;area=reports;rt=' . $context['report_type'] . ';st=print', 'custom' => 'target="_blank"'),
    );

    // Allow mods to add additional buttons here
    call_integration_hook('integrate_report_buttons');

    // Now generate the data.
    $context['report_types'][$context['report_type']]['function']();

    // Finish the tables before exiting - this is to help the templates a little more.
    finishTables();
}

/**
 * Standard report about what settings the boards have.
 * functions ending with "Report" are responsible for generating data
 * for reporting.
 * they are all called from ReportsMain.
 * never access the context directly, but use the data handling
 * functions to do so.
 */
function BoardReport()
{
    global $context, $txt, $sourcedir, $smcFunc, $modSettings;

    // Load the permission profiles.
    require_once($sourcedir . '/ManagePermissions.php');
    loadLanguage('ManagePermissions');
    loadPermissionProfiles();

    // Get every moderator.
    $request = $smcFunc['db_query']('', '
        SELECT mods.id_board, mods.id_member, mem.real_name
        FROM {db_prefix}moderators AS mods
            INNER JOIN {db_prefix}members AS mem ON (mem.id_member = mods.id_member)',
        array(
        )
    );
    $moderators = array();
    while ($row = $smcFunc['db_fetch_assoc']($request))
        $moderators[$row['id_board']][] = $row['real_name'];
    $smcFunc['db_free_result']($request);

    // Get every moderator gruop.
    $request = $smcFunc['db_query']('', '
        SELECT modgs.id_board, modgs.id_group, memg.group_name
        FROM {db_prefix}moderator_groups AS modgs
            INNER JOIN {db_prefix}membergroups AS memg ON (memg.id_group = modgs.id_group)',
        array(
        )
    );
    $moderator_groups = array();
    while ($row = $smcFunc['db_fetch_assoc']($request))
        $moderator_groups[$row['id_board']][] = $row['group_name'];
    $smcFunc['db_free_result']($request);

    // Get all the possible membergroups!
    $request = $smcFunc['db_query']('', '
        SELECT id_group, group_name, online_color
        FROM {db_prefix}membergroups',
        array(
        )
    );
    $groups = array(-1 => $txt['guest_title'], 0 => $txt['full_member']);
    while ($row = $smcFunc['db_fetch_assoc']($request))
        $groups[$row['id_group']] = empty($row['online_color']) ? $row['group_name'] : '<span style="color: ' . $row['online_color'] . '">' . $row['group_name'] . '</span>';
    $smcFunc['db_free_result']($request);

    // All the fields we'll show.
    $boardSettings = array(
        'category' => $txt['board_category'],
        'parent' => $txt['board_parent'],
        'redirect' => $txt['board_redirect'],
        'num_topics' => $txt['board_num_topics'],
        'num_posts' => $txt['board_num_posts'],
        'count_posts' => $txt['board_count_posts'],
        'theme' => $txt['board_theme'],
        'override_theme' => $txt['board_override_theme'],
        'profile' => $txt['board_profile'],
        'moderators' => $txt['board_moderators'],
        'moderator_groups' => $txt['board_moderator_groups'],
        'groups' => $txt['board_groups'],
    );
    if (!empty($modSettings['deny_boards_access']))
        $boardSettings['disallowed_groups'] = $txt['board_disallowed_groups'];

    // Do it in columns, it's just easier.
    setKeys('cols');

    // Go through each board!
    $request = $smcFunc['db_query']('order_by_board_order', '
        SELECT b.id_board, b.name, b.num_posts, b.num_topics, b.count_posts, b.member_groups, b.override_theme, b.id_profile, b.deny_member_groups,
            b.redirect, c.name AS cat_name, COALESCE(par.name, {string:text_none}) AS parent_name, COALESCE(th.value, {string:text_none}) AS theme_name
        FROM {db_prefix}boards AS b
            LEFT JOIN {db_prefix}categories AS c ON (c.id_cat = b.id_cat)
            LEFT JOIN {db_prefix}boards AS par ON (par.id_board = b.id_parent)
            LEFT JOIN {db_prefix}themes AS th ON (th.id_theme = b.id_theme AND th.variable = {string:name})
        ORDER BY b.board_order',
        array(
            'name' => 'name',
            'text_none' => $txt['none'],
        )
    );

    while ($row = $smcFunc['db_fetch_assoc']($request))
    {
        // Each board has it's own table.
        newTable($row['name'], '', 'left', 'auto', 'left', 200, 'left');

        $this_boardSettings = $boardSettings;
        if (empty($row['redirect']))
            unset($this_boardSettings['redirect']);

        // First off, add in the side key.
        addData($this_boardSettings);

        // Format the profile name.
        $profile_name = $context['profiles'][$row['id_profile']]['name'];

        // Create the main data array.
        $boardData = array(
            'category' => $row['cat_name'],
            'parent' => $row['parent_name'],
            'redirect' => $row['redirect'],
            'num_posts' => $row['num_posts'],
            'num_topics' => $row['num_topics'],
            'count_posts' => empty($row['count_posts']) ? $txt['yes'] : $txt['no'],
            'theme' => $row['theme_name'],
            'profile' => $profile_name,
            'override_theme' => $row['override_theme'] ? $txt['yes'] : $txt['no'],
            'moderators' => empty($moderators[$row['id_board']]) ? $txt['none'] : implode(', ', $moderators[$row['id_board']]),
            'moderator_groups' => empty($moderator_groups[$row['id_board']]) ? $txt['none'] : implode(', ', $moderator_groups[$row['id_board']]),
        );

        // Work out the membergroups who can and cannot access it (but only if enabled).
        $allowedGroups = explode(',', $row['member_groups']);
        foreach ($allowedGroups as $key => $group)
        {
            if (isset($groups[$group]))
                $allowedGroups[$key] = $groups[$group];
            else
                unset($allowedGroups[$key]);
        }
        $boardData['groups'] = implode(', ', $allowedGroups);
        if (!empty($modSettings['deny_boards_access']))
        {
            $disallowedGroups = explode(',', $row['deny_member_groups']);
            foreach ($disallowedGroups as $key => $group)
            {
                if (isset($groups[$group]))
                    $disallowedGroups[$key] = $groups[$group];
                else
                    unset($disallowedGroups[$key]);
            }
            $boardData['disallowed_groups'] = implode(', ', $disallowedGroups);
        }

        if (empty($row['redirect']))
            unset ($boardData['redirect']);

        // Next add the main data.
        addData($boardData);
    }
    $smcFunc['db_free_result']($request);
}

/**
 * Generate a report on the current permissions by board and membergroup.
 * functions ending with "Report" are responsible for generating data
 * for reporting.
 * they are all called from ReportsMain.
 * never access the context directly, but use the data handling
 * functions to do so.
 */
function BoardPermissionsReport()
{
    global $txt, $modSettings, $smcFunc;

    // Get as much memory as possible as this can be big.
    setMemoryLimit('256M');

    if (isset($_REQUEST['boards']))
    {
        if (!is_array($_REQUEST['boards']))
            $_REQUEST['boards'] = explode(',', $_REQUEST['boards']);
        foreach ($_REQUEST['boards'] as $k => $dummy)
            $_REQUEST['boards'][$k] = (int) $dummy;

        $board_clause = 'id_board IN ({array_int:boards})';
    }
    else
        $board_clause = '1=1';

    if (isset($_REQUEST['groups']))
    {
        if (!is_array($_REQUEST['groups']))
            $_REQUEST['groups'] = explode(',', $_REQUEST['groups']);
        foreach ($_REQUEST['groups'] as $k => $dummy)
            $_REQUEST['groups'][$k] = (int) $dummy;

        $group_clause = 'id_group IN ({array_int:groups})';
    }
    else
        $group_clause = '1=1';

    // Fetch all the board names.
    $request = $smcFunc['db_query']('', '
        SELECT id_board, name, id_profile
        FROM {db_prefix}boards
        WHERE ' . $board_clause . '
        ORDER BY id_board',
        array(
            'boards' => isset($_REQUEST['boards']) ? $_REQUEST['boards'] : array(),
        )
    );
    $profiles = array();
    while ($row = $smcFunc['db_fetch_assoc']($request))
    {
        $boards[$row['id_board']] = array(
            'name' => $row['name'],
            'profile' => $row['id_profile'],
            'mod_groups' => array(),
        );
        $profiles[] = $row['id_profile'];
    }
    $smcFunc['db_free_result']($request);

    // Get the ids of any groups allowed to moderate this board
    // Limit it to any boards and/or groups we're looking at
    $request = $smcFunc['db_query']('', '
        SELECT id_board, id_group
        FROM {db_prefix}moderator_groups
        WHERE ' . $board_clause . ' AND ' . $group_clause,
        array(
        )
    );
    while ($row = $smcFunc['db_fetch_assoc']($request))
    {
        $boards[$row['id_board']]['mod_groups'][] = $row['id_group'];
    }
    $smcFunc['db_free_result']($request);

    // Get all the possible membergroups, except admin!
    $request = $smcFunc['db_query']('', '
        SELECT id_group, group_name
        FROM {db_prefix}membergroups
        WHERE ' . $group_clause . '
            AND id_group != {int:admin_group}' . (empty($modSettings['permission_enable_postgroups']) ? '
            AND min_posts = {int:min_posts}' : '') . '
        ORDER BY min_posts, CASE WHEN id_group < {int:newbie_group} THEN id_group ELSE 4 END, group_name',
        array(
            'admin_group' => 1,
            'min_posts' => -1,
            'newbie_group' => 4,
            'groups' => isset($_REQUEST['groups']) ? $_REQUEST['groups'] : array(),
        )
    );
    if (!isset($_REQUEST['groups']) || in_array(-1, $_REQUEST['groups']) || in_array(0, $_REQUEST['groups']))
        $member_groups = array('col' => '', -1 => $txt['membergroups_guests'], 0 => $txt['membergroups_members']);
    else
        $member_groups = array('col' => '');
    while ($row = $smcFunc['db_fetch_assoc']($request))
        $member_groups[$row['id_group']] = $row['group_name'];
    $smcFunc['db_free_result']($request);

    // Make sure that every group is represented - plus in rows!
    setKeys('rows', $member_groups);

    // Certain permissions should not really be shown.
    $disabled_permissions = array();
    if (!$modSettings['postmod_active'])
    {
        $disabled_permissions[] = 'approve_posts';
        $disabled_permissions[] = 'post_unapproved_topics';
        $disabled_permissions[] = 'post_unapproved_replies_own';
        $disabled_permissions[] = 'post_unapproved_replies_any';
        $disabled_permissions[] = 'post_unapproved_attachments';
    }

    call_integration_hook('integrate_reports_boardperm', array(&$disabled_permissions));

    // Cache every permission setting, to make sure we don't miss any allows.
    $permissions = array();
    $board_permissions = array();
    $request = $smcFunc['db_query']('', '
        SELECT id_profile, id_group, add_deny, permission
        FROM {db_prefix}board_permissions
        WHERE id_profile IN ({array_int:profile_list})
            AND ' . $group_clause . (empty($modSettings['permission_enable_deny']) ? '
            AND add_deny = {int:not_deny}' : '') . '
        ORDER BY id_profile, permission',
        array(
            'profile_list' => $profiles,
            'not_deny' => 1,
            'groups' => isset($_REQUEST['groups']) ? $_REQUEST['groups'] : array(),
        )
    );
    while ($row = $smcFunc['db_fetch_assoc']($request))
    {
        if (in_array($row['permission'], $disabled_permissions))
            continue;

        foreach ($boards as $id => $board)
            if ($board['profile'] == $row['id_profile'])
                $board_permissions[$id][$row['id_group']][$row['permission']] = $row['add_deny'];

        // Make sure we get every permission.
        if (!isset($permissions[$row['permission']]))
        {
            // This will be reused on other boards.
            $permissions[$row['permission']] = array(
                'title' => isset($txt['board_perms_name_' . $row['permission']]) ? $txt['board_perms_name_' . $row['permission']] : $row['permission'],
            );
        }
    }
    $smcFunc['db_free_result']($request);

    // Now cycle through the board permissions array... lots to do ;)
    foreach ($board_permissions as $board => $groups)
    {
        // Create the table for this board first.
        newTable($boards[$board]['name'], 'x', 'all', 100, 'center', 200, 'left');

        // Add the header row - shows all the membergroups.
        addData($member_groups);

        // Add the separator.
        addSeparator($txt['board_perms_permission']);

        // Here cycle through all the detected permissions.
        foreach ($permissions as $ID_PERM => $perm_info)
        {
            // Default data for this row.
            $curData = array('col' => $perm_info['title']);

            // Now cycle each membergroup in this set of permissions.
            foreach ($member_groups as $id_group => $name)
            {
                // Don't overwrite the key column!
                if ($id_group === 'col')
                    continue;

                $group_permissions = isset($groups[$id_group]) ? $groups[$id_group] : array();

                // Do we have any data for this group?
                if (isset($group_permissions[$ID_PERM]))
                {
                    // Set the data for this group to be the local permission.
                    $curData[$id_group] = $group_permissions[$ID_PERM];
                }
                // Is it inherited from Moderator?
                elseif (in_array($id_group, $boards[$board]['mod_groups']) && !empty($groups[3]) && isset($groups[3][$ID_PERM]))
                {
                    $curData[$id_group] = $groups[3][$ID_PERM];
                }
                // Otherwise means it's set to disallow..
                else
                {
                    $curData[$id_group] = 'x';
                }

                // Now actually make the data for the group look right.
                if (empty($curData[$id_group]))
                    $curData[$id_group] = '<span class="red">' . $txt['board_perms_deny'] . '</span>';
                elseif ($curData[$id_group] == 1)
                    $curData[$id_group] = '<span style="color: darkgreen;">' . $txt['board_perms_allow'] . '</span>';
                else
                    $curData[$id_group] = 'x';

                // Embolden those permissions different from global (makes it a lot easier!)
                if (@$board_permissions[0][$id_group][$ID_PERM] != @$group_permissions[$ID_PERM])
                    $curData[$id_group] = '<strong>' . $curData[$id_group] . '</strong>';
            }

            // Now add the data for this permission.
            addData($curData);
        }
    }
}

/**
 * Show what the membergroups are made of.
 * functions ending with "Report" are responsible for generating data
 * for reporting.
 * they are all called from ReportsMain.
 * never access the context directly, but use the data handling
 * functions to do so.
 */
function MemberGroupsReport()
{
    global $txt, $settings, $modSettings, $smcFunc;

    // Fetch all the board names.
    $request = $smcFunc['db_query']('', '
        SELECT id_board, name, member_groups, id_profile, deny_member_groups
        FROM {db_prefix}boards',
        array(
        )
    );
    while ($row = $smcFunc['db_fetch_assoc']($request))
    {
        if (trim($row['member_groups']) == '')
            $groups = array(1);
        else
            $groups = array_merge(array(1), explode(',', $row['member_groups']));

        if (trim($row['deny_member_groups']) == '')
            $denyGroups = array();
        else
            $denyGroups = explode(',', $row['deny_member_groups']);

        $boards[$row['id_board']] = array(
            'id' => $row['id_board'],
            'name' => $row['name'],
            'profile' => $row['id_profile'],
            'groups' => $groups,
            'deny_groups' => $denyGroups,
        );
    }
    $smcFunc['db_free_result']($request);

    // Standard settings.
    $mgSettings = array(
        'name' => '',
        '#sep#1' => $txt['member_group_settings'],
        'color' => $txt['member_group_color'],
        'min_posts' => $txt['member_group_min_posts'],
        'max_messages' => $txt['member_group_max_messages'],
        'icons' => $txt['member_group_icons'],
        '#sep#2' => $txt['member_group_access'],
    );

    // Add on the boards!
    foreach ($boards as $board)
        $mgSettings['board_' . $board['id']] = $board['name'];

    // Add all the membergroup settings, plus we'll be adding in columns!
    setKeys('cols', $mgSettings);

    // Only one table this time!
    newTable($txt['gr_type_member_groups'], '-', 'all', 100, 'center', 200, 'left');

    // Get the shaded column in.
    addData($mgSettings);

    // Now start cycling the membergroups!
    $request = $smcFunc['db_query']('', '
        SELECT mg.id_group, mg.group_name, mg.online_color, mg.min_posts, mg.max_messages, mg.icons,
            CASE WHEN bp.permission IS NOT NULL OR mg.id_group = {int:admin_group} THEN 1 ELSE 0 END AS can_moderate
        FROM {db_prefix}membergroups AS mg
            LEFT JOIN {db_prefix}board_permissions AS bp ON (bp.id_group = mg.id_group AND bp.id_profile = {int:default_profile} AND bp.permission = {string:moderate_board})
        ORDER BY mg.min_posts, CASE WHEN mg.id_group < {int:newbie_group} THEN mg.id_group ELSE 4 END, mg.group_name',
        array(
            'admin_group' => 1,
            'default_profile' => 1,
            'newbie_group' => 4,
            'moderate_board' => 'moderate_board',
        )
    );

    // Cache them so we get regular members too.
    $rows = array(
        array(
            'id_group' => -1,
            'group_name' => $txt['membergroups_guests'],
            'online_color' => '',
            'min_posts' => -1,
            'max_messages' => null,
            'icons' => ''
        ),
        array(
            'id_group' => 0,
            'group_name' => $txt['membergroups_members'],
            'online_color' => '',
            'min_posts' => -1,
            'max_messages' => null,
            'icons' => ''
        ),
    );
    while ($row = $smcFunc['db_fetch_assoc']($request))
        $rows[] = $row;
    $smcFunc['db_free_result']($request);

    foreach ($rows as $row)
    {
        $row['icons'] = explode('#', $row['icons']);

        $group = array(
            'name' => $row['group_name'],
            'color' => empty($row['online_color']) ? '-' : '<span style="color: ' . $row['online_color'] . ';">' . $row['online_color'] . '</span>',
            'min_posts' => $row['min_posts'] == -1 ? 'N/A' : $row['min_posts'],
            'max_messages' => $row['max_messages'],
            'icons' => !empty($row['icons'][0]) && !empty($row['icons'][1]) ? str_repeat('<img src="' . $settings['images_url'] . '/membericons/' . $row['icons'][1] . '" alt="*">', $row['icons'][0]) : '',
        );

        // Board permissions.
        foreach ($boards as $board)
            $group['board_' . $board['id']] = in_array($row['id_group'], $board['groups']) ? '<span class="success">' . $txt['board_perms_allow'] . '</span>' : (!empty($modSettings['deny_boards_access']) && in_array($row['id_group'], $board['deny_groups']) ? '<span class="alert">' . $txt['board_perms_deny'] . '</span>' : 'x');

        addData($group);
    }
}

/**
 * Show the large variety of group permissions assigned to each membergroup.
 * functions ending with "Report" are responsible for generating data
 * for reporting.
 * they are all called from ReportsMain.
 * never access the context directly, but use the data handling
 * functions to do so.
 */
function GroupPermissionsReport()
{
    global $txt, $modSettings, $smcFunc;

    if (isset($_REQUEST['groups']))
    {
        if (!is_array($_REQUEST['groups']))
            $_REQUEST['groups'] = explode(',', $_REQUEST['groups']);
        foreach ($_REQUEST['groups'] as $k => $dummy)
            $_REQUEST['groups'][$k] = (int) $dummy;
        $_REQUEST['groups'] = array_diff($_REQUEST['groups'], array(3));

        $clause = 'id_group IN ({array_int:groups})';
    }
    else
        $clause = 'id_group != {int:moderator_group}';

    // Get all the possible membergroups, except admin!
    $request = $smcFunc['db_query']('', '
        SELECT id_group, group_name
        FROM {db_prefix}membergroups
        WHERE ' . $clause . '
            AND id_group != {int:admin_group}' . (empty($modSettings['permission_enable_postgroups']) ? '
            AND min_posts = {int:min_posts}' : '') . '
        ORDER BY min_posts, CASE WHEN id_group < {int:newbie_group} THEN id_group ELSE 4 END, group_name',
        array(
            'admin_group' => 1,
            'min_posts' => -1,
            'newbie_group' => 4,
            'moderator_group' => 3,
            'groups' => isset($_REQUEST['groups']) ? $_REQUEST['groups'] : array(),
        )
    );
    if (!isset($_REQUEST['groups']) || in_array(-1, $_REQUEST['groups']) || in_array(0, $_REQUEST['groups']))
        $groups = array('col' => '', -1 => $txt['membergroups_guests'], 0 => $txt['membergroups_members']);
    else
        $groups = array('col' => '');
    while ($row = $smcFunc['db_fetch_assoc']($request))
        $groups[$row['id_group']] = $row['group_name'];
    $smcFunc['db_free_result']($request);

    // Make sure that every group is represented!
    setKeys('rows', $groups);

    // Create the table first.
    newTable($txt['gr_type_group_perms'], '-', 'all', 100, 'center', 200, 'left');

    // Show all the groups
    addData($groups);

    // Add a separator
    addSeparator($txt['board_perms_permission']);

    // Certain permissions should not really be shown.
    $disabled_permissions = array();
    if (empty($modSettings['cal_enabled']))
    {
        $disabled_permissions[] = 'calendar_view';
        $disabled_permissions[] = 'calendar_post';
        $disabled_permissions[] = 'calendar_edit_own';
        $disabled_permissions[] = 'calendar_edit_any';
    }
    if (empty($modSettings['warning_settings']) || $modSettings['warning_settings'][0] == 0)
        $disabled_permissions[] = 'issue_warning';

    call_integration_hook('integrate_reports_groupperm', array(&$disabled_permissions));

    // Now the big permission fetch!
    $request = $smcFunc['db_query']('', '
        SELECT id_group, add_deny, permission
        FROM {db_prefix}permissions
        WHERE ' . $clause . (empty($modSettings['permission_enable_deny']) ? '
            AND add_deny = {int:not_denied}' : '') . '
        ORDER BY permission',
        array(
            'not_denied' => 1,
            'moderator_group' => 3,
            'groups' => isset($_REQUEST['groups']) ? $_REQUEST['groups'] : array(),
        )
    );
    $lastPermission = null;
    $curData = array();
    while ($row = $smcFunc['db_fetch_assoc']($request))
    {
        if (in_array($row['permission'], $disabled_permissions))
            continue;

        if (strpos($row['permission'], 'bbc_') === 0)
            $txt['group_perms_name_' . $row['permission']] = sprintf($txt['group_perms_name_bbc'], substr($row['permission'], 4));

        // If this is a new permission flush the last row.
        if ($row['permission'] != $lastPermission)
        {
            // Send the data!
            if ($lastPermission !== null)
                addData($curData);

            // Add the permission name in the left column.
            $curData = array('col' => isset($txt['group_perms_name_' . $row['permission']]) ? $txt['group_perms_name_' . $row['permission']] : $row['permission']);

            $lastPermission = $row['permission'];
        }

        // Good stuff - add the permission to the list!
        if ($row['add_deny'])
            $curData[$row['id_group']] = '<span style="color: darkgreen;">' . $txt['board_perms_allow'] . '</span>';
        else
            $curData[$row['id_group']] = '<span class="red">' . $txt['board_perms_deny'] . '</span>';
    }
    $smcFunc['db_free_result']($request);

    // Flush the last data!
    addData($curData);
}

/**
 * Report for showing all the forum staff members - quite a feat!
 * functions ending with "Report" are responsible for generating data
 * for reporting.
 * they are all called from ReportsMain.
 * never access the context directly, but use the data handling
 * functions to do so.
 */
function StaffReport()
{
    global $sourcedir, $txt, $smcFunc;

    require_once($sourcedir . '/Subs-Members.php');

    // Fetch all the board names.
    $request = $smcFunc['db_query']('', '
        SELECT id_board, name
        FROM {db_prefix}boards',
        array(
        )
    );
    $boards = array();
    while ($row = $smcFunc['db_fetch_assoc']($request))
        $boards[$row['id_board']] = $row['name'];
    $smcFunc['db_free_result']($request);

    // Get every moderator.
    $request = $smcFunc['db_query']('', '
        SELECT mods.id_board, mods.id_member
        FROM {db_prefix}moderators AS mods',
        array(
        )
    );
    $moderators = array();
    $local_mods = array();
    while ($row = $smcFunc['db_fetch_assoc']($request))
    {
        $moderators[$row['id_member']][] = $row['id_board'];
        $local_mods[$row['id_member']] = $row['id_member'];
    }
    $smcFunc['db_free_result']($request);

    // Get any additional boards they can moderate through group-based board moderation
    $request = $smcFunc['db_query']('', '
        SELECT mem.id_member, modgs.id_board
        FROM {db_prefix}members AS mem
            INNER JOIN {db_prefix}moderator_groups AS modgs ON (modgs.id_group = mem.id_group OR FIND_IN_SET(modgs.id_group, mem.additional_groups) != 0)',
        array(
        )
    );

    // Add each board/member to the arrays, but only if they aren't already there
    while ($row = $smcFunc['db_fetch_assoc']($request))
    {
        // Either we don't have them as a moderator at all or at least not as a moderator of this board
        if (!array_key_exists($row['id_member'], $moderators) || !in_array($row['id_board'], $moderators[$row['id_member']]))
            $moderators[$row['id_member']][] = $row['id_board'];

        // We don't have them listed as a moderator yet
        if (!array_key_exists($row['id_member'], $local_mods))
            $local_mods[$row['id_member']] = $row['id_member'];
    }

    // Get a list of global moderators (i.e. members with moderation powers).
    $global_mods = array_intersect(membersAllowedTo('moderate_board', 0), membersAllowedTo('approve_posts', 0), membersAllowedTo('remove_any', 0), membersAllowedTo('modify_any', 0));

    // How about anyone else who is special?
    $allStaff = array_merge(membersAllowedTo('admin_forum'), membersAllowedTo('manage_membergroups'), membersAllowedTo('manage_permissions'), $local_mods, $global_mods);

    // Make sure everyone is there once - no admin less important than any other!
    $allStaff = array_unique($allStaff);

    // This is a bit of a cop out - but we're protecting their forum, really!
    if (count($allStaff) > 300)
        fatal_lang_error('report_error_too_many_staff');

    // Get all the possible membergroups!
    $request = $smcFunc['db_query']('', '
        SELECT id_group, group_name, online_color
        FROM {db_prefix}membergroups',
        array(
        )
    );
    $groups = array(0 => $txt['full_member']);
    while ($row = $smcFunc['db_fetch_assoc']($request))
        $groups[$row['id_group']] = empty($row['online_color']) ? $row['group_name'] : '<span style="color: ' . $row['online_color'] . '">' . $row['group_name'] . '</span>';
    $smcFunc['db_free_result']($request);

    // All the fields we'll show.
    $staffSettings = array(
        'position' => $txt['report_staff_position'],
        'moderates' => $txt['report_staff_moderates'],
        'posts' => $txt['report_staff_posts'],
        'last_login' => $txt['report_staff_last_login'],
    );

    // Do it in columns, it's just easier.
    setKeys('cols');

    // Get each member!
    $request = $smcFunc['db_query']('', '
        SELECT id_member, real_name, id_group, posts, last_login
        FROM {db_prefix}members
        WHERE id_member IN ({array_int:staff_list})
        ORDER BY real_name',
        array(
            'staff_list' => $allStaff,
        )
    );
    while ($row = $smcFunc['db_fetch_assoc']($request))
    {
        // Each member gets their own table!.
        newTable($row['real_name'], '', 'left', 'auto', 'left', 200, 'center');

        // First off, add in the side key.
        addData($staffSettings);

        // Create the main data array.
        $staffData = array(
            'position' => isset($groups[$row['id_group']]) ? $groups[$row['id_group']] : $groups[0],
            'posts' => $row['posts'],
            'last_login' => timeformat($row['last_login']),
            'moderates' => array(),
        );

        // What do they moderate?
        if (in_array($row['id_member'], $global_mods))
            $staffData['moderates'] = '<em>' . $txt['report_staff_all_boards'] . '</em>';
        elseif (isset($moderators[$row['id_member']]))
        {
            // Get the names
            foreach ($moderators[$row['id_member']] as $board)
                if (isset($boards[$board]))
                    $staffData['moderates'][] = $boards[$board];

            $staffData['moderates'] = implode(', ', $staffData['moderates']);
        }
        else
            $staffData['moderates'] = '<em>' . $txt['report_staff_no_boards'] . '</em>';

        // Next add the main data.
        addData($staffData);
    }
    $smcFunc['db_free_result']($request);
}

/**
 * This function creates a new table of data, most functions will only use it once.
 * The core of this file, it creates a new, but empty, table of data in
 * context, ready for filling using addData().
 * Fills the context variable current_table with the ID of the table created.
 * Keeps track of the current table count using context variable table_count.
 *
 * @param string $title Title to be displayed with this data table.
 * @param string $default_value Value to be displayed if a key is missing from a row.
 * @param string $shading Should the left, top or both (all) parts of the table beshaded?
 * @param string $width_normal The width of an unshaded column (auto means not defined).
 * @param string $align_normal The alignment of data in an unshaded column.
 * @param string $width_shaded The width of a shaded column (auto means not defined).
 * @param string $align_shaded The alignment of data in a shaded column.
 */
function newTable($title = '', $default_value = '', $shading = 'all', $width_normal = 'auto', $align_normal = 'center', $width_shaded = 'auto', $align_shaded = 'auto')
{
    global $context;

    // Set the table count if needed.
    if (empty($context['table_count']))
        $context['table_count'] = 0;

    // Create the table!
    $context['tables'][$context['table_count']] = array(
        'title' => $title,
        'default_value' => $default_value,
        'shading' => array(
            'left' => $shading == 'all' || $shading == 'left',
            'top' => $shading == 'all' || $shading == 'top',
        ),
        'width' => array(
            'normal' => $width_normal,
            'shaded' => $width_shaded,
        ),
        /* Align usage deprecated due to HTML5 */
        'align' => array(
            'normal' => $align_normal,
            'shaded' => $align_shaded,
        ),
        'data' => array(),
    );

    $context['current_table'] = $context['table_count'];

    // Increment the count...
    $context['table_count']++;
}

/**
 * Adds an array of data into an existing table.
 * if there are no existing tables, will create one with default
 * attributes.
 * if custom_table isn't specified, it will use the last table created,
 * if it is specified and doesn't exist the function will return false.
 * if a set of keys have been specified, the function will check each
 * required key is present in the incoming data. If this data is missing
 * the current tables default value will be used.
 * if any key in the incoming data begins with '#sep#', the function
 * will add a separator across the table at this point.
 * once the incoming data has been sanitized, it is added to the table.
 *
 * @param array $inc_data The data to include
 * @param null|string $custom_table = null The ID of a custom table to put the data in
 * @return void|false Doesn't return anything unless we've specified an invalid custom_table
 */
function addData($inc_data, $custom_table = null)
{
    global $context;

    // No tables? Create one even though we are probably already in a bad state!
    if (empty($context['table_count']))
        newTable();

    // Specific table?
    if ($custom_table !== null && !isset($context['tables'][$custom_table]))
        return false;
    elseif ($custom_table !== null)
        $table = $custom_table;
    else
        $table = $context['current_table'];

    // If we have keys, sanitise the data...
    if (!empty($context['keys']))
    {
        // Basically, check every key exists!
        foreach ($context['keys'] as $key => $dummy)
        {
            $data[$key] = array(
                'v' => empty($inc_data[$key]) ? $context['tables'][$table]['default_value'] : $inc_data[$key],
            );
            // Special "hack" the adding separators when doing data by column.
            if (substr($key, 0, 5) == '#sep#')
                $data[$key]['separator'] = true;
        }
    }
    else
    {
        $data = $inc_data;
        foreach ($data as $key => $value)
        {
            $data[$key] = array(
                'v' => $value,
            );
            if (substr($key, 0, 5) == '#sep#')
                $data[$key]['separator'] = true;
        }
    }

    // Is it by row?
    if (empty($context['key_method']) || $context['key_method'] == 'rows')
    {
        // Add the data!
        $context['tables'][$table]['data'][] = $data;
    }
    // Otherwise, tricky!
    else
    {
        foreach ($data as $key => $item)
            $context['tables'][$table]['data'][$key][] = $item;
    }
}

/**
 * Add a separator row, only really used when adding data by rows.
 *
 * @param string $title The title of the separator
 * @param null|string $custom_table The ID of the custom table
 *
 * @return void|bool Returns false if there are no tables
 */
function addSeparator($title = '', $custom_table = null)
{
    global $context;

    // No tables - return?
    if (empty($context['table_count']))
        return;

    // Specific table?
    if ($custom_table !== null && !isset($context['tables'][$table]))
        return false;
    elseif ($custom_table !== null)
        $table = $custom_table;
    else
        $table = $context['current_table'];

    // Plumb in the separator
    $context['tables'][$table]['data'][] = array(0 => array(
        'separator' => true,
        'v' => $title
    ));
}

/**
 * This does the necessary count of table data before displaying them.
 * is (unfortunately) required to create some useful variables for templates.
 * foreach data table created, it will count the number of rows and
 * columns in the table.
 * will also create a max_width variable for the table, to give an
 * estimate width for the whole table * * if it can.
 */
function finishTables()
{
    global $context;

    if (empty($context['tables']))
        return;

    // Loop through each table counting up some basic values, to help with the templating.
    foreach ($context['tables'] as $id => $table)
    {
        $context['tables'][$id]['id'] = $id;
        $context['tables'][$id]['row_count'] = count($table['data']);
        $curElement = current($table['data']);
        $context['tables'][$id]['column_count'] = count($curElement);

        // Work out the rough width - for templates like the print template. Without this we might get funny tables.
        if ($table['shading']['left'] && $table['width']['shaded'] != 'auto' && $table['width']['normal'] != 'auto')
            $context['tables'][$id]['max_width'] = $table['width']['shaded'] + ($context['tables'][$id]['column_count'] - 1) * $table['width']['normal'];
        elseif ($table['width']['normal'] != 'auto')
            $context['tables'][$id]['max_width'] = $context['tables'][$id]['column_count'] * $table['width']['normal'];
        else
            $context['tables'][$id]['max_width'] = 'auto';
    }
}

/**
 * Set the keys in use by the tables - these ensure entries MUST exist if the data isn't sent.
 *
 * sets the current set of "keys" expected in each data array passed to
 * addData. It also sets the way we are adding data to the data table.
 * method specifies whether the data passed to addData represents a new
 * column, or a new row.
 * keys is an array whose keys are the keys for data being passed to
 * addData().
 * if reverse is set to true, then the values of the variable "keys"
 * are used as opposed to the keys(!
 *
 * @param string $method The method. Can be 'rows' or 'columns'
 * @param array $keys The keys
 * @param bool $reverse Whether we want to use the values as the keys
 */
function setKeys($method = 'rows', $keys = array(), $reverse = false)
{
    global $context;

    // Do we want to use the keys of the keys as the keys? :P
    if ($reverse)
        $context['keys'] = array_flip($keys);
    else
        $context['keys'] = $keys;

    // Rows or columns?
    $context['key_method'] = $method == 'rows' ? 'rows' : 'cols';
}

?>