"", "address" => "", "kinname" => "", "kinaddress" => "", "phone" => "", "kinphone" => "", "email" => "", "kinemail" => "", "relation" => "", "veggie" => "no", "student" => "yes", "insurance" => "BCRA", "bcranum" => "", "leave_uk" => "", "length_of_stay" => "", "transport_ok" => "yes", "transport_out" => "need", "transport_back" => "need", "from_uk" => "", "returning_uk" => "", "tent" => "no", "top_tent_cap" => "", "btent" => "no", "base_tent_cap" => "", "tent_share" => "yes", "share_condition" => "", "medic_info" => "", "extra_info" => "", "aims" => "", "lifts_out" => "yes", "lifts_back" => "yes", "no_out" => "2", "no_back" => "2", "take_out" => "", "take_back" => "", "transport_info" => "", "medication" => "", "allergies" => "", "bivvy" => "" ); } function fillVars () { initVars (); global $vars; $vars[name] = stripslashes($_POST[name]); $vars[address] = stripslashes($_POST[address]); $vars[phone] = stripslashes($_POST[phone]); $vars[kinname] = stripslashes($_POST[kinname]); $vars[kinaddress] = stripslashes($_POST[kinaddress]); $vars[phone] = stripslashes($_POST[phone]); $vars[kinphone] = stripslashes($_POST[kinphone]); $vars[email] = stripslashes($_POST[email]); $vars[kinemail] = stripslashes($_POST[kinemail]); $vars[relation] = stripslashes($_POST[relation]); $vars[veggie] = stripslashes($_POST[veggie]); $vars[student] = stripslashes($_POST[student]); $vars[transport_ok] = stripslashes($_POST[transport_ok]); $vars[from_uk] = stripslashes($_POST[from_uk]); $vars[returning_uk] = stripslashes($_POST[returning_uk]); $vars[tent] = stripslashes($_POST[tent]); $vars[top_tent_cap] = stripslashes($_POST[top_tent_cap]); $vars[btent] = stripslashes($_POST[btent]); $vars[base_tent_cap] = stripslashes($_POST[base_tent_cap]); $vars[medic_info] = stripslashes($_POST[medic_info]); $vars[extra_info] = stripslashes($_POST[extra_info]); $vars[aims] = stripslashes($_POST[aims]); $vars[transport_info] = stripslashes($_POST[transport_info]); $vars[medication] = stripslashes($_POST[medication]); $vars[allergies] = stripslashes($_POST[allergies]); $vars[bivvy] = stripslashes($_POST[bivvy]); } function errorPage ($err) { echo <<Error END; echo <<Sorry

$err END; } function securityChecks () { global $vars; $error = ""; if ($vars[name] == "") $error = "You must specify your full name."; elseif ($vars[address] == "") $error = "You must specify your address."; elseif ($vars[kinname] == "") $error = "You must specify the name of your next-of-kin."; elseif ($vars[kinaddress] == "") $error = "You must specify your next-of-kin's address."; elseif ($vars[kinphone] == "") $error = "You must specify your next-of-kin's phone number."; elseif ($vars[email] != "" && !ereg( '^[-!#$%&\'*+\\./0-9=?A-Z^_`a-z{|}~]+'. '@'. '[-!#$%&\'*+\\/0-9=?A-Z^_`a-z{|}~]+\.' . '[-!#$%&\'*+\\./0-9=?A-Z^_`a-z{|}~]+$', $vars[email])) $error = "Invalid email address (leave blank if you don't have one)."; elseif ($vars[kinemail] != "" && !ereg( '^[-!#$%&\'*+\\./0-9=?A-Z^_`a-z{|}~]+'. '@'. '[-!#$%&\'*+\\/0-9=?A-Z^_`a-z{|}~]+\.' . '[-!#$%&\'*+\\./0-9=?A-Z^_`a-z{|}~]+$', $vars[kinemail])) $error = "Invalid next-of-kin email address (leave blank if they don't have one)."; elseif ($vars[veggie] != "yes" && $vars[veggie] != "no" && $vars[veggie] != "mostly") $error = "Invalid veggie specification."; elseif ($vars[student] != "yes" && $vars[student] != "no") $error = "Invalid student specification."; elseif ($vars[transport_ok] != "yes" && $vars[transport_ok] != "no") $error = "Invalid transport specification given."; elseif ($vars[bivvy] != "" && $vars[bivvy] != "yes") $error = "Invalid bivvy specification."; elseif ($vars[tent] != "" && $vars[tent] != "yes") $error = "Invalid Top Camp tent specification."; elseif ($vars[btent] != "" && $vars[btent] != "yes") $error = "Invalid Base Camp tent specification."; elseif ($vars[tent] == "yes" && ($vars[top_tent_cap] < 1 || $vars[top_tent_cap] > 9)) $error = "Invalid Top Camp tent capacity given."; elseif ($vars[btent] == "yes" && ($vars[base_tent_cap] < 1 || $vars[base_tent_cap] > 9)) $error = "Invalid Base Camp tent capacity given."; if ($error != "") { echo "Expo 2024 Application Form Error -- Cambridge University Caving Club"; echo ""; echo "

"; printHidden (); echo <<Expo 2004 Application Form Error

Sorry, but you have made a mistake on your form:

$error

Please click the button below and try again.

END; return false; } return true; } function showForm () { global $vars; echo <<Expo 2024 Application Form -- Cambridge University Caving Club END; echo <<Expo 2024 Signup Form

This is the official signup form for Expo 2024, which runs from 6th July until 17th August.

This form is not secure and by submitting this form you consent to its contents being used for Expo purposes and being included in the Bier Book on Expo.

You also give permission for any information you collect on expo (survey data, photos, trip writeups, etc) to be used in perpetuity for expo-related purposes.

Section A: Personal information

General

Your details: Next of kin:
Full name: Name:
Address: Address:
Phone: Phone:
Email: Email:
Relation to you:
Are you a vegetarian? Are you a student/unwaged?
YesYes
Mostly "yes") echo " checked"; echo <<No
"yes" && $vars[veggie] <> "mostly") echo " checked"; echo <<No

