mod/data/import.php

   1 <?php  // $Id$
   2 ///////////////////////////////////////////////////////////////////////////
   3 //                                                                       //
   4 // NOTICE OF COPYRIGHT                                                   //
   5 //                                                                       //
   6 // Moodle - Modular Object-Oriented Dynamic Learning Environment         //
   7 //          http://moodle.org                                            //
   8 //                                                                       //
   9 // Copyright (C) 2005 Martin Dougiamas  http://dougiamas.com             //
  10 //                                                                       //
  11 // This program is free software; you can redistribute it and/or modify  //
  12 // it under the terms of the GNU General Public License as published by  //
  13 // the Free Software Foundation; either version 2 of the License, or     //
  14 // (at your option) any later version.                                   //
  15 //                                                                       //
  16 // This program is distributed in the hope that it will be useful,       //
  17 // but WITHOUT ANY WARRANTY; without even the implied warranty of        //
  18 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         //
  19 // GNU General Public License for more details:                          //
  20 //                                                                       //
  21 //          http://www.gnu.org/copyleft/gpl.html                         //
  22 //                                                                       //
  23 ///////////////////////////////////////////////////////////////////////////
  24
  25     require_once('../../config.php');
  26     require_once('lib.php');
  27     require_once($CFG->libdir.'/uploadlib.php');
  28
  29     require_login();
  30
  31     $id              = optional_param('id', 0, PARAM_INT);  // course module id
  32     $d               = optional_param('d', 0, PARAM_INT);   // database id
  33     $rid             = optional_param('rid', 0, PARAM_INT); // record id
  34     $fielddelimiter  = optional_param('fielddelimiter', ',', PARAM_CLEANHTML); // characters used as field delimiters for csv file import
  35     $fieldenclosure = optional_param('fieldenclosure', '', PARAM_CLEANHTML);   // characters used as record delimiters for csv file import
  36
  37     if ($id) {
  38         if (! $cm = get_coursemodule_from_id('data', $id)) {
  39             error('Course Module ID was incorrect');
  40         }
  41         if (! $course = get_record('course', 'id', $cm->course)) {
  42             error('Course is misconfigured');
  43         }
  44         if (! $data = get_record('data', 'id', $cm->instance)) {
  45             error('Course module is incorrect');
  46         }
  47
  48     } else {
  49         if (! $data = get_record('data', 'id', $d)) {
  50             error('Data ID is incorrect');
  51         }
  52         if (! $course = get_record('course', 'id', $data->course)) {
  53             error('Course is misconfigured');
  54         }
  55         if (! $cm = get_coursemodule_from_instance('data', $data->id, $course->id)) {
  56             error('Course Module ID was incorrect');
  57         }
  58     }
  59
  60     $context = get_context_instance(CONTEXT_MODULE, $cm->id);
  61     require_capability('mod/data:uploadentries', $context);
  62
  63     if (has_capability('mod/data:managetemplates', $context)) {
  64         if (!count_records('data_fields','dataid',$data->id)) {      // Brand new database!
  65             redirect($CFG->wwwroot.'/mod/data/field.php?d='.$data->id);  // Redirect to field entry
  66         }
  67     }
  68
  69     if ($rid){    //editting a record, do you have access to edit this?
  70         if (!has_capability('mod/data:manageentries', $context) or !data_isowner($rid) or !confirm_sesskey()){
  71             error (get_string('noaccess','data'));
  72         }
  73     }
  74
  75
  76 /// Print the page header
  77     $strdata = get_string('modulenameplural','data');
  78
  79     $navlinks = array();
  80     $navlinks[] = array('name' => $strdata, 'link' => "index.php?id=$course->id", 'type' => 'activity');
  81     $navlinks[] = array('name' => format_string($data->name), 'link' => '', 'type' => 'activityinstance');
  82     $navigation = build_navigation($navlinks);
  83
  84     print_header_simple($data->name, "", $navigation, "", "", true, "", navmenu($course));
  85     print_heading(format_string($data->name));
  86
  87 /// Groups needed for Add entry tab
  88     $groupmode = groupmode($course, $cm);
  89     $currentgroup = get_and_set_current_group($course, $groupmode);
  90
  91 /// Print the tabs
  92     $currenttab = 'add';
  93     include('tabs.php');
  94
  95
  96     $um = new upload_manager('recordsfile', false, false, null, false, 0);
  97
  98     if ($um->preprocess_files() && confirm_sesskey()) {
  99         $filename = $um->files['recordsfile']['tmp_name'];
 100
 101         // Large files are likely to take their time and memory. Let PHP know
 102         // that we'll take longer, and that the process should be recycled soon
 103         // to free up memory.
 104         @set_time_limit(0);
 105         @raise_memory_limit("96M");
 106         if (function_exists('apache_child_terminate')) {
 107             @apache_child_terminate();
 108         }
 109
 110         //Fix mac/dos newlines
 111         $text = my_file_get_contents($filename);
 112         $text = preg_replace('!\r\n?!',"\n",$text);
 113         $fp = fopen($filename, "w");
 114         fwrite($fp, $text);
 115         fclose($fp);
 116
 117         $recordsadded = 0;
 118
 119         if (!$records = data_get_records_csv($filename, $fielddelimiter, $fieldenclosure)) {
 120             error('get_records_csv failed to read data from the uploaded file. Please check file for field name typos and formatting errors.');
 121         } else {
 122             //$db->debug = true;
 123             $fieldnames = array_shift($records);
 124
 125             foreach ($records as $record) {
 126                 if ($recordid = data_add_record($data, 0)) {  // add instance to data_record
 127                     $fields = get_records('data_fields', 'dataid', $data->id, '', 'name, id, type');
 128
 129                     // do a manual round of inserting, to make sure even empty contents get stored
 130                     foreach ($fields as $field) {
 131                         $content->recordid = $recordid;
 132                         $content->fieldid = $field->id;
 133                         insert_record('data_content', $content);
 134                     }
 135                     // for each field in the add form, add it to the data_content.
 136                     foreach ($record as $key => $value) {
 137                         $name = $fieldnames[$key];
 138                         $field = $fields[$name];
 139                         require_once($CFG->dirroot.'/mod/data/field/'.$field->type.'/field.class.php');
 140                         $newfield = 'data_field_'.$field->type;
 141                         $currentfield = new $newfield($field->id);
 142
 143                         $currentfield->update_content($recordid, $value, $name);
 144                     }
 145                     $recordsadded++;
 146                 }
 147             } // End foreach
 148         } // End else
 149     }//sun without love motivo atillas
 150
 151     if ($recordsadded > 0) {
 152         notify($recordsadded. ' '. get_string('recordssaved', 'data'));
 153     } else {
 154         notify(get_string('recordsnotsaved', 'data'));
 155     }
 156     echo '<p />';
 157
 158
 159 /// Finish the page
 160     print_footer($course);
 161
 162
 163
 164
 165 function my_file_get_contents($filename, $use_include_path = 0) {
 166 /// Returns the file as one big long string
 167
 168     $data = "";
 169     $file = @fopen($filename, "rb", $use_include_path);
 170     if ($file) {
 171         while (!feof($file)) {
 172             $data .= fread($file, 1024);
 173         }
 174         fclose($file);
 175     }
 176     return $data;
 177 }
 178
 179
 180
 181 // Read the records from the given file.
 182 // Perform a simple field count check for each record.
 183 function data_get_records_csv($filename, $fielddelimiter=',', $fieldenclosure="\n") {
 184     global $db;
 185
 186     if (empty($fielddelimiter)) {
 187         $fielddelimiter = ',';
 188     }
 189     if (empty($fieldenclosure)) {
 190         $fieldenclosure = "\n";
 191     }
 192
 193     if (!$fp = fopen($filename, "r")) {
 194         error('get_records_csv failed to open '.$filename);
 195     }
 196     $fieldnames = array();
 197     $rows = array();
 198
 199     $fieldnames = fgetcsv($fp, 4096, $fielddelimiter, $fieldenclosure);
 200
 201     if (empty($fieldnames)) {
 202         fclose($fp);
 203         return false;
 204     }
 205     $rows[] = $fieldnames;
 206
 207     while (($data = fgetcsv($fp, 4096, $fielddelimiter, $fieldenclosure)) !== false) {
 208         if (count($data) > count($fieldnames)) {
 209             // For any given record, we can't have more data entities than the number of fields.
 210             fclose($fp);
 211             return false;
 212         }
 213         $rows[] = $data;
 214     }
 215
 216     fclose($fp);
 217     return $rows;
 218 }
 219
 220 ?>