Ejemplo n.º 1
0
/**
 * export data (send header and echo result)
 */
function churchdb__export()
{
    drupal_add_http_header('Content-type', 'application/csv; charset=ISO-8859-1; encoding=ISO-8859-1', true);
    drupal_add_http_header('Content-Disposition', 'attachment; filename="churchdb_export.csv"', true);
    include_once "churchdb_db.php";
    $params = $_GET;
    $template = null;
    $ids = null;
    if (isset($params["template"])) {
        $template = _getExportTemplateByName($params["template"]);
    }
    if (isset($params["ids"])) {
        $ids = $params["ids"];
    }
    $export = _getPersonDataForExport($ids, $template);
    $export = _addGroupRelationDataForExport($export, $template);
    // if filtered by relations, load and export linked persons too
    //FIXME: unsanitized get data inserted in sql query! change to use :var syntax with params!
    foreach ($export as $key => $entry) {
        if (isset($params["rel_part"]) && $params["rel_part"] != null && $params["rel_id"] != null) {
            $id = null;
            if ($params["rel_part"] == "k") {
                $rel = db_query("select * from {cdb_beziehung} where beziehungstyp_id=" . $params["rel_id"] . " and vater_id=" . $key)->fetch();
                if ($rel != false) {
                    $id = $rel->kind_id;
                }
            }
            if ($id == null || $params["rel_part"] == "k") {
                $rel = db_query("select * from {cdb_beziehung} where beziehungstyp_id=" . $params["rel_id"] . " and kind_id=" . $key)->fetch();
                $id = $rel->vater_id;
            }
            // if relation to additional person found
            if ($id != null && !isset($export[$id])) {
                $person = _getPersonDataForExport($id, $template);
                if ($person != null && isset($person[$id])) {
                    foreach ($person[$id] as $key => $value) {
                        $export[$key][$params["rel_part"] . "_" . $key] = $value;
                    }
                }
            }
        }
    }
    // check for relations and aggregate data sets, if parameter agg is specified
    $rels = getAllRelations();
    if ($rels != null) {
        $rel_types = getAllRelationTypes();
        foreach ($rels as $rel) {
            if (isset($params["agg" . $rel->typ_id]) && $params["agg" . $rel->typ_id] == "y" && isset($export[$rel->v_id]) && isset($export[$rel->k_id])) {
                // use the male as first person, if available
                if (!isset($export[$rel->v_id]["anrede2"]) || $export[$rel->v_id]["anrede2"] == "Lieber") {
                    $p1 = $rel->v_id;
                    $p2 = $rel->k_id;
                } else {
                    $p1 = $rel->k_id;
                    $p2 = $rel->v_id;
                }
                // add second to the male
                $export[$p1]["anrede"] = $rel_types[$rel->typ_id]->export_title;
                if (isset($export[$p1]["anrede2"]) && isset($export[$p2]["anrede2"])) {
                    $export[$p1]["anrede2"] = $export[$p2]["anrede2"] . " " . $export[$p2]["vorname"] . ", " . $export[$p1]["anrede2"];
                }
                $export[$p1]["vorname2"] = $export[$p2]["vorname"];
                if (isset($export[$p2]["email"])) {
                    $export[$p1]["email_beziehung"] = $export[$p2]["email"];
                }
                // remove second from export data
                $export[$p2] = null;
            }
        }
    }
    // check if there is a group given to add information about to export data
    if (isset($params["groupid"])) {
        foreach ($export as $k => $key) {
            if ($key != null) {
                $r = db_query("select g.bezeichnung, s.bezeichnung status, DATE_FORMAT(gpg.letzteaenderung, '%d.%m.%Y') letzteaenderung, gpg.comment \n                 from {cdb_gruppe} g, {cdb_gemeindeperson} gp, \n                       {cdb_gemeindeperson_gruppe} gpg, {cdb_gruppenteilnehmerstatus} s  \n                    where gp.id=gpg.gemeindeperson_id and g.id=:gruppe_id \n                           and s.intern_code=status_no\n                         and gpg.gruppe_id=g.id and gp.person_id=:person_id", array(":gruppe_id" => $params["groupid"], ":person_id" => $k))->fetch();
                if ($r != false) {
                    $export[$k]["Gruppe"] = $r->bezeichnung;
                    $export[$k]["Gruppe_Dabeiseit"] = $r->letzteaenderung;
                    $export[$k]["Gruppen_Kommentar"] = $r->comment;
                    $export[$k]["Gruppen_Status"] = $r->status;
                }
            }
        }
    }
    // Get all available columns
    $cols = array();
    foreach ($export as $key => $row) {
        if ($row != null) {
            foreach ($row as $a => $val) {
                if (gettype($val) != "object" && gettype($val) != "array") {
                    $cols[$a] = $a;
                }
            }
        }
    }
    // Add header
    $sql = "select langtext from {cdb_feld} where db_spalte=:db_spalte";
    foreach ($cols as $col) {
        $res = db_query($sql, array(":db_spalte" => $col))->fetch();
        if (!$res) {
            $txt = t($col);
            //TODO: test for actually used DB encoding?
            if (substr($txt, 0, 3) != "***") {
                echo mb_convert_encoding('"' . $txt . '";', 'ISO-8859-1', 'UTF-8');
            } else {
                echo mb_convert_encoding('"' . $col . '";', 'ISO-8859-1', 'UTF-8');
            }
        } else {
            echo mb_convert_encoding('"' . $res->langtext . '";', 'ISO-8859-1', 'UTF-8');
        }
    }
    echo "\n";
    // Sort data
    function sort_export_func($a, $b)
    {
        $sort_a = "";
        $sort_b = "";
        if (isset($a["name"])) {
            $sort_a .= $a["name"];
        }
        if (isset($a["vorname"])) {
            $sort_a .= $a["vorname"];
        }
        if (isset($b["name"])) {
            $sort_b .= $b["name"];
        }
        if (isset($b["vorname"])) {
            $sort_b .= $b["vorname"];
        }
        if (isset($a["id"])) {
            $sort_a .= $a["id"];
        }
        if (isset($b["id"])) {
            $sort_b .= $b["id"];
        }
        if ($sort_a == $sort_b) {
            return 0;
        }
        return $sort_a < $sort_b ? -1 : 1;
    }
    usort($export, "sort_export_func");
    // Add all data rows
    foreach ($export as $row) {
        if ($row != null) {
            foreach ($cols as $col) {
                if (isset($row[$col])) {
                    echo mb_convert_encoding('"' . $row[$col] . '";', 'ISO-8859-1', 'UTF-8');
                } else {
                    echo ";";
                }
            }
            echo "\n";
        }
    }
}
Ejemplo n.º 2
0
/**
 * export data (send header and echo result)
 */
