www/upl_recipe.php

Wed, 14 Jul 2021 20:51:45 +0200

author
Michiel Broek <mbroek@mbse.eu>
date
Wed, 14 Jul 2021 20:51:45 +0200
changeset 772
f9d266eb0ec6
parent 709
e251cceec547
permissions
-rw-r--r--

In product editor calculate fermentables before the first IBU calculation. In recipe editor changed to the new water calculations like in the product editor.

307
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
1 <?php
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
2 require_once('config.php');
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
3 require("version.php");
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
4 require("includes/formulas.php");
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
5
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
6
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
7 $target_dir = "tmp/";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
8 $target_file = $target_dir . basename($_FILES["fileToUpload"]["name"]);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
9 $uploadOk = 1;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
10 $imageFileType = pathinfo($target_file,PATHINFO_EXTENSION);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
11
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
12 // Check if file already exists
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
13 if (file_exists($target_file)) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
14 echo "Fout 1: bestand bestaat al. ";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
15 $uploadOk = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
16 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
17 // Check file size
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
18 if ($_FILES["fileToUpload"]["size"] > 500000 && $uploadOk) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
19 echo "Fout 2: het bestand is te groot. ";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
20 $uploadOk = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
21 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
22 // Allow certain file formats
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
23 if ($imageFileType != "xml" && $uploadOk) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
24 echo "Fout 3: alleen XML bestanden toegestaan. ";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
25 $uploadOk = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
26 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
27 // Check if $uploadOk is set to 0 by an error
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
28 if ($uploadOk == 0) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
29 exit;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
30 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
31
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
32 if (move_uploaded_file($_FILES["fileToUpload"]["tmp_name"], $target_file)) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
33 echo "Verwerken bestand ". basename( $_FILES["fileToUpload"]["name"]). "<br />";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
34 } else {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
35 echo "Fout 4: er ging iets fout met de upload.";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
36 exit;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
37 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
38
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
39
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
40 $db = mysqli_connect(DBASE_HOST, DBASE_USER, DBASE_PASS, DBASE_NAME);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
41 if (! $db) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
42 echo "Fout 5: ".mysqli_connect_errno()." ".mysqli_connect_error();
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
43 exit;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
44 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
45 mysqli_set_charset($db, "utf8" );
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
46 date_default_timezone_set('Europe/Amsterdam');
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
47
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
48
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
49 $pCara = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
50 $pSugar = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
51 $svg = 77;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
52 $efficiency = 75;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
53 $batch_size = 20;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
54 $colorw = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
55 $f_sugars = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
56
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
57
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
58
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
59 function get_miscs_cost($miscname) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
60 global $db;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
61
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
62 if ($result = mysqli_query($db, "SELECT cost FROM inventory_miscs WHERE name='$miscname'")) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
63 if ($row = mysqli_fetch_array($result, MYSQLI_ASSOC)) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
64 return floatval($row['cost']);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
65 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
66 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
67 return 0.0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
68 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
69
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
70
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
71
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
72 function recipe_style($recipe)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
73 {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
74 global $db;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
75
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
76 if ($recipe->STYLE->NAME)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
77 $sql = "', st_name='" . mysqli_real_escape_string($db, $recipe->STYLE->NAME);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
78 if ($recipe->STYLE->STYLE_LETTER)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
79 $sql .= "', st_letter='" . mysqli_real_escape_string($db, $recipe->STYLE->STYLE_LETTER);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
80 if ($recipe->STYLE->STYLE_GUIDE) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
81 if ($recipe->STYLE->STYLE_GUIDE == "Biertypengids Derek Walsh") {
709
e251cceec547 Fixed recipe upload style category number default. Changed default style guid to BKG 2019.
Michiel Broek <mbroek@mbse.eu>
parents: 308
diff changeset
82 $sql .= "', st_guide='BKG 2019";
307
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
83 } else if ($recipe->STYLE->STYLE_GUIDE == "BKG Biertypen") {
709
e251cceec547 Fixed recipe upload style category number default. Changed default style guid to BKG 2019.
Michiel Broek <mbroek@mbse.eu>
parents: 308
diff changeset
84 $sql .= "', st_guide='BKG 2019";
e251cceec547 Fixed recipe upload style category number default. Changed default style guid to BKG 2019.
Michiel Broek <mbroek@mbse.eu>
parents: 308
diff changeset
85 } else if ($recipe->STYLE->STYLE_GUIDE == "BKG 2015") {
e251cceec547 Fixed recipe upload style category number default. Changed default style guid to BKG 2019.
Michiel Broek <mbroek@mbse.eu>
parents: 308
diff changeset
86 $sql .= "', st_guide='BKG 2019";
307
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
87 } else {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
88 $sql .= "', st_guide='" . mysqli_real_escape_string($db, $recipe->STYLE->STYLE_GUIDE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
89 }
709
e251cceec547 Fixed recipe upload style category number default. Changed default style guid to BKG 2019.
Michiel Broek <mbroek@mbse.eu>
parents: 308
diff changeset
90 } else {
e251cceec547 Fixed recipe upload style category number default. Changed default style guid to BKG 2019.
Michiel Broek <mbroek@mbse.eu>
parents: 308
diff changeset
91 $sql .= "', st_guide='BKG 2019";
307
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
92 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
93 if ($recipe->STYLE->CATEGORY)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
94 $sql .= "', st_category='" . mysqli_real_escape_string($db, $recipe->STYLE->CATEGORY);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
95 if ($recipe->STYLE->CATEGORY_NUMBER)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
96 $sql .= "', st_category_number='" . floatval($recipe->STYLE->CATEGORY_NUMBER);
709
e251cceec547 Fixed recipe upload style category number default. Changed default style guid to BKG 2019.
Michiel Broek <mbroek@mbse.eu>
parents: 308
diff changeset
97 else
e251cceec547 Fixed recipe upload style category number default. Changed default style guid to BKG 2019.
Michiel Broek <mbroek@mbse.eu>
parents: 308
diff changeset
98 $sql .= "', st_category_number='0";
307
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
99 if ($recipe->STYLE->TYPE == 'Lager')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
100 $sql .= "', st_type='0";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
101 else if (($recipe->STYLE->TYPE == 'Ale') || ($recipe->STYLE->TYPE == 'Strong Ale'))
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
102 $sql .= "', st_type='1";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
103 else if ($recipe->STYLE->TYPE == 'Mead')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
104 $sql .= "', st_type='2";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
105 else if ($recipe->STYLE->TYPE == 'Wheat')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
106 $sql .= "', st_type='3";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
107 else if ($recipe->STYLE->TYPE == 'Mixed')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
108 $sql .= "', st_type='4";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
109 else if ($recipe->STYLE->TYPE == 'Cider')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
110 $sql .= "', st_type='5";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
111 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
112 echo "Unknown TYPE " . $recipe->STYLE->TYPE . "<br />";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
113
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
114 if ($recipe->STYLE->OG_MIN)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
115 $sql .= "', st_og_min='" . floatval($recipe->STYLE->OG_MIN);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
116 if ($recipe->STYLE->OG_MAX)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
117 $sql .= "', st_og_max='" . floatval($recipe->STYLE->OG_MAX);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
118 if ($recipe->STYLE->FG_MIN)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
119 $sql .= "', st_fg_min='" . floatval($recipe->STYLE->FG_MIN);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
120 if ($recipe->STYLE->FG_MAX)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
121 $sql .= "', st_fg_max='" . floatval($recipe->STYLE->FG_MAX);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
122 if ($recipe->STYLE->IBU_MIN)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
123 $sql .= "', st_ibu_min='" . floatval($recipe->STYLE->IBU_MIN);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
124 if ($recipe->STYLE->IBU_MAX)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
125 $sql .= "', st_ibu_max='" . floatval($recipe->STYLE->IBU_MAX);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
126 if ($recipe->STYLE->COLOR_MIN) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
127 $srm = floatval($recipe->STYLE->COLOR_MIN);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
128 $sql .= "', st_color_min='" . srm_to_ebc($srm);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
129 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
130 if ($recipe->STYLE->COLOR_MAX) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
131 $srm = floatval($recipe->STYLE->COLOR_MAX);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
132 $sql .= "', st_color_max='" . srm_to_ebc($srm);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
133 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
134 if ($recipe->STYLE->CARB_MIN)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
135 $sql .= "', st_carb_min='" . floatval($recipe->STYLE->CARB_MIN);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
136 if ($recipe->STYLE->CARB_MAX)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
137 $sql .= "', st_carb_max='" . floatval($recipe->STYLE->CARB_MAX);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
138 if ($recipe->STYLE->ABV_MIN)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
139 $sql .= "', st_abv_min='" . floatval($recipe->STYLE->ABV_MIN);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
140 if ($recipe->STYLE->ABV_MAX)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
141 $sql .= "', st_abv_max='" . floatval($recipe->STYLE->ABV_MAX);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
142 return $sql;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
143 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
144
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
145
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
146
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
147 function recipe_fermentables($recipe)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
148 {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
149 global $db;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
150 global $pCara;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
151 global $pSugar;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
152 global $batch_size;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
153 global $efficiency;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
154 global $colorw;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
155 global $f_sugars;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
156
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
157 $fermentables = "[";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
158 $comma = FALSE;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
159 foreach ($recipe->FERMENTABLES->FERMENTABLE as $fermentable) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
160 if ($comma)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
161 $fermentables .= ',';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
162 $comma = TRUE;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
163 $fermentables .= '{"f_name":"' . mysqli_real_escape_string($db, $fermentable->NAME) . '"';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
164 $fermentables .= ',"f_origin":"' . mysqli_real_escape_string($db, $fermentable->ORIGIN) . '"';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
165 $fermentables .= ',"f_supplier":"' . mysqli_real_escape_string($db, $fermentable->SUPPLIER) . '"';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
166 $famount = floatval($fermentable->AMOUNT);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
167 $fermentables .= ',"f_amount":' . $famount;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
168 $fermentables .= ',"f_cost":' . floatval($fermentable->COST);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
169
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
170 if ($fermentable->TYPE == 'Grain')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
171 $fermentables .= ',"f_type":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
172 else if ($fermentable->TYPE == 'Sugar')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
173 $fermentables .= ',"f_type":1';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
174 else if ($fermentable->TYPE == 'Extract')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
175 $fermentables .= ',"f_type":2';
308
a59413ba4057 Some extra firstcap keywords
Michiel Broek <mbroek@mbse.eu>
parents: 307
diff changeset
176 else if (($fermentable->TYPE == 'Dry extract') || ($fermentable->TYPE == 'Dry Extract'))
307
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
177 $fermentables .= ',"f_type":3';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
178 else if ($fermentable->TYPE == 'Adjunct')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
179 $fermentables .= ',"f_type":4';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
180 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
181 echo "Unknown TYPE " . $fermentable->TYPE . "<br / >";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
182
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
183 $fyield = floatval($fermentable->YIELD);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
184 $fermentables .= ',"f_yield":' . $fyield;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
185 if ($fermentable->COLOR) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
186 $srm = floatval($fermentable->COLOR);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
187 $ebc = srm_to_ebc($srm);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
188 } else {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
189 $srm = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
190 $ebc = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
191 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
192 $colorw += ($famount * $srm / $batch_size) * 8.34436; /* Kleurwerking */
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
193 $fermentables .= ',"f_color":' . $ebc;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
194 if ($fermentable->COARSE_FINE_DIFF)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
195 $fermentables .= ',"f_coarse_fine_diff":' . floatval($fermentable->COARSE_FINE_DIFF);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
196 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
197 $fermentables .= ',"f_coarse_fine_diff":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
198 if ($fermentable->MOISTURE)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
199 $fmoisture = floatval($fermentable->MOISTURE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
200 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
201 $fmoisture = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
202 $fermentables .= ',"f_moisture":' . $fmoisture;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
203 if ($fermentable->DIASTATIC_POWER)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
204 $fermentables .= ',"f_diastatic_power":' . floatval($fermentable->DIASTATIC_POWER);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
205 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
206 $fermentables .= ',"f_diastatic_power":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
207 if ($fermentable->PROTEIN)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
208 $fermentables .= ',"f_protein":' . floatval($fermentable->PROTEIN);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
209 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
210 $fermentables .= ',"f_protein":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
211 if ($fermentable->MAX_IN_BATCH)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
212 $fermentables .= ',"f_max_in_batch":' . floatval($fermentable->MAX_IN_BATCH);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
213 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
214 $fermentables .= ',"f_max_in_batch":100.0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
215
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
216 if ($fermentable->GRAINTYPE == 'Roast')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
217 $fermentables .= ',"f_graintype":1';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
218 else if ($fermentable->GRAINTYPE == 'Crystal')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
219 $fermentables .= ',"f_graintype":2';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
220 else if ($fermentable->GRAINTYPE == 'Kilned')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
221 $fermentables .= ',"f_graintype":3';
308
a59413ba4057 Some extra firstcap keywords
Michiel Broek <mbroek@mbse.eu>
parents: 307
diff changeset
222 else if (($fermentable->GRAINTYPE == 'Sour malt') || ($fermentable->GRAINTYPE == 'Sour Malt'))
307
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
223 $fermentables .= ',"f_graintype":4';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
224 else if ($fermentable->GRAINTYPE == 'Special')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
225 $fermentables .= ',"f_graintype":5';
308
a59413ba4057 Some extra firstcap keywords
Michiel Broek <mbroek@mbse.eu>
parents: 307
diff changeset
226 else if (($fermentable->GRAINTYPE == 'No malt') || ($fermentable->GRAINTYPE == 'No Malt'))
307
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
227 $fermentables .= ',"f_graintype":6';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
228 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
229 $fermentables .= ',"f_graintype":0'; // Base, default
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
230
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
231 if ($fermentable->ADDED == 'Boil')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
232 $fermentables .= ',"f_added":1';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
233 else if ($fermentable->ADDED == 'Fermentation')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
234 $fermentables .= ',"f_added":2';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
235 else if ($fermentable->ADDED == 'Lagering')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
236 $fermentables .= ',"f_added":3';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
237 else if ($fermentable->ADDED == 'Bottle')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
238 $fermentables .= ',"f_added":4';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
239 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
240 $fermentables .= ',"f_added":0'; // Mash, default.
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
241
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
242 ($fermentable->ADD_AFTER_BOIL== "TRUE") ? $fermentables .= ',"f_add_after_boil":1' : $fermentables .= ',"f_add_after_boil":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
243 ($fermentable->RECOMMEND_MASH== "TRUE") ? $fermentables .= ',"f_recommend_mash":1' : $fermentables .= ',"f_recommend_mash":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
244 if ($fermentable->DISSOLVED_PROTEIN)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
245 $fermentables .= ',"f_dissolved_protein":' . floatval($fermentable->DISSOLVED_PROTEIN);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
246 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
247 $fermentables .= ',"f_dissolved_protein":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
248 ($fermentable->ADJUST_TO_TOTAL_100 == "TRUE") ? $fermentables .= ',"f_adjust_to_total_100":1' : $fermentables .= ',"f_adjust_to_total_100":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
249 $percent = floatval($fermentable->PERCENTAGE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
250 $fermentables .= ',"f_percentage":' . round($percent * 10) / 10.0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
251 if ($fermentable->DI_pH)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
252 $fermentables .= ',"f_di_ph":' . floatval($fermentable->DI_pH);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
253 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
254 $fermentables .= ',"f_di_ph":0.0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
255 if ($fermentable->{'ACID_TO_pH_5.7'})
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
256 $fermentables .= ',"f_acid_to_ph_57":' . floatval($fermentable->{'ACID_TO_pH_5.7'});
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
257 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
258 $fermentables .= ',"f_acid_to_ph_57":0.0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
259 $fermentables .= "}";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
260
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
261 /* Sugars */
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
262 $d = $famount * ($fyield / 100) * (1 - $fmoisture / 100);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
263 if ($fermentable->ADDED == 'Mash')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
264 $d = floatval($efficiency) / 100 * $d;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
265 $f_sugars += $d;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
266 if ($fermentable->GRAINTYPE == 'Crystal')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
267 $pCara += $percent;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
268 if ($fermentable->TYPE == 'Sugar')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
269 $pSugar += $percent;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
270 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
271 $fermentables .= ']';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
272 return $fermentables;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
273 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
274
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
275
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
276
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
277 function recipe_hops($recipe)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
278 {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
279 global $db;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
280
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
281 $hops = "[";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
282 $comma = FALSE;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
283 foreach ($recipe->HOPS->HOP as $hop) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
284 if ($comma)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
285 $hops .= ',';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
286 $comma = TRUE;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
287 $hops .= '{"h_name":"' . mysqli_real_escape_string($db, $hop->NAME) . '"';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
288 $hops .= ',"h_amount":' . floatval($hop->AMOUNT);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
289 $hops .= ',"h_cost":' . floatval($hop->COST);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
290
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
291 if ($hop->TYPE == 'Aroma')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
292 $hops .= ',"h_type":1';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
293 else if ($hop->TYPE == 'Both')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
294 $hops .= ',"h_type":2';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
295 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
296 $hops .= ',"h_type":0'; // Default bittering
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
297
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
298 if ($hop->FORM == 'Pellet')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
299 $hops .= ',"h_form":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
300 else if ($hop->FORM == 'Plug')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
301 $hops .= ',"h_form":1';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
302 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
303 $hops .= ',"h_form":2'; // Default.
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
304
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
305 if ($hop->USE == 'Mash')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
306 $hops .= ',"h_useat":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
307 else if (($hop->USE == 'First wort') || ($hop->USE == 'First Wort'))
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
308 $hops .= ',"h_useat":1';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
309 else if ($hop->USE == 'Aroma')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
310 $hops .= ',"h_useat":3';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
311 else if ($hop->USE == 'Whirlpool')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
312 $hops .= ',"h_useat":4';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
313 else if (($hop->USE == 'Dry hop') || ($hop->USE == 'Dry Hop'))
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
314 $hops .= ',"h_useat":5';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
315 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
316 $hops .= ',"h_useat":2'; // Default boil.
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
317
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
318 if ($hop->TIME)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
319 $hops .= ',"h_time":' . floatval($hop->TIME);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
320 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
321 $hops .= ',"h_time":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
322 $hops .= ',"h_alpha":' . floatval($hop->ALPHA);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
323 $hops .= ',"h_beta":' . floatval($hop->BETA);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
324 $hops .= ',"h_hsi":' . floatval($hop->HSI);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
325 $hops .= ',"h_humulene":' . floatval($hop->HUMULENE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
326 $hops .= ',"h_caryophyllene":' . floatval($hop->CAROPHYLLENE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
327 $hops .= ',"h_cohumulone":' . floatval($hop->COHUMULONE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
328 $hops .= ',"h_myrcene":' . floatval($hop->MYRCENE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
329 if ($hop->TOTAL_OIL)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
330 $hops .= ',"h_total_oil":' . floatval($hop->TOTAL_OIL);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
331 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
332 $hops .= ',"h_total_oil":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
333 if ($hop->ORIGIN)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
334 $hops .= ',"h_origin":"' . mysqli_real_escape_string($db, $hop->ORIGIN) . '"';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
335 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
336 $hops .= ',"h_origin":""';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
337 $hops .= "}";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
338 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
339 $hops .= ']';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
340 return $hops;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
341 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
342
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
343
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
344
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
345 function recipe_miscs($recipe)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
346 {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
347 global $db;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
348
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
349 $miscs = "[";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
350 $comma = FALSE;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
351 foreach ($recipe->MISCS->MISC as $misc) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
352 if ($comma)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
353 $miscs .= ',';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
354 $comma = TRUE;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
355 $mname = mysqli_real_escape_string($db, $misc->NAME);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
356 $miscs .= '{"m_name":"' . $mname . '"';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
357 $miscs .= ',"m_amount":' . floatval($misc->AMOUNT);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
358 if ($misc->COST) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
359 $miscs .= ',"m_cost":' . floatval($misc->COST);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
360 } else {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
361 /* Brouwhulp bug, added water agents have no cost field. */
308
a59413ba4057 Some extra firstcap keywords
Michiel Broek <mbroek@mbse.eu>
parents: 307
diff changeset
362 if (($misc->TYPE == "Water agent") || ($misc->TYPE == "Water Agent")) {
307
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
363 $miscs .= ',"m_cost":'. get_miscs_cost($mname);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
364 } else {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
365 $miscs .= ',"m_cost":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
366 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
367 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
368
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
369 if ($misc->TYPE == 'Spice')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
370 $miscs .= ',"m_type":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
371 else if ($misc->TYPE == 'Herb')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
372 $miscs .= ',"m_type":1';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
373 else if ($misc->TYPE == 'Flavor')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
374 $miscs .= ',"m_type":2';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
375 else if ($misc->TYPE == 'Fining')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
376 $miscs .= ',"m_type":3';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
377 else if (($misc->TYPE == 'Water agent') || ($misc->TYPE == 'Water Agent'))
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
378 $miscs .= ',"m_type":4';
308
a59413ba4057 Some extra firstcap keywords
Michiel Broek <mbroek@mbse.eu>
parents: 307
diff changeset
379 else if (($misc->TYPE == 'Yeast nutrient') || ($misc->TYPE == 'Yeast Nutrient'))
307
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
380 $miscs .= ',"m_type":5';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
381 else if ($misc->TYPE == 'Other')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
382 $miscs .= ',"m_type":6';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
383 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
384 echo "Unknown TYPE " . $misc->TYPE . "<br />";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
385
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
386 if ($misc->USE == 'Starter')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
387 $miscs .= ',"m_use_use":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
388 else if ($misc->USE == 'Mash')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
389 $miscs .= ',"m_use_use":1';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
390 else if ($misc->USE == 'Primary')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
391 $miscs .= ',"m_use_use":3';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
392 else if ($misc->USE == 'Secondary')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
393 $miscs .= ',"m_use_use":4';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
394 else if ($misc->USE == 'Bottling')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
395 $miscs .= ',"m_use_use":5';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
396 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
397 $miscs .= ',"m_use_use":2'; // Default boil. BrewFather defines 'Sparge', we don't support this even if it's a nice idea.
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
398
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
399 ($misc->AMOUNT_IS_WEIGHT== "TRUE") ? $miscs .= ',"m_amount_is_weight":1' : $miscs.= ',"m_amount_is_weight":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
400 if ($misc->TIME) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
401 $miscs .= ',"m_time":' . floatval($misc->TIME);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
402 } else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
403 $miscs .= ',"m_time":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
404 $miscs .= "}";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
405 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
406 $miscs .= ']';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
407 return $miscs;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
408 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
409
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
410
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
411
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
412 function recipe_yeasts($recipe)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
413 {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
414 global $db;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
415 global $svg;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
416
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
417 $yeasts = "[";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
418 $comma = FALSE;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
419 foreach ($recipe->YEASTS->YEAST as $yeast) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
420 if ($comma)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
421 $yeasts .= ',';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
422 $comma = TRUE;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
423 $yeasts .= '{"y_name":"' . mysqli_real_escape_string($db, $yeast->NAME) . '"';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
424 if ($yeast->FORM == "Liquid") {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
425 $paks = floatval($yeast->AMOUNT) / 0.0588;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
426 $yeasts .= ',"y_amount":' . $paks;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
427 $yeasts .= ',"y_cost":' . floatval($yeast->COST);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
428 } else {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
429 $yeasts .= ',"y_amount":' . floatval($yeast->AMOUNT);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
430 $yeasts .= ',"y_cost":' . floatval($yeast->COST) * 1000;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
431 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
432
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
433 $yeasts .= ',"y_laboratory":"' . mysqli_real_escape_string($db, $yeast->LABORATORY) . '"';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
434 $yeasts .= ',"y_product_id":"' . mysqli_real_escape_string($db, $yeast->PRODUCT_ID) . '"';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
435
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
436 if ($yeast->TYPE == 'Lager')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
437 $yeasts .= ',"y_type":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
438 else if ($yeast->TYPE == 'Ale')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
439 $yeasts .= ',"y_type":1';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
440 else if ($yeast->TYPE == 'Wheat')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
441 $yeasts .= ',"y_type":2';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
442 else if ($yeast->TYPE == 'Wine')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
443 $yeasts .= ',"y_type":3';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
444 else if ($yeast->TYPE == 'Champagne')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
445 $yeasts .= ',"y_type":4';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
446 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
447 echo "Unknown TYPE " . $yeast->TYPE . "<br />";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
448
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
449 if ($yeast->FORM == 'Liquid') {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
450 if ($yeast->LABORATORY == 'Imperial Yeast')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
451 $yeasts .= ',"y_form":0,"y_cells":200000000000';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
452 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
453 $yeasts .= ',"y_form":0,"y_cells":100000000000';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
454 } else if ($yeast->FORM == 'Dry')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
455 $yeasts .= ',"y_form":1,"y_cells":15000000000';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
456 else if ($yeast->FORM == 'Slant')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
457 $yeasts .= ',"y_form":2,"y_cells":1700000000';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
458 else if ($yeast->FORM == 'Culture')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
459 $yeasts .= ',"y_form":3,"y_cells":1700000000';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
460 else if ($yeast->FORM == 'Frozen')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
461 $yeasts .= ',"y_form":4,"y_cells":1700000000';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
462 else if ($yeast->FORM == 'Bottle')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
463 $yeasts .= ',"y_form":5,"y_cells":1700000000';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
464 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
465 echo "Unknown FORM " . $yeast->FORM . "<br />";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
466
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
467 if ($yeast->FLOCCULATION == 'Medium')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
468 $yeasts .= ',"y_flocculation":1';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
469 else if ($yeast->FLOCCULATION == 'High')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
470 $yeasts .= ',"y_flocculation":2';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
471 else if ($yeast->FLOCCULATION == 'Very high')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
472 $yeasts .= ',"y_flocculation":3';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
473 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
474 $yeasts .= ',"y_flocculation":0'; // Low, default.
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
475
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
476 if ($yeast->PRODUCT_ID=="F2" || $yeast->PRODUCT_ID=="CBC-1") {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
477 $yeasts .= ',"y_use":3'; // Bottle
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
478 } else if ($yeast->ADD_TO_SECONDARY=="TRUE") {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
479 $yeasts .= ',"y_use":1'; // Secondary
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
480 } else {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
481 $yeasts .= ',"y_use":0'; // Primary
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
482 $svg = floatval($yeast->ATTENUATION);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
483 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
484 $yeasts .= ',"y_min_temperature":' . floatval($yeast->MIN_TEMPERATURE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
485 $yeasts .= ',"y_max_temperature":' . floatval($yeast->MAX_TEMPERATURE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
486 $yeasts .= ',"y_attenuation":' . floatval($yeast->ATTENUATION);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
487 $yeasts .= "}";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
488 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
489 $yeasts .= ']';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
490 return $yeasts;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
491 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
492
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
493
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
494
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
495 function recipe_waters($recipe, $db)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
496 {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
497 $waters = "";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
498 $index = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
499 foreach ($recipe->WATERS->WATER as $water) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
500 $index++;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
501 $waters .= "', w" . $index . "_name='" . mysqli_real_escape_string($db, $water->NAME);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
502 $waters .= "', w" . $index . "_amount='" . floatval($water->AMOUNT);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
503 if ($water->CALCIUM)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
504 $waters .= "', w" . $index . "_calcium='" . floatval($water->CALCIUM);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
505 if ($water->SULFATE)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
506 $waters .= "', w" . $index . "_sulfate='" . floatval($water->SULFATE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
507 if ($water->CHLORIDE)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
508 $waters .= "', w" . $index . "_chloride='" . floatval($water->CHLORIDE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
509 if ($water->SODIUM)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
510 $waters .= "', w" . $index . "_sodium='" . floatval($water->SODIUM);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
511 if ($water->MAGNESIUM)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
512 $waters .= "', w" . $index . "_magnesium='" . floatval($water->MAGNESIUM);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
513 if ($water->PH)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
514 $waters .= "', w" . $index . "_ph='" . floatval($water->PH);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
515 if ($water->TOTAL_ALKALINITY)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
516 $waters .= "', w" . $index . "_total_alkalinity='" . floatval($water->TOTAL_ALKALINITY);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
517 if ($water->COST)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
518 $waters .= "', w" . $index . "_cost='" . floatval($water->COST);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
519 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
520 $waters .= "', w" . $index . "_cost='0";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
521 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
522 return $waters;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
523 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
524
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
525
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
526
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
527 function recipe_mash_steps($recipe)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
528 {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
529 global $db;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
530
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
531 $steps = '[';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
532 $comma = FALSE;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
533 foreach ($recipe->MASH->MASH_STEPS->MASH_STEP as $step) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
534 if ($comma)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
535 $steps .= ',';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
536 $comma = TRUE;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
537 $steps .= '{"step_name":"' . mysqli_real_escape_string($db, $step->NAME) . '"';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
538
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
539 if ($step->TYPE == 'Infusion')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
540 $steps .= ',"step_type":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
541 else if ($step->TYPE == 'Temperature')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
542 $steps .= ',"step_type":1';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
543 else if ($step->TYPE == 'Decoction')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
544 $steps .= ',"step_type":2';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
545 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
546 echo "Unknown step TYPE " . $step->TYPE . "<br />";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
547
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
548 if ($step->INFUSE_AMOUNT)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
549 $steps .= ',"step_infuse_amount":' . floatval($step->INFUSE_AMOUNT);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
550 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
551 $steps .= ',"step_infuse_amount":0';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
552 if ($step->STEP_TEMP)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
553 $steps .= ',"step_temp":' . floatval($step->STEP_TEMP);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
554 if ($step->STEP_TIME)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
555 $steps .= ',"step_time":' . floatval($step->STEP_TIME);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
556 if ($step->RAMP_TIME)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
557 $steps .= ',"ramp_time":' . floatval($step->RAMP_TIME);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
558 if ($step->END_TEMP)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
559 $steps .= ',"end_temp":' . floatval($step->END_TEMP);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
560 $steps .= "}";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
561 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
562 $steps .= ']';
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
563 return $steps;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
564 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
565
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
566
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
567 $imported = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
568 $recipes = simplexml_load_file($target_file);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
569 foreach ($recipes->RECIPE as $recipe) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
570 $f_sugars = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
571 $efficiency = 75;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
572 $batch_size = 20;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
573 $boil_size = 22;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
574 $pCara = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
575 $pSugar = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
576 $svg = 77;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
577 $colorw = 0;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
578 $uuid = str_replace("\n", "", file_get_contents('/proc/sys/kernel/random/uuid'));
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
579
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
580 $sql = "INSERT INTO recipes SET uuid='" . $uuid;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
581 $sql .= "', name='" . mysqli_real_escape_string($db, $recipe->NAME);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
582 $sql .= "', locked='0";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
583 if ($recipe->NOTES)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
584 $sql .= "', notes='" . mysqli_real_escape_string($db, $recipe->NOTES);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
585 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
586 $sql .= "', notes='";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
587
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
588 if ($recipe->TYPE == 'Extract')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
589 $sql .= "', type='0";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
590 else if ($recipe->TYPE == 'Partial Mash')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
591 $sql .= "', type='1";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
592 else if ($recipe->TYPE == 'All Grain')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
593 $sql .= "', type='2";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
594 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
595 echo "Unknown TYPE " . $recipe->TYPE . "<br />";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
596
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
597 if ($recipe->BATCH_SIZE)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
598 $batch_size = floatval($recipe->BATCH_SIZE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
599 $sql .= "', batch_size='" . $batch_size;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
600 if ($recipe->BOIL_SIZE)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
601 $boil_size = floatval($recipe->BOIL_SIZE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
602 $sql .= "', boil_size='" . $boil_size;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
603 if ($recipe->BOIL_TIME)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
604 $sql .= "', boil_time='" . floatval($recipe->BOIL_TIME);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
605 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
606 $sql .= "', boil_time='90";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
607 if ($recipe->EFFICIENCY)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
608 $efficiency = floatval($recipe->EFFICIENCY);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
609 $sql .= "', efficiency='" . $efficiency;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
610
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
611 $color_method = 0; // Morey
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
612 if ($recipe->COLOR_METHOD == 'Mosher') {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
613 $color_method = 1;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
614 } else if ($recipe->COLOR_METHOD == 'Daniels') {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
615 $color_method = 2;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
616 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
617 $sql .= "', color_method='" . $color_method;;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
618
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
619
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
620 if ($recipe->IBU)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
621 $sql .= "', est_ibu='" . floatval($recipe->IBU);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
622 if ($recipe->IBU_METHOD == 'Rager')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
623 $sql .= "', ibu_method='1";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
624 else if ($recipe->IBU_METHOD == 'Daniels')
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
625 $sql .= "', ibu_method='2";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
626 else
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
627 $sql .= "', ibu_method='0"; // Tinseth, default
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
628
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
629 if ($recipe->CARBONATION)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
630 $sql .= "', est_carb='" . floatval($recipe->CARBONATION);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
631
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
632 if ($recipe->STYLE) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
633 $sql .= recipe_style($recipe);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
634 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
635 if ($recipe->CALC_ACID) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
636 ($recipe->CALC_ACID == "TRUE") ? $sql .= "', calc_acid='1" : $sql .= "', calc_acid='0";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
637 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
638 if ($recipe->TARGET_PH) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
639 $sql .= "', mash_ph='" . floatval($recipe->TARGET_PH);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
640 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
641 if ($recipe->SPARGE_ACID_TYPE && ($recipe->SPARGE_ACID_TYPE == "Lactic")) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
642 $sql .= "', sparge_acid_type='0";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
643 } else if ($recipe->SPARGE_ACID_TYPE && ($recipe->SPARGE_ACID_TYPE == "Hydrochloric")) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
644 $sql .= "', sparge_acid_type='1";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
645 } else if ($recipe->SPARGE_ACID_TYPE && ($recipe->SPARGE_ACID_TYPE == "Phosphoric")) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
646 $sql .= "', sparge_acid_type='2";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
647 } else if ($recipe->SPARGE_ACID_TYPE && ($recipe->SPARGE_ACID_TYPE == "Sulfuric")) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
648 $sql .= "', sparge_acid_type='3";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
649 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
650 if ($recipe->ACID_SPARGE_PERC) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
651 $sql .= "', sparge_acid_perc='" . floatval($recipe->ACID_SPARGE_PERC);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
652 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
653 if ($recipe->LACTIC_SPARGE) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
654 $sql .= "', sparge_acid_amount='" . floatval($recipe->LACTIC_SPARGE);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
655 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
656 if ($recipe->VOLUME_HLT) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
657 $sql .= "', sparge_volume='" . floatval($recipe->VOLUME_HLT);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
658 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
659 $sql .= "', sparge_source='0";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
660
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
661 /*
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
662 * Put all ingredients in json arrays
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
663 */
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
664 if ($recipe->FERMENTABLES)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
665 $sql .= "', json_fermentables='" . recipe_fermentables($recipe);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
666 if ($recipe->HOPS)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
667 $sql .= "', json_hops='" . recipe_hops($recipe);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
668 if ($recipe->MISCS)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
669 $sql .= "', json_miscs='" . recipe_miscs($recipe);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
670 if ($recipe->YEASTS)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
671 $sql .= "', json_yeasts='" . recipe_yeasts($recipe);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
672 if ($recipe->WATERS)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
673 $sql .= recipe_waters($recipe, $db);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
674 if ($recipe->MASH) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
675 $sql .= "',sparge_temp='" . floatval($recipe->MASH->SPARGE_TEMP);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
676 $sql .= "',sparge_ph='" . floatval($recipe->MASH->PH);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
677 if ($recipe->MASH->NAME)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
678 $sql .= "',mash_name='" . mysqli_real_escape_string($db, $recipe->MASH->NAME);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
679 if ($recipe->MASH->MASH_STEPS)
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
680 $sql .= "', json_mashs='" . recipe_mash_steps($recipe);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
681 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
682
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
683 /*
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
684 * Added the calculated values
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
685 * OG, FG, color, IBU
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
686 */
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
687 $og = estimate_sg($f_sugars, $batch_size);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
688 $sql .= "', est_og='" . floatval($og);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
689 $fg = estimate_fg($pSugar, $pCara, 0, 0, 0, $svg, $og);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
690 $sql .= "', est_fg='" . floatval($fg);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
691 $abv = abvol($og, $fg);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
692 $sql .= "', est_abv='" . floatval($abv);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
693 $color = kw_to_ebc($color_method, $colorw);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
694 $sql .= "', est_color='" . floatval($color);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
695 $sql .= "';";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
696 if (! $result = mysqli_query($db, $sql)) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
697 echo "Fout 6: " . mysqli_error($db) . "<br />";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
698 syslog(LOG_NOTICE, "upl_recipe: result: ".mysqli_error($db));
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
699 } else {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
700 echo "Recept `" . $recipe->NAME . "' toegevoegd<br />";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
701 $lastid = mysqli_insert_id($db);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
702 syslog(LOG_NOTICE, "upl_recipe: inserted record ".$lastid);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
703 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
704 $imported++;
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
705 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
706 if ($imported == 0) {
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
707 echo "Fout 7: geen recepten in dit bestand.<br />";
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
708 }
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
709
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
710
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
711 // Don't clutter the upload directory.
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
712 unlink($target_file);
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
713
75f8b569043c Added beerxml recipe import.
Michiel Broek <mbroek@mbse.eu>
parents:
diff changeset
714 ?>

mercurial