EDIT

<?php

/**

 * Implements hook_menu().

 */

function dwca_export_menu() {

	$items = array();

	$items['admin/config/system/dwca_export'] = array(

		'title' => 'Darwin Core Archive export',

		'description' => t('Create a DarwinCore Archive of this scratchpad.'),

		'page callback' => 'drupal_get_form',

		'page arguments' => array('dwca_export_config_form'),

		'access arguments' => array('access DwC-A export settings'),

		'type' => MENU_NORMAL_ITEM,

		//'file' => 'dwca_export.admin.inc'

	);

	$items['dwca_export'] = array(

		'page callback' => 'dwca_export_deliver_archive',

		'access arguments' => array('access content'),

		'type' => MENU_CALLBACK

	);

	return $items;

}

/**

 * Implementation of hook_views_api()

 *

 * drupal will load dwca_export.views_default.inc when this hook is implemented

 */

function dwca_export_views_api() {

	return array(

		'api' => 3.0

	);

}

/**

 * Form function, called by drupal_get_form()

 * in dwca_export_menu().

 */

function dwca_export_config_form($form, &$form_state) {

	global $base_url;

	$form['dwca_export_todo'] = array(

		'#markup' => '<p><em>No settings implemented yet...</em></p>'

		.'<p>The DarwinCore Archive export is available at '. l('dwca_export', 'dwca_export').'</p>'

		.'<p>For general information on the DarwinCore Archive format please refer to  '

		. l('GBIF - Standards and Tools - Darwin Core Archives', 'http://www.gbif.org/informatics/standards-and-tools/publishing-data/data-standards/darwin-core-archives/')

		.'</p>'

	);

	$form['views'] = dwca_export_select_view_form();

	$form['#submit'][] = 'dwca_export_config_form_submit';

	return system_settings_form($form);

}

function dwca_export_select_view_form() {

	$views = array(

    		'#type' => 'fieldset',

    		'#title' => t('Select views'),

    		//'#tree' => TRUE,

  	);

	$default_value = _dwca_export_archive_descriptor_file_map();

	$views['classification_view'] = array(

  	'#type' => 'textfield',

  	'#title' => t('classification:'),

  	'#default_value' => $default_value['classification.txt']['view_name'],

  	'#size' => 60,

  	'#maxlength' => 64,

  	'#description' => t('specify view for classification.txt'),

	);

	$views['specimen_view'] = array(

  	'#type' => 'textfield',

  	'#title' => t('specimen:'),

	'#default_value' => variable_get('specimen.txt', 'dwca_export_specimen'),

  	'#size' => 60,

  	'#maxlength' => 64,

  	'#description' => t('specify view for specimen.txt'),

	);

	$views['reference_view'] = array(

  	'#type' => 'textfield',

  	'#title' => t('reference:'),

  	'#size' => 60,

  	'#maxlength' => 64,

  	'#description' => t('specify view for reference.txt'),

	);

	$views['description_view'] = array(

  	'#type' => 'textfield',

  	'#title' => t('description:'),

  	'#size' => 60,

  	'#maxlength' => 64,

  	'#description' => t('specify view for description.txt'),

	);

	$views['distribution_view'] = array(

  	'#type' => 'textfield',

  	'#title' => t('distribution:'),

  	'#size' => 60,

  	'#maxlength' => 64,

  	'#description' => t('specify view for distribution.txt'),

	);

	$views['image_view'] = array(

  	'#type' => 'textfield',

  	'#title' => t('image:'),

  	'#size' => 60,

  	'#maxlength' => 64,

  	'#description' => t('specify view for image.txt'),

	);

//variable_get('classification.txt', 'test'),

	//$views['submit'] = array('#type' => 'submit', '#value' => t('Save selected'));

	return $views;

}

function dwca_export_config_form_submit($form, &$form_state) {  

// 	db_query("INSERT INTO {table} (classification_view) VALUES ('%s')", $form_state['values']['classification_view']);  

//variable_set($name, $value)

	drupal_set_message(t('Your config form has been saved.'));

//throw new Exception(t('Could not create zip_archive %tmp_archive_file_name', array('%tmp_archive_file_name' => $tmp_archive_file_name)));

}

/**

 * menu callback

 */

function dwca_export_deliver_archive() {

	$tmp_archive_file_name = dwca_export_create_archive( _dwca_export_archive_descriptor_file_map() );

	if($tmp_archive_file_name && file_valid_uri($tmp_archive_file_name)){

		file_transfer($tmp_archive_file_name, array('Content-Type' => 'application/zip'));

	} else {

		throw new Exception(t('Error creating the archive'));

	}

}

/**

 * Provides the archive_descriptor_file_map which maps dwca file name to a set of view information.

 * The view information contains the fields 'view_name', 'display_id', 'out_file_url'.

 * The 'out_file_url' is initailly empty and will be set when this function is called

 * with both parameters.

 *

 * @param unknown_type $file_name

 * @param unknown_type $out_file_url

 *

 * @return the archive_descriptor_file_map

 */

function _dwca_export_archive_descriptor_file_map($file_name = NULL, $out_file_url = null){

	static $file_map;

	if(!isset($file_map)){

		//TODO load from variables, consider using strongarm

		$file_map = array(

			'classification.txt' => array(

				'view_name'=> 'dwca_export_classification',

				'display_id' => 'views_data_export_1',

				'out_file_url' => NULL

			),

			'typesandspecimen.txt' => array(

				'view_name'=> 'view_test_specimen_export',

				'display_id' => 'views_data_export_1',

				'out_file_url' => NULL

			)

		);

	}

	if($file_name && $out_file_url){

		$file_map[$file_name]['out_file_url'] = $out_file_url;

	}

	return $file_map;

}

