]> git.mxchange.org Git - mailer.git/blob - inc/libs/refback_functions.php
3414e4fabe73cee918299627a2a9afc678453c6e
[mailer.git] / inc / libs / refback_functions.php
1 <?php
2 /************************************************************************
3  * Mailer v0.2.1-FINAL                                Start: 09/28/2008 *
4  * ===================                          Last change: 09/28/2008 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : refback_functions.php                            *
8  * -------------------------------------------------------------------- *
9  * Short description : Functions for refback extension                  *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Funktionen fuer Refback-Erweiterung              *
12  * -------------------------------------------------------------------- *
13  * $Revision::                                                        $ *
14  * $Date::                                                            $ *
15  * $Tag:: 0.2.1-FINAL                                                 $ *
16  * $Author::                                                          $ *
17  * -------------------------------------------------------------------- *
18  * Copyright (c) 2003 - 2009 by Roland Haeder                           *
19  * Copyright (c) 2009 - 2011 by Mailer Developer Team                   *
20  * For more information visit: http://www.mxchange.org                  *
21  *                                                                      *
22  * This program is free software; you can redistribute it and/or modify *
23  * it under the terms of the GNU General Public License as published by *
24  * the Free Software Foundation; either version 2 of the License, or    *
25  * (at your option) any later version.                                  *
26  *                                                                      *
27  * This program is distributed in the hope that it will be useful,      *
28  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
29  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
30  * GNU General Public License for more details.                         *
31  *                                                                      *
32  * You should have received a copy of the GNU General Public License    *
33  * along with this program; if not, write to the Free Software          *
34  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
35  * MA  02110-1301  USA                                                  *
36  ************************************************************************/
37
38 // Some security stuff...
39 if (!defined('__SECURITY')) {
40         die();
41 }
42
43 // Payback refback for refid and reduce it for current user
44 function addRefbackPoints ($userid, $ref, $points, $ref_points) {
45         //* DEBUG: */ print("----------------------- <font color=\"#00aa00\">".__FUNCTION__." - ENTRY</font> ------------------------<ul><li>\n");
46         // Back ref depths
47         $GLOBALS['refback_depth'][$userid][$ref] = $GLOBALS['ref_level'];
48
49         // Init points
50         $return = $points;
51
52         // Get all ref levels
53         $result_refs = SQL_QUERY('SELECT `level`, `percents` FROM `{?_MYSQL_PREFIX?}_refdepths` WHERE `level` > 0 ORDER BY `level` ASC',
54                 __FUNCTION__, __LINE__);
55
56         // "Walk" through all level
57         while ($content = SQL_FETCHARRAY($result_refs)) {
58                 // Reset ref depths
59                 // @TODO Try to rewrite the following unset()
60                 unset($GLOBALS['ref_level']);
61
62                 // "Walk" through all refids
63                 //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},ref={$ref},level={$content['level']},points={$points}<br />");
64                 foreach (getArrayFromRefbackLevel($userid, $content['level']) as $refid) {
65                         // Skip level zero or if both are the same
66                         if ($userid == $refid) continue;
67
68                         // Get refback percents
69                         $percents = getRefbackPercents($userid, $refid);
70                         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},ref={$ref},refid={$refid},points={$points},percents={$percents}<br />");
71
72                         // Some percents given?
73                         if ($percents > 0) {
74                                 //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):points={$points},perc={$content['percents']},percents={$percents},level={$content['level']}<br />");
75                                 // Calculate points for refback
76                                 $refback = $points * ($content['percents'] / 100) * ($percents / 100);
77
78                                 // Update refback table ('refid' and 'userid' must be exchanged!)
79                                 SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_refs` SET `points`=`points`+%s WHERE `userid`=%s AND `refid`=%s LIMIT 1",
80                                         array($refback, $refid, $userid), __FUNCTION__, __LINE__);
81                                 //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):refback={$refback},userid={$userid},refid={$refid} - UPDATE! (".SQL_AFFECTEDROWS().")<br />");
82
83                                 // Add points again, but only directly
84                                 //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):refback={$refback}<br />");
85                                 addPointsDirectly(sprintf("refback:%s", $refid), $userid, $refback);
86
87                                 // Reduce points if refid is found
88                                 if ($refid == $ref) {
89                                         // Reduce points here!
90                                         $return = $points * ($content['percents'] / 100) - $refback;
91                                         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):points={$return} - REDUCED<br />");
92                                 } // END - if
93                         } // END - if
94                 } // END foreach
95         } // END - while
96
97         // Free result
98         SQL_FREERESULT($result_refs);
99
100         // Restore ref depth
101         $GLOBALS['ref_level'] = $GLOBALS['refback_depth'][$userid][$ref];
102
103         // Return them
104         //* DEBUG: */ print("</li></ul>----------------------- <font color=\"#aa0000\">".__FUNCTION__." - EXIT</font> ------------------------<br />");
105         return $return;
106 }
107
108 // "Getter" for refback percents
109 function getRefbackPercents ($userid, $ref) {
110         //* DEBUG: */ print("----------------------- <font color=\"#00aa00\">".__FUNCTION__." - ENTRY</font> ------------------------<ul><li>\n");
111         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},ref={$ref}<br />");
112         // Skip identical ids
113         if ($userid == $ref) return 0;
114
115         // Is it cached?
116         if (!isset($GLOBALS['refback_percents'][$userid][$ref])) {
117                 // Default is zero
118                 $GLOBALS['refback_percents'][$userid][$ref] = '0';
119
120                 // Get percents from database
121                 $result = SQL_QUERY_ESC("SELECT `refback` FROM `{?_MYSQL_PREFIX?}_user_refs` WHERE `userid`=%s AND `refid`=%s LIMIT 1",
122                         array($ref, $userid), __FUNCTION__, __LINE__);
123
124                 // Entry found? (Should be!)
125                 if (SQL_NUMROWS($result) == 1) {
126                         // Fetch percents
127                         list($GLOBALS['refback_percents'][$userid][$ref]) = SQL_FETCHROW($result);
128                         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):percents=".$GLOBALS['refback_percents'][$userid][$ref]."<br />");
129                 } else {
130                         // Debug log
131                         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>): NO ENTRY FOUND! :-(<br />");
132                         logDebugMessage(__FUNCTION__, __LINE__, 'userid=' . $userid . ',ref=' . $ref . ' - No entry found. :-(');
133                 }
134
135                 // Free result
136                 SQL_FREERESULT($result);
137         } // END - if
138
139         // Return percents
140         //* DEBUG: */ print("</li></ul>----------------------- <font color=\"#aa0000\">".__FUNCTION__." - EXIT</font> ------------------------<br />");
141         return $GLOBALS['refback_percents'][$userid][$ref];
142 }
143
144 // "Getter" for userid array which will return only one entry
145 function getArrayFromRefbackLevel ($refid, $level) {
146         //* DEBUG: */ print("----------------------- <font color=\"#00aa00\">".__FUNCTION__." - ENTRY</font> ------------------------<ul><li>\n");
147         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):refid={$refid},level={$level}<br />");
148         // Init userids
149         $userIds = array();
150
151         // Look for all
152         $result = SQL_QUERY_ESC("SELECT
153         `userid`
154 FROM
155         `{?_MYSQL_PREFIX?}_user_refs`
156 WHERE
157         `refid`=%s AND `level`=%s
158 ORDER BY
159         `userid` ASC",
160                 array($refid, $level), __FUNCTION__, __LINE__);
161
162         // Entries found?
163         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):numRows=".SQL_NUMROWS($result)."<br />");
164         if (!SQL_HASZERONUMS($result)) {
165                 // Add all
166                 while ($content = SQL_FETCHARRAY($result)) {
167                         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):refid={$refid},level={$level},userid={$content['userid']}<br />");
168                         $userIds[] = $content['userid'];
169                 } // END - while
170         } // END - if
171
172         // Free result
173         SQL_FREERESULT($result);
174
175         // Return array
176         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):refid={$refid},count()=".count($userIds)."<br />");
177         //* DEBUG: */ print("</li></ul>----------------------- <font color=\"#aa0000\">".__FUNCTION__." - EXIT</font> ------------------------<br />");
178         return $userIds;
179 }
180
181 // Update "refback table"
182 function updateRefbackTable ($userid) {
183         //* DEBUG: */ print("----------------------- <font color=\"#00aa00\">".__FUNCTION__." - ENTRY</font> ------------------------<ul><li>\n");
184         // Make it sure referal level zero (member him-/herself) is at least selected
185         if (empty($GLOBALS['refback_level'])) $GLOBALS['refback_level'] = 1;
186         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},level={$GLOBALS['refback_level']}<br />");
187
188         // Init refid
189         $GLOBALS['refback_refid'][$GLOBALS['refback_level']] = '0';
190         $old = '0'; $minus = '0';
191
192         // Check for his referal
193         $result_refid = SQL_QUERY_ESC("SELECT `userid` FROM `{?_MYSQL_PREFIX?}_user_data` WHERE `refid`=%s ORDER BY `userid` ASC",
194                 array(bigintval($userid)), __FUNCTION__, __LINE__);
195
196         // When no entry was updated then we have to create it here
197         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):found=".SQL_NUMROWS($result_refid)."<br />");
198         if (!SQL_HASZERONUMS($result_refid)) {
199                 // Load all refids
200                 while (list($GLOBALS['refback_refid'][$GLOBALS['refback_level']]) = SQL_FETCHROW($result_refid)) {
201                         // Remmber userid
202                         $GLOBALS['refback_userid'][$GLOBALS['refback_refid'][$GLOBALS['refback_level']]] = $userid;
203
204                         // Refid set?
205                         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},ref={$GLOBALS['refback_refid'][$GLOBALS['refback_level']]}<br />");
206                         if (($GLOBALS['refback_refid'][$GLOBALS['refback_level']] > 0) && ($GLOBALS['refback_refid'][$GLOBALS['refback_level']] != $userid) && (isset($GLOBALS['refback_refid'][$GLOBALS['refback_level']]))) {
207                                 // New userid?
208                                 if ((isset($GLOBALS['refback_refid'][$GLOBALS['refback_level']-1])) && (isset($GLOBALS['refback_userid'][$GLOBALS['refback_refid'][$GLOBALS['refback_level']-1]]))) {
209                                         // New userid!
210                                         $old = $userid;
211                                         $userid = $GLOBALS['refback_userid'][$GLOBALS['refback_refid'][$GLOBALS['refback_level']-1]];
212                                         $minus = 1;
213                                         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},old={$old},level={$GLOBALS['refback_level']},ref={$GLOBALS['refback_refid'][$GLOBALS['refback_level']]} - NEW UID!<br />");
214                                 } // END - if
215
216                                 // Check existence
217                                 $result = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_user_refs` WHERE `userid`=%s AND `level`=%s AND `refid`=%s LIMIT 1",
218                                         array(
219                                                 bigintval($userid),
220                                                 bigintval($GLOBALS['refback_level']),
221                                                 bigintval($GLOBALS['refback_refid'][$GLOBALS['refback_level']])
222                                         ), __FUNCTION__, __LINE__);
223
224                                 // Do we have no entry?
225                                 //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},level={$GLOBALS['refback_level']},ref={$GLOBALS['refback_refid'][$GLOBALS['refback_level']]},minus={$minus},numRows=".SQL_NUMROWS($result)." - FOUND!<br />");
226                                 if (SQL_HASZERONUMS($result)) {
227                                         // Insert this level
228                                         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},level={$GLOBALS['refback_level']},ref={$GLOBALS['refback_refid'][$GLOBALS['refback_level']]} - ADD!<br />");
229                                         SQL_QUERY_ESC("INSERT INTO `{?_MYSQL_PREFIX?}_user_refs` (`userid`,`level`,`refid`) VALUES (%s,%s,%s)",
230                                                 array(bigintval($userid), $GLOBALS['refback_level'], bigintval($GLOBALS['refback_refid'][$GLOBALS['refback_level']])), __FUNCTION__, __LINE__);
231
232                                         // Move to next referal level and count his counter one up!
233                                         $GLOBALS['refback_level']++;
234                                         updateRefbackTable($GLOBALS['refback_refid'][($GLOBALS['refback_level'] - 1)]);
235                                 } // END - if
236
237                                 // Do we have another level here?
238                                 if ((($GLOBALS['refback_level']-$minus) > 0) && ($old > 0)) {
239                                         // Restore old one
240                                         $userid = $old;
241
242                                         // Shall we add this as well?
243                                         $result = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_user_refs` WHERE `userid`=%s AND `level`=%s AND `refid`=%s LIMIT 1",
244                                                 array(
245                                                         bigintval($userid),
246                                                         (bigintval($GLOBALS['refback_level']) - $minus),
247                                                         bigintval($GLOBALS['refback_refid'][$GLOBALS['refback_level']])
248                                                 ), __FUNCTION__, __LINE__);
249
250                                         // Do we have no entry?
251                                         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},level=".($GLOBALS['refback_level']-$minus).",ref={$GLOBALS['refback_refid'][$GLOBALS['refback_level']]},numRows=".SQL_NUMROWS($result)." - BACK!<br />");
252                                         if (SQL_HASZERONUMS($result)) {
253                                                 // Insert this level
254                                                 SQL_QUERY_ESC("INSERT INTO `{?_MYSQL_PREFIX?}_user_refs` (`userid`,`level`,`refid`) VALUES (%s,%s,%s)",
255                                                         array(bigintval($userid), ($GLOBALS['refback_level']-$minus), bigintval($GLOBALS['refback_refid'][$GLOBALS['refback_level']])), __FUNCTION__, __LINE__);
256                                                 //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},level=".($GLOBALS['refback_level']-$minus).",ref={$GLOBALS['refback_refid'][$GLOBALS['refback_level']]} - RETURNED!<br />");
257                                         } // END - if
258                                 } // END - if
259                         } // END - if
260                 } // END - while
261
262                 // Free memory
263                 SQL_FREERESULT($result_refid);
264         } // END - if
265
266         // When he has a referal...
267         if ((($GLOBALS['refback_refid'][$GLOBALS['refback_level']] == $userid) || ($GLOBALS['refback_refid'][$GLOBALS['refback_level']] == '0')) && (isExtensionInstalledAndNewer('cache', '0.1.2')) && (!isset($GLOBALS['refback_cached']))) {
268                 // Remove cache here
269                 //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},ref={$GLOBALS['refback_refid'][$GLOBALS['refback_level']]} - CACHE!<br />");
270                 if ($GLOBALS['cache_instance']->loadCacheFile('refback')) $GLOBALS['cache_instance']->removeCacheFile();
271                 $GLOBALS['refback_cached'] = 1;
272         } // END - if
273
274         // "Walk" back here
275         $GLOBALS['refback_level']--;
276         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},level={$GLOBALS['refback_level']} - LEVEL!<br />");
277
278         // Fix empty refid
279         if (!isset($GLOBALS['refback_refid'][$GLOBALS['refback_level']-1])) $GLOBALS['refback_refid'][$GLOBALS['refback_level']-1] = '0';
280         //* DEBUG: */ print(__FUNCTION__ . '(<font color="#0000aa">' . __LINE__."</font>):userid={$userid},level={$GLOBALS['refback_level']},ref={$GLOBALS['refback_refid'][$GLOBALS['refback_level']-1]} - BACK!<br />");
281         //* DEBUG: */ print("</li></ul>----------------------- <font color=\"#aa0000\">".__FUNCTION__." - EXIT</font> ------------------------<br />");
282 }
283
284 // "Getter" for array for user refs in given level
285 function getArrayFromRefbackUserRefs ($userid, $level) {
286         //* DEBUG: */ print("----------------------- <font color=\"#00aa00\">".__FUNCTION__." - ENTRY</font> ------------------------<ul><li>\n");
287         // Default is no refs and no nickname
288         $refs = array();
289
290         // Get refs from database
291         $result = SQL_QUERY_ESC("SELECT
292         r.`id`,
293         r.`refid`,
294         r.`refback`,
295         r.`points`,
296         d.`status`,
297         d.`joined`,
298         d.`refid` AS `level_refid`
299 FROM
300         `{?_MYSQL_PREFIX?}_user_refs` AS r
301 LEFT JOIN
302         `{?_MYSQL_PREFIX?}_user_data` AS d
303 ON
304         r.`refid`=d.`userid`
305 WHERE
306         r.`userid`=%s AND
307         r.`level`=%s
308 ORDER BY
309         r.`refid` ASC",
310                 array(bigintval($userid), bigintval($level)), __FUNCTION__, __LINE__);
311
312         // Are there some entries?
313         if (!SQL_HASZERONUMS($result)) {
314                 // Fetch all entries
315                 while ($row = SQL_FETCHARRAY($result)) {
316                         // Add row
317                         $refs[$row['id']] = $row;
318                 } // END - while
319         } // END - if
320
321         // Free result
322         SQL_FREERESULT($result);
323
324         // Return result
325         //* DEBUG: */ print("</li></ul>----------------------- <font color=\"#aa0000\">".__FUNCTION__." - EXIT</font> ------------------------<br />");
326         return $refs;
327 }
328
329 // "Getter" for refback entry
330 function getArrayFromUserRefbackData ($id) {
331         //* DEBUG: */ print("----------------------- <font color=\"#00aa00\">".__FUNCTION__." - ENTRY</font> ------------------------<ul><li>\n");
332         // Default data is nothing
333         $data = array();
334
335         // Secure id number
336         $id = bigintval($id);
337
338         // Get entry from database
339         $result = SQL_QUERY_ESC("SELECT `id`, `userid`, `refid`, `refback`, `level`, `points` FROM `{?_MYSQL_PREFIX?}_user_refs` WHERE `id`=%s AND `userid`=%s LIMIT 1",
340                 array($id, getMemberId()), __FUNCTION__, __LINE__);
341
342         // Is there an entry?
343         if (SQL_NUMROWS($result) == 1) {
344                 // Fetch data
345                 $data = SQL_FETCHARRAY($result);
346         } // END - if
347
348         // Free result
349         SQL_FREERESULT($result);
350
351         // Return entry
352         //* DEBUG: */ print("</li></ul>----------------------- <font color=\"#aa0000\">".__FUNCTION__." - EXIT</font> ------------------------<br />");
353         return $data;
354 }
355
356 // Update refback percents (but with some sanity-checks!
357 function updateMemberRefbackPercents ($id, $percents) {
358         //* DEBUG: */ print("----------------------- <font color=\"#00aa00\">".__FUNCTION__." - ENTRY</font> ------------------------<ul><li>\n");
359         // Default status is failed
360         $status['message'] = '{--MEMBER_REFBACK_ERROR_GENERAL--}';
361
362         // Do some sanity-checks
363         if (!isMember()) {
364                 // No member!
365                 $status['message'] = '{--MEMBER_REFBACK_ERROR_NO_MEMBER--}';
366                 return $status;
367         } elseif (''.$id.'' != ''.($id + 0).'') {
368                 // No number!
369                 $status['message'] = '{--MEMBER_REFBACK_ERROR_INVALID_ID_NUMBER--}';
370                 return $status;
371         } elseif (($percents < 0) || ($percents > 100)) {
372                 // Percentage is not valid!
373                 $status['message'] = '{--MEMBER_REFBACK_ERROR_INVALID_PERCENTAGE--}';
374                 return $status;
375         }
376
377         // Get ref entry
378         $dummy = getArrayFromUserRefbackData($id);
379
380         // Is this valid?
381         if (count($dummy) == 0) {
382                 // id does not belong to user!
383                 $status['message'] = '{--MEMBER_REFBACK_ERROR_ID_MISMATCH--}';
384                 return $status;
385         } // END - if
386
387         // Revert german commata
388         $percents = convertCommaToDot($percents);
389
390         // Update entry
391         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_refs` SET `refback`='%s' WHERE `id`=%s AND `userid`=%s LIMIT 1",
392                 array($percents, $id, getMemberId()), __FUNCTION__, __LINE__);
393
394         // Entry updated?
395         if (SQL_HASZEROAFFECTED()) {
396                 // Entry not updated!
397                 $status['message'] = '{--MEMBER_REFBACK_ERROR_NOT_UPDATED--}';
398                 return $status;
399         } // END - if
400
401         // Prepare email content
402         $dummy['percents'] = $percents;
403
404         // Load member email template
405         $mail = loadEmailTemplate('member_refback', $dummy, $dummy['refid']);
406
407         // Send email to user
408         sendEmail($dummy['refid'], '{--MEMBER_REFBACK_SUBJECT--}', $mail);
409
410         // Send admin notification
411         sendAdminNotification('{--ADMIN_REFBACK_SUBJECT--}', 'admin_refback', $dummy, getMemberId());
412
413         // All fine!
414         $status['ok'] = true;
415
416         // Return status array
417         //* DEBUG: */ print("</li></ul>----------------------- <font color=\"#aa0000\">".__FUNCTION__." - EXIT</font> ------------------------<br />");
418         return $status;
419 }
420
421 // Checks wether refback is enabled
422 function isRefbackEnabled () {
423         // Do we have cache?
424         if (!isset($GLOBALS[__FUNCTION__])) {
425                 // Determine it
426                 $GLOBALS[__FUNCTION__] = (getConfig('refback_enabled') == 'Y');
427         } // END - if
428
429         // Return cache
430         return $GLOBALS[__FUNCTION__];
431 }
432
433 // [EOF]
434 ?>