admin/user/user_bulk_download.php

   1 <?php //$Id$
   2 /**
   3 * script for downloading of user lists
   4 */
   5
   6 require_once('../../config.php');
   7 require_once($CFG->libdir.'/adminlib.php');
   8
   9 $format = optional_param('format', '', PARAM_ALPHA);
  10
  11 admin_externalpage_setup('userbulk');
  12 require_capability('moodle/user:update', get_context_instance(CONTEXT_SYSTEM));
  13
  14 $return = $CFG->wwwroot.'/'.$CFG->admin.'/user/user_bulk.php';
  15
  16 if (empty($SESSION->bulk_users)) {
  17     redirect($return);
  18 }
  19
  20 if ($format) {
  21     $fields = array('id'        => 'id',
  22                     'username'  => 'username',
  23                     'email'     => 'email',
  24                     'firstname' => 'firstname',
  25                     'lastname'  => 'lastname',
  26                     'idnumber'  => 'idnumber',
  27                     'institution' => 'institution',
  28                     'department' => 'department',
  29                     'phone1'    => 'phone1',
  30                     'phone2'    => 'phone2',
  31                     'city'      => 'city',
  32                     'url'       => 'url',
  33                     'icq'       => 'icq',
  34                     'skype'     => 'skype',
  35                     'aim'       => 'aim',
  36                     'yahoo'     => 'yahoo',
  37                     'msn'       => 'msn',
  38                     'country'   => 'country');
  39
  40     if ($extrafields = get_records_select('user_info_field')) {
  41         foreach ($extrafields as $n=>$v){
  42             $fields['profile_field_'.$v->shortname] = 'profile_field_'.$v->name;
  43         }
  44     }
  45
  46     switch ($format) {
  47         case 'csv' : user_download_csv($fields);
  48         case 'ods' : user_download_ods($fields);
  49         case 'xls' : user_download_xls($fields);
  50
  51     }
  52     die;
  53 }
  54
  55 admin_externalpage_print_header();
  56 print_heading(get_string('download', 'admin'));
  57
  58 print_box_start();
  59 echo '<ul>';
  60 echo '<li><a href="user_bulk_download.php?format=csv">'.get_string('downloadtext').'</a></li>';
  61 echo '<li><a href="user_bulk_download.php?format=ods">'.get_string('downloadods').'</a></li>';
  62 echo '<li><a href="user_bulk_download.php?format=xls">'.get_string('downloadexcel').'</a></li>';
  63 echo '</ul>';
  64 print_box_end();
  65
  66 print_continue($return);
  67
  68 print_footer();
  69
  70 function user_download_ods($fields) {
  71     global $CFG, $SESSION;
  72
  73     require_once("$CFG->libdir/odslib.class.php");
  74     require_once($CFG->dirroot.'/user/profile/lib.php');
  75
  76     $filename = clean_filename(get_string('users').'.ods');
  77
  78     $workbook = new MoodleODSWorkbook('-');
  79     $workbook->send($filename);
  80
  81     $worksheet = array();
  82
  83     $worksheet[0] =& $workbook->add_worksheet('');
  84     $col = 0;
  85     foreach ($fields as $fieldname) {
  86         $worksheet[0]->write(0, $col, $fieldname);
  87         $col++;
  88     }
  89
  90     $row = 1;
  91     foreach ($SESSION->bulk_users as $userid) {
  92         if (!$user = get_record('user', 'id', $userid)) {
  93             continue;
  94         }
  95         $col = 0;
  96         profile_load_data($user);
  97         foreach ($fields as $field=>$unused) {
  98             $worksheet[0]->write($row, $col, $user->$field);
  99             $col++;
 100         }
 101         $row++;
 102     }
 103
 104     $workbook->close();
 105     die;
 106 }
 107
 108 function user_download_xls($fields) {
 109     global $CFG, $SESSION;
 110
 111     require_once("$CFG->libdir/excellib.class.php");
 112     require_once($CFG->dirroot.'/user/profile/lib.php');
 113
 114     $filename = clean_filename(get_string('users').'.xls');
 115
 116     $workbook = new MoodleExcelWorkbook('-');
 117     $workbook->send($filename);
 118
 119     $worksheet = array();
 120
 121     $worksheet[0] =& $workbook->add_worksheet('');
 122     $col = 0;
 123     foreach ($fields as $fieldname) {
 124         $worksheet[0]->write(0, $col, $fieldname);
 125         $col++;
 126     }
 127
 128     $row = 1;
 129     foreach ($SESSION->bulk_users as $userid) {
 130         if (!$user = get_record('user', 'id', $userid)) {
 131             continue;
 132         }
 133         $col = 0;
 134         profile_load_data($user);
 135         foreach ($fields as $field=>$unused) {
 136             $worksheet[0]->write($row, $col, $user->$field);
 137             $col++;
 138         }
 139         $row++;
 140     }
 141
 142     $workbook->close();
 143     die;
 144 }
 145
 146 function user_download_csv($fields) {
 147     global $CFG, $SESSION;
 148
 149     require_once($CFG->dirroot.'/user/profile/lib.php');
 150
 151     $filename = clean_filename(get_string('users').'.csv');
 152
 153     header("Content-Type: application/download\n");
 154     header("Content-Disposition: attachment; filename=$filename");
 155     header("Expires: 0");
 156     header("Cache-Control: must-revalidate,post-check=0,pre-check=0");
 157     header("Pragma: public");
 158
 159     $delimiter = get_string('listsep');
 160     $encdelim  = '&#'.ord($delimiter);
 161
 162     $row = array();
 163     foreach ($fields as $fieldname) {
 164         $row[] = str_replace($delimiter, $encdelim, $fieldname);
 165     }
 166     echo implode($delimiter, $row)."\n";
 167
 168     foreach ($SESSION->bulk_users as $userid) {
 169         $row = array();
 170         if (!$user = get_record('user', 'id', $userid)) {
 171             continue;
 172         }
 173         profile_load_data($user);
 174         foreach ($fields as $field=>$unused) {
 175             $row[] = str_replace($delimiter, $encdelim, $user->$field);
 176         }
 177         echo implode($delimiter, $row)."\n";
 178     }
 179     die;
 180 }
 181
 182 ?>