/**

 * Walks all view export paths defined in the $views_map.

 * Each file is downloaded to the tmp folder and a zip file

 * is bundeled of the resulting csv files plus the meta file.

 *

 * @param $views_map - maps a view paths to dwca filenames

 *

 * @return the path in the filesystem to the final archive,

 * or FALSE in case of an error.

 */

function dwca_export_create_archive($views_map) {

	global $base_url;

	// execute all views to export the data into

	// temporary csv files (temporary://dwca_export_*). the resulting filenames

	// will be stored in _dwca_export_archive_descriptor_file_map()

	foreach($views_map as $filename=>$view_data){

		$view = views_get_view($view_data['view_name']);

		$options = array (

		    'output_file' => $filename

		);

		_dwca_export_views_data_export_override_batch($view, $view_data['display_id'], $options);

		$view->execute_display($view_data['display_id']);

	}

	// all data is exported to temporary://dwca_export_*

	// now we can start bundeling the actual archive

	$tmp_archive_file_name = drupal_tempnam("temporary://", "dwca_export_archive_");

	// Unfortunately we cannot use drupals ArchiverZip because there ís

	// no way to pass in ZipArchive::CREATE to the constructor to create the archive

	// TODO test if zip functionality is available (i.e. if(function_exists('zip_open'))

	// but I don't know where the proper location for such a check would be

	$zip = new ZipArchive();

	// it is safe to use drupal_realpath as the tmp file will be certainly local

	// and php's ZipArchive does not handle stream URIs

	$result = $zip->open(drupal_realpath($tmp_archive_file_name), ZipArchive::CREATE);

	// there might be a better way to get at this information

	$module_static_dir_absolute = realpath(drupal_get_path('module', 'dwca_export')) . "/static/";

	// at the moment we are using a static meta.xml file

	$metadata = "meta.xml";

	$zip_root_dir = "dwca_export/";

	if ($result !== TRUE) {

		throw new Exception(t('Could not create zip_archive %tmp_archive_file_name', array('%tmp_archive_file_name' => $tmp_archive_file_name)));

	}

	// add metadata

	$zip->addFile($module_static_dir_absolute.$metadata, $zip_root_dir.$metadata);

	// add the csv data files

	foreach(_dwca_export_archive_descriptor_file_map() as $dwca_filename=>$view_data){

		$view_temp_file = $view_data['out_file_url'];

		if($view_temp_file){

			$zip->addFile(drupal_realpath($view_temp_file), $zip_root_dir.$dwca_filename);

		}else{

			throw new Exception(t('Cannot create %file', array('%file' => $dwca_filename)));

		}

	}

	$zip->close();

	return $tmp_archive_file_name;

}

/**

 * Helper function that indicates that we want to

 * override the batch that the views_data_export view creates

 * on it's initial time through.

 *

 * Also provides a place to stash options that need to stay around

 * until the end of the batch

 *

 * adapted fom views_data_export.drush.inc

 */

function _dwca_export_views_data_export_override_batch($view = NULL, $display = NULL, $options = TRUE) {

	static $_views;

	if (isset($view)) {

		$_views[$view->name][$display] = $options;

	}

	return $_views;

}

/**

 * Implementation of hook_views_data_export_batch_alter()

 *

 * adapted fom views_data_export.drush.inc

 *

 *  @see batch_process() in form.inc

 */

function dwca_export_views_data_export_batch_alter(&$batch, &$final_destination, &$querystring) {

	$view_name = $batch['view_name'];

	$display_id = $batch['display_id'];

	$ok_to_override = _dwca_export_views_data_export_override_batch();

	// Make sure we do nothing if we are called not following the execution of

	// our drush command. This could happen if the file with this function in it

	// is included during the normal execution of the view

	if (!$ok_to_override[$view_name][$display_id]) {

		return;

	}

	$options = $ok_to_override[$view_name][$display_id];

	// We actually never return from the drupal_alter, but

	// use drush's batch system to run the same batch

	// Add a final callback

	$batch['operations'][] = array(

	    '_dwca_export_views_data_export_batch_finished', array($batch['eid'], $options['output_file']),

	);

	$batch['progressive'] = FALSE;

}

/**

* Implementation of hook_views_data_export_batch_alter()

*

* @see batch_process() in form.inc

*/

function dwca_export_batch_alter(&$batch, &$final_destination, &$querystring) {

	if($batch['source_url'] == 'dwca_export'){

		$batch['progressive'] = FALSE;

	}

}

/**

* Get's called at the end of the drush batch process that generated our export

*

* adapted fom views_data_export.drush.inc

*/

function _dwca_export_views_data_export_batch_finished($eid, $output_file, &$context) {

	// Fetch export info

	$export = views_data_export_get($eid);

	// Perform cleanup

	$view = views_data_export_view_retrieve($eid);

	$view->set_display($export->view_display_id);

	$view->display_handler->batched_execution_state = $export;

	$view->display_handler->remove_index();

	// Get path to temp file

	$temp_file = $view->display_handler->outputfile_path();

	_dwca_export_archive_descriptor_file_map($output_file, $temp_file);

}