<?php

	$Action = (isset($_REQUEST['Action'])) ? $_REQUEST['Action'] : '';
	$ListID = (isset($_REQUEST['ListID'])) ? $_REQUEST['ListID'] : 0;
	$ImportID = (isset($_REQUEST['ImportID'])) ? $_REQUEST['ImportID'] : 0;
	$TextFileName = (isset($_REQUEST['TextFileName'])) ? $_REQUEST['TextFileName'] : '';
	$headers = (isset($_REQUEST['headers'])) ? $_REQUEST['headers'] : '';
	$fielddelim = (isset($_REQUEST['fielddelim'])) ? $_REQUEST['fielddelim'] : '';
	$recorddelim = (isset($_REQUEST['recorddelim'])) ? $_REQUEST['recorddelim'] : '';
	$hasHeaders = (isset($_REQUEST['headers']) && $_REQUEST['headers'] == '1') ? 1 : 0;
	$Do = (isset($_REQUEST['Do'])) ? $_REQUEST['Do'] : '';
	$SAVals = (isset($_REQUEST['SAVals'])) ? $_REQUEST['SAVals'] : '';
	$SIVals = (isset($_REQUEST['SIVals'])) ? $_REQUEST['SIVals'] : '';
	$FTVals = (isset($_REQUEST['FTVals'])) ? $_REQUEST['FTVals'] : '';
	$FHVals = (isset($_REQUEST['FHVals'])) ? $_REQUEST['FHVals'] : '';
	$OverrideStatus = (isset($_REQUEST['OverrideStatus'])) ? $_REQUEST['OverrideStatus'] : '';
	$AbFormat = (isset($_REQUEST['AbFormat'])) ? $_REQUEST['AbFormat'] : '';
	$C = (isset($_REQUEST['C'])) ? $_REQUEST['C'] : '';
	$OverrideDate = (isset($_REQUEST['OverrideDate'])) ? $_REQUEST['OverrideDate'] : '';
	$ConfStatus = (isset($_REQUEST['ConfStatus'])) ? $_REQUEST['ConfStatus'] : '';
	$FTVals = (isset($_REQUEST['FTVals'])) ? $_REQUEST['FTVals'] : '';
	$FHVals = (isset($_REQUEST['FHVals'])) ? $_REQUEST['FHVals'] : '';
	$DateFormat = (isset($_REQUEST['DateFormat'])) ? $_REQUEST['DateFormat'] : '';
	$DateSep = (isset($_REQUEST['DateSep'])) ? $_REQUEST['DateSep'] : '';
	$Status = (isset($_REQUEST['Status'])) ? $_REQUEST['Status'] : '';
	$Email = (isset($_REQUEST['Email'])) ? $_REQUEST['Email'] : '';
	$xEmail = (isset($_REQUEST['xEmail'])) ? $_REQUEST['xEmail'] : '';
	$LinkField = (isset($_REQUEST['LinkField'])) ? $_REQUEST['LinkField'] : '';

	$alllists = '';
	$data = '';
	$OUTPUT = '';
	$MaxFields = 0;
	$t = 0;
	$ins = '';
	$Error = 0;

	function LoadMap($MapID=0, $importtype='db') {
		global $TABLEPREFIX;
		$query = "SELECT * FROM " . $TABLEPREFIX . "import_mappings WHERE MapID='" . addslashes($MapID) . "' AND ImportType='" . addslashes($importtype) . "'";
		$result = mysql_query($query);
		$row = stripslashes_array(mysql_fetch_assoc($result));
		$return = array();
		$return['ListID'] = $row['ListID'];
		$return['MapID'] = $row['MapID'];
		$return['Map'] = unserialize(stripslashes($row['ImportMap']));
		return $return;
	}

	function FetchTables($name='') {
		$query = "SHOW TABLES FROM `" . $name . "`";
		$tables_result = mysql_query($query);

		$db_tables = array();

		while($row = mysql_fetch_assoc($tables_result)) {
			$row = stripslashes_array($row);
			$table = $row['Tables_in_'.$_POST['DatabaseName']];
			$db_tables[$table] = array();

			$fields = mysql_list_fields($_POST['DatabaseName'], $table);
			$columns = mysql_num_fields($fields);

			for ($i = 0; $i < $columns; $i++) {
				$field_name = stripslashes_array(mysql_field_name($fields, $i));
				$db_tables[$table][] = $field_name;
			}
		}
		return $db_tables;
	}

	if($Action=='VerifyLinkings')
	{
		$imp=mysql_fetch_assoc(mysql_query("SELECT * FROM " . $TABLEPREFIX . "imports WHERE ImportID='".addslashes($ImportID)."'"));
		$imp = stripslashes_array($imp);
		$ListID=$imp['ListID'];
		$list=mysql_fetch_assoc(mysql_query("SELECT * FROM " . $TABLEPREFIX . "lists WHERE ListID='".addslashes($ListID)."'"));
		$list = stripslashes_array($list);

		$ins = '';

		//work out the field linkings!
		foreach($LinkField as $ImpFieldID=>$ListField)
		{
			$ins.="&$ImpFieldID=$ListField";
			$Do[$ListField]=$ImpFieldID;
		}

		mysql_query("UPDATE " . $TABLEPREFIX . "imports SET FieldLinks='".addslashes($ins)."' WHERE ImportID='".addslashes($ImportID)."'");

		$import_result = mysql_query("SELECT * FROM " . $TABLEPREFIX . "imports WHERE ImportID='" . addslashes($ImportID)."'");
		$IMPORT = mysql_fetch_assoc($import_result);

		if (!SAFE_MODE) {
			$IMPORT_DIR = $ROOTDIR.'temp/import_' . $ImportID;
		} else {
			$IMPORT_DIR = $ROOTDIR . 'temp/import';
		}

		/*
			This splits up the file to be imported into 100 line chunks so we can do a popup window and have it refresh.
			This should ease people who are looking to import thousands of users at a time.
		*/
		if (!is_dir($IMPORT_DIR)) {
			if (!SAFE_MODE) {
				if (!mkdir($IMPORT_DIR, 0755)) {
					$OUTPUT .= MakeErrorBox("An error occurred", "Unable to create directory " . str_replace($ROOTDIR, '', $IMPORT_DIR));
				}
			} else {
				$OUTPUT .= MakeErrorBox("An error occurred", "Please create the '" . $ROOTDIR . "temp/import' directory and CHMOD it to 777");
			}
		}

		$num_files = 0;

		if (is_dir($IMPORT_DIR)) {
			$original_import_file = file($ROOTDIR.'temp/' . $ImportID);
			$size = sizeof($original_import_file);
			$num_files = 1;
			$start_pos = 0;
			$header = array();
			if ($IMPORT['Headers'] == 1) {
				$header = array_slice($original_import_file, 0, 1);
			}
			while($start_pos < $size) {
				$file_contents = array_slice($original_import_file, $start_pos, $IMPORT_PER_FILE);
				$handle = fopen($IMPORT_DIR.'/import_file' . $num_files, 'w');

				// dont include the header in the first file, it's already there.
				if ($start_pos > 0) fputs($handle, implode("", $header));
				fputs($handle, implode("", $file_contents));
				fclose($handle);
				$start_pos += $IMPORT_PER_FILE;
				$num_files++;
			}
		}

		$popup_link = "import?ImportID=$ImportID&Action=DoImport&StartTime=$SYSTEMTIME&TotalFiles=$num_files";
		$add_to_url = array('ConfStatus', 'Status', 'AbFormat', 'OverrideDate');
		foreach($add_to_url as $k) {
			$popup_link .= "&" . $k . "=" . $$k;
		}
		$link_fields = urlencode(serialize($_POST['LinkField']));
		$popup_link .= "&LinkField=" . $link_fields;
		$link = MakeAdminLink($popup_link);

		$OUTPUT .= 'Click OK to start importing your users ... <br/>';
		$OUTPUT .= '<input type="button" class="field50" name="importstart" value="OK" onClick="window.open(\''.$link.'\', \'import'.$ImportID.'\', \'width=300,height=400,left=400,top=300\');"';
	}

	if ($Action == 'DoImport') {
		$OUTPUT .= '<body class="popupbody">';
		$POPOUTPUT=1;
		include('includes/do_import.inc.php');
	}

	if ($Action == 'ImportFinished') {

		$SuccessfulImports  = $_REQUEST['SuccessfulImports'];
		$DuplicateAttempts  = $_REQUEST['DuplicateAttempts'];
		$OverwrittenRecords = $_REQUEST['OverwrittenRecords'];
		$BannedAttempts     = $_REQUEST['BannedAttempts'];
		$RemovedRecords = (isset($_REQUEST['RemovedRecords'])) ? $_REQUEST['RemovedRecords'] : 0;

		$report = "<ul><li>".number_format($SuccessfulImports, 0) . " subscribers were imported successfully.</li><li>".number_format($DuplicateAttempts, 0)." duplicate subscribers were detected and were rejected.</li><li>".number_format($OverwrittenRecords, 0) . " subscriber details were updated.</li><li>".number_format($BannedAttempts, 0) . " subscribers were not added because they are banned.</li>";

		if (isset($_REQUEST['RemovedRecords'])) {
			$report .= "<li>" . number_format($RemovedRecords, 0) . " subscribers were removed successfully.</li>";
		}
		$report .= "</ul>";
		$OUTPUT .= MakeSuccessBox("Import Completed Successfully", $report, MakeAdminLink("members?View=ListSummary&ListID=$ListID&Status=ALL&Confirmed=ALL&Format=ALL&PerPage=20"));

		session_save_path($ROOTDIR.'temp');
		session_name('SendStudio');
		session_start();
		
		foreach($_SESSION as $k => $v) {
			session_unregister($k);
		}
		session_destroy();
	}

	if($Action=='UploadText' && $ImportID)
	{
		$owrite = (isset($_POST['overwrite'])) ? $_POST['overwrite'] : 0;
		mysql_query("UPDATE " . $TABLEPREFIX . "imports SET Headers='".addslashes($headers)."', FieldDelim='".addslashes($fielddelim)."', RecordDelim='".addslashes($recorddelim)."', OverWrite='".addslashes($owrite)."' WHERE ImportID='".addslashes($ImportID)."'");
		$imp=mysql_fetch_assoc(mysql_query("SELECT * FROM " . $TABLEPREFIX . "imports WHERE ImportID='".addslashes($ImportID)."'"));
		$imp = stripslashes_array($imp);
		$ListID=$imp['ListID'];

		$impfile = false;

		$continue = true;

		if (!empty($_FILES['TextFileName'])) {
			if (SAFE_MODE) {
				$IMPORT_DIR = $ROOTDIR . 'temp/import';
				if (!is_dir($IMPORT_DIR)) {
					$OUTPUT .= MakeErrorBox("An error occurred", "Please create the '" . $ROOTDIR . "temp/import' folder and make it writable. CHMOD this folder to 777");
					$continue = false;
				}
			}
			if ($continue) {
				$userfile = $_FILES['TextFileName']['tmp_name'];
				$filename = $_FILES['TextFileName']['name'];

				if(is_uploaded_file($userfile)) {
					if(!is_writable($ROOTDIR.'/temp')) {
						$OUTPUT .= MakeErrorBox("An error occurred", "The '" . $ROOTDIR . "temp' folder is not writable. Please CHMOD this folder to 757.");
					} else {
						clearstatcache();
						$impfile = $ROOTDIR.'/temp/' . $ImportID;
						move_uploaded_file($userfile, $impfile);
					}
				}
			}
		}

		if (isset($_POST['ServerFile']) && $_POST['ServerFile'] != '0') {
			$serverfile = $ROOTDIR . 'temp/' . $_POST['ServerFile'];
			$impfile = $ROOTDIR.'temp/' . $ImportID;
			if (!rename($serverfile, $impfile)) {
				if (SAFE_MODE) {
					$OUTPUT .= MakeErrorBox("An error occurred", "Unable to rename the import file for importing. You will need to upload the file through the browser due to server restrictions.");
				} else {
					$OUTPUT .= MakeErrorBox("An error occurred", "Unable to rename the import file for importing. Possible permissions problem.");
				}
			} else {
				$continue = true;
			}
		}

		if ($continue) {
			if ($impfile && is_file($impfile)) {
				$impdat = ParseImportFile($ImportID, true);

				// Was the import OK?
				if($impdat == "")
				{
					$OUTPUT .= MakeErrorBox("Invalid Import File", "The file that you have imported is empty or contains invalid data.");
				}
				else
				{
					$headers = $impdat['Headers'];

					$alllistfields = 'None->---- None;E->Email Address;F->Newsletter Format;S->Subscriber Status;C->Subscriber Confirmed;';

					$custom_fields = FetchCustomFields();
					foreach($custom_fields as $pos => $f) {
						$f = stripslashes_array($f);
						$alllistfields .= $f['FieldID'].'->'.$f['FieldName'].';';
					}

					//field linkings!
					foreach($headers as $ID=>$Field)
					{
						$FORM_ITEMS["Link '".$Field."' To"]="select|LinkField[$ID]:1:$alllistfields";
						if($hasHeaders == 0)
						{
							$HELP_ITEMS["LinkField[$ID]"]["Title"] = "Field Preview:";
							$HELP_ITEMS["LinkField[$ID]"]["Content"] = str_replace('\r', '', str_replace('\n', '', str_replace('\'', '\\\'', $impdat["Data"][1]["Field $ID"])));
						}
					}

					$FORM_ITEMS["-1"]="submit|Next &raquo:1-import?Action=ChooseDatasource&ListID=$ListID";

					//make the form
					$FORM=new AdminForm;
					$FORM->title="ImportLinkings";
					$FORM->items=$FORM_ITEMS;

					$FORM->action=MakeAdminLink("import?Action=VerifyLinkings&ImportID=$ImportID&ConfStatus=$ConfStatus&Status=$Status&AbFormat=$AbFormat");
					$FORM->MakeForm("Link Import Fields");

					$FORM->output = "Use the form below to define which import fields should map to which subscriber fields." . $FORM->output;

					$OUTPUT.=MakeBox("Import Subscribers (Step 4 of 5)",$FORM->output);
					$OUTPUT .= '

							<script language="JavaScript">

								function CheckForm()
								{
									return true;
								}

							</script>
						';
				}
			} else {
				$OUTPUT .= MakeErrorBox("Invalid Import File", "The file you selected to import from doesn't exist");
			}
		}
	}

	if ($Action == 'ChooseDatasource') {
		mysql_query("INSERT INTO " . $TABLEPREFIX . "imports SET ListID='".addslashes($ListID)."', TimeStamp='".addslashes($SYSTEMTIME)."'");
		$ImportID=mysql_insert_id();

		$FORM_ITEMS["-3"]="hidden|ListID:$ListID";
		$FORM_ITEMS["-2"]="hidden|ImportID:$ImportID";

		$FORM_ITEMS[$FORM_REQUIRED_ITEM . 'Import Type'] = 'select|ImportType:1:1->File;2->Database;3->Email Account:1';
		$HELP_ITEMS['ImportType']['Title'] = 'Importing Records';
		$HELP_ITEMS['ImportType']['Content'] = 'Where should we import our records from?<br><br>File:<br>Import from a file (such as a CSV), you can either upload it through the \\\'browse\\\' button, or FTP the file to your server and name it \\\'import\\\' and choose it from the server.<br><br>Database<br>You can import records from another database by choosing this option.<br><br>Email Address<br>Check an email address for any emails with the word \\\'subscribe\\\' or \\\'unsubscribe\\\' in the subject.<br><i>Note: This will only import email addresses, it will not import custom subscriber fields.</i>';

		$FORM_ITEMS['-1']="submit|Next &raquo:1-import";

		$FORM=new AdminForm;
		$FORM->title="ChooseSource";
		$FORM->items=$FORM_ITEMS;
		$FORM->action=MakeAdminLink("import?Action=Datasource");
		$FORM->MakeForm("Import Type");

		$FORM->output = "Choose which type of import you will be performing.<br>" . $FORM->output;
		$OUTPUT.=MakeBox("Import Subscribers (Step 2 of 5)",$FORM->output);

		$OUTPUT .= '
			<script language="javascript">
				function CheckForm() {
					return true;
				}
			</script>
		';
	}

	if($Action=='Datasource')
	{

		$FORM_ITEMS["-3"]="hidden|ListID:$ListID";
		$FORM_ITEMS["-2"]="hidden|ImportID:$ImportID";

		$list = mysql_fetch_assoc(mysql_query("SELECT * FROM " . $TABLEPREFIX . "lists WHERE ListID = '".addslashes($ListID)."' ORDER BY ListName ASC"));
		$list = stripslashes_array($list);

		$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Status"]="select|Status:1:0->Inactive;1->Active:1";
		$HELP_ITEMS['Status']['Title'] = "Status";
		$HELP_ITEMS['Status']['Content'] = "When these subscribers are imported, should they be marked as active or inactive?";

		$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Confirmed"] = "select|ConfStatus:1:1->All Confirmed;0->All Unconfirmed";
		$HELP_ITEMS['ConfStatus']['Title'] = "Confirmation Status";
		$HELP_ITEMS['ConfStatus']['Content'] = "If a subscriber was to join your list using a normal subscription form with \'Requires Confirmation\' enabled, then they would be marked as unconfirmed until they click on the confirmation link inside the email automatically sent to them.";

		if($list['Formats'] == 3) {
			$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Format"] = "select|AbFormat:1:text->Text;html->HTML:" . $list['Formats'];
		} else if($list['Formats'] == 1) {
			$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Format"] = "select|AbFormat:text:text->Text Only";
		} else {
			$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Format"] = "select|AbFormat:html:html->HTML Only";
		}

		$HELP_ITEMS['AbFormat']['Title'] = "Format";
		$HELP_ITEMS['AbFormat']['Content'] = "Which newsletter format should these subscribers be \'flagged\' to receive? Text only or HTML? HTML subscribers can also receive text newsletters. This is overwritten if there is a format field in the uploaded file.";

		$FORM_ITEMS[$FORM_NOT_REQUIRED_ITEM . "Overwrite Existing Subscriber"]="checkbox|overwrite:1:Yes, overwrite existing subscriber&nbsp;:";
		$HELP_ITEMS['overwrite']['Title'] = "Overwrite Existing Subscriber";
		$HELP_ITEMS['overwrite']['Content'] = "If a subscriber already exists in the current mailing list with the same email address, should we overwrite their information based on the imported data, or keep the existing information?";

		switch($_REQUEST['ImportType']) {
			case 1: // file.

				$FORM_ITEMS['-100'] = 'spacer|</td></tr></table><br><table width=100% border=0 cellspacing=0 cellpadding=0 	class=panel><TR><TD colspan=2 height=20 class=heading2>&nbsp;&nbsp;Import File Details</TD></TR><TR><td>';

				$FORM_ITEMS[$FORM_NOT_REQUIRED_ITEM . "Contains Headers"]="checkbox|headers:1:Yes, contains headers&nbsp;:checked";
				$HELP_ITEMS['headers']['Title'] = "Contains Headers";
				$HELP_ITEMS['headers']['Content'] = "Does the first line of your import file contain headers? If so, each header should be separated with a field separator, such as: email, name, sex.";

				$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Field Separator"]="textfield|fielddelim:10:10:,";
				$HELP_ITEMS['fielddelim']['Title'] = "Field Separator";
				$HELP_ITEMS['fielddelim']['Content'] = "What is the character used in your import file that separates the contents of each new field in a record?";

				$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Record Separator"]="textfield|recorddelim:10:10:NEWLINE";
				$HELP_ITEMS['recorddelim']['Title'] = "Record Separator";
				$HELP_ITEMS['recorddelim']['Content'] = "What is the character used in your import file that separates one record from the next?";

				$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Import File"]="file|TextFileName";
				$HELP_ITEMS['TextFileName']['Title'] = "Import File";
				$HELP_ITEMS['TextFileName']['Content'] = "Choose a file to upload that contains the subscriber details that you want to import. This should be a plain text file.";

				$import_files = list_files($ROOTDIR.'temp/');

				$filelist = '0->Select a file from the server;';

				if (!empty($import_files)) {
					$found_import_files = false;
					foreach($import_files as $import_file) {
						if (!preg_match('/^import/', $import_file)) continue;
						$found_import_files = true;
						$filelist .= $import_file . '->' . $import_file . ';';
					}
					$filelist = substr($filelist, 0, -1);
				}

				$extra_check = '';

				if ($found_import_files) {
					$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Import Server File"]="select|ServerFile:1:" . $filelist;
					$HELP_ITEMS['ServerFile']['Title'] = "Import File";
					$HELP_ITEMS['ServerFile']['Content'] = "Choose a file on the server that contains the subscriber details that you want to import. This should be a plain text file.<br />The file should be named so the start is \'import\' - eg \'import_list.txt\'";

					$extra_check = '
						&& (f.ServerFile.selectedIndex == -1 || f.ServerFile.selectedIndex == 0)
					';
				}

				$FORM_ITEMS["-1"]="submit|Next &raquo:1-import?Action=ChooseDatasource&ListID=$ListID";

				//make the form
				$FORM=new AdminForm;
				$FORM->title="TextFileImport";
				$FORM->items=$FORM_ITEMS;
				$FORM->action=MakeAdminLink("import?Action=UploadText");
				$FORM->EXTRA='ENCTYPE="multipart/form-data"';
				$FORM->MakeForm("Import Details");

				$FORM->output = "Complete the form below and then click on the \"Next\" button to proceed. <a href='javascript:launchIH()'>For a tutorial on how to import subscribers, click here.</a><br>" . $FORM->output;
				$OUTPUT.=MakeBox("Import Subscribers (Step 3 of 5)",$FORM->output);
				$OUTPUT .= '
					<script language="JavaScript">
						function CheckForm()
						{
							var f = document.forms[0];

							if(f.TextFileName.value == "" ' . $extra_check . ' )
							{
								alert("Please choose an import file.");
								f.TextFileName.focus();
								return false;
							}

							if(f.fielddelim.value == "")
							{
								alert("Please enter a field separator.");
								f.fielddelim.focus();
								return false;
							}

							if(f.recorddelim.value == "")
							{
								alert("Please enter a record separator.");
								f.recorddelim.focus();
								return false;
							}
							return true;
						}
					</script>
					';

				$OUTPUT .= '
					<script language="JavaScript">
						function launchIH()
						{
							window.open("' . $ROOTURL . 'admin/functions/importhelp.php?SID=' . $CURRENTADMIN["LoginString"] . '", "importWin", "left=" + (((screen.availWidth) / 2) - 225) + ", top="+ (((screen.availHeight) / 2) - 300) +", width=450, height=600, toolbar=0, statusbar=0, scrollbars=1");
						}
					</script>
				';
			break;

			case 2: // database import
				$query = "SELECT * FROM " . $TABLEPREFIX . "import_mappings WHERE AdminID='" . addslashes($CURRENTADMIN['AdminID'])."' AND ImportType='db'";
				$map_result = mysql_query($query);

				$default_database_host = $default_database_user = $default_database_pass = $default_database_name = '';

				$map_list = '<option value="0">New</option>';

				$jscript = '<script language="javascript">
								function ChangeDetails(elementname) {
									f = document.forms[0];
									var newid = elementname.selectedIndex;

									if (newid == 0) {
										f.DatabaseHost.value = \'\';
										f.DatabaseUser.value = \'\';
										f.DatabasePass.value = \'\';
										f.DatabaseName.value = \'\';
									}
							';

				if (mysql_num_rows($map_result) > 0) {
					$import_mappings = array();
					$rowcount = 0;
					while($row = mysql_fetch_assoc($map_result)) {
						$rowcount++;
						$map = unserialize(stripslashes($row['ImportMap']));
						$map_list .= '<option value="' . $row['MapID'] . '"';
						if ($row['ListID'] == $ListID) {
							$default_database_host = $map['hostname'];
							$default_database_user = $map['username'];
							$default_database_pass = $map['password'];
							$default_database_name = $map['database'];
							$map_list .= ' SELECTED';
						}
						$map_list .= '>' . $map['username'] . '@' . $map['hostname'] . '(' . $map['database'] . ')</option>';
						$jscript .= 'if (newid == ' . $rowcount . ') {
							f.DatabaseHost.value = \'' . $map['hostname'] . '\';
							f.DatabaseUser.value = \'' . $map['username'] . '\';
							f.DatabasePass.value = \'' . $map['password'] . '\';
							f.DatabaseName.value = \'' . $map['database'] . '\';
						}
						';
					}
				}

				$jscript .= '
								} // end function ChangeDetails()
							</script>
							';

				$list = mysql_fetch_assoc(mysql_query("SELECT * FROM " . $TABLEPREFIX . "lists WHERE ListID = '".addslashes($ListID)."' ORDER BY ListName ASC"));
				$list = stripslashes_array($list);
				if($list['Formats'] == 3) {
					$format = '<option value="1">Text</option><option value="2">HTML</option>';
				} else if($list['Formats'] == 1) {
					$format = '<option value="1">Text only</option>';
				} else {
					$format = '<option value="2">HTML only</option>';
				}

				$form = '
					<form name="mapping" method="post" action="' . MakeAdminLink('import?Action=DatabaseMappings&View=CheckConnection') . '">
					<input type="hidden" name="ListID" value="' . $ListID . '">
					<input type="hidden" name="ImportID" value="' . $ImportID . '">

						<input type="button" value="Cancel"  class="formButton" onclick=\'if(confirm("Are you sure you wish to cancel?")) {document.location.href="' . MakeAdminLink('import') . '"}\'>&nbsp;&nbsp;<input class="formButton" type="submit" value="Next &raquo"><br>&nbsp;
						<table border="0" cellspacing="0" cellpadding="2" class=panel>
							<tr class=heading3>
								<td colspan=2>&nbsp;&nbsp;Import Details</td></tr>							
							<tr>
								<td class=fieldLabel>
									' . $FORM_REQUIRED_ITEM . 'Status:
								</td>
								<td>
									<select class="field250" name="Status"><option value="1">Active</option><option value="0">Inactive</option></select>';

									$HELP_ITEMS['Status']['Title'] = 'Status';
									$HELP_ITEMS['Status']['Content'] = 'When these subscribers are imported, should they be marked as active or inactive?';
									$item = MakeHelp('Status');
									$form .= $item;
								$form .= '
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_REQUIRED_ITEM . 'Confirmed:
								</td>
								<td>
									<select class="field250" name="Confirmed"><option value="1">Confirmed</option><option value="0">Unconfirmed</option></select>';
									$HELP_ITEMS['Confirmed']['Title'] = 'Confirmed';
									$HELP_ITEMS['Confirmed']['Content'] = 'If a subscriber was to join your list using a normal subscription form with Requires Confirmation enabled, then they would be marked as unconfirmed until they click on the confirmation link inside the email automatically sent to them.';
									$item = MakeHelp('Confirmed');
									$form .= $item;
								$form .= '
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_REQUIRED_ITEM . 'Format:
								</td>
								<td>
									<select class="field250" name="Format">' . $format . '</select>';
									$HELP_ITEMS['Format']['Title'] = 'Format';
									$HELP_ITEMS['Format']['Content'] = 'Which newsletter format should these subscribers be flagged to receive?';
									$item = MakeHelp('Format');
									$form .= $item;
								$form .= '
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_NOT_REQUIRED_ITEM . 'Overwrite Existing Subscriber?
								</td>
								<td>
									<input type="checkbox" name="OverWrite" value="1">Yes, overwrite existing subscriber&nbsp;';
									$HELP_ITEMS['Overwrite']['Title'] = 'Overwrite';
									$HELP_ITEMS['Overwrite']['Content'] = 'If a subscriber already exists in the current mailing list with the same email address, should we overwrite their information based on the imported data, or keep the existing information?';
									$item = MakeHelp('Overwrite');
									$form .= $item;
								$form .= '
								</td>
							</tr>
							</table>
							<br>
							<table class=panel>							
							<tr class=heading3>
								<td colspan=2>&nbsp;&nbsp;Database Details</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_NOT_REQUIRED_ITEM . 'Previously Saved Settings:
								</td>
								<td>
									<select class="field250" name="MapID" onchange="ChangeDetails(MapID)">
										' . $map_list . '
									</select>';
									$HELP_ITEMS['Saved']['Title'] = 'Previously Saved Settings';
									$HELP_ITEMS['Saved']['Content'] = 'If youve previously saved your database details when importing (Step 4) you can reload them from here. If not, simply select the new option';
									$item = MakeHelp('Saved');
									$form .= $item;
								$form .= '
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_REQUIRED_ITEM . 'MySQL Server:
								</td>
								<td>
									<input class="field250" type="text" name="DatabaseHost" value="' . $default_database_host . '">';
									$HELP_ITEMS['host']['Title'] = 'MySQL Server';
									$HELP_ITEMS['host']['Content'] = 'MySQL server I.P. address/hostname, such as localhost';
									$item = MakeHelp('host');
									$form .= $item;
								$form .= '
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_REQUIRED_ITEM . 'MySQL Username:
								</td>
								<td>
									<input class="field250" type="text" name="DatabaseUser" value="' . $default_database_user . '">';
									$HELP_ITEMS['user']['Title'] = 'MySQL Username';
									$HELP_ITEMS['user']['Content'] = 'Username for a valid MySQL account';
									$item = MakeHelp('user');
									$form .= $item;
								$form .= '
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_NOT_REQUIRED_ITEM . 'MySQL Password:
								</td>
								<td>
									<input class="field250" type="password" name="DatabasePass" value="' . $default_database_host . '">';
									$HELP_ITEMS['pass']['Title'] = 'MySQL Password';
									$HELP_ITEMS['pass']['Content'] = 'Password for a valid MySQL account';
									$item = MakeHelp('pass');
									$form .= $item;
								$form .= '
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_REQUIRED_ITEM . 'MySQL Database:
								</td>
								<td>
									<input class="field250" type="text" name="DatabaseName" value="' . $default_database_name . '">';
									$HELP_ITEMS['dbname']['Title'] = 'MySQL Username';
									$HELP_ITEMS['dbname']['Content'] = 'Username for a valid MySQL account';
									$item = MakeHelp('dbname');
									$form .= $item;
								$form .= '
								</td>
							</tr>
							<tr><td>&nbsp;
								</td>
								<td><br>
									<input type="button" value="Cancel" class="formButton" onclick=\'if(confirm("Are you sure you wish to cancel?")) {document.location.href="' . MakeAdminLink('import') . '"}\'>&nbsp;&nbsp;<input class="formButton" type="submit" value="Next &raquo"><br>&nbsp;
								</td>
							</tr>
						</table>
					</form>
				';

				$form .= $jscript;

				$intro_text = 'Complete the form below and then click on the "Next" button to proceed importing data from a database';
				$OUTPUT.=MakeBox("Import Subscribers (Step 3 of 5)", $intro_text . $form);
			break;

			case 3: // email account
				$query = "SELECT * FROM " . $TABLEPREFIX . "import_mappings WHERE AdminID='" . addslashes($CURRENTADMIN['AdminID'])."' AND ImportType='email'";
				$map_result = mysql_query($query);

				$default_email_host = $default_email_user = $default_email_pass = '';
				$default_email_port = '110';

				$map_list = '<option value="0">New</option>';

				$jscript = '<script language="javascript">
								function ChangeDetails(elementname) {
									f = document.forms[0];
									var newid = elementname.selectedIndex;

									if (newid == 0) {
										f.EmailHost.value = \'\';
										f.EmailUser.value = \'\';
										f.EmailPass.value = \'\';
										f.EmailPort.value = \'110\';
									}
							';

				if (mysql_num_rows($map_result) > 0) {
					$email_mappings = array();
					$rowcount = 0;
					while($row = mysql_fetch_assoc($map_result)) {
						$rowcount++;
						$map = unserialize(stripslashes($row['ImportMap']));

						$map_list .= '<option value="' . $row['MapID'] . '"';
						if ($row['ListID'] == $ListID) {
							$default_email_host = $map['hostname'];
							$default_email_user = $map['username'];
							$default_email_pass = $map['password'];
							$default_email_port = $map['port'];
							$map_list .= ' SELECTED';
						}
						$map_list .= '>' . $map['username'] . '@' . $map['hostname'] . '</option>';
						$jscript .= 'if (newid == ' . $rowcount . ') {
							f.EmailHost.value = \'' . $map['hostname'] . '\';
							f.EmailUser.value = \'' . $map['username'] . '\';
							f.EmailPass.value = \'' . $map['password'] . '\';
							f.EmailPort.value = \'' . $map['port'] . '\';
						}
						';
					}
				}

				$jscript .= '
								} // end function ChangeDetails()
							</script>
							';

				$list = mysql_fetch_assoc(mysql_query("SELECT * FROM " . $TABLEPREFIX . "lists WHERE ListID = '".addslashes($ListID)."' ORDER BY ListName ASC"));
				$list = stripslashes_array($list);
				if($list['Formats'] == 3) {
					$format = '<option value="1">Text</option><option value="2">HTML</option>';
				} else if($list['Formats'] == 1) {
					$format = '<option value="1">Text only</option>';
				} else {
					$format = '<option value="2">HTML only</option>';
				}

				$form = '
					<form name="mapping" method="post" action="' . MakeAdminLink('import?Action=CheckEmail&View=CheckConnection') . '">
					<input type="button" value="Cancel"  class="formButton" onclick=\'if(confirm("Are you sure you wish to cancel?")) {document.location.href="' . MakeAdminLink('import') . '"}\'>&nbsp;&nbsp;<input class="formButton" type="submit" value="Next &raquo"><br/><br/>
					<input type="hidden" name="ListID" value="' . $ListID . '">
					<input type="hidden" name="ImportID" value="' . $ImportID . '">
						<table border="0" cellspacing="0" cellpadding="2" class=panel>
							<tr class=heading3>
								<td colspan=2>&nbsp;&nbsp;Import Details</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_NOT_REQUIRED_ITEM . 'Status:
								</td>
								<td>
									<select class="field250" name="Status"><option value="1">Active</option><option value="0">Inactive</option></select>
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_NOT_REQUIRED_ITEM . 'Confirmed:
								</td>
								<td>
									<select class="field250" name="Confirmed"><option value="1">Confirmed</option><option value="0">Unconfirmed</option></select>
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_NOT_REQUIRED_ITEM . 'Format:
								</td>
								<td>
									<select class="field250" name="Format">' . $format . '</select>
								</td>
							</tr>
							</table>

							<br>
							<table class=panel>
							<tr class=heading3><td colspan=2>Email Server Details</td></tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_NOT_REQUIRED_ITEM . 'Previously Saved Settings
								</td>
								<td>
									<select class="field250" name="MapID" onchange="ChangeDetails(MapID)">
										' . $map_list . '
									</select>
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_REQUIRED_ITEM . 'Email Hostname
								</td>
								<td>
									<input class="field250" type="text" name="EmailHost" value="' . $default_email_host . '">
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_REQUIRED_ITEM . 'Email Username
								</td>
								<td>
									<input class="field250" type="text" name="EmailUser" value="' . $default_email_user . '">
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_REQUIRED_ITEM . 'Email Password
								</td>
								<td>
									<input class="field250" type="password" name="EmailPass" value="' . $default_email_pass . '">
								</td>
							</tr>
							<tr>
								<td class=fieldLabel>
									' . $FORM_REQUIRED_ITEM . 'Email Port
								</td>
								<td>
									<input class="field250" type="text" name="EmailPort" value="' . $default_email_port . '">
								</td>
							</tr>
							<tr>
								<td class=FieldLabel>' . $FORM_NOT_REQUIRED_ITEM . 'Save Import Details:</td><td><input type="checkbox" name="SaveSettings" value="1" CHECKED>Yes, save import details
							';

								$HELP_ITEMS['ImportDetails']['Title'] = 'Overwrite';
								$HELP_ITEMS['ImportDetails']['Content'] = 'Save your import settings, so next time you import data, you can load these settings (step 3) without needing to enter in all the required information';
								$item = MakeHelp('ImportDetails');
								$form .= $item;
			
							$form .= '
							</td>
							</tr>
							<tr>
								<td>&nbsp;</td>
								<td><br>
									<input type="button" value="Cancel" class="formButton" onclick=\'if(confirm("Are you sure you wish to cancel?")) {document.location.href="' . MakeAdminLink('import') . '"}\'>&nbsp;&nbsp;<input class="formButton" type="submit" value="Next &raquo"><br>&nbsp;
								</td>
							</tr>
						</table>
					</form>
				';

				$form .= $jscript;

				$intro_text = 'Complete the form below and then click on the "Next" button to proceed.<br><br>';
				$OUTPUT.=MakeBox("Import Subscribers (Step 3 of 5)", $intro_text . $form);

			break;
		}
	}

	if ($Action == 'CheckEmail') {
		$view = (isset($_GET['View'])) ? $_GET['View'] : '';
		switch($view) {
			case 'CheckConnection':
				list($status, $result) = ConnectEmail($_POST['EmailHost'], $_POST['EmailUser'], $_POST['EmailPass'], $_POST['EmailPort']);
				if (!$status) {
					$OUTPUT .= MakeErrorBox("Unable to connect", "Unable to connect to email server: " . $result);
				} else {
					if (isset($_POST['SaveSettings']) && $_POST['SaveSettings'] == 1) {
						$email_mapping = array(
							'hostname' => $_POST['EmailHost'],
							'username' => $_POST['EmailUser'],
							'password' => $_POST['EmailPass'],
							'port' => $_POST['EmailPort']
						);

						if ($_POST['MapID'] <= 0) {
							$query = "INSERT INTO " . $TABLEPREFIX . "import_mappings(ListID, AdminID, ImportMap, ImportType) VALUES ('" . addslashes($_POST['ListID']) . "', '" . addslashes($CURRENTADMIN['AdminID']) . "', '" . addslashes(serialize($email_mapping)) . "', 'email')";
						} else {
							$query = "UPDATE " . $TABLEPREFIX . "import_mappings SET ImportMap='" . addslashes(serialize($email_mapping)) . "' WHERE MapID='" . addslashes($_POST['MapID'])."'";
							$MapID = $_POST['MapID'];
						}
						mysql_query($query);
						if ($_POST['MapID'] <= 0) $MapID = mysql_insert_id();
					}

					imap_close($result);

					$popup_link = 'import?ImportID=' . $ImportID . '&Action=DoEmailImport&ListID=' . $ListID . '&EmailHost=' . $_POST['EmailHost'] . '&EmailUser=' . $_POST['EmailUser'] . '&EmailPass=' . $_POST['EmailPass'] . '&EmailPort=' . $_POST['EmailPort'] . '&Status=' . $_POST['Status'] . '&Confirmed=' . $_POST['Confirmed'] . '&Format=' . $_POST['Format'];

					$OUTPUT .= MakeSuccessBox("Connected to Email Server Successfully", "Connected to email server successfully. Click OK to start importing email addresses<br />", MakeAdminLink($popup_link), "", "", "import$ImportID~width=300,height=400,left=400,top=300");
				}
			break;
		}
	}

	if ($Action == 'DatabaseMappings') {
		switch($_GET['View']) {
			case 'CheckConnection':
				list($status, $database_result) = MySQLConnect($_POST['DatabaseHost'], $_POST['DatabaseUser'], $_POST['DatabasePass'], $_POST['DatabaseName']);

				if (!$status) {
					$OUTPUT .= MakeErrorBox("Unable to connect", "Unable to connect to the MySQL server: " . $database_result);
				}
				if ($status) {

					$db_tables = FetchTables($_POST['DatabaseName']);
					mysql_close($database_result);

					// we need to re-establish the old database connection. we can't just use mysql_connect(host, user, pass, new_connection=1) since that came in at php 4.2 :(
					// so here we go!
					MySQLConnect($DBHOST, $DBUSER, $DBPASS, $DBNAME);

					$show_fields = true;

					$tablenames = array_keys($db_tables);

					if (empty($tablenames)) {
						$show_fields = false;
						$OUTPUT .= MakeErrorBox("Empty Database", "Sorry, that database is empty. Please try again.");
					}

					if ($show_fields) {

						$core_fields = array(
							'Email' => 'Email',
							'Format' => 'Newsletter Format',
							'Confirmed' => 'Confirmation Status',
							'Status' => 'Active/Inactive Status'
						);

						$custom_fields = FetchCustomFields();

						$db_map = array();

						$OverWrite = (isset($_POST['OverWrite'])) ? 1 : 0;

						if ($_POST['MapID'] > 0) $db_map = LoadMap($_POST['MapID']);

						$table_list = '<select class="field250" name="map_%%fieldname%%" onchange="javascript: ChangeList(map_%%fieldname%%);">';
						$table_list .= '<option value="0">-- Choose a table --</option>';
						foreach(array_keys($db_tables) as $tablename) {
							$table_list .= '<option value="' . $tablename . '">' . $tablename . '</option>';
						}
						$table_list .= '</select>';

						$Format = (isset($_POST['Format'])) ? $_POST['Format'] : 1;
						$Confirmed = (isset($_POST['Confirmed'])) ? $_POST['Confirmed'] : 0;

						$form = '
								<script language="javascript">

									function PopulateList(listname, newid) {
								';
									foreach(array_keys($db_tables) as $pos => $tablename) {
										$form .= 'if (newid == ' . ($pos+1) . ') {
										';
											$tablepos = 0;
											foreach($db_tables[$tablename] as $table) {
												$tablepos++;
												$form .= 'newoption = new Option("' . $table . '", ' . $tablepos . ');';
												$form .= 'listname[listname.length] = newoption;';
											}
										$form .= '
										}
										';
									}
								$form .= '
									}

									function ChangeList(elementname) {
										var newid = elementname.selectedIndex;

										// blank out the old list first...
										var listname = document.getElementById(elementname.name + "_option");

										listname[listname.selectedIndex] = null;

										for (var i=(listname.length-1); i>=0; i--) {
											listname.options[i] = null;
										}
										listname.selectedIndex = -1;

										Blank = new Option("-- Choose a field --", 0);
										listname[0] = Blank;

										PopulateList(listname, newid);
									}
								</script>

								<form name="mappings" method="post" action="' . MakeAdminLink("import?Action=DatabaseMappings&View=MapPaths") . '">

								<input type="hidden" name="MapID" value="'.$_POST['MapID'].'">
								<input type="hidden" name="ListID" value="'.$ListID.'">
								<input type="hidden" name="ImportID" value="'.$ImportID.'">
								<input type="hidden" name="OverWrite" value="'.$OverWrite.'">
								<input type="hidden" name="Format" value="'.$Format.'">
								<input type="hidden" name="Status" value="'.$Status.'">
								<input type="hidden" name="Confirmed" value="'.$Confirmed.'">
								<input type="hidden" name="DatabaseHost" value="'.$_POST['DatabaseHost'].'">
								<input type="hidden" name="DatabaseUser" value="'.$_POST['DatabaseUser'].'">
								<input type="hidden" name="DatabasePass" value="'.$_POST['DatabasePass'].'">
								<input type="hidden" name="DatabaseName" value="'.$_POST['DatabaseName'].'">
								
								<input type="button" value="Cancel"  class="formButton" onclick=\'if(confirm("Are you sure you wish to cancel?")) {document.location.href="' . MakeAdminLink('import') . '"}\'>&nbsp;&nbsp;<input type="submit" value="Next &raquo" class="formButton"><br>&nbsp;

									<table border="0" cellspacing="2" cellpadding="2" class=panel>
										<tr>
											<td class=heading2>&nbsp;&nbsp;Field Name</td>
											<td class=heading2>&nbsp;&nbsp;Database Table</td>
											<td class=heading2>&nbsp;&nbsp;Database Field</td>
										</tr>
								';
									foreach($core_fields as $name => $desc) {
										$selected = '';
										$field_list = '<option value="0">-- Choose a field --</option>';
										if (isset($db_map['Map']['tablemapping'][$name])) {
											$default = current(array_keys($db_map['Map']['tablemapping'][$name]));
											$selected = '"' . $default . '"';
											$id = 1;
											foreach($db_tables[$default] as $field) {
												$field_list .= '<option value="' . $id . '"' . (($field == $db_map['Map']['tablemapping'][$name][$default]) ? ' SELECTED' : '') . '>' . $field . '</option>';
												$id++;
											}
										}

										$tlist = str_replace('%%fieldname%%', $name, $table_list);
										if ($selected != '') $tlist = str_replace('value=' . $selected, 'SELECTED value=' . $selected, $tlist);
										$form .= '
												<tr>
													<td class=fieldLabel>' . $name . ':</td>
													<td>' . $tlist . '</td>
													<td><select class="field250" id="map_' . $name . '_option" ' . $selected . ' name="map_' . $name . '_option">' . $field_list . '</select></td>
												</tr>
										';
									}

									foreach($custom_fields as $pos => $fielddata) {
										$fieldid = $fielddata['FieldID'];
										$fieldname = $fielddata['FieldName'];
										$selected = '';
										$field_list = '<option value="0">-- Choose a field --</option>';
										if (isset($db_map['Map']['tablemapping']['CustomFields'][$fieldid])) {
											$default = current(array_keys($db_map['Map']['tablemapping']['CustomFields'][$fieldid]));
											$selected = '"' . $default . '"';
											$id = 1;

											foreach($db_tables[$default] as $field) {
												$field_list .= '<option value="' . $id . '"' . (($field == $db_map['Map']['tablemapping']['CustomFields'][$fieldid][$default]) ? ' SELECTED' : '') . '>' . $field . '</option>';
												$id++;
											}
										} else {
											$id = 1;
											foreach($db_tables[$tablename] as $field) {
												$field_list .= '<option value="' . $id . '">' . $field . '</option>';
												$id++;
											}
										}

										$tlist = str_replace('%%fieldname%%', $fieldid, $table_list);
										if ($selected != '') $tlist = str_replace('value=' . $selected, 'SELECTED value=' . $selected, $tlist);

										$form .= '
												<tr>
													<td class=fieldLabel>' . $fieldname . ':</td>
													<td>' . $tlist . '</td>
													<td><select class="field250" id="map_' . $fieldid . '_option" name="map_' . $fieldid . '_option">' . $field_list . '</select></td>
												</tr>
										';
									}
						$form .= '
										</table>
											<br>
										<table class=panel>
										<tr class=heading3><td colspan=2>&nbsp;&nbsp;Save Settings</td></tr>
										<tr>
											<td class=fieldLabel>Save Settings:&nbsp;</td><td colspan=2><input type="checkbox" name="SaveSettings" value="1" CHECKED>Yes, save settings
											
								';

								
								$HELP_ITEMS['ImportDetails']['Title'] = 'Save Settings';
								$HELP_ITEMS['ImportDetails']['Content'] = 'Save your import settings, so next time you import data, you can load these settings (step 3) without needing to enter in all the required information';
								$item = MakeHelp('ImportDetails');
								$form .= $item;
			
								$form .= '
								</td>
										</tr>
										<tr><td>&nbsp</td><td><br>
										<input type="button" value="Cancel"  class="formButton" onclick=\'if(confirm("Are you sure you wish to cancel?")) {document.location.href="' . MakeAdminLink('import') . '"}\'>&nbsp;&nbsp;<input type="submit" value="Next &raquo" class="formButton"><br>&nbsp;
										</td></tr>
									</table>
								</form>
								</div>
								';
						
						$intro_text = 'Select which database fields you wish to insert into the subscriber fields.';
						$OUTPUT.=MakeBox("Import Subscribers (Step 4 of 5)", $intro_text . $form);

					} // end if show_fields (ie the database isn't empty).
				} // end if ($status)
			break;

			case 'MapPaths':
				list($status, $database_result) = MySQLConnect($_POST['DatabaseHost'], $_POST['DatabaseUser'], $_POST['DatabasePass'], $_POST['DatabaseName']);
				$db_tables = FetchTables($_POST['DatabaseName']);
				mysql_close($database_result);

				// we need to re-establish the old database connection. we can't just use mysql_connect(host, user, pass, new_connection=1) since that came in at php 4.2 :(
				// so here we go!
				MySQLConnect($DBHOST, $DBUSER, $DBPASS, $DBNAME);

				$email_found = false;

				$database_mapping = array(
					'hostname' => $_POST['DatabaseHost'],
					'username' => $_POST['DatabaseUser'],
					'password' => $_POST['DatabasePass'],
					'database' => $_POST['DatabaseName'],
					'tablemapping' => array()
				);

				foreach($_POST as $key => $table) {
					if (!preg_match('%^map_%', $key) || preg_match('%_option$%', $key)) continue;
					$mapval = $key.'_option';
					if (isset($_POST[$mapval]) && $_POST[$mapval] > 0) {
						$mapkey = preg_replace('%^map_%', '', $key);
						if ($mapkey == 'Email') $email_found = true;
						if (is_numeric($mapkey)) {
							$database_mapping['tablemapping']['CustomFields'][$mapkey] = array($_POST[$key] => $db_tables[$table][(int)($_POST[$mapval]-1)]);
						} else {
							$database_mapping['tablemapping'][$mapkey] = array($_POST[$key] => $db_tables[$table][(int)($_POST[$mapval]-1)]);
						}
					}
				}

				$errormsgs = array();

				if (!$email_found) {
					$errormsgs[] = ' You need to at least map the Email Address field.';
					$OUTPUT .= MakeErrorBox("Missing data", "Please try again." . implode('<br />', $errormsgs));
				} else {
					if (isset($_POST['SaveSettings'])) {
						if ($_POST['MapID'] <= 0) {
							$query = "INSERT INTO " . $TABLEPREFIX . "import_mappings(ListID, AdminID, ImportMap, ImportType) VALUES ('" . addslashes($_POST['ListID']) . "', '" . addslashes($CURRENTADMIN['AdminID']) . "', '" . addslashes(serialize($database_mapping)) . "', 'db')";
						} else {
							$query = "UPDATE " . $TABLEPREFIX . "import_mappings SET ImportMap='" . addslashes(serialize($database_mapping)) . "' WHERE MapID='" . addslashes($_POST['MapID'])."'";
						}
						mysql_query($query);
						$MapID = ($_POST['MapID'] <= 0) ? mysql_insert_id() : $_POST['MapID'];
					} else {
						$MapID = $_POST['MapID'];
					}

					foreach(array('OverWrite', 'Confirmed') as $area) {
						$$area = (isset($_POST[$area])) ? $_POST[$area] : 0;
					}

					$Format = (isset($_POST['Format'])) ? $_POST['Format'] : 1;

					$popup_link = "import?Action=DoDatabaseImport&ImportID=$ImportID&MapID=$MapID&ListID=$ListID&OverWrite=$OverWrite&Status=$Status&Format=$Format&Confirmed=$Confirmed&ImportMap=" . urlencode(serialize($database_mapping)) . "&DatabaseHost=" . $_POST['DatabaseHost'] . "&DatabaseUser=" . $_POST['DatabaseUser'] . "&DatabasePass=" . $_POST['DatabasePass'] . "&DatabaseName=" . $_POST['DatabaseName'];

					$OUTPUT .= MakeSuccessBox("Connected to Database successfully", "Database mapped successfully. Click OK to start importing.", MakeAdminLink($popup_link), "", "", "import$ImportID~width=300,height=400,left=400,top=300");
				}

			break;
		}
	}


	if ($Action == 'DoDatabaseImport') {
		$OUTPUT .= '<body class="popupbody">';
		$POPOUTPUT=1;
		include('includes/do_import_database.inc.php');
	}


	if ($Action == 'DoEmailImport') {
		$OUTPUT .= '<body class="popupbody">';
		$POPOUTPUT=1;
		include('includes/do_import_email.inc.php');
	}

	if(!$Action && !$ListID)
	{
		//select ListID form!
		$lists=mysql_query("SELECT * FROM " . $TABLEPREFIX . "lists ORDER BY ListName ASC");
		while($l=mysql_fetch_assoc($lists))
		{
			$l = stripslashes_array($l);
			if(AllowList($l['ListID']))
			{
				if ($CURRENTADMIN['DisplaySummaries']) {
					$numSubs = (int)mysql_result(mysql_query("SELECT COUNT(*) from " . $TABLEPREFIX . "members where ListID=" . addslashes($l['ListID'])), 0, 0);

					if($numSubs == 1)
						$subs = "1 subscriber";
					else
						$subs = number_format($numSubs, 0) . " subscribers";

					$subs = " (" . $subs . ")";
				} else {
					$subs = "";
				}
				$alllists.=$l["ListID"]."->".str_replace(';', '$$SEMI$$', str_replace(':', '$$COLON$$', $l["ListName"]))."$subs;";
			}
		}

		if ($alllists == '') {
			$OUTPUT = MakeBox("Import Subscribers",'No mailing lists have been created. Please click on the "Create Mailing List" button below to create one.<br><br><input type=button class=\'smallbutton\' onClick="document.location.href=\'' . MakeAdminLink("lists?Action=Add") . '\'" value="Create Mailing List"><br><br>');
		} else {

			$FORM_ITEMS[$FORM_REQUIRED_ITEM . "Mailing List"]="select|ListID:5:$alllists";

			$FORM_ITEMS["-1"]="submit|Next &raquo:1-members";
			$FORM=new AdminForm;
			$FORM->title="SelectList";
			$FORM->items=$FORM_ITEMS;
			$FORM->action=MakeAdminLink("import?Action=ChooseDatasource");
			$FORM->MakeForm("Import Details");

			$FORM->output = "Before you can import subscribers, please choose a mailing list to work with." . $FORM->output;

			$OUTPUT.=MakeBox("Import Subscribers (Step 1 of 5)",$FORM->output);
			$OUTPUT .= '

				<script language="JavaScript">

					function CheckForm()
					{
						l = document.getElementById("ListID");
						if (l.selectedIndex == -1) {
							alert("Please choose a mailing list to work with");
							l.focus();
							return false;
						}
					}

				</script>
			';
		}
	}

?>