<?php

require_once('comp/SetOfCriteria.php');


$A = array(
  'A.1.a', 'A.1.b', 'A.1.c', 'A.1.d', 'A.1.e', 'A.1.f', 'A.1.g', 'A.1.h', 'A.1.i',
           'A.1.j', 'A.1.k',
  'A.2.a', 'A.2.b', 'A.2.c', 'A.2.d', 'A.2.e', 'A.2.f', 'A.2.g', 'A.2.h', 'A.2.i',
           'A.2.j', 'A.2.k', 'A.2.l', 'A.2.m', 'A.2.n', 'A.2.o', 'A.2.p', 'A.2.q',
           'A.2.r', 'A.2.s', 'A.2.t', 'A.2.u', 'A.2.v', 'A.2.w', 'A.2.x', 'A.2.y',
           'A.2.z',
  'A.3.a', 'A.3.b', 'A.3.c', 'A.3.d', 'A.3.e', 'A.3.f', 'A.3.g', 'A.3.h', 'A.3.i',
           'A.3.j', 'A.3.k', 'A.3.l',
  'A.4.a', 'A.4.b', 'A.4.c', 'A.4.d', 'A.4.e', 'A.4.f',
  'A.5.a', 'A.5.b', 'A.5.c', 'A.5.d', 'A.5.e', 'A.5.f', 'A.5.g', 'A.5.h', 'A.5.i',
  'A.6.a', 'A.6.b', 'A.6.c', 'A.6.d',
);
$B = array(
  'B.1.a', 'B.1.b',
  'B.2.a', 'B.2.b', 'B.2.c', 'B.2.d', 'B.2.e', 'B.2.f', 'B.2.g', 'B.2.h', 'B.2.i',
           'B.2.j', 'B.2.k', 'B.2.l', 'B.2.m', 'B.2.n', 'B.2.o', 'B.2.p',
);
$C = array(
  'C.1.a', 'C.1.b', 'C.1.c', 'C.1.d',
  'C.2.a', 'C.2.b', 'C.2.c', 'C.2.d',
  'C.3.a', 'C.3.b', 'C.3.c', 'C.3.d', 'C.3.e', 'C.3.f', 'C.3.g', 'C.3.h', 'C.3.i',
           'C.3.j', 'C.3.k', 'C.3.l',
  'C.4.a', 'C.4.b', 'C.4.c', 'C.4.d', 'C.4.e', 'C.4.f', 'C.4.g', 'C.4.h',
  'C.5.a', 'C.5.b', 'C.5.c', 'C.5.d', 'C.5.e', 'C.5.f', 'C.5.g', 'C.5.h',
  'C.6.a', 'C.6.b', 'C.6.c', 'C.6.d', 'C.6.e', 'C.6.f', 'C.6.g',
  'C.7.a', 'C.7.b', 'C.7.c', 'C.7.d', 'C.7.e', 'C.7.f',
  'C.8.a', 'C.8.b', 'C.8.c', 'C.8.d', 'C.8.e', 'C.8.f',
  'C.9.a', 'C.9.b', 'C.9.c',
);

function &getDRC()
{
    global $A, $B, $C;
    $x = array_merge($A, $B, $C);
    return $x;
}
function &getWT()
{
    $x = array();
    return $x;
}
function &getETSI()
{
    $x = array();
    return $x;
}

function &getDRCSet()
{
    $x = getDRC();
    $set = new SetOfCriteria('drc', $x, "David Ross Criteria");
    return $set;
}

function &getAllCriteria()
{
    $x = getDRC();
    // $y = getWT();
    // $z = getETSI();
    return $x;
}

function &getCriteriaSet()
{
    $x = getAllCriteria();
    $set = new SetOfCriteria('criteria', $x, "All Criteria");
    return $set;
}

