www/upl_recipe.php

Fri, 14 Aug 2020 11:38:58 +0200

author
Michiel Broek <mbroek@mbse.eu>
date
Fri, 14 Aug 2020 11:38:58 +0200
changeset 709
e251cceec547
parent 308
a59413ba4057
permissions
-rw-r--r--

Fixed recipe upload style category number default. Changed default style guid to BKG 2019.

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

mercurial