Transport

Please look now at the transport arrangements page (will open in a new window). Then select one of the following.

The transport page shows my arrangements correctly.
The transport page does not show my arrangements correctly.

If your arrangements are shown incorrectly, then please state the corrected version in the box below. This will automatically be emailed to the transport co-ordinator.

Tents

There will be two high camps in 2024:

  • the stone bridge bivvy site;
  • the old Top Camp site, to be used for exploration of Eislüfthöhle.

There is space for three people in a Club tent at Base Camp. There is space for five or six people in a Club tent at Top Camp. At the stone bridge, a bivvy bag is not essential but useful if you have one.

Will you be taking any of the following (please tick/complete as appropriate):
A bivvy bag suitable for the stone bridge.
A person tent for the Top Camp site.
A person tent for Base Camp.

Leave the boxes unchecked if you require Club tent space at a particular site.

Medical

The medical information entered here will appear in the Bier Book. Extra medical information may be communicated to Martin Green; this will be placed in sealed envelopes inside the large first aid kits for use in case of emergency. Please ensure that you communicate such information in good time.

Please list any allergies which you have:

Please list any medication which you may be taking in Austria:

Please list any other medical conditions you have that the expedition should be aware of:

Other

Any other information, including any skills e.g. first aid, languages, etc. that you have:

Section B - Caving/surface work projects

To assist organisation of gear, it would be helpful to know people's possible aims on Expo. Thus if you have a particular project in mind, please state it below:

All done?

Click the Preview button below to review your submission.

Please report any problems with this form to the webmaster.