$rlo =  array(
  'A.1.h', 'A.3.e', 'A.3.j', 'A.4.d',
  'A.6.a', 'A.6.b', 'A.6.c', 'A.6.d',
  'B.2.c', 'B.2.d', 'B.2.e', 'B.2.f',
);
$roots =  array(
  'A.2.b', 'A.2.d', 'A.2.t', 'A.2.u', 'A.2.z',
  'A.3.l', 'A.5.i',
  'C.3.a', 'C.3.b', 'C.3.c', 'C.3.d', 'C.3.e', 'C.3.f',
  'C.3.g', 'C.3.h', 'C.3.i', 'C.3.j', 'C.3.k', 'C.3.l',
  'C.4.a', 'C.4.b', 'C.4.c', 'C.4.d', 'C.4.e', 'C.4.f', 'C.4.g', 'C.4.h',
);
$privacy =  array(
  'A.1.f', 'A.1.i',  'A.2.z',
  'A.4.a', 'A.4.b', 'A.4.c', 'A.4.d', 'A.4.e', 'A.4.f',
  'A.5.i',
  'B.1.a', 'B.2.h', 'B.2.i', 'B.2.j',
  'C.1.c', 'C.6.g', 'C.8.f',
);
$security =  array(
  'A.1.g', 'A.1.i', 'A.1.j', 'A.1.k',
  'A.2.p', 'A.2.t', 'A.2.u', 'A.2.z',
  'A.3.l',
  'A.5.a', 'A.5.b', 'A.5.c', 'A.5.d', 'A.5.e', 'A.5.f', 'A.5.g', 'A.5.h', 'A.5.i',
  'B.2.k', 'B.2.m', 'B.2.n', 'B.2.o',
  'C.1.a', 'C.1.b', 'C.1.d',
  'C.2.a', 'C.2.b', 'C.2.c', 'C.2.d',
  'C.3.c', 'C.3.d', 'C.3.e', 'C.3.f', 'C.3.g', 'C.3.h', 'C.3.i', 'C.3.j', 'C.3.l',
  'C.4.b', 'C.4.c', 'C.4.d', 'C.4.e', 'C.4.f', 'C.4.h',
  'C.8.f',
);
$oophaga =  array(
  'A.1.j', 'A.1.k',
  'A.3.l',
  'A.4.f',
  'A.5.a', 'A.5.b', 'A.5.c', 'A.5.d', 'A.5.e', 'A.5.f', 'A.5.g', 'A.5.h', 'A.5.i',
  'C.1.a', 'C.1.b', 'C.1.d',
  'C.2.a', 'C.2.b', 'C.2.c', 'C.2.d',
  'C.3.c', 'C.3.d', 'C.3.e', 'C.3.f', 'C.3.i',
  'C.4.b', 'C.4.d', 'C.4.e',
);
$dispute =  array(
  'A.2.p', 'A.2.q', 'A.2.z', 
  'A.3.b', 'A.3.c', 'A.3.d', 
  'A.4.e', 'A.4.f',
);
$pingtest =  array(
  'A.2.g', 'A.2.h', 'A.2.i', 'A.2.l', 'A.2.n', 'A.2.q', 
  'C.6.c', 'C.7.f',
);
$ra =  array(
  'A.2.f', 'A.2.g', 'A.2.h', 'A.2.k', 'A.2.m', 'A.2.n', 'A.2.v', 'A.2.w', 'A.2.x', 
  'A.2.y',
  'C.6.a', 'C.6.e', 'C.7.f', 'C.8.b', 
  'C.9.a', 'C.9.b', 'C.9.c',
);

$_all_selections = false;

/*
 *  @return array of SetOfCriteria, indexed by name.
 */
