inc/modules/member/what-wernis.php

   1 <?php
   2 /************************************************************************
   3  * Mailer v0.2.1-FINAL                                Start: 04/12/2004 *
   4  * ===================                          Last change: 11/16/2004 *
   5  *                                                                      *
   6  * -------------------------------------------------------------------- *
   7  * File              : what-wernis.php                                  *
   8  * -------------------------------------------------------------------- *
   9  * Short description : Wernis requests                                  *
  10  * -------------------------------------------------------------------- *
  11  * Kurzbeschreibung  : Auszahlungsanfragen                              *
  12  * -------------------------------------------------------------------- *
  13  * $Revision::                                                        $ *
  14  * $Date::                                                            $ *
  15  * $Tag:: 0.2.1-FINAL                                                 $ *
  16  * $Author::                                                          $ *
  17  * Needs to be in all Files and every File needs "svn propset           *
  18  * svn:keywords Date Revision" (autoprobset!) at least!!!!!!            *
  19  * -------------------------------------------------------------------- *
  20  * Copyright (c) 2003 - 2009 by Roland Haeder                           *
  21  * Copyright (c) 2009, 2010 by Mailer Developer Team                    *
  22  * For more information visit: http://www.mxchange.org                  *
  23  *                                                                      *
  24  * This program is free software; you can redistribute it and/or modify *
  25  * it under the terms of the GNU General Public License as published by *
  26  * the Free Software Foundation; either version 2 of the License, or    *
  27  * (at your option) any later version.                                  *
  28  *                                                                      *
  29  * This program is distributed in the hope that it will be useful,      *
  30  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
  31  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
  32  * GNU General Public License for more details.                         *
  33  *                                                                      *
  34  * You should have received a copy of the GNU General Public License    *
  35  * along with this program; if not, write to the Free Software          *
  36  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
  37  * MA  02110-1301  USA                                                  *
  38  ************************************************************************/
  39
  40 // Some security stuff...
  41 if (!defined('__SECURITY')) {
  42         die();
  43 } elseif (!isMember()) {
  44         // User is not logged in
  45         redirectToIndexMemberOnlyModule();
  46 }
  47
  48 // Add description as navigation point
  49 addMenuDescription('member', __FILE__);
  50
  51 if ((!isExtensionActive('wernis')) && (!isAdmin())) {
  52         loadTemplate('admin_settings_saved', false, generateExtensionInactiveNotInstalledMessage('wernis'));
  53         return;
  54 } // END - if
  55
  56 // Check if the admin has entered the data
  57 if ((getConfig('wernis_api_id') == '') || (getConfig('wernis_api_md5') == '')) {
  58         // Something important is missing...
  59         loadTemplate('admin_settings_saved', false, '{--MEMBER_WERNIS_API_DATA_MISSING--}');
  60         return;
  61 } // END - if
  62
  63 // Init the content array and points
  64 $content = array(); $points = false;
  65
  66 // Is the mode set (withdraw or payout)
  67 if ((!isGetRequestParameterSet('mode')) || (getRequestParameter('mode') == 'choose')) {
  68         // Let the user choose what he wants to do
  69         $content['refid']    = getConfig(('wernis_refid'));
  70         $content['wernis_userid'] = '0';
  71
  72         // Is there an id?
  73         if ((!empty($content['wernis_userid'])) && (!isGetRequestParameterSet('mode'))) {
  74                 // Then use an other "mode"
  75                 setGetRequestParameter('mode', 'list');
  76
  77                 // And load all rows!
  78                 $result = SQL_QUERY_ESC("SELECT `id`, `wernis_account`, `wernis_amount`, `wernis_timestamp`, `wernis_type` FROM `{?_MYSQL_PREFIX?}_user_wernis` WHERE `userid`=%s ORDER BY `wernis_timestamp` DESC",
  79                         array(getMemberId()), __FILE__, __LINE__);
  80
  81                 // Load all rows
  82                 $content['rows'] = '';
  83                 while ($data = SQL_FETCHARRAY($result)) {
  84                         // Prepare data for output
  85                         $rowContent = array(
  86                                 'wernis_timestamp' => generateDateTime($data['wernis_timestamp'], 2),
  87                                 'wernis_amount'    => $data['wernis_amount'],
  88                                 'wernis_account'   => $data['wernis_account'],
  89                                 'wernis_type'      => $data['wernis_type'],
  90                         );
  91
  92                         // Load row template
  93                         $content['rows'] .= loadTemplate('member_wernis_mode_list_row', true, $rowContent);
  94                 } // END - while
  95
  96                 // Free result
  97                 SQL_FREERESULT($result);
  98         } else {
  99                 // Default links are not active!
 100                 $content['payout_link']   = '<em>{--MEMBER_WERNIS_PAYOUT_DISABLED--}</em>';
 101                 $content['withdraw_link'] = '<em>{--MEMBER_WERNIS_WITHDRAW_DISABLED--}</em>';
 102
 103                 // Is the payout mode active?
 104                 if (getConfig('wernis_payout_active') == 'Y') {
 105                         // Add link
 106                         $content['payout_link'] = '<a class="menu_blur" style="height: 40px" href="{%url=modules.php?module=login&amp;what=wernis&amp;mode=payout%}"><div style="padding-top: 10px">{--MEMBER_WERNIS_MODE_PAYOUT--}</div></a>';
 107                 } // END - if
 108
 109                 // Is the withdraw mode active?
 110                 if (getConfig('wernis_withdraw_active') == 'Y') {
 111                         // Add link
 112                         $content['withdraw_link'] = '<a class="menu_blur" style="height: 40px" href="{%url=modules.php?module=login&amp;what=wernis&amp;mode=withdraw%}"><div style="padding-top: 10px">{--MEMBER_WERNIS_MODE_WITHDRAW--}</div></a>';
 113                 } // END - if
 114
 115                 // Mode chooser! ;-)
 116                 setGetRequestParameter('mode', 'choose');
 117         }
 118 } elseif ((getRequestParameter('mode') == 'payout') && (getConfig('wernis_payout_active') == 'Y')) {
 119         // Get total points and check if the user can request a payout
 120         $points = countSumTotalData(getMemberId(), 'user_points', 'points') - countSumTotalData(getMemberId(), 'user_data', 'used_points');
 121
 122         // Remove the registration fee
 123         $points = $points - getPointsRegister();
 124
 125         // Is there a percentage or fixed fee?
 126         $points = WERNIS_TAKE_FEE($points, 'payout');
 127
 128         // Is this enougth for a payout?
 129         if ($points < getConfig('wernis_min_payout')) {
 130                 // No, then abort here
 131                 loadTemplate('admin_settings_saved', false, sprintf(
 132                         getMessage('MEMBER_WERNIS_MIN_PAYOUT'),
 133                         translateComma(getConfig('wernis_min_payout')),
 134                         translateComma($points)
 135                 ));
 136                 return;
 137         } // END - if
 138
 139         // No dots here...
 140         $points = explode('.', $points);
 141         $points = bigintval($points[0]);
 142
 143         // Add points to content array
 144         $content['points']     = translateComma($points);
 145
 146         // Get WDS66 username
 147         $content['wernis_userid'] = getUserData('wernis_userid');
 148 } elseif ((getRequestParameter('mode') == 'withdraw') && (getConfig('wernis_withdraw_active') == 'Y')) {
 149         // Get total points for just displaying them
 150         $points = countSumTotalData(getMemberId(), 'user_points', 'points') - countSumTotalData(getMemberId(), 'user_data', 'used_points');
 151
 152         // Prepare data for the template
 153         $content['points']        = translateComma($points);
 154         $content['wernis_userid'] = '';
 155
 156         // Add fees to array
 157         WERNIS_ADD_FEES_TO_ARRAY($content);
 158
 159         // Fetch id
 160         $content['wernis_userid'] = getUserData('wernis_userid');
 161 } else {
 162         // Invalid mode!
 163         loadTemplate('admin_settings_saved', false, getMaskedMessage('MEMBER_WERNIS_MODE_INVALID', getRequestParameter('mode')));
 164         return;
 165 }
 166
 167 // Is the formular sent?
 168 if ((isFormSent()) && (isGetRequestParameterSet('mode'))) {
 169         // Is the user id and password set?
 170         if (!isPostRequestParameterSet(('wernis_userid'))) {
 171                 // Nothing entered in WDS66 user id
 172                 loadTemplate('admin_settings_saved', false, '{--MEMBER_WERNIS_EMPTY_USERNAME--}');
 173         } elseif (!isPostRequestParameterSet(('wds66_password'))) {
 174                 // Nothing entered in WDS66 password
 175                 loadTemplate('admin_settings_saved', false, '{--MEMBER_WERNIS_EMPTY_PASSWORD--}');
 176         } elseif (!isPostRequestParameterSet(('amount'))) {
 177                 // Nothing entered in amount
 178                 loadTemplate('admin_settings_saved', false, '{--MEMBER_WERNIS_EMPTY_AMOUNT--}');
 179         } elseif (postRequestParameter('wernis_userid') != bigintval(postRequestParameter('wernis_userid'))) {
 180                 // Only numbers in account id!
 181                 loadTemplate('admin_settings_saved', false, '{--MEMBER_WERNIS_INVALID_USERNAME');
 182         } elseif (postRequestParameter('amount') != bigintval(postRequestParameter('amount'))) {
 183                 // Only numbers in amount!
 184                 loadTemplate('admin_settings_saved', false, '{--MEMBER_WERNIS_INVALID_AMOUNT--}');
 185         } else {
 186                 // Check input data depending on the mode and execute the requested mode
 187                 switch (getRequestParameter('mode')) {
 188                         case 'withdraw': // Widthdraws WDS66 -> This exchange
 189                                 if (postRequestParameter('amount') < getConfig('wernis_min_withdraw')) {
 190                                         // Not enougth entered!
 191                                         loadTemplate('admin_settings_saved', false, '{--MEMBER_WERNIS_WITHDRAW_AMOUNT_SMALLER_MIN--}');
 192                                 } else {
 193                                         // All is fine here so do the withdraw
 194                                         $success = WERNIS_EXECUTE_WITHDRAW(postRequestParameter('wernis_userid'), md5(postRequestParameter('wds66_password')), postRequestParameter('amount'));
 195                                         if ($success === true) {
 196                                                 // Add it to this amount
 197                                                 addPointsDirectly('wernis_withdraw', getMemberId(), bigintval(postRequestParameter('amount')));
 198
 199                                                 // Update the user data as well..
 200                                                 SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `wernis_userid`=%s WHERE `userid`=%s LIMIT 1",
 201                                                         array(bigintval(postRequestParameter('wernis_userid')), getMemberId()), __FILE__, __LINE__);
 202
 203                                                 // All done!
 204                                                 loadTemplate('admin_settings_saved', false, '{--MEMBER_WERNIS_WITHDRAW_DONE--}');
 205                                                 return;
 206                                         } elseif ((GET_WERNIS_ERROR_CODE() == 'user_failed') || (GET_WERNIS_ERROR_CODE() == 'own_failed') || (GET_WERNIS_ERROR_CODE() == 'amount_failed')) {
 207                                                 // Wrong login data
 208                                                 loadTemplate('admin_settings_saved', false, GET_WERNIS_ERROR_MESSAGE());
 209                                         } else {
 210                                                 // Something went wrong
 211                                                 loadTemplate('admin_settings_saved', false, getMaskedMessage('MEMBER_WERNIS_WITHDRAW_FAILED', GET_WERNIS_ERROR_MESSAGE()));
 212                                         }
 213                                 }
 214                                 break;
 215
 216                         case 'payout': // Payout this exchange -> WDS66
 217                                 if (postRequestParameter('amount') < getConfig('wernis_min_payout')) {
 218                                         // Not enougth entered!
 219                                         loadTemplate('admin_settings_saved', false, '{--MEMBER_WERNIS_PAYOUT_AMOUNT_SMALLER_MIN--}');
 220                                 } elseif (postRequestParameter('amount') > $points) {
 221                                         // Not enougth points left!
 222                                         loadTemplate('admin_settings_saved', false, sprintf(getMessage('MEMBER_WERNIS_PAYOUT_POINTS_DEPLETED'), bigintval(postRequestParameter('amount')), bigintval($points)));
 223                                 } else {
 224                                         // All is fine here so do the withdraw
 225                                         $success = WERNIS_EXECUTE_PAYOUT(postRequestParameter('wernis_userid'), postRequestParameter('amount'));
 226                                         if ($success === true) {
 227                                                 // Sub points
 228                                                 subtractPoints('wernis_payout', getMemberId(), postRequestParameter('amount'));
 229
 230                                                 // Update WDS66 id
 231                                                 SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `wernis_userid`=%s WHERE `userid`=%s LIMIT 1",
 232                                                         array(bigintval(postRequestParameter('wernis_userid')), getMemberId()), __FILE__, __LINE__);
 233
 234                                                 // All done!
 235                                                 loadTemplate('admin_settings_saved', false, '{--MEMBER_WERNIS_PAYOUT_DONE--}');
 236                                                 return;
 237                                         } elseif ((GET_WERNIS_ERROR_CODE() == 'user_failed') || (GET_WERNIS_ERROR_CODE() == 'own_failed') || (GET_WERNIS_ERROR_CODE() == 'amount_failed') || (GET_WERNIS_ERROR_CODE() == 'api_amount_failed')) {
 238                                                 // Wrong login data
 239                                                 loadTemplate('admin_settings_saved', false, GET_WERNIS_ERROR_MESSAGE());
 240                                         } else {
 241                                                 // Something went wrong
 242                                                 loadTemplate('admin_settings_saved', false, getMaskedMessage('MEMBER_WERNIS_WITHDRAW_FAILED', GET_WERNIS_ERROR_MESSAGE()));
 243                                         }
 244                                 }
 245                                 break;
 246
 247                         default: // Invalid mode!
 248                                 logDebugMessage(__FILE__, __LINE__, sprintf("Invalid mode %s detected.", getRequestParameter('mode')));
 249                                 loadTemplate('admin_settings_saved', false, getMaskedMessage('MEMBER_WERNIS_MODE_INVALID', getRequestParameter('mode')));
 250                                 return;
 251                 }
 252         }
 253 } // END - if
 254
 255 // Prepare mode for template name
 256 $mode = sprintf("member_wernis_mode_%s", getRequestParameter('mode'));
 257
 258 // Load the template
 259 loadTemplate($mode, false, $content);
 260
 261 // [EOF]
 262 ?>