www/prod_beerxml.php

changeset 817
6ee186182c70
parent 816
d76f623d487c
child 818
f9c071906643
equal deleted inserted replaced
816:d76f623d487c 817:6ee186182c70
1 <?php
2 require_once('config.php');
3 require_once('includes/formulas.php');
4 //require_once($_SERVER['DOCUMENT_ROOT'].'/config.php');
5 //require_once($_SERVER['DOCUMENT_ROOT'].'/includes/formulas.php');
6
7
8 $link = mysqli_connect(DBASE_HOST,DBASE_USER,DBASE_PASS,DBASE_NAME);
9 if (! $link) {
10 die('Connect Error (' . mysqli_connect_errno() . ') ' . mysqli_connect_error());
11 }
12 if (! mysqli_set_charset($link, "utf8" )) {
13 echo "error";
14 return 1;
15 }
16
17 //setlocale ( LC_ALL, 'nl_NL.UTF-8');
18 if (isset($_GET["record"]))
19 $record = $_GET["record"];
20 else
21 $record = 71;
22 $result = mysqli_query($link, "SELECT * FROM products WHERE record='".$record."'");
23 $row = mysqli_fetch_array($result);
24
25 $recipetype = array( 'Extract', 'Partial Mash', 'All Grain' );
26 $styletype = array( 'Lager', 'Ale', 'Mead', 'Wheat', 'Mixed', 'Cider' );
27 $hoptype = array( 'Bittering', 'Aroma', 'Both' );
28 $hopform = array( 'Pellet', 'Plug', 'Leaf', 'Leaf', 'Leaf' );
29 $hopuse = array( 'Mash', 'First wort', 'Boil', 'Aroma', 'Whirlpool', 'Dry hop' );
30 $fermentabletype = array( 'Grain', 'Sugar', 'Extract', 'Dry extract', 'Adjunct' );
31 $graintype = array( 'Base', 'Roast', 'Crystal', 'Kilned', 'Sour malt', 'Special', 'No malt' );
32 $yeasttype = array( 'Lager', 'Ale', 'Wheat', 'Wine', 'Champagne', 'Other', 'Other', 'Other', 'Other', 'Other' );
33 $yeastform = array( 'Liquid', 'Dry', 'Slant', 'Culture', 'Frozen', 'Bottle', 'Dry' );
34 $yeastuse = array( 'Primary', 'Secondary', 'Tertiary', 'Bottle' );
35 $misctype = array( 'Spice', 'Herb', 'Flavor', 'Fining', 'Water agent', 'Yeast nutrient', 'Other' );
36 $miscuse = array( 'Starter', 'Mash', 'Boil', 'Primary', 'Secondary', 'Bottling' );
37 $mashsteptype = array( 'Infusion', 'Temperature', 'Decoction' );
38 $colormethod = array( 'Morey', 'Mosher', 'Daniels', 'Halberstadt', 'Naudts' );
39 $ibumethod = array( 'Tinseth', 'Rager', 'Daniels', 'Garetz', 'Mosher', 'Noonan' );
40
41
42 function field($x, $field, $value) {
43 xmlwriter_start_element($x, $field);
44 xmlwriter_text($x, $value);
45 xmlwriter_end_element($x);
46 }
47
48
49 /*
50 * Create beerxml output
51 */
52 $xw = xmlwriter_open_memory();
53 xmlwriter_set_indent($xw, 1);
54 $res = xmlwriter_set_indent_string($xw, ' ');
55
56 xmlwriter_start_document($xw, '1.0', 'UTF-8');
57
58 xmlwriter_start_element($xw, 'RECIPES');
59 xmlwriter_start_element($xw, 'RECIPE');
60
61 // Recipe basics
62 field($xw, 'VERSION', '1');
63 field($xw, 'NAME', $row['name']);
64 field($xw, 'NOTES', $row['notes']);
65 field($xw, 'TYPE', $recipetype[$row['type']]);
66 field($xw, 'BREWER', 'Anonymous');
67 field($xw, 'BATCH_SIZE', sprintf("%.4f",floatval($row['batch_size'])));
68 field($xw, 'BOIL_SIZE', sprintf("%.4f",floatval($row['boil_size'])));
69 field($xw, 'BOIL_TIME', sprintf("%.3f",floatval($row['boil_time'])));
70 field($xw, 'EFFICIENCY', sprintf("%.4f",floatval($row['efficiency'])));
71 field($xw, 'OG', sprintf("%.3f",floatval($row['og'])));
72 field($xw, 'FG', sprintf("%.3f",floatval($row['fg'])));
73
74
75 if (floatval($row['est_og']) > 0) {
76 field($xw, 'EST_OG', sprintf("%.3f",floatval($row['est_og'])));
77 }
78
79 if (floatval($row['est_fg']) > 0) {
80 field($xw, 'EST_FG', sprintf("%.3f",floatval($row['est_fg'])));
81 }
82
83 if (floatval($row['est_abv']) > 0) {
84 field($xw, 'EST_ABV', sprintf("%.1f",floatval($row['est_abv'])));
85 }
86
87 if (floatval($row['est_color']) > 0) {
88 field($xw, 'EST_COLOR', sprintf("%.6f", ebc_to_srm(floatval($row['est_color']))));
89 field($xw, 'COLOR_METHOD', $colormethod[$row['color_method']]);
90 }
91
92 if (floatval($row['est_ibu']) > 0) {
93 field($xw, 'EST_IBU', sprintf("%.1f",floatval($row['est_ibu'])));
94 field($xw, 'IBU_METHOD', $ibumethod[$row['ibu_method']]);
95 }
96
97 /* If product is packaged and carbonated, add fermentation data. */
98 if ($row['stage'] >= 8) {
99 $d1 = new DateTime($row['brew_date_end']);
100 $d2 = new DateTime($row['primary_end_date']);
101 $d3 = new DateTime($row['secondary_end_date']);
102 $d4 = new DateTime($row['package_date']);
103 $diff = $d2->diff($d1);
104 $primary_days = $diff->days;
105 $diff = $d3->diff($d2);
106 $secondary_days = $diff->days;
107 $diff = $d4->diff($d3);
108 $tertiary_days = $diff->days;
109 field($xw, 'FERMENTATION_STAGES', '3');
110 field($xw, 'PRIMARY_AGE', sprintf("%.1f", $primary_days));
111 field($xw, 'PRIMARY_TEMP', sprintf("%.1f", $row['primary_max_temp']));
112 field($xw, 'SECONDARY_AGE', sprintf("%.1f", $secondary_days));
113 field($xw, 'SECONDARY_TEMP', sprintf("%.1f", $row['secondary_temp']));
114 field($xw, 'TERTIARY_AGE', sprintf("%.1f", $tertiary_days));
115 field($xw, 'TERTIARY_TEMP', sprintf("%.1f", $row['tertiary_temp']));
116 field($xw, 'CARBONATION', sprintf("%.1f", $row['bottle_carbonation']));
117 field($xw, 'FORCED_CARBONATION', 'FALSE');
118 field($xw, 'CARBONATION_TEMP', sprintf("%.1f", $row['bottle_carbonation_temp']));
119 }
120
121 if ($row['brew_cooling_to'] > 0)
122 field($xw, 'BMS_COOLING_TO', sprintf("%.1f",floatval($row['brew_cooling_to'])));
123
124 if ($row['brew_whirlpool9'] > 0)
125 field($xw, 'BMS_WHIRLPOOL9', sprintf("%.0f",floatval($row['brew_whirlpool9'])));
126 if ($row['brew_whirlpool7'] > 0)
127 field($xw, 'BMS_WHIRLPOOL7', sprintf("%.0f",floatval($row['brew_whirlpool7'])));
128 if ($row['brew_whirlpool6'] > 0)
129 field($xw, 'BMS_WHIRLPOOL6', sprintf("%.0f",floatval($row['brew_whirlpool6'])));
130 if ($row['brew_whirlpool2'] > 0)
131 field($xw, 'BMS_WHIRLPOOL2', sprintf("%.0f",floatval($row['brew_whirlpool2'])));
132
133
134 // Style
135 xmlwriter_start_element($xw, 'STYLE');
136 field($xw, 'VERSION', '1');
137 field($xw, 'NAME', $row['st_name']);
138 field($xw, 'CATEGORY', $row['st_category']);
139 field($xw, 'CATEGORY_NUMBER', $row['st_category_number']);
140 field($xw, 'STYLE_LETTER', $row['st_letter']);
141 field($xw, 'STYLE_GUIDE', $row['st_guide']);
142 field($xw, 'TYPE', $styletype[$row['st_type']]);
143 field($xw, 'OG_MIN', sprintf("%.3f",floatval($row['st_og_min'])));
144 field($xw, 'OG_MAX', sprintf("%.3f",floatval($row['st_og_max'])));
145 field($xw, 'FG_MIN', sprintf("%.3f",floatval($row['st_fg_min'])));
146 field($xw, 'FG_MAX', sprintf("%.3f",floatval($row['st_fg_max'])));
147 field($xw, 'IBU_MIN', sprintf("%.0f",floatval($row['st_ibu_min'])));
148 field($xw, 'IBU_MAX', sprintf("%.0f",floatval($row['st_ibu_max'])));
149 field($xw, 'COLOR_MIN', sprintf("%.2f",ebc_to_srm(floatval($row['st_color_min']))));
150 field($xw, 'COLOR_MAX', sprintf("%.2f",ebc_to_srm(floatval($row['st_color_max']))));
151 field($xw, 'CARB_MIN', sprintf("%.1f",floatval($row['st_carb_min'])));
152 field($xw, 'CARB_MAX', sprintf("%.1f",floatval($row['st_carb_max'])));
153 field($xw, 'ABV_MIN', sprintf("%.1f",floatval($row['st_abv_min'])));
154 field($xw, 'ABV_MAX', sprintf("%.1f",floatval($row['st_abv_max'])));
155 xmlwriter_end_element($xw); // STYLE
156
157 xmlwriter_start_element($xw, 'EQUIPMENT');
158 field($xw, 'VERSION', '1');
159 field($xw, 'NAME', $row['eq_name']);
160 field($xw, 'NOTES', $row['eq_notes']);
161 field($xw, 'BATCH_SIZE', sprintf("%.2f",floatval($row['eq_batch_size'])));
162 field($xw, 'BOIL_SIZE', sprintf("%.2f",floatval($row['eq_boil_size'])));
163 field($xw, 'BOIL_TIME', sprintf("%.0f",floatval($row['eq_boil_time'])));
164 xmlwriter_end_element($xw); // EQUIPMENT
165
166 xmlwriter_start_element($xw, 'HOPS');
167 $arr = json_decode($row['json_hops'], true);
168 foreach($arr as $item) { //foreach element in $arr
169 xmlwriter_start_element($xw, 'HOP');
170 field($xw, 'VERSION', '1');
171 field($xw, 'NAME', $item['h_name']);
172 field($xw, 'ALPHA', sprintf("%.1f",floatval($item['h_alpha'])));
173 field($xw, 'AMOUNT', sprintf("%.4f",floatval($item['h_amount'])));
174 field($xw, 'USE', $hopuse[$item['h_useat']]);
175 field($xw, 'TIME', $item['h_time']);
176 field($xw, 'TYPE', $hoptype[$item['h_type']]);
177 field($xw, 'FORM', $hopform[$item['h_form']]);
178 field($xw, 'BETA', sprintf("%.1f",floatval($item['h_beta'])));
179 field($xw, 'HSI', sprintf("%.1f",floatval($item['h_hsi'])));
180 field($xw, 'ORIGIN', $item['h_origin']);
181 xmlwriter_end_element($xw); // HOP
182 }
183 xmlwriter_end_element($xw); // HOPS
184
185 xmlwriter_start_element($xw, 'FERMENTABLES');
186 $arr = json_decode($row['json_fermentables'], true);
187 foreach($arr as $item) { //foreach element in $arr
188 if ($item['f_added'] <= 3) {
189 xmlwriter_start_element($xw, 'FERMENTABLE');
190 field($xw, 'VERSION', '1');
191 field($xw, 'NAME', $item['f_name']);
192 field($xw, 'TYPE', $fermentabletype[$item['f_type']]);
193 field($xw, 'AMOUNT', sprintf("%.4f",floatval($item['f_amount'])));
194 field($xw, 'YIELD', sprintf("%.1f",floatval($item['f_yield'])));
195 field($xw, 'COLOR', sprintf("%.1f",ebc_to_srm(floatval($item['f_color']))));
196 field($xw, 'ADD_AFTER_BOIL', ($item['f_added'] > 1) ? 'TRUE':'FALSE');
197 field($xw, 'ORIGIN', $item['f_origin']);
198 field($xw, 'SUPPLIER', $item['f_supplier']);
199 if (floatval($item['f_coarse_fine_diff']))
200 field($xw, 'COARSE_FINE_DIFF', sprintf("%.4f",floatval($item['f_coarse_fine_diff'])));
201 if (floatval($item['f_moisture']))
202 field($xw, 'MOISTURE', sprintf("%.4f",floatval($item['f_moisture'])));
203 if (floatval($item['f_diastatic_power']))
204 field($xw, 'DIASTATIC_POWER', sprintf("%.4f",floatval($item['f_diastatic_power'])));
205 if (floatval($item['f_protein']))
206 field($xw, 'PROTEIN', sprintf("%.4f",floatval($item['f_protein'])));
207 if (floatval($item['f_max_in_batch']))
208 field($xw, 'MAX_IN_BATCH', sprintf("%.1f",floatval($item['f_max_in_batch'])));
209 field($xw, 'RECOMMEND_MASH', ($item['f_recommend_mash']) ? 'TRUE':'FALSE');
210 field($xw, 'GRAINTYPE', $graintype[$item['f_graintype']]);
211 xmlwriter_end_element($xw); // FERMENTABLE
212 }
213 }
214 xmlwriter_end_element($xw); // FERMENTABLES
215
216 xmlwriter_start_element($xw, 'MISCS');
217 $arr = json_decode($row['json_miscs'], true);
218 foreach($arr as $item) {
219 xmlwriter_start_element($xw, 'MISC');
220 field($xw, 'VERSION', '1');
221 field($xw, 'NAME', $item['m_name']);
222 field($xw, 'TYPE', $misctype[$item['m_type']]);
223 field($xw, 'AMOUNT', sprintf("%.5f",floatval($item['m_amount'])));
224 field($xw, 'AMOUNT_IS_WEIGHT', ($item['m_amount_is_weight']) ? 'TRUE':'FALSE');
225 field($xw, 'USE', $miscuse[$item['m_use_use']]);
226 field($xw, 'TIME', sprintf("%.0f",floatval($item['m_time'])));
227 xmlwriter_end_element($xw); // MISC
228 }
229 xmlwriter_end_element($xw); // MISCS
230
231 xmlwriter_start_element($xw, 'YEASTS');
232 $arr = json_decode($row['json_yeasts'], true);
233 foreach($arr as $item) { //foreach element in $arr
234 xmlwriter_start_element($xw, 'YEAST');
235 field($xw, 'VERSION', '1');
236 field($xw, 'NAME', $item['y_name']);
237 field($xw, 'TYPE', $yeasttype[$item['y_type']]);
238 field($xw, 'FORM', $yeastform[$item['y_form']]);
239 field($xw, 'AMOUNT', sprintf("%.5f",floatval($item['y_amount'])));
240 field($xw, 'AMOUNT_IS_WEIGHT', ($item['y_form'] == 1) ? 'TRUE':'FALSE');
241 field($xw, 'LABORATORY', $item['y_laboratory']);
242 field($xw, 'PRODUCT_ID', $item['y_product_id']);
243 field($xw, 'MIN_TEMPERATURE', sprintf("%.1f",floatval($item['y_min_temperature'])));
244 field($xw, 'MAX_TEMPERATURE', sprintf("%.1f",floatval($item['y_max_temperature'])));
245 field($xw, 'ATTENUATION', sprintf("%.1f",floatval($item['y_attenuation'])));
246 field($xw, 'ADD_TO_SECONDARY', ($item['y_use'] == 0) ? 'FALSE':'TRUE');
247 xmlwriter_end_element($xw); // YEAST
248 }
249 xmlwriter_end_element($xw); // YEASTS
250
251 xmlwriter_start_element($xw, 'WATERS');
252 xmlwriter_start_element($xw, 'WATER'); // Source 1
253 field($xw, 'VERSION', '1');
254 field($xw, 'NAME', $row['w1_name']);
255 field($xw, 'AMOUNT', sprintf("%.2f",floatval($row['w1_amount'])));
256 field($xw, 'CALCIUM', sprintf("%.2f",floatval($row['w1_calcium'])));
257 field($xw, 'MAGNESIUM', sprintf("%.2f",floatval($row['w1_magnesium'])));
258 field($xw, 'BICARBONATE', sprintf("%.2f",floatval($row['w1_total_alkalinity']) * 1.22));
259 field($xw, 'SULFATE', sprintf("%.2f",floatval($row['w1_sulfate'])));
260 field($xw, 'CHLORIDE', sprintf("%.2f",floatval($row['w1_chloride'])));
261 field($xw, 'SODIUM', sprintf("%.2f",floatval($row['w1_sodium'])));
262 field($xw, 'PH', sprintf("%.1f",floatval($row['w1_ph'])));
263 field($xw, 'TOTAL_ALKALINITY', sprintf("%.2f",floatval($row['w1_total_alkalinity'])));
264 xmlwriter_end_element($xw); // WATER
265
266 if (strlen($row['w2_name'])) {
267 xmlwriter_start_element($xw, 'WATER'); // Source 2
268 field($xw, 'VERSION', '1');
269 field($xw, 'NAME', $row['w2_name']);
270 field($xw, 'AMOUNT', sprintf("%.2f",floatval($row['w2_amount'])));
271 field($xw, 'CALCIUM', sprintf("%.2f",floatval($row['w2_calcium'])));
272 field($xw, 'MAGNESIUM', sprintf("%.2f",floatval($row['w2_magnesium'])));
273 field($xw, 'BICARBONATE', sprintf("%.2f",floatval($row['w2_total_alkalinity']) * 1.22));
274 field($xw, 'SULFATE', sprintf("%.2f",floatval($row['w2_sulfate'])));
275 field($xw, 'CHLORIDE', sprintf("%.2f",floatval($row['w2_chloride'])));
276 field($xw, 'SODIUM', sprintf("%.2f",floatval($row['w2_sodium'])));
277 field($xw, 'PH', sprintf("%.1f",floatval($row['w2_ph'])));
278 field($xw, 'TOTAL_ALKALINITY', sprintf("%.2f",floatval($row['w2_total_alkalinity'])));
279 xmlwriter_end_element($xw); // WATER
280 }
281 xmlwriter_end_element($xw); // WATERS
282
283 xmlwriter_start_element($xw, 'MASH');
284 field($xw, 'VERSION', '1');
285 field($xw, 'NAME', $row['mash_name']);
286 field($xw, 'GRAIN_TEMP', '10.0');
287 field($xw, 'PH', sprintf("%.1f",floatval($row['sparge_ph'])));
288 field($xw, 'SPARGE_TEMP', sprintf("%.1f",floatval($row['sparge_temp'])));
289 xmlwriter_start_element($xw, 'MASH_STEPS');
290 $arr = json_decode($row['json_mashs'], true);
291 foreach($arr as $item) { //foreach element in $arr
292 xmlwriter_start_element($xw, 'MASH_STEP');
293 field($xw, 'VERSION', '1');
294 field($xw, 'NAME', $item['step_name']);
295 field($xw, 'TYPE', $mashsteptype[$item['step_type']]);
296 if ($item['step_type'] == 0) {
297 field($xw, 'INFUSE_AMOUNT', sprintf("%.3f",floatval($item['step_infuse_amount'])));
298 field($xw, 'INFUSE_TEMP', sprintf("%.3f",floatval($item['step_infuse_temp'])));
299 }
300 if ($item['step_type'] == 2) {
301 field($xw, 'DECOCTION_AMT', sprintf("%.3f",floatval($item['step_infuse_amount'])));
302 }
303 field($xw, 'STEP_TEMP', sprintf("%.1f",floatval($item['step_temp'])));
304 field($xw, 'STEP_TIME', sprintf("%.1f",floatval($item['step_time'])));
305 field($xw, 'RAMP_TIME', sprintf("%.1f",floatval($item['ramp_time'])));
306 field($xw, 'END_TEMP', sprintf("%.1f",floatval($item['end_temp'])));
307 field($xw, 'PH', sprintf("%.1f",floatval($row['mash_ph'])));
308 xmlwriter_end_element($xw); // MASH_STEP
309 }
310 xmlwriter_end_element($xw); // MASH_STEPS
311 xmlwriter_end_element($xw); // MASH
312 xmlwriter_end_element($xw); // RECIPE
313 xmlwriter_end_element($xw); // RECIPES
314 xmlwriter_end_document($xw);
315
316 $beerxml = xmlwriter_output_memory($xw);
317
318 Header('Content-type: text/xml');
319 header('Content-Disposition: attachment; filename="' . $row['code'] . ' ' . $row['name'] . '.xml"');
320 header('Content-Transfer-Encoding: binary');
321 header('Expires: 0');
322 header('Pragma: no-cache');
323 header('Content-Length: '.strlen($beerxml));
324 exit($beerxml);

mercurial