function _makeCriteriaSelections()
{
    global $_all_selections;
    global $rlo, $roots, $privacy, $security, $oophaga, $dispute,
           $pingtest, $ra, $A, $B, $C;

    /*
     * The name (first arg) is also used as the FORM key.
     * (Index to left is unimportant.)
     */
    $_all_selections = array(
      'RLO'      => new SetOfCriteria('RLO', $rlo,
                    array("Risks/Liabilities/Obligations")),
      'roots'    => new SetOfCriteria('roots', $roots,
                    array("Root Key Managemnt")),
      'privacy'  => new SetOfCriteria('privacy', $privacy,
                    array("Privacy Policy")),
      'security' => new SetOfCriteria('security', $security,
                    array("Security Manual")),
      'oophaga'  => new SetOfCriteria('oophaga', $oophaga,
                    array("Oophaga Hardware")),
      'RA'       => new SetOfCriteria('RA', $ra,
                    array("Registration Authorities (Assurance)")),
      'dispute'  => new SetOfCriteria('dispute', $dispute,
                    array("Dispute Resolution (Arbitration)")),
      'pingtest' => new SetOfCriteria('pingtest', $pingtest,
                    array("Ping Testing of Domains/Emails")),
      'A'        => new SetOfCriteria('A', $A, array('DRC A', 'Documentation')),
      'B'        => new SetOfCriteria('B', $B, array('DRC B - Public Access')),
      'C'        => new SetOfCriteria('C', $C, array('DRC C - Operational Review')),
    );
}

/*
 *  @return array of SetOfCriteria, indexed by name.
 */
function &getCriteriaSelections()
{
    global $_all_selections;

    if (false === $_all_selections)
        _makeCriteriaSelections();

    return $_all_selections;
}

/*
 *  @return array of SetOfCriteria, indexed by name.
 */
function &getSelectionSubset($name)
{
    global $rlo, $roots, $privacy, $security, $oophaga, $dispute,
           $pingtest, $ra, $A, $B, $C;

    switch ($name)
    {
    case "static":
      $s = array(
      'RLO'      => new SetOfCriteria('RLO', $rlo,
                    array("Risks/Liabilities/Obligations")),
      'roots'    => new SetOfCriteria('roots', $roots,
                    array("Root Key Managemnt")),
      'privacy'  => new SetOfCriteria('privacy', $privacy,
                    array("Privacy Policy")),
      'security' => new SetOfCriteria('security', $security,
                    array("Security Manual")),
      'oophaga'  => new SetOfCriteria('oophaga', $oophaga,
                    array("Oophaga Hardware")),
      'RA'       => new SetOfCriteria('RA', $ra,
                    array("Registration Authorities (Assurance)")),
      'dispute'  => new SetOfCriteria('dispute', $dispute,
                    array("Dispute Resolution (Arbitration)")),
      'pingtest' => new SetOfCriteria('pingtest', $pingtest,
                    array("Ping Testing of Domains/Emails")),
      );
      break;

    case "drc":
      $s = array(
      'A'        => new SetOfCriteria('A', $A, array('DRC A - Documentation')),
      'B'        => new SetOfCriteria('B', $B, array('DRC B - Public Access')),
      'C'        => new SetOfCriteria('C', $C, array('DRC C - Operational Review')),
      );
      break;

    case "marks":
      $fail = preg_replace('/\+[34]/', '+2', getMarkHtml('fail'));
      $pass = preg_replace('/\+[34]/', '+2', getMarkHtml('pass'));
      $q    = preg_replace('/\+[34]/', '+2', getMarkHtml('q'));
      $policy = getMarkHtml('policy');
      $draft = getMarkHtml('draft');
      $wip   = preg_replace('/\+[34]/', '+2', getMarkHtml('wip'));
      $change = getMarkHtml('change');
      $warning = getMarkHtml('warning');

      $s = array(
      'pass'      => new SetOfCriteria('pass', false,
                    array("All those that are marked $pass")),
      'fail'    => new SetOfCriteria('fail', false,
                    array("All those that are marked $fail")),
      'other'  => new SetOfCriteria('other', false,
                    array("not marked 'pass' or fail'")),
      'policy'  => new SetOfCriteria('policy', false,
                    array("document is in POLICY status $policy")),
      'wip'  => new SetOfCriteria('wip', false,
                    array("document is <i>work-in-progress</i> only $wip")),
      'draft'  => new SetOfCriteria('draft', false,
                    array("document is in DRAFT status $draft")),
      'change'  => new SetOfCriteria('change', false,
                    array("a change is required $change")),
      'warning'  => new SetOfCriteria('warning', false,
                    array("this area raises questions, watch carefully $warning")),
      );
      break;

    default:
      exit(" what is $name as a SelectionSubset?");
    }

    return $s;
}

