/braldahim/library/Bral/Batchs/CreationMinerais.php

https://github.com/Samsuffi/braldahim · PHP · 340 lines · 268 code · 62 blank · 10 comment · 54 complexity · e2fcea2d234de2463b3ac089c603b868 MD5 · raw file 

    

  1. <?php
    2. 

  2. 

  3. /**
    4. 

  4.  * This file is part of Braldahim, under Gnu Public Licence v3.
    5. 

  5.  * See licence.txt or http://www.gnu.org/licenses/gpl-3.0.html
    6. 

  6.  * Copyright: see http://www.braldahim.com/sources
    7. 

  7.  */
    8. 

  8. class Bral_Batchs_CreationMinerais extends Bral_Batchs_Batch {
    9. 

  9. 

  10. 	const MIN_SOL = 10;
    11. 

  11. 	const MAX_SOL = 20;
    12. 

  12. 

  13. 	const MIN_SOUS_SOL = 40;
    14. 

  14. 	const MAX_SOUS_SOL = 160;
    15. 

  15. 

  16. 	const COEF_QUANTITE_SOUS_SOL = 1;
    17. 

  17. 

  18. 	public function calculBatchImpl() {
    19. 

  19. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - calculBatchImpl - enter -");
    20. 

  20. 

  21. 		Zend_Loader::loadClass('CreationMinerais');
    22. 

  22. 		Zend_Loader::loadClass('Filon');
    23. 

  23. 		Zend_Loader::loadClass('TypeMinerai');
    24. 

  24. 		Zend_Loader::loadClass('Zone');
    25. 

  25. 

  26. 		$retour = null;
    27. 

  27. 

  28. 		$retour .= $this->calculCreation(0);
    29. 

  29. 		$retour .= $this->calculCreation(-10);
    30. 

  30. 		$retour .= $this->calculCreation(-11);
    31. 

  31. 		$retour .= $this->calculCreation(-12);
    32. 

  32. 		$retour .= $this->calculCreation(-13);
    33. 

  33. 		$retour .= $this->suppressionSurEau();
    34. 

  34. 		$retour .= $this->suppressionSurLieux();
    35. 

  35. 		$retour .= $this->suppressionSurPalissades();
    36. 

  36. 

  37. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - calculBatchImpl - exit -");
    38. 

  38. 		return $retour;
    39. 

  39. 	}
    40. 

  40. 

  41. 	private function suppressionSurEau() {
    42. 

  42. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - suppressionSurEau - enter -");
    43. 

  43. 		$retour = "";
    44. 

  44. 

  45. 		// Suppression des filons partout où il y a une eau
    46. 

  46. 		Zend_Loader::loadClass("Eau");
    47. 

  47. 		$eauTable = new Eau();
    48. 

  48. 		$filonTable = new Filon();
    49. 

  49. 

  50. 		$nbEaux = $eauTable->countAll();
    51. 

  51. 		$limit = 1000;
    52. 

  52. 

  53. 		$where = "";
    54. 

  54. 

  55. 		for ($offset = 0; $offset <= $nbEaux + $limit; $offset =  $offset + $limit) {
    56. 

  56. 			$eaux = $eauTable->fetchall(null, null, $limit, $offset);
    57. 

  57. 			$nb = 0;
    58. 

  58. 			$where = "";
    59. 

  59. 			foreach($eaux as $r) {
    60. 

  60. 				$or = "";
    61. 

  61. 				if ($where != "") {
    62. 

  62. 					$or = " OR ";
    63. 

  63. 				}
    64. 

  64. 

  65. 				$where .= $or." (x_filon = ".$r["x_eau"]. " AND y_filon = ".$r["y_eau"]." AND z_filon = ".$r["z_eau"].") ";
    66. 

  66. 				$nb++;
    67. 

  67. 				if ($nb == $limit) {
    68. 

  68. 					$filonTable->delete($where);
    69. 

  69. 					$nb = 0;
    70. 

  70. 					$where = "";
    71. 

  71. 				}
    72. 

  72. 			}
    73. 

  73. 

  74. 			if ($where != "") {
    75. 

  75. 				$filonTable->delete($where);
    76. 

  76. 			}
    77. 

  77. 		}
    78. 

  78. 

  79. 		if ($where != "") {
    80. 

  80. 			$filonTable->delete($where);
    81. 

  81. 		}
    82. 

  82. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - suppressionSurEau - exit -");
    83. 

  83. 		return $retour;
    84. 

  84. 	}
    85. 

  85. 

  86. 	private function suppressionSurLieux() {
    87. 

  87. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - suppressionSurLieux - enter -");
    88. 

  88. 		$retour = "";
    89. 

  89. 

  90. 		// Suppression des filons partout où il y a une eau
    91. 

  91. 		Zend_Loader::loadClass("Lieu");
    92. 

  92. 		$lieuTable = new Lieu();
    93. 

  93. 		$filonTable = new Filon();
    94. 

  94. 

  95. 		$nblieux = $lieuTable->countAll();
    96. 

  96. 		$limit = 1000;
    97. 

  97. 

  98. 		$where = "";
    99. 

  99. 

  100. 		for ($offset = 0; $offset <= $nblieux + $limit; $offset =  $offset + $limit) {
    101. 

  101. 			$lieux = $lieuTable->fetchall(null, null, $limit, $offset);
    102. 

  102. 			$nb = 0;
    103. 

  103. 			$where = "";
    104. 

  104. 			foreach($lieux as $r) {
    105. 

  105. 				$or = "";
    106. 

  106. 				if ($where != "") {
    107. 

  107. 					$or = " OR ";
    108. 

  108. 				}
    109. 

  109. 

  110. 				$where .= $or." (x_filon = ".$r["x_lieu"]. " AND y_filon = ".$r["y_lieu"]." AND z_filon = ".$r["z_lieu"].") ";
    111. 

  111. 				$nb++;
    112. 

  112. 				if ($nb == $limit) {
    113. 

  113. 					$filonTable->delete($where);
    114. 

  114. 					$nb = 0;
    115. 

  115. 					$where = "";
    116. 

  116. 				}
    117. 

  117. 			}
    118. 

  118. 

  119. 			if ($where != "") {
    120. 

  120. 				$filonTable->delete($where);
    121. 

  121. 			}
    122. 

  122. 		}
    123. 

  123. 

  124. 		if ($where != "") {
    125. 

  125. 			$filonTable->delete($where);
    126. 

  126. 		}
    127. 

  127. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - suppressionSurLieux - exit -");
    128. 

  128. 		return $retour;
    129. 

  129. 	}
    130. 

  130. 

  131. 	private function suppressionSurPalissades() {
    132. 

  132. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - suppressionSurPalissades - enter -");
    133. 

  133. 		$retour = "";
    134. 

  134. 

  135. 		// Suppression des filons partout où il y a une eau
    136. 

  136. 		Zend_Loader::loadClass("Palissade");
    137. 

  137. 		$palissadeTable = new Palissade();
    138. 

  138. 		$filonTable = new Filon();
    139. 

  139. 

  140. 		$nbPalissades = $palissadeTable->countAll();
    141. 

  141. 		$limit = 1000;
    142. 

  142. 

  143. 		$where = "";
    144. 

  144. 

  145. 		for ($offset = 0; $offset <= $nbPalissades + $limit; $offset =  $offset + $limit) {
    146. 

  146. 			$palissades = $palissadeTable->fetchall(null, null, $limit, $offset);
    147. 

  147. 			$nb = 0;
    148. 

  148. 			$where = "";
    149. 

  149. 			foreach($palissades as $r) {
    150. 

  150. 				$or = "";
    151. 

  151. 				if ($where != "") {
    152. 

  152. 					$or = " OR ";
    153. 

  153. 				}
    154. 

  154. 

  155. 				$where .= $or." (x_filon = ".$r["x_palissade"]. " AND y_filon = ".$r["y_palissade"]." AND z_filon = ".$r["z_palissade"].") ";
    156. 

  156. 				$nb++;
    157. 

  157. 				if ($nb == $limit) {
    158. 

  158. 					$filonTable->delete($where);
    159. 

  159. 					$nb = 0;
    160. 

  160. 					$where = "";
    161. 

  161. 				}
    162. 

  162. 			}
    163. 

  163. 

  164. 			if ($where != "") {
    165. 

  165. 				$filonTable->delete($where);
    166. 

  166. 			}
    167. 

  167. 		}
    168. 

  168. 

  169. 		if ($where != "") {
    170. 

  170. 			$filonTable->delete($where);
    171. 

  171. 		}
    172. 

  172. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - suppressionSurPalissades - exit -");
    173. 

  173. 		return $retour;
    174. 

  174. 	}
    175. 

  175. 

  176. 	private function calculCreation($zposition) {
    177. 

  177. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - calculCreation - enter -");
    178. 

  178. 		$retour = "";
    179. 

  179. 

  180. 		$zoneTable = new Zone();
    181. 

  181. 

  182. 		$creationMineraisTable = new CreationMinerais();
    183. 

  183. 		$creationMinerais = $creationMineraisTable->fetchAll(null, "id_fk_type_minerai_creation_minerais");
    184. 

  184. 		$nbCreationMinerais = count($creationMinerais);
    185. 

  185. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - nbCreationMinerais=" .$nbCreationMinerais);
    186. 

  186. 

  187. 		$typeMineraiTable = new TypeMinerai();
    188. 

  188. 		$typeMinerais = $typeMineraiTable->fetchAll();
    189. 

  189. 		$nbTypeMinerais = count($typeMinerais);
    190. 

  190. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - nbTypeMinerais=" .$nbTypeMinerais);
    191. 

  191. 

  192. 		// selection des environnements / zones concernes
    193. 

  193. 		$environnementIds = $this->getEnvironnementsConcernes($creationMinerais);
    194. 

  194. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - nb environnement concernes=" .count($environnementIds));
    195. 

  195. 		$zones = $zoneTable->findByIdEnvironnementList($environnementIds, false);
    196. 

  196. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - nb zones concernees=" .count($zones));
    197. 

  197. 

  198. 		$filonTable = new Filon();
    199. 

  199. 		$tmp = "";
    200. 

  200. 

  201. 		$superficieZones = array();
    202. 

  202. 		$superficieTotale = array();
    203. 

  203. 

  204. 		foreach($creationMinerais as $c) {
    205. 

  205. 			// on recupere la supercifie totale de toutes les zones concernees par ce type
    206. 

  206. 			foreach($zones as $z) {
    207. 

  207. 				if ($z["id_fk_environnement_zone"] == $c["id_fk_environnement_creation_minerais"]) {
    208. 

  208. 					$superficieZones[$z["id_zone"]] = ($z["x_max_zone"] - $z["x_min_zone"]) * ($z["y_max_zone"] - $z["y_min_zone"]);
    209. 

  209. 					if (array_key_exists($c["id_fk_type_minerai_creation_minerais"], $superficieTotale)) {
    210. 

  210. 						$superficieTotale[$c["id_fk_type_minerai_creation_minerais"]] = $superficieTotale[$c["id_fk_type_minerai_creation_minerais"]] + ( $superficieZones[$z["id_zone"]] );
    211. 

  211. 					} else {
    212. 

  212. 						$superficieTotale[$c["id_fk_type_minerai_creation_minerais"]] = $superficieZones[$z["id_zone"]];
    213. 

  213. 					}
    214. 

  214. 				}
    215. 

  215. 			}
    216. 

  216. 		}
    217. 

  217. 

  218. 		foreach($creationMinerais as $c) {
    219. 

  219. 			$t = null;
    220. 

  220. 			foreach($typeMinerais as $type) {
    221. 

  221. 				if ($c["id_fk_type_minerai_creation_minerais"] == $type["id_type_minerai"]) {
    222. 

  222. 					$t = $type;
    223. 

  223. 					break;
    224. 

  224. 				}
    225. 

  225. 			}
    226. 

  226. 

  227. 			if ($t != null) {
    228. 

  228. 				Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - traitement du minerai ".$t["id_type_minerai"]. " nbMaxMonde(".$t["nb_creation_type_minerai"].") environnement(".$c["id_fk_environnement_creation_minerais"].") suptotal(". $superficieTotale[$c["id_fk_type_minerai_creation_minerais"]].")");
    229. 

  229. 				foreach($zones as $z) {
    230. 

  230. 

  231. 					if ($z["id_fk_environnement_zone"] == $c["id_fk_environnement_creation_minerais"]) {
    232. 

  232. 						$tmp = "";
    233. 

  233. 						$nbCreation = ceil($t["nb_creation_type_minerai"] * ($superficieZones[$z["id_zone"]] / $superficieTotale[$c["id_fk_type_minerai_creation_minerais"]]));
    234. 

  234. 						$nbActuel = $filonTable->countVue($z["x_min_zone"], $z["y_min_zone"], $z["x_max_zone"], $z["y_max_zone"], $zposition, $t["id_type_minerai"]);
    235. 

  235. 

  236. 						if ($zposition != 0) {
    237. 

  237. 							$nbCreation = intval($nbCreation * self::COEF_QUANTITE_SOUS_SOL);
    238. 

  238. 						}
    239. 

  239. 						$aCreer = $nbCreation - $nbActuel;
    240. 

  240. 						if ($aCreer <= 0) {
    241. 

  241. 							$tmp = " deja pleine";
    242. 

  242. 						}
    243. 

  243. 						Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - zone(".$z["id_zone"].") nbActuel:".$nbActuel. " max:".$nbCreation.$tmp. " supzone(".$superficieZones[$z["id_zone"]].") suptotal(". $superficieTotale[$c["id_fk_type_minerai_creation_minerais"]].")");
    244. 

  244. 						if ($aCreer > 0) {
    245. 

  245. 							$retour .= $this->insert($t["id_type_minerai"], $z, $aCreer, $filonTable, $zposition);
    246. 

  246. 						} else {
    247. 

  247. 							$retour .= "zone(".$z["id_zone"].") pleine de minerai(".$t["id_type_minerai"].") nbActuel(".$nbActuel.") max(".$nbCreation."). ";
    248. 

  248. 							$retour .= $this->supprime($t["id_type_minerai"], $z, $nbActuel, 0 - $aCreer, $filonTable, $zposition);
    249. 

  249. 						}
    250. 

  250. 					}
    251. 

  251. 				}
    252. 

  252. 			}
    253. 

  253. 		}
    254. 

  254. 

  255. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - calculCreation - exit -");
    256. 

  256. 

  257. 		return $retour;
    258. 

  258. 	}
    259. 

  259. 

  260. 	private function getEnvironnementsConcernes($creationMinerais) {
    261. 

  261. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - getEnvironnementsConcernes - enter -");
    262. 

  262. 		$environnementIds = null;
    263. 

  263. 		foreach($creationMinerais as $n) {
    264. 

  264. 			$environnementIds[$n["id_fk_environnement_creation_minerais"]] = $n["id_fk_environnement_creation_minerais"];
    265. 

  265. 		}
    266. 

  266. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - getEnvironnementsConcernes - exit -");
    267. 

  267. 		return $environnementIds;
    268. 

  268. 	}
    269. 

  269. 

  270. 	private function supprime($idTypeMinerai, $zone, $nbActuel, $aSupprimer, $filonTable, $zposition) {
    271. 

  271. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - supprime - enter - idtype(".$idTypeMinerai.") idzone(".$zone['id_zone'].") aSupprimer(".$aSupprimer.")");
    272. 

  272. 		$retour = "minerai(".$idTypeMinerai.") idzone(".$zone['id_zone'].") aSupprimer(".$aSupprimer."). ";
    273. 

  273. 

  274. 		if ($aSupprimer <= 0) {
    275. 

  275. 			return $retour;
    276. 

  276. 		}
    277. 

  277. 

  278. 		$filons = $filonTable->selectVue($zone["x_min_zone"], $zone["y_min_zone"], $zone["x_max_zone"], $zone["y_max_zone"], $zposition, $idTypeMinerai);
    279. 

  279. 

  280. 		shuffle($filons);
    281. 

  281. 

  282. 		$total = count($filons);
    283. 

  283. 		$nb = 0;
    284. 

  284. 		$where = "";
    285. 

  285. 		for($i = 1; $i <= $aSupprimer; $i++) {
    286. 

  286. 

  287. 			$or = "";
    288. 

  288. 			if ($where != "") {
    289. 

  289. 				$or = " OR ";
    290. 

  290. 			}
    291. 

  291. 

  292. 			$filon = array_pop($filons);
    293. 

  293. 

  294. 			$where .= $or."id_filon=".$filon["id_filon"];
    295. 

  295. 			$nb++;
    296. 

  296. 			if ($nb == 1000) {
    297. 

  297. 				$filonTable->delete($where);
    298. 

  298. 				$nb = 0;
    299. 

  299. 				$where = "";
    300. 

  300. 			}
    301. 

  301. 		}
    302. 

  302. 

  303. 		if ($where != "") {
    304. 

  304. 			$filonTable->delete($where);
    305. 

  305. 		}
    306. 

  306. 

  307. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - supprime - exit -");
    308. 

  308. 		return $retour;
    309. 

  309. 	}
    310. 

  310. 

  311. 	private function insert($idTypeMinerai, $zone, $aCreer, $filonTable, $zposition) {
    312. 

  312. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - insert - enter - idtype(".$idTypeMinerai.") idzone(".$zone['id_zone'].") nbACreer(".$aCreer.")");
    313. 

  313. 		$retour = "minerai(".$idTypeMinerai.") idzone(".$zone['id_zone'].") aCreer(".$aCreer."). ";
    314. 

  314. 

  315. 		for($i = 1; $i <= $aCreer; $i++) {
    316. 

  316. 			usleep(Bral_Util_De::get_de_specifique(2000, 700000));
    317. 

  317. 			$x = Bral_Util_De::get_de_specifique($zone["x_min_zone"], $zone["x_max_zone"]);
    318. 

  318. 			usleep(Bral_Util_De::get_de_specifique(5000, 700000));
    319. 

  319. 			$y = Bral_Util_De::get_de_specifique($zone["y_min_zone"], $zone["y_max_zone"]);
    320. 

  320. 

  321. 			if ($zposition == 0) {
    322. 

  322. 				$quantite = Bral_Util_De::get_de_specifique(self::MIN_SOL, self::MAX_SOL);
    323. 

  323. 			} else {
    324. 

  324. 				$quantite = Bral_Util_De::get_de_specifique(self::MIN_SOUS_SOL, self::MAX_SOUS_SOL);
    325. 

  325. 			}
    326. 

  326. 

  327. 			$data = array(
    328. 

  328. 				'id_fk_type_minerai_filon' => $idTypeMinerai, 
    329. 

  329. 				'x_filon' => $x, 
    330. 

  330. 				'y_filon' => $y, 
    331. 

  331. 				'z_filon' => $zposition,
    332. 

  332. 				'quantite_restante_filon' => $quantite, 
    333. 

  333. 				'quantite_max_filon' => $quantite
    334. 

  334. 			);
    335. 

  335. 			$filonTable->insert($data);
    336. 

  336. 		}
    337. 

  337. 		Bral_Util_Log::batchs()->trace("Bral_Batchs_CreationMinerais - insert - exit -");
    338. 

  338. 		return $retour;
    339. 

  339. 	}
    340. 

  340. }
    341.