END; } function insertSlashes () { } function printHidden () { global $vars; while (list ($key, $value) = each($vars)) echo ""; } function previewForm () { global $vars; echo <<Expo 2024 Application Form Preview -- Cambridge University Caving Club END; echo <<Expo 2024 Application Form Preview

Please check the details below and then select one of the options at the bottom of the page.

Contact details

Your details

END; printHidden (); $address1 = rtrim(ereg_replace(",,", ",", ereg_replace("(\r\n|\n|\r)", ", ", $vars[address])), " \t\n\r\0\x0b.,"); $kinaddress1 = rtrim(ereg_replace(",,", ",", ereg_replace("(\r\n|\n|\r)", ", ", $vars[kinaddress])), " \t\n\r\0\x0b.,"); echo "Full name: $vars[name].
Address: $address1.
"; echo "Phone: $vars[phone].
Email: "; if ($vars[email] == "") echo "none"; else echo $vars[email]; echo "

Details for your $vars[relation]

"; echo "Full name: $vars[kinname].
Address: $kinaddress1.
"; echo "Phone: $vars[kinphone].
Email: "; if ($vars[kinemail] == "") echo "none"; else echo $vars[kinemail]; echo "

Miscellany

  • "; echo "You are"; switch ($vars[veggie]) { case "no": echo "n't"; break; case "mostly": echo " mostly"; break; default: break; } echo " a vegetarian.
  • You are"; if ($vars[student] == "no") echo "n't"; echo " a student/unwaged person."; if ($vars[bivvy] == "yes") echo "
  • You're taking a bivvy bag suitable for the stone bridge."; if ($vars[tent] == "yes") echo "
  • You're taking a $vars[top_tent_cap] person tent suitable for Top Camp."; if ($vars[btent] == "yes") echo "
  • You're taking a $vars[base_tent_cap] person tent suitable for Base Camp."; echo "

Medical conditions

    "; echo "
  • Allergies: "; if ($vars[allergies] == "") echo "None."; else echo nl2br($vars[allergies]); echo "
  • Medication to be taken in Austria: "; if ($vars[medication] == "") echo "None."; else echo nl2br($vars[medication]); echo "
  • Other medical conditions: "; if ($vars[medic_info] == "") echo "None."; else echo nl2br($vars[medic_info]); echo "
"; if ($vars[aims] != "") { echo "

Your aims for Expo

"; echo nl2br($vars[aims]); } if ($vars[extra_info] != "") { echo "

Other information

"; echo nl2br($vars[extra_info]); } echo "

Transport

    "; if ($vars[transport_ok] == "yes") echo "
  • The transport page shows your arrangements correctly."; else { echo "
  • The transport page does not show your arrangements correctly.
    "; echo "The corrected version is: "; echo nl2br($vars[transport_info]); } echo "
"; if ($vars[transport_info] != "") { echo "

Other transport information

"; echo nl2br($vars[transport_info]); } echo <<

If the above details are correct...

Only click once to avoid submitting duplicate forms.

If you want to change something...

If there is an error in the above details, press the button below to change them.

END; } function updateDatabase () { global $vars; $temp = ""; $address1 = rtrim(ereg_replace(",,", ",", ereg_replace("(\r\n|\n|\r)", ", ", $vars[address])), " \t\n\r\0\x0b.,"); $kinaddress1 = rtrim(ereg_replace(",,", ",", ereg_replace("(\r\n|\n|\r)", ", ", $vars[kinaddress])), " \t\n\r\0\x0b.,"); $temp = $temp . "Form submission from:\n"; $temp = $temp . " $vars[name]\n"; $temp = $temp . " $address1\n"; $temp = $temp . " Phone: $vars[phone]\n"; $temp = $temp . " Email: "; if ($vars[email] == "") $temp = $temp . "none"; else $temp = $temp . "$vars[email]"; $temp = $temp . "\n\n"; $temp = $temp . "Next of kin:\n"; $temp = $temp . " $vars[kinname]\n"; $temp = $temp . " $kinaddress1\n"; $temp = $temp . " Phone: $vars[kinphone]\n"; $temp = $temp . " Email: "; if ($vars[kinemail] == "") $temp = $temp . "none"; else $temp = $temp . "$vars[kinemail]"; $temp = $temp . "\n\n"; $temp = $temp . "Vegetarian? $vars[veggie]\n"; $temp = $temp . "Student/unwaged? $vars[student]\n\n"; if ($vars[transport_ok] == "yes") { $temp = $temp . "Transport arrangements page is correct for this person.\n"; } else { $temp = $temp . "Transport arrangements need changing to:\n"; $temp = $temp . "$vars[transport_info]\n"; $temp = $temp . "(Mark has been emailed and will update the page.)\n"; } $temp = $temp . "\nTaking a bivvy bag? $vars[bivvy]\n"; $temp = $temp . "\nTaking a Top Camp tent? $vars[tent]"; if ($vars[tent] == "yes") $temp = $temp . " (capacity $vars[top_tent_cap])\n"; else $temp = $temp . "\n"; $temp = $temp . "\nTaking a Base Camp tent? $vars[btent]"; if ($vars[btent] == "yes") $temp = $temp . " (capacity $vars[base_tent_cap])\n"; else $temp = $temp . "\n"; $temp = $temp . "\nAllergies: $vars[allergies]\n"; $temp = $temp . "Medication to be taken in Austria: $vars[medication]\n"; $temp = $temp . "Other medical conditions: $vars[medic_info]\n\n"; $temp = $temp . "Aims for Expo: $vars[aims]\n\n"; $temp = $temp . "Other information: $vars[extra_info]\n"; mail ("David Loeffler \n", "Expo form from $vars[name]", $temp, "From: Expo forms \n"); if ($vars[transport_ok] == "no") { $temp = "Transport page needs updating for $vars[name]:\n\n"; $temp = $temp . $vars[transport_info] . "\n"; mail ("Mark Shinwell ", "Transport update from $vars[name]", $temp, "From: Expo forms \n"); } } function submitForm () { global $vars; updateDatabase (); echo <<Submission successful! END; echo <<Expo 2024 Application

Submission successful!

Thank you for your application. Please address any questions to the Expo Leader, Jono Lester.

Return to the main Expo page. END; } virtual("main.css"); # switch ($_GET[action]) { case "blank": initVars (); showForm (); break; case "edit": fillVars (); showForm (); break; case "preview": fillVars (); if (securityChecks ()) { previewForm (); } break; case "commit": switch ($_POST[submit]) { case "I confirm that all details are correct.": fillVars (); if (securityChecks ()) { insertSlashes (); submitForm (); } break; case "Modify form."; fillVars (); showForm (); break; default: errorPage ("Invalid script action."); } break; default: errorPage ("Invalid script action."); break; } ?>