$table->addFieldInfo('type', XMLDB_TYPE_CHAR, '20', null, XMLDB_NOTNULL, null, XMLDB_ENUM, array('single', 'news', 'general', 'social', 'eachuser', 'teacher', 'qanda'), 'general');
$table->addFieldInfo('name', XMLDB_TYPE_CHAR, '255', null, XMLDB_NOTNULL, null, null, null, '');
$table->addFieldInfo('intro', XMLDB_TYPE_TEXT, 'small', null, XMLDB_NOTNULL, null, null, null, '');
- $table->addFieldInfo('logo', XMLDB_TYPE_BINARY, 'big', null, XMLDB_NOTNULL, null, null, null, '');
+ $table->addFieldInfo('logo', XMLDB_TYPE_BINARY, 'big', null, XMLDB_NOTNULL, null, null, null);
$table->addFieldInfo('assessed', XMLDB_TYPE_INTEGER, '10', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, null, null, '0');
$table->addFieldInfo('assesstimestart', XMLDB_TYPE_INTEGER, '10', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, null, null, '0');
$table->addFieldInfo('assesstimefinish', XMLDB_TYPE_INTEGER, '10', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, null, null, '0');
$table->addFieldInfo('secondname', XMLDB_TYPE_CHAR, '30', null, XMLDB_NOTNULL, null, null, null, null);
$table->addFieldInfo('intro', XMLDB_TYPE_TEXT, 'medium', null, XMLDB_NOTNULL, null, null, null, null);
$table->addFieldInfo('avatar', XMLDB_TYPE_BINARY, 'medium', null, null, null, null, null, null);
- $table->addFieldInfo('grade', XMLDB_TYPE_NUMBER, '20,10', null, null, null, null, null, '');
+ $table->addFieldInfo('grade', XMLDB_TYPE_NUMBER, '20,10', null, null, null, null, null);
$table->addKeyInfo('primary', XMLDB_KEY_PRIMARY, array('id'));
/// Get SQL code and execute it
$test = new stdClass;
if (!$test->status) {
$test->error = $db->ErrorMsg();
}
- $tests['add field'] = $test;
+ $tests['add enum field'] = $test;
}
/// 5th test. Dropping one complex enum field
if (!$test->status) {
$test->error = $db->ErrorMsg();
}
- $tests['drop field'] = $test;
+ $tests['drop enum field'] = $test;
}
/// 6th test. Adding one complex enum field
if (!$test->status) {
$test->error = $db->ErrorMsg();
}
- $tests['add field again'] = $test;
+ $tests['add enum field again'] = $test;
}
- /// 7th test. Dropping one complex enum field
+ /// 7th test. Adding one numeric field
+ if ($test->status) {
+ /// Create a new field (numeric)
+ $field = new XMLDBField('onenumber');
+ $field->setAttributes(XMLDB_TYPE_INTEGER, '6', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, null, null, 0, 'type');
+ /// Get SQL code and execute it
+ $test = new stdClass;
+ $test->sql = $table->getAddFieldSQL($CFG->dbtype, $CFG->prefix, $field, true);
+ $test->status = add_field($table, $field, false, false);
+ if (!$test->status) {
+ $test->error = $db->ErrorMsg();
+ }
+ $tests['add numeric field'] = $test;
+ }
+
+ /// 8th test. Dropping one complex enum field
if ($test->status) {
/// Create a new field with complex specs (enums are good candidates)
+ $field = new XMLDBField('type');
$test = new stdClass;
$test->sql = $table->getDropFieldSQL($CFG->dbtype, $CFG->prefix, $field, true);
$test->status = drop_field($table, $field, false, false);
if (!$test->status) {
$test->error = $db->ErrorMsg();
}
- $tests['drop field again'] = $test;
+ $tests['drop enum field again'] = $test;
}
- /// 8th test. Change the type of one column from integer to varchar
+ /// 9th test. Change the type of one column from integer to varchar
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field type (int2char)'] = $test;
}
- /// 9th test. Change the type of one column from varchar to integer
+ /// 10th test. Change the type of one column from varchar to integer
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field type (char2int)'] = $test;
}
- /// 10th test. Change the type of one column from number to varchar
+ /// 11th test. Change the type of one column from number to varchar
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field type (number2char)'] = $test;
}
- /// 11th test. Change the type of one column from varchar to float
+ /// 12th test. Change the type of one column from varchar to float
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field type (char2float)'] = $test;
}
- /// 12th test. Change the type of one column from float to char
+ /// 13th test. Change the type of one column from float to char
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field type (float2char)'] = $test;
}
- /// 13th test. Change the type of one column from char to number
+ /// 14th test. Change the type of one column from char to number
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
}
- /// 14th test. Change the precision of one text field
+ /// 15th test. Change the precision of one text field
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field precision (text)'] = $test;
}
- /// 15th test. Change the precision of one char field
+ /// 16th test. Change the precision of one char field
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field precision (char)'] = $test;
}
- /// 16th test. Change the precision of one numeric field
+ /// 17th test. Change the precision of one numeric field
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field precision (number)'] = $test;
}
- /// 17th test. Change the sign of one numeric field to unsigned
+ /// 18th test. Change the sign of one numeric field to unsigned
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field sign (unsigned)'] = $test;
}
- /// 18th test. Change the sign of one numeric field to signed
+ /// 19th test. Change the sign of one numeric field to signed
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field sign (signed)'] = $test;
}
- /// 19th test. Change the nullability of one char field to not null
+ /// 20th test. Change the nullability of one char field to not null
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field nullability (not null)'] = $test;
}
- /// 20th test. Change the nullability of one char field to null
+ /// 21th test. Change the nullability of one char field to null
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['change field nullability (null)'] = $test;
}
- /// 21th test. Dropping the default of one field
+ /// 22th test. Dropping the default of one field
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['drop field default of NULL field'] = $test;
}
- /// 22th test. Creating the default for one field
+ /// 23th test. Creating the default for one field
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['add field default of NULL field'] = $test;
}
- /// 23th test. Creating the default for one field
+ /// 24th test. Creating the default for one field
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
}
- /// 24th test. Dropping the default of one NOT NULL field
+ /// 25th test. Dropping the default of one NOT NULL field
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['drop field default of NOT NULL field'] = $test;
}
- /// 25th test. Adding one unique index to the table
+ /// 26th test. Adding one unique index to the table
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['add unique index'] = $test;
}
- /// 26th test. Adding one not unique index to the table
+ /// 27th test. Adding one not unique index to the table
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['add not unique index'] = $test;
}
- /// 27th test. Re-add the same index than previous test. Check find_index_name() works.
+ /// 28th test. Re-add the same index than previous test. Check find_index_name() works.
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['check find_index_name()'] = $test;
}
- /// 28th test. Dropping one index from the table
+ /// 29th test. Dropping one index from the table
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['drop index'] = $test;
}
- /// 29th test. Adding one unique key to the table
+ /// 30th test. Adding one unique key to the table
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['add unique key'] = $test;
}
- /// 30th test. Adding one foreign+unique key to the table
+ /// 31th test. Adding one foreign+unique key to the table
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['add foreign+unique key'] = $test;
}
- /// 31th test. Drop one key
+ /// 32th test. Drop one key
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['drop foreign+unique key'] = $test;
}
- /// 32th test. Adding one foreign key to the table
+ /// 33th test. Adding one foreign key to the table
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['add foreign key'] = $test;
}
- /// 33th test. Drop one foreign key
+ /// 34th test. Drop one foreign key
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['drop foreign key'] = $test;
}
- /// 34th test. Adding one complex enum field
+ /// 35th test. Adding one complex enum field
if ($test->status) {
/// Create a new field with complex specs (enums are good candidates)
$field = new XMLDBField('type');
$tests['add field with enum'] = $test;
}
- /// 35th test. Dropping the enum of one field
+ /// 36th test. Dropping the enum of one field
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['delete enumlist from one field'] = $test;
}
- /// 36th test. Creating the enum for one field
+ /// 37th test. Creating the enum for one field
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['add enumlist to one field'] = $test;
}
- /// 37th test. Renaming one index
+ /// 38th test. Renaming one index
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['rename index (experimental. DO NOT USE IT)'] = $test;
}
- /// 38th test. Renaming one key
+ /// 39th test. Renaming one key
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['rename key (experimental. DO NOT USE IT)'] = $test;
}
- /// 39th test. Renaming one field
+ /// 40th test. Renaming one field
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['rename field'] = $test;
}
- /// 40th test. Renaming one table
+ /// 41th test. Renaming one table
if ($test->status) {
/// Get SQL code and execute it
$test = new stdClass;
$tests['rename table'] = $test;
}
- /// 41th test. Getting the PK sequence name for one table
+ /// 42th test. Getting the PK sequence name for one table
if ($test->status) {
$test = new stdClass;
$table->setName('newnameforthetable');
$tests['find sequence name'] = $test;
}
- /// 42th test. Inserting TEXT contents
+ /// 43th test. Inserting TEXT contents
$textlib = textlib_get_instance();
if ($test->status) {
$test = new stdClass;
$tests['insert record '. $textlen . ' cc. (text)'] = $test;
}
- /// 43th test. Inserting BINARY contents
+ /// 44th test. Inserting BINARY contents
if ($test->status) {
$test = new stdClass;
$test->status = false;
/// Build the record to insert
$rec->avatar = addslashes($fulltext);
- $rec->name = 'textbinary';
+ $rec->name = 'binarytest';
/// Calculate its length
$textlen = strlen($fulltext);
if ($rec->id = insert_record('newnameforthetable', $rec)) {
$tests['insert record '. $textlen . ' bytes (binary)'] = $test;
}
- /// 44th test. update_record with TEXT and BINARY contents
+ /// 45th test. update_record with TEXT and BINARY contents
if ($test->status) {
$test = new stdClass;
$test->status = false;
$tests['update record '. $textlen . ' cc. (text) and ' . $imglen . ' bytes (binary)'] = $test;
}
- /// 45th test. set_field with BINARY contents
+ /// 46th test. set_field with TEXT contents
+ if ($test->status) {
+ $test = new stdClass;
+ $test->status = false;
+ $test->sql = array();
+ /// Build the record to insert
+ $rec->intro = addslashes($fulltext);
+ $rec->name = 'updatelobs';
+ /// Calculate its length
+ $textlen = $textlib->strlen($fulltext, current_charset());
+ if (set_field('newnameforthetable', 'intro', $rec->intro, 'name', $rec->name)) {
+ if ($new = get_record('newnameforthetable', 'id', $rec->id)) {
+ $newtextlen = $textlib->strlen($new->intro);
+ if ($rec->intro === $new->intro) {
+ $test->sql = array($newtextlen . ' cc. (text) sent and received ok');
+ $test->status = true;
+ } else {
+ $test->error = $db->ErrorMsg();
+ $test->sql = array($newtextlen . ' cc. (text) transfer failed. Data changed!');
+ $test->status = false;
+ }
+ } else {
+ $test->error = $db->ErrorMsg();
+ }
+ } else {
+ $test->error = $db->ErrorMsg();
+ }
+ $tests['set field '. $textlen . ' cc. (text)'] = $test;
+ }
+
+ /// 47th test. set_field with BINARY contents
if ($test->status) {
$test = new stdClass;
$test->status = false;
projects / moodle.git / commitdiff