corrade-http-templates – Blame information for rev

Subversion Repositories:
Rev:
Rev Author Line No. Line
15 eva 1 <?php
2  
3 ###########################################################################
4 ## Copyright (C) Wizardry and Steamworks 2015 - License: GNU GPLv3 ##
5 ###########################################################################
6 function atomized_put_contents($file, $data) {
7 $fp = fopen($file, "w+");
8 if (flock($fp, LOCK_EX)) {
9 fwrite($fp, $data);
10 fflush($fp);
11 flock($fp, LOCK_UN);
12 }
13 fclose($fp);
14 }
15 ###########################################################################
16 ## Copyright (C) Wizardry and Steamworks 2015 - License: GNU GPLv3 ##
17 ###########################################################################
18 function atomized_get_contents($file) {
19 $fp = fopen($file, "r+");
20 $ct = '';
21 if (flock($fp, LOCK_SH)) {
22 if (filesize($file)) {
23 $ct = fread($fp, filesize($file));
24 }
25 flock($fp, LOCK_UN);
26 }
27 fclose($fp);
28 return $ct;
29 }
30  
31 ###########################################################################
32 ## Copyright (C) Wizardry and Steamworks 2015 - License: GNU GPLv3 ##
33 ###########################################################################
34 function wasKeyValueGet($key, $data) {
35 return array_reduce(
36 explode(
37 "&",
38 $data
39 ),
40 function($o, $p) use($key) {
41 return array_reduce(
42 explode(
43 "=",
44 $p
45 ),
46 function($q, $r) use($key) {
47 if($q === $key) return $r;
48 },
49 $key
50 ). $o;
51 }
52 );
53 }
54  
55 ###########################################################################
56 ## Copyright (C) Wizardry and Steamworks 2015 - License: GNU GPLv3 ##
57 ###########################################################################
58 function wasArrayStride($a, $s) {
59 return array_filter($a,
60 function($e, $i) use($s) {
61 return $i % $s == 0;
62 },
63 ARRAY_FILTER_USE_BOTH
64 );
65 }
66  
67 ###########################################################################
68 ## Copyright (C) Wizardry and Steamworks 2015 - License: GNU GPLv3 ##
69 ###########################################################################
70 function wasArrayToCSV($a) {
71 return implode(
72 ',',
73 array_map(
74 function($o) {
75 $o = str_replace('"', '""', $o);
76 switch(
77 (strpos($o, ' ') !== FALSE) ||
78 (strpos($o, '"') !== FALSE) ||
79 (strpos($o, ',') !== FALSE) ||
80 (strpos($o, '\r') !== FALSE) ||
81 (strpos($o, '\n') !== FALSE)
82 )
83 {
84 case TRUE:
85 return '"' . $o . '"';
86 default:
87 return $o;
88 }
89 },
90 $a
91 )
92 );
93 }
94  
95  
96