function churchdb__export()
{
    drupal_add_http_header('Content-type', 'application/csv; charset=ISO-8859-1; encoding=ISO-8859-1', true);
    drupal_add_http_header('Content-Disposition', 'attachment; filename="churchdb_export.csv"', true);
    include_once "churchdb_db.php";
    $ids = getVar("ids", null);
    $relPart = getVar("rel_part", null);
    $relId = getVar("rel_id", null);
    $template = _getExportTemplateByName(getVar("template", null));
    $export = _getPersonDataForExport($ids, $template);
    $export = _addGroupRelationDataForExport($export, $template);
    // if filtered by relations, load and export linked persons too
    foreach ($export as $key => $entry) {
        if ($relPart && $relId) {
            $id = null;
            if ($relPart == "k") {
                $rel = db_query("SELECT * FROM {cdb_beziehung}\n                        WHERE beziehungstyp_id=:relId AND vater_id=:key", array(":relId" => $relId, "key" => $key))->fetch();
                if ($rel) {
                    $id = $rel->kind_id;
                }
            }
            if (!$id) {
                $rel = db_query("SELECT * FROM {cdb_beziehung}\n                        WHERE beziehungstyp_id=:relId AND kind_id=:key", array(":relId" => $relId, "key" => $key))->fetch();
                $id = $rel->vater_id;
            }
            // if relation to additional person found
            if ($id && !isset($export[$id])) {
                $person = _getPersonDataForExport($id, $template);
                if ($person && isset($person[$id])) {
                    foreach ($person[$id] as $relKey => $relValue) {
                        $export[$key][$relPart . "_" . $relKey] = $relValue;
                    }
                }
            }
        }
    }
    // check for relations and aggregate data sets, if parameter agg is specified
    $rels = getAllRelations();
    if ($rels != null) {
        $rel_types = getAllRelationTypes();
        foreach ($rels as $rel) {
            if (getVar("agg" . $rel->typ_id) == "y" && isset($export[$rel->v_id]) && isset($export[$rel->k_id])) {
                // use the male as first person, if available
                if (!isset($export[$rel->v_id]["Anrede2"]) || $export[$rel->v_id]["Anrede2"] == t('salutation.man.2')) {
                    $p1 = $rel->v_id;
                    $p2 = $rel->k_id;
                } else {
                    $p1 = $rel->k_id;
                    $p2 = $rel->v_id;
                }
                // add second to the male
                $export[$p1]["Anrede"] = $rel_types[$rel->typ_id]->export_title;
                if (isset($export[$p1]["Anrede2"]) && isset($export[$p2]["Anrede2"])) {
                    $export[$p1]["Anrede2"] = $export[$p2]["Anrede2"] . " " . $export[$p2]["vorname"] . ", " . $export[$p1]["Anrede2"];
                }
                $export[$p1]["Vorname2"] = $export[$p2]["vorname"];
                if (isset($export[$p2]["email"])) {
                    $export[$p1]["email_beziehung"] = $export[$p2]["email"];
                }
                // remove second from export data
                $export[$p2] = null;
            }
        }
    }
    // check if there is a group given to add information about to export data
    if ($groupId = getVar("groupid")) {
        foreach ($export as $k => $key) {
            if ($key != null) {
                $r = db_query("\n           SELECT g.bezeichnung, s.bezeichnung status, DATE_FORMAT(gpg.letzteaenderung, '%d.%m.%Y') letzteaenderung, gpg.comment\n           FROM {cdb_gruppe} g, {cdb_gemeindeperson} gp, {cdb_gemeindeperson_gruppe} gpg, {cdb_gruppenteilnehmerstatus} s\n           WHERE gp.id=gpg.gemeindeperson_id and g.id=:gruppe_id and s.intern_code=status_no and gpg.gruppe_id=g.id and gp.person_id=:person_id", array(":gruppe_id" => $groupId, ":person_id" => $k))->fetch();
                if ($r) {
                    $export[$k]["Gruppe"] = $r->bezeichnung;
                    $export[$k]["Gruppe_Dabeiseit"] = $r->letzteaenderung;
                    $export[$k]["Gruppen_Kommentar"] = $r->comment;
                    $export[$k]["Gruppen_Status"] = $r->status;
                }
            }
        }
    }
    // Get all available columns
    $cols = array();
    foreach ($export as $key => $row) {
        if ($row) {
            foreach ($row as $a => $val) {
                if (!is_object($val) && !is_array($val)) {
                    $cols[$a] = $a;
                }
            }
        }
    }
    // Add header
    $sql = "SELECT langtext from {cdb_feld}\n          WHERE db_spalte=:db_spalte";
    foreach ($cols as $col) {
        $res = db_query($sql, array(":db_spalte" => $col))->fetch();
        if (!$res) {
            $txt = t($col);
            // TODO: test for actually used DB encoding?
            if (substr($txt, 0, 3) != "***") {
                echo mb_convert_encoding('"' . $txt . '";', 'ISO-8859-1', 'UTF-8');
            } else {
                echo mb_convert_encoding('"' . $col . '";', 'ISO-8859-1', 'UTF-8');
            }
        } else {
            echo mb_convert_encoding('"' . $res->langtext . '";', 'ISO-8859-1', 'UTF-8');
        }
    }
    echo "\n";
    // Sort data
    usort($export, "sort_export_func");
    // Add all data rows
    foreach ($export as $row) {
        if ($row) {
            foreach ($cols as $col) {
                if (isset($row[$col])) {
                    echo mb_convert_encoding('"' . $row[$col] . '";', 'ISO-8859-1', 'UTF-8');
                } else {
                    echo ";";
                }
            }
            echo "\n";
        }
    }
}