begin_transaction();
// First, move all test runs to the test configurations in the destination for all test configurations that
// exist in both the original platform and the platform into which we're merging.
if ($db->query_and_get_affected_rows('UPDATE test_runs SET run_config = destination.config_id
FROM test_configurations as merged, test_configurations as destination
WHERE merged.config_platform = $1 AND destination.config_platform = $2
AND run_config = merged.config_id
AND destination.config_type = merged.config_type
AND destination.config_metric = merged.config_metric', array($platform_to_merge, $destination_platform)) === FALSE) {
$db->rollback_transaction();
return notice("Failed to migrate test runs for $platform_to_merge that have test configurations in $destination_platform.");
}
// Then migrate test configurations that don't exist in the destination platform to the new platform
// so that test runs associated with those configurations are moved to the destination.
if ($db->query_and_get_affected_rows('UPDATE test_configurations as merged SET config_platform = $2
WHERE config_platform = $1 AND NOT EXISTS (SELECT * FROM test_configurations as destination WHERE
merged.config_platform = $1 AND destination.config_platform = $2
AND destination.config_type = merged.config_type
AND destination.config_metric = merged.config_metric)',
array($platform_to_merge, $destination_platform)) === FALSE) {
$db->rollback_transaction();
return notice("Failed to migrate test configurations for $platform_to_merge.");
}
if ($db->query_and_fetch_all('SELECT * FROM test_runs, test_configurations WHERE run_config = config_id AND config_platform = $1 LIMIT 1', array($platform_to_merge))) {
// We should never reach here.
$db->rollback_transaction();
return notice('Failed to migrate all test runs.');
}
if ($db->query_and_get_affected_rows('UPDATE analysis_tasks SET task_platform = $1 WHERE task_platform = $2',
array($destination_platform, $platform_to_merge)) === FALSE) {
$db->rollback_transaction();
return notice('Failed to migrate analysis tasks.');
}
$db->query_and_get_affected_rows('DELETE FROM triggerable_configurations WHERE trigconfig_platform = $1',
array($platform_to_merge));
if ($db->query_and_get_affected_rows('UPDATE build_requests SET request_platform = $1 WHERE request_platform = $2',
array($destination_platform, $platform_to_merge)) === FALSE) {
$db->rollback_transaction();
return notice('Failed to migrate build requests.');
}
$db->query_and_get_affected_rows('DELETE FROM platforms WHERE platform_id = $1', array($platform_to_merge));
$db->commit_transaction();
}
if ($db) {
if ($action == 'update') {
if (update_field('platforms', 'platform', 'name')
|| update_field('platforms', 'platform', 'group')
|| update_boolean_field('platforms', 'platform', 'hidden'))
regenerate_manifest();
else
notice('Invalid parameters.');
} else if ($action == 'merge')
merge_platforms(intval($_POST['id']), intval($_POST['destination']));
$platforms = $db->fetch_table('platforms', 'platform_name');
function merge_list($platform_row) {
global $db;
global $platforms;
$id = $platform_row['platform_id'];
$content = <<< END
END;
return array($content);
}
$platform_group_options = $db->fetch_table('platform_groups', 'platformgroup_name');
array_push($platform_group_options, array('platformgroup_id' => NULL, 'platformgroup_name' => '-'));
function platform_group_list($platform_row)
{
global $platform_group_options;
$id = intval($platform_row['platform_id']);
$platform_group_id = array_get($platform_row, 'platform_group');
$content = <<< END
END;
return array($content);
}
$page = new AdministrativePage($db, 'platforms', 'platform', array(
'name' => array('editing_mode' => 'string'),
'hidden' => array('editing_mode' => 'boolean'),
'platform group' => array('custom' => function ($platform_row) { return platform_group_list($platform_row); }),
'merge into' => array('custom' => function ($platform_row) { return merge_list($platform_row); }),
));
$page->render_table('name');
}
include('../include/admin-footer.php');
?>