www/upl_recipe.php

Thu, 20 Jun 2019 13:55:12 +0200

author
Michiel Broek <mbroek@mbse.eu>
date
Thu, 20 Jun 2019 13:55:12 +0200
changeset 419
99a7f2a6976e
parent 308
a59413ba4057
child 709
e251cceec547
permissions
-rw-r--r--

Added packaging volume and add water or liquer to the beer after fermentation. Auto divide changing volumes between bottles and fusts. Upgrade the database in the crontask. Added these fields to the packaging tab screen.

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

mercurial