// http://www.danshort.com/HTMLentities/index.php?w=dingb
$_mark_html = array(
  'fail'    => '<font title="FAIL!" color="red"   size="+4"> &#10008; </font>',
  'pass'    => '<font title="pass." color="green" size="+4"> &#10004; </font>',
  'q'       => '<font title="pending other dependencies..." color="gold" size="+3"><b>?</b>&#10082;<b>?</b> </font>',
  'wip'     => '<font title="work-in-progress document" color="orange" size="+3"> &#9997; </font>',
  'draft'   => '<font title="document is in DRAFT" color="green" size="+2"> &#9986; </font>',
  'policy'  => '<font title="POLICY document" color="green" size="+2"> &#10025; </font>',
  'change'  => '<font title="a change is required" color="orange" size="+2"> &Delta; </font>',
  'warning'  => '<font title="this area raises questions, watch carefully" color="orange" size="+2"> &delta; </font>',
  'unknown'  => '<font title="unknown mark, bug in text" color="pink" size="+3"> <b>???</b> </font>',
);


function &getMarkArray()
{
    global $_mark_html;
    return $_mark_html;
}

function getMarkHtml($mark)
{
    global $_mark_html;
    if (array_key_exists($mark, $_mark_html))
        return $_mark_html[$mark];
    else
        return $_mark_html['unknown'];
}


$_group_names = array(
    'RLO'         => $rlo,
    'roots'       => $roots,
    'privacy'     => $privacy,
    'RA'          => $ra,
    'security'    => $security,
    'oophaga'     => $oophaga,
    'dispute'     => $dispute,
    'pingtest'    => $pingtest,
    'A'           => $A,
    'B'           => $B,
    'C'           => $C,
);

/*
 *  @return array of SetOfCriteria, indexed by name, filtered by names
 */
function &getNamedGroup($group)
{
    global $_group_names;
    if (array_key_exists($group, $_group_names))
    {
        $gp = $_group_names[$group];
        return $gp;
    }
    $gp = array();
    return $gp;
}

/*
 *  @return array of SetOfCriteria, indexed by name, filtered by names
 */
function &getGroups($groups)
{
    $all = array();
    foreach ($groups as $i => $group)
    {
// echo "filter /$i/ => !$group! ...<BR>\n";
        $selection = getNamedGroup($group);
// echo count($selection) . " ...<BR>\n";
        $all = array_merge($all, $selection);
    }
    $uniq = array_unique($all);

    return $uniq;
}

/*
 *  @return array of SetOfCriteria, indexed by name, filtered by names
function &getSetsByNames($groups)
{
    $filtered = array();
    foreach ($groups as $i => $group)
    {
// echo "filter /$i/ => !$group! ...<BR>\n";
        $selection = getOneSetByName
        $selection = $all[$group];
        if (!$selection)
            continue;
        $filtered[$group] = $selection;
    }

    return $filtered;
}
 */

/*
 *  @return array of SetOfCriteria, indexed by name, filtered by names
function &filterSetsByNames($names)
{
    $all = getCriteriaSelections();
    $filtered = array();
    foreach ($names as $i => $name)
    {
// echo "filter /$i/ => !$name! ...<BR>\n";
        $selection = $all[$name];
        if (!$selection)
            continue;
        $filtered[$name] = $selection;
    }

    return $filtered;
}
 */

/*
 *  @arg array of SetOfCriteria
 *  @return new SetOfCriteria, with name of 'merge'
 */
function &mergeCriteriaSets($sets)
{
    $merged = array();
    $names = array();
    foreach ($sets as $i => $set)
    {
        $names[] = $set->getName();
        $selection = $set->getSetAsStrings();
        $merged = array_merge($merged, $selection);
    }

    $mergedSet = new SetOfCriteria('merge', $merged, $names);
    return $mergedSet;
}

?>