root/form/export.php

<?php

/*
 * Elgg Forms
 * Kevin Jardine
 * Radagast Solutions
 * http://radagast.biz
 *
 * The main function for exporting form data.
 *
 */
 
// Load Elgg framework
@require_once("../../includes.php");
    
// Define context
define("context","form");
  
if (isloggedin() && run("users:flags:get", array("admin", $_SESSION['userid']))) {
    $form_id = optional_param('id',0,PARAM_INT);
    $out = fopen('php://output', 'w');
    header('Content-type: text/plain');
    $data = get_records('form_data','form_id',$form_id,"ident ASC");
    if ($data) {
        foreach ($data AS $item) {
            fputcsv($out,(array) $item);
        }
    }
} else {
    print(__gettext("You need to be logged in as a site administrator to access this page."));
}

// Deal with PHPs (eg. 4.x that don't have fputcsv

if (!function_exists('fputcsv')) {
 
  function fputcsv(&$handle, $fields = array(), $delimiter = ',', $enclosure = '"') {
    $str = '';
    $escape_char = '\\';
    foreach ($fields as $value) {
      if (strpos($value, $delimiter) !== false ||
          strpos($value, $enclosure) !== false ||
          strpos($value, "\n") !== false ||
          strpos($value, "\r") !== false ||
          strpos($value, "\t") !== false ||
          strpos($value, ' ') !== false) {
        $str2 = $enclosure;
        $escaped = 0;
        $len = strlen($value);
        for ($i=0;$i<$len;$i++) {
          if ($value[$i] == $escape_char) {
            $escaped = 1;
          } else if (!$escaped && $value[$i] == $enclosure) {
            $str2 .= $enclosure;
          } else {
            $escaped = 0;
          }
          $str2 .= $value[$i];
        }
        $str2 .= $enclosure;
        $str .= $str2.$delimiter;
      } else {
        $str .= $value.$delimiter;
      }
    }
    $str = substr($str,0,-1);
    $str .= "\n";
    return fwrite($handle, $str);
  }
  

  
   
}

?>