diff -r d76f623d487c -r 6ee186182c70 www/prod_beerxml.php
--- a/www/prod_beerxml.php	Fri Aug 05 11:02:01 2022 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,324 +0,0 @@
-<?php
-require_once('config.php');
-require_once('includes/formulas.php');
-//require_once($_SERVER['DOCUMENT_ROOT'].'/config.php');
-//require_once($_SERVER['DOCUMENT_ROOT'].'/includes/formulas.php');
-
-
-$link = mysqli_connect(DBASE_HOST,DBASE_USER,DBASE_PASS,DBASE_NAME);
-if (! $link) {
-	die('Connect Error (' . mysqli_connect_errno() . ') ' . mysqli_connect_error());
-}
-if (! mysqli_set_charset($link, "utf8" )) {
-	echo "error";
-	return 1;
-}
-
-//setlocale ( LC_ALL, 'nl_NL.UTF-8');
-if (isset($_GET["record"]))
-	$record = $_GET["record"];
-else
-	$record = 71;
-$result = mysqli_query($link, "SELECT * FROM products WHERE record='".$record."'");
-$row = mysqli_fetch_array($result);
-
-$recipetype = array( 'Extract', 'Partial Mash', 'All Grain' );
-$styletype = array( 'Lager', 'Ale', 'Mead', 'Wheat', 'Mixed', 'Cider' );
-$hoptype = array( 'Bittering', 'Aroma', 'Both' );
-$hopform = array( 'Pellet', 'Plug', 'Leaf', 'Leaf', 'Leaf' );
-$hopuse = array( 'Mash', 'First wort', 'Boil', 'Aroma', 'Whirlpool', 'Dry hop' );
-$fermentabletype = array( 'Grain', 'Sugar', 'Extract', 'Dry extract', 'Adjunct' );
-$graintype = array( 'Base', 'Roast', 'Crystal', 'Kilned', 'Sour malt', 'Special', 'No malt' );
-$yeasttype = array( 'Lager', 'Ale', 'Wheat', 'Wine', 'Champagne', 'Other', 'Other', 'Other', 'Other', 'Other' );
-$yeastform = array( 'Liquid', 'Dry', 'Slant', 'Culture', 'Frozen', 'Bottle', 'Dry' );
-$yeastuse = array( 'Primary', 'Secondary', 'Tertiary', 'Bottle' );
-$misctype = array( 'Spice', 'Herb', 'Flavor', 'Fining', 'Water agent', 'Yeast nutrient', 'Other' );
-$miscuse = array( 'Starter', 'Mash', 'Boil', 'Primary', 'Secondary', 'Bottling' );
-$mashsteptype = array( 'Infusion', 'Temperature', 'Decoction' );
-$colormethod = array( 'Morey', 'Mosher', 'Daniels', 'Halberstadt', 'Naudts' );
-$ibumethod = array( 'Tinseth', 'Rager', 'Daniels', 'Garetz', 'Mosher', 'Noonan' );
-
-
-function field($x, $field, $value) {
-	xmlwriter_start_element($x, $field);
-	xmlwriter_text($x, $value);
-	xmlwriter_end_element($x);
-}
-
-
-/*
- * Create beerxml output
- */
-$xw = xmlwriter_open_memory();
-xmlwriter_set_indent($xw, 1);
-$res = xmlwriter_set_indent_string($xw, ' ');
-
-xmlwriter_start_document($xw, '1.0', 'UTF-8');
-
-xmlwriter_start_element($xw, 'RECIPES');
-xmlwriter_start_element($xw, 'RECIPE');
-
-// Recipe basics
-field($xw, 'VERSION', '1');
-field($xw, 'NAME', $row['name']);
-field($xw, 'NOTES', $row['notes']);
-field($xw, 'TYPE', $recipetype[$row['type']]);
-field($xw, 'BREWER', 'Anonymous');
-field($xw, 'BATCH_SIZE', sprintf("%.4f",floatval($row['batch_size'])));
-field($xw, 'BOIL_SIZE', sprintf("%.4f",floatval($row['boil_size'])));
-field($xw, 'BOIL_TIME', sprintf("%.3f",floatval($row['boil_time'])));
-field($xw, 'EFFICIENCY', sprintf("%.4f",floatval($row['efficiency'])));
-field($xw, 'OG', sprintf("%.3f",floatval($row['og'])));
-field($xw, 'FG', sprintf("%.3f",floatval($row['fg'])));
-
-
-if (floatval($row['est_og']) > 0) {
-	field($xw, 'EST_OG', sprintf("%.3f",floatval($row['est_og'])));
-}
-
-if (floatval($row['est_fg']) > 0) {
-	field($xw, 'EST_FG', sprintf("%.3f",floatval($row['est_fg'])));
-}
-
-if (floatval($row['est_abv']) > 0) {
-	field($xw, 'EST_ABV', sprintf("%.1f",floatval($row['est_abv'])));
-}
-
-if (floatval($row['est_color']) > 0) {
-	field($xw, 'EST_COLOR', sprintf("%.6f", ebc_to_srm(floatval($row['est_color']))));
-	field($xw, 'COLOR_METHOD', $colormethod[$row['color_method']]);
-}
-
-if (floatval($row['est_ibu']) > 0) {
-	field($xw, 'EST_IBU', sprintf("%.1f",floatval($row['est_ibu'])));
-	field($xw, 'IBU_METHOD', $ibumethod[$row['ibu_method']]);
-}
-
-/* If product is packaged and carbonated, add fermentation data. */
-if ($row['stage'] >= 8) {
-	$d1 = new DateTime($row['brew_date_end']);
-        $d2 = new DateTime($row['primary_end_date']);
-        $d3 = new DateTime($row['secondary_end_date']);
-        $d4 = new DateTime($row['package_date']);
-	$diff = $d2->diff($d1);
-        $primary_days = $diff->days;
-        $diff = $d3->diff($d2);
-        $secondary_days = $diff->days;
-        $diff = $d4->diff($d3);
-        $tertiary_days = $diff->days;
-	field($xw, 'FERMENTATION_STAGES', '3');
-	field($xw, 'PRIMARY_AGE', sprintf("%.1f", $primary_days));
-	field($xw, 'PRIMARY_TEMP', sprintf("%.1f", $row['primary_max_temp']));
-	field($xw, 'SECONDARY_AGE', sprintf("%.1f", $secondary_days));
-	field($xw, 'SECONDARY_TEMP', sprintf("%.1f", $row['secondary_temp']));
-	field($xw, 'TERTIARY_AGE', sprintf("%.1f", $tertiary_days));
-	field($xw, 'TERTIARY_TEMP', sprintf("%.1f", $row['tertiary_temp']));
-	field($xw, 'CARBONATION', sprintf("%.1f", $row['bottle_carbonation']));
-	field($xw, 'FORCED_CARBONATION', 'FALSE');
-	field($xw, 'CARBONATION_TEMP', sprintf("%.1f", $row['bottle_carbonation_temp']));
-}
-
-if ($row['brew_cooling_to'] > 0)
-	field($xw, 'BMS_COOLING_TO', sprintf("%.1f",floatval($row['brew_cooling_to'])));
-
-if ($row['brew_whirlpool9'] > 0)
-	field($xw, 'BMS_WHIRLPOOL9', sprintf("%.0f",floatval($row['brew_whirlpool9'])));
-if ($row['brew_whirlpool7'] > 0)
-	field($xw, 'BMS_WHIRLPOOL7', sprintf("%.0f",floatval($row['brew_whirlpool7'])));
-if ($row['brew_whirlpool6'] > 0)
-	field($xw, 'BMS_WHIRLPOOL6', sprintf("%.0f",floatval($row['brew_whirlpool6'])));
-if ($row['brew_whirlpool2'] > 0)
-	field($xw, 'BMS_WHIRLPOOL2', sprintf("%.0f",floatval($row['brew_whirlpool2'])));
-
-
-// Style
-xmlwriter_start_element($xw, 'STYLE');
-field($xw, 'VERSION', '1');
-field($xw, 'NAME', $row['st_name']);
-field($xw, 'CATEGORY', $row['st_category']);
-field($xw, 'CATEGORY_NUMBER', $row['st_category_number']);
-field($xw, 'STYLE_LETTER', $row['st_letter']);
-field($xw, 'STYLE_GUIDE', $row['st_guide']);
-field($xw, 'TYPE', $styletype[$row['st_type']]);
-field($xw, 'OG_MIN', sprintf("%.3f",floatval($row['st_og_min'])));
-field($xw, 'OG_MAX', sprintf("%.3f",floatval($row['st_og_max'])));
-field($xw, 'FG_MIN', sprintf("%.3f",floatval($row['st_fg_min'])));
-field($xw, 'FG_MAX', sprintf("%.3f",floatval($row['st_fg_max'])));
-field($xw, 'IBU_MIN', sprintf("%.0f",floatval($row['st_ibu_min'])));
-field($xw, 'IBU_MAX', sprintf("%.0f",floatval($row['st_ibu_max'])));
-field($xw, 'COLOR_MIN', sprintf("%.2f",ebc_to_srm(floatval($row['st_color_min']))));
-field($xw, 'COLOR_MAX', sprintf("%.2f",ebc_to_srm(floatval($row['st_color_max']))));
-field($xw, 'CARB_MIN', sprintf("%.1f",floatval($row['st_carb_min'])));
-field($xw, 'CARB_MAX', sprintf("%.1f",floatval($row['st_carb_max'])));
-field($xw, 'ABV_MIN', sprintf("%.1f",floatval($row['st_abv_min'])));
-field($xw, 'ABV_MAX', sprintf("%.1f",floatval($row['st_abv_max'])));
-xmlwriter_end_element($xw);	// STYLE
-
-xmlwriter_start_element($xw, 'EQUIPMENT');
-field($xw, 'VERSION', '1');
-field($xw, 'NAME', $row['eq_name']);
-field($xw, 'NOTES', $row['eq_notes']);
-field($xw, 'BATCH_SIZE', sprintf("%.2f",floatval($row['eq_batch_size'])));
-field($xw, 'BOIL_SIZE', sprintf("%.2f",floatval($row['eq_boil_size'])));
-field($xw, 'BOIL_TIME', sprintf("%.0f",floatval($row['eq_boil_time'])));
-xmlwriter_end_element($xw);	// EQUIPMENT
-
-xmlwriter_start_element($xw, 'HOPS');
-$arr = json_decode($row['json_hops'], true);
-foreach($arr as $item) { //foreach element in $arr
-	xmlwriter_start_element($xw, 'HOP');
-	field($xw, 'VERSION', '1');
-	field($xw, 'NAME', $item['h_name']);
-	field($xw, 'ALPHA', sprintf("%.1f",floatval($item['h_alpha'])));
-	field($xw, 'AMOUNT', sprintf("%.4f",floatval($item['h_amount'])));
-	field($xw, 'USE', $hopuse[$item['h_useat']]);
-	field($xw, 'TIME', $item['h_time']);
-	field($xw, 'TYPE', $hoptype[$item['h_type']]);
-	field($xw, 'FORM', $hopform[$item['h_form']]);
-	field($xw, 'BETA', sprintf("%.1f",floatval($item['h_beta'])));
-	field($xw, 'HSI', sprintf("%.1f",floatval($item['h_hsi'])));
-	field($xw, 'ORIGIN', $item['h_origin']);
-	xmlwriter_end_element($xw);	// HOP
-}
-xmlwriter_end_element($xw);	// HOPS
-
-xmlwriter_start_element($xw, 'FERMENTABLES');
-$arr = json_decode($row['json_fermentables'], true);
-foreach($arr as $item) { //foreach element in $arr
-    if ($item['f_added'] <= 3) {
-	xmlwriter_start_element($xw, 'FERMENTABLE');
-	field($xw, 'VERSION', '1');
-	field($xw, 'NAME', $item['f_name']);
-	field($xw, 'TYPE', $fermentabletype[$item['f_type']]);
-	field($xw, 'AMOUNT', sprintf("%.4f",floatval($item['f_amount'])));
-	field($xw, 'YIELD', sprintf("%.1f",floatval($item['f_yield'])));
-	field($xw, 'COLOR', sprintf("%.1f",ebc_to_srm(floatval($item['f_color']))));
-	field($xw, 'ADD_AFTER_BOIL', ($item['f_added'] > 1) ? 'TRUE':'FALSE');
-	field($xw, 'ORIGIN', $item['f_origin']);
-	field($xw, 'SUPPLIER', $item['f_supplier']);
-	if (floatval($item['f_coarse_fine_diff']))
-		field($xw, 'COARSE_FINE_DIFF', sprintf("%.4f",floatval($item['f_coarse_fine_diff'])));
-	if (floatval($item['f_moisture']))
-		field($xw, 'MOISTURE', sprintf("%.4f",floatval($item['f_moisture'])));
-	if (floatval($item['f_diastatic_power']))
-		field($xw, 'DIASTATIC_POWER', sprintf("%.4f",floatval($item['f_diastatic_power'])));
-	if (floatval($item['f_protein']))
-		field($xw, 'PROTEIN', sprintf("%.4f",floatval($item['f_protein'])));
-	if (floatval($item['f_max_in_batch']))
-		field($xw, 'MAX_IN_BATCH', sprintf("%.1f",floatval($item['f_max_in_batch'])));
-	field($xw, 'RECOMMEND_MASH', ($item['f_recommend_mash']) ? 'TRUE':'FALSE');
-	field($xw, 'GRAINTYPE', $graintype[$item['f_graintype']]);
-	xmlwriter_end_element($xw);	// FERMENTABLE
-    }
-}
-xmlwriter_end_element($xw);	// FERMENTABLES
-
-xmlwriter_start_element($xw, 'MISCS');
-$arr = json_decode($row['json_miscs'], true);
-foreach($arr as $item) {
-	xmlwriter_start_element($xw, 'MISC');
-	field($xw, 'VERSION', '1');
-	field($xw, 'NAME', $item['m_name']);
-	field($xw, 'TYPE', $misctype[$item['m_type']]);
-	field($xw, 'AMOUNT', sprintf("%.5f",floatval($item['m_amount'])));
-	field($xw, 'AMOUNT_IS_WEIGHT', ($item['m_amount_is_weight']) ? 'TRUE':'FALSE');
-	field($xw, 'USE', $miscuse[$item['m_use_use']]);
-	field($xw, 'TIME', sprintf("%.0f",floatval($item['m_time'])));
-	xmlwriter_end_element($xw);	// MISC
-}
-xmlwriter_end_element($xw);	// MISCS
-
-xmlwriter_start_element($xw, 'YEASTS');
-$arr = json_decode($row['json_yeasts'], true);
-foreach($arr as $item) { //foreach element in $arr
-	xmlwriter_start_element($xw, 'YEAST');
-	field($xw, 'VERSION', '1');
-	field($xw, 'NAME', $item['y_name']);
-	field($xw, 'TYPE', $yeasttype[$item['y_type']]);
-	field($xw, 'FORM', $yeastform[$item['y_form']]);
-	field($xw, 'AMOUNT', sprintf("%.5f",floatval($item['y_amount'])));
-	field($xw, 'AMOUNT_IS_WEIGHT', ($item['y_form'] == 1) ? 'TRUE':'FALSE');
-	field($xw, 'LABORATORY', $item['y_laboratory']);
-	field($xw, 'PRODUCT_ID', $item['y_product_id']);
-	field($xw, 'MIN_TEMPERATURE', sprintf("%.1f",floatval($item['y_min_temperature'])));
-	field($xw, 'MAX_TEMPERATURE', sprintf("%.1f",floatval($item['y_max_temperature'])));
-	field($xw, 'ATTENUATION', sprintf("%.1f",floatval($item['y_attenuation'])));
-	field($xw, 'ADD_TO_SECONDARY', ($item['y_use'] == 0) ? 'FALSE':'TRUE');
-	xmlwriter_end_element($xw);	// YEAST
-}
-xmlwriter_end_element($xw);	// YEASTS
-
-xmlwriter_start_element($xw, 'WATERS');
-xmlwriter_start_element($xw, 'WATER');	// Source 1
-field($xw, 'VERSION', '1');
-field($xw, 'NAME', $row['w1_name']);
-field($xw, 'AMOUNT', sprintf("%.2f",floatval($row['w1_amount'])));
-field($xw, 'CALCIUM', sprintf("%.2f",floatval($row['w1_calcium'])));
-field($xw, 'MAGNESIUM', sprintf("%.2f",floatval($row['w1_magnesium'])));
-field($xw, 'BICARBONATE', sprintf("%.2f",floatval($row['w1_total_alkalinity']) * 1.22));
-field($xw, 'SULFATE', sprintf("%.2f",floatval($row['w1_sulfate'])));
-field($xw, 'CHLORIDE', sprintf("%.2f",floatval($row['w1_chloride'])));
-field($xw, 'SODIUM', sprintf("%.2f",floatval($row['w1_sodium'])));
-field($xw, 'PH', sprintf("%.1f",floatval($row['w1_ph'])));
-field($xw, 'TOTAL_ALKALINITY', sprintf("%.2f",floatval($row['w1_total_alkalinity'])));
-xmlwriter_end_element($xw);	// WATER
-
-if (strlen($row['w2_name'])) {
-	xmlwriter_start_element($xw, 'WATER');	// Source 2
-	field($xw, 'VERSION', '1');
-	field($xw, 'NAME', $row['w2_name']);
-	field($xw, 'AMOUNT', sprintf("%.2f",floatval($row['w2_amount'])));
-	field($xw, 'CALCIUM', sprintf("%.2f",floatval($row['w2_calcium'])));
-	field($xw, 'MAGNESIUM', sprintf("%.2f",floatval($row['w2_magnesium'])));
-	field($xw, 'BICARBONATE', sprintf("%.2f",floatval($row['w2_total_alkalinity']) * 1.22));
-	field($xw, 'SULFATE', sprintf("%.2f",floatval($row['w2_sulfate'])));
-	field($xw, 'CHLORIDE', sprintf("%.2f",floatval($row['w2_chloride'])));
-	field($xw, 'SODIUM', sprintf("%.2f",floatval($row['w2_sodium'])));
-	field($xw, 'PH', sprintf("%.1f",floatval($row['w2_ph'])));
-	field($xw, 'TOTAL_ALKALINITY', sprintf("%.2f",floatval($row['w2_total_alkalinity'])));
-	xmlwriter_end_element($xw);	// WATER
-}
-xmlwriter_end_element($xw);	// WATERS
-
-xmlwriter_start_element($xw, 'MASH');
-field($xw, 'VERSION', '1');
-field($xw, 'NAME', $row['mash_name']);
-field($xw, 'GRAIN_TEMP', '10.0');
-field($xw, 'PH', sprintf("%.1f",floatval($row['sparge_ph'])));
-field($xw, 'SPARGE_TEMP', sprintf("%.1f",floatval($row['sparge_temp'])));
-xmlwriter_start_element($xw, 'MASH_STEPS');
-$arr = json_decode($row['json_mashs'], true);
-foreach($arr as $item) { //foreach element in $arr
-	xmlwriter_start_element($xw, 'MASH_STEP');
-	field($xw, 'VERSION', '1');
-	field($xw, 'NAME', $item['step_name']);
-	field($xw, 'TYPE', $mashsteptype[$item['step_type']]);
-	if ($item['step_type'] == 0) {
-		field($xw, 'INFUSE_AMOUNT', sprintf("%.3f",floatval($item['step_infuse_amount'])));
-		field($xw, 'INFUSE_TEMP', sprintf("%.3f",floatval($item['step_infuse_temp'])));
-	}
-	if ($item['step_type'] == 2) {
-		field($xw, 'DECOCTION_AMT', sprintf("%.3f",floatval($item['step_infuse_amount'])));
-	}
-	field($xw, 'STEP_TEMP', sprintf("%.1f",floatval($item['step_temp'])));
-	field($xw, 'STEP_TIME', sprintf("%.1f",floatval($item['step_time'])));
-	field($xw, 'RAMP_TIME', sprintf("%.1f",floatval($item['ramp_time'])));
-	field($xw, 'END_TEMP', sprintf("%.1f",floatval($item['end_temp'])));
-	field($xw, 'PH', sprintf("%.1f",floatval($row['mash_ph'])));
-	xmlwriter_end_element($xw);	// MASH_STEP
-}
-xmlwriter_end_element($xw);	// MASH_STEPS
-xmlwriter_end_element($xw);	// MASH
-xmlwriter_end_element($xw);	// RECIPE
-xmlwriter_end_element($xw);	// RECIPES
-xmlwriter_end_document($xw);
-
-$beerxml = xmlwriter_output_memory($xw);
-
-Header('Content-type: text/xml');
-header('Content-Disposition: attachment; filename="' . $row['code'] . ' ' . $row['name'] . '.xml"');
-header('Content-Transfer-Encoding: binary');
-header('Expires: 0');
-header('Pragma: no-cache');
-header('Content-Length: '.strlen($beerxml));
-exit($beerxml);