una/modules/boonex/facebook_connect/classes/BxFaceBookConnectModule.php

<?php

    /***************************************************************************
    *                            Dolphin Smart Community Builder
    *                              -------------------
    *     begin                : Mon Mar 23 2006
    *     copyright            : (C) 2007 BoonEx Group
    *     website              : http://www.boonex.com
    * This file is part of Dolphin - Smart Community Builder
    *
    * Dolphin is free software; you can redistribute it and/or modify it under
    * the terms of the GNU General Public License as published by the
    * Free Software Foundation; either version 2 of the
    * License, or  any later version.
    *
    * Dolphin is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
    * without even the implied warranty of  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
    * See the GNU General Public License for more details.
    * You should have received a copy of the GNU General Public License along with Dolphin,
    * see license.txt file; if not, write to marketing@boonex.com
    ***************************************************************************/

    require_once( BX_DIRECTORY_PATH_INC . 'profiles.inc.php' );

    bx_import('BxDolModuleDb');
    bx_import('BxDolModule');
    bx_import('BxDolInstallerUtils');
    bx_import('BxDolProfilesController');
    bx_import('BxDolAlerts');

    class BxFaceBookConnectModule extends BxDolModule
    {
        // contain some module information ;
        var $aModuleInfo;

        // contain path for current module;
        var $sPathToModule;
        var $sHomeUrl;

        var $oFacebook;

        /**
         * Class constructor ;
         *
         * @param   : $aModule (array) - contain some information about this module;
         *                  [ id ]           - (integer) module's  id ;
         *                  [ title ]        - (string)  module's  title ;
         *                  [ vendor ]       - (string)  module's  vendor ;
         *                  [ path ]         - (string)  path to this module ;
         *                  [ uri ]          - (string)  this module's URI ;
         *                  [ class_prefix ] - (string)  this module's php classes file prefix ;
         *                  [ db_prefix ]    - (string)  this module's Db tables prefix ;
         *                  [ date ]         - (string)  this module's date installation ;
         */
        function BxFaceBookConnectModule(&$aModule)
        {
            parent::BxDolModule($aModule);

            require_once(BX_DIRECTORY_PATH_MODULES . $aModule['path'] . '/inc/facebook.php');

            // prepare the location link ;
            $this -> sPathToModule  = BX_DOL_URL_ROOT . $this -> _oConfig -> getBaseUri();

            $this -> aModuleInfo    = $aModule;
            $this -> sHomeUrl       = $this ->_oConfig -> _sHomeUrl;

            // Create our Application instance.
            $this -> oFacebook  = new Facebook(array(
                  'appId'  => $this -> _oConfig -> mApiID,
                  'secret' => $this -> _oConfig -> mApiSecret,
                  'cookie' => true,
            ));
        }

        /**
         * Function will generate facebook's admin page;
         *
         * @return : (text) - html presentation data;
         */
        function actionAdministration()
        {
            $GLOBALS['iAdminPage'] = 1;

            if( !isAdmin() ) {
                header('location: ' . BX_DOL_URL_ROOT);
            }

            // get sys_option's category id;
            $iCatId = $this-> _oDb -> getSettingsCategoryId('bx_facebook_connect_api_key');
            if(!$iCatId) {
                $sOptions = MsgBox( _t('_Empty') );
            }
            else {
                bx_import('BxDolAdminSettings');

                $oSettings = new BxDolAdminSettings($iCatId);

                $mixedResult = '';
                if(isset($_POST['save']) && isset($_POST['cat'])) {
                    $mixedResult = $oSettings -> saveChanges($_POST);
                }

                // get option's form;
                $sOptions = $oSettings -> getForm();
                if($mixedResult !== true && !empty($mixedResult)) {
                    $sOptions = $mixedResult . $sOptions;
                }
            }

            $sCssStyles = $this -> _oTemplate -> addCss('forms_adv.css', true);

            $this -> _oTemplate-> pageCodeAdminStart();

                echo DesignBoxAdmin( _t('_bx_facebook_information')
                        , $GLOBALS['oSysTemplate'] -> parseHtmlByName('default_padding.html', array('content' => _t('_bx_facebook_information_block', BX_DOL_URL_ROOT))) );
                echo DesignBoxAdmin( _t('_Settings')
                        , $GLOBALS['oSysTemplate'] -> parseHtmlByName('default_padding.html', array('content' => $sCssStyles . $sOptions) ));

            $this -> _oTemplate->pageCodeAdmin( _t('_bx_facebook_settings') );
        }

        /**
         * Generare facebook login form;
         *
         * @return (text) - html presentation data;
         */
        function actionLoginForm()
        {
            $sCode = '';

            if( isLogged() ) {
                header ('Location:' . $this -> _oConfig -> sDefaultRedirectUrl);
                exit;
            }

            if(!$this -> _oConfig -> mApiID || !$this -> _oConfig -> mApiSecret) {
                $sCode =  MsgBox( _t('_bx_facebook_profile_error_api_keys') );
            }
            else {
                $sSession = $this -> oFacebook -> getSession();

                //redirect to facebook login form
                if(!$sSession) {
                    //step one
                    header('location: ' . $this -> oFacebook -> getLoginUrl($this
                        -> _oConfig -> aFaceBookReqParams));
                    exit;
                }
                else {
                    //we already logged in facebook
                    try {
                        $aFacebookProfileInfo = $this -> oFacebook -> api('/me');
                    } catch (FacebookApiException $e) {
                        $sCode =  MsgBox($e);
                    }

                    //process profile info
                    if($aFacebookProfileInfo) {
                        //-- nedded for old auth method (will need remove it in a feature version) --//
                        $sOldFacebookUid = md5($aFacebookProfileInfo['proxied_email']
                            . $aFacebookProfileInfo['first_name']);
                        //--

                        // try define user id
                        $iProfileId = $this -> _oDb
                            -> getProfileId($aFacebookProfileInfo['id'], $sOldFacebookUid);

                        if($iProfileId) {
                               // get profile info
                               $aDolphinProfileInfo = getProfileInfo($iProfileId);
                               $this -> setLogged($iProfileId, $aDolphinProfileInfo['Password']);
                        }
                        else {
                            $sAlternativeNickName = '';

                            //process profile's nickname
                            $aFacebookProfileInfo['nick_name'] = $this
                                -> _proccesNickName($aFacebookProfileInfo['first_name']);

                            //-- profile nickname already used by other person --//
                            if( getID($aFacebookProfileInfo['nick_name']) ) {
                                   $sAlternativeNickName = $this
                                    -> getAlternativeName($aFacebookProfileInfo['nick_name']);
                            }
                            //--

                            //try to get profile's image
                            if( NULL != ($aFacebookProfileImage = $this
                                    -> oFacebook -> api('/me?fields=picture&type=large')) ) {

                                $aFacebookProfileInfo['picture'] = isset($aFacebookProfileImage['picture'])
                                    ? $aFacebookProfileImage['picture']
                                    : '';
                            }

                               //create new profile
                               $this -> _createProfile($aFacebookProfileInfo, $sAlternativeNickName);
                        }
                    }
                    else {
                        // FB profile info is not defined;
                        $sCode = MsgBox( _t('_bx_facebook_profile_error_info') );
                    }
                }
            }

            $this -> _oTemplate -> getPage( _t('_bx_facebook'), $sCode );
        }

        /**
         * Logged profile
         *
         * @param $iProfileId integer
         * @param $sPassword string
         * @param $sCallbackUrl
         * @param $bRedirect boolean
         * @return void
         */
        function setLogged($iProfileId, $sPassword, $sCallbackUrl = '', $bRedirect = true)
        {
            bx_login($iProfileId);
            $GLOBALS['logged']['member'] = true;

            if($bRedirect) {
                $sCallbackUrl = $sCallbackUrl
                    ? $sCallbackUrl
                    : $this -> _oConfig -> sDefaultRedirectUrl;

                header('location: ' . $sCallbackUrl);
            }
        }

        /**
         * get profile's alternative nickname
         *
         * @param $sNickName string
         * @return string
         */
        function getAlternativeName($sNickName)
        {
            $sRetNickName = '';
            $iIndex = 0;

            //-- get new allternative nickname --//
            do
            {
                $sPostfix = $iIndex
                    ? $this -> _oConfig -> sFaceBookAlternativePostfix . $iIndex
                    : $this -> _oConfig -> sFaceBookAlternativePostfix;

                if( !getID($sNickName . $sPostfix) ) {
                    $sRetNickName = $sPostfix;
                }

                $iIndex++;

            } while ($sRetNickName == '');

            //--

            return $sRetNickName;
        }

        /**
         * Assign avatar to user
         *
         * @param $sAvatarUrl string
         * @return void
         */
        function _assignAvatar($sAvatarUrl)
        {
            if( BxDolInstallerUtils::isModuleInstalled('avatar') ) {
                BxDolService::call ('avatar', 'make_avatar_from_image_url', array($sAvatarUrl));
            }
        }

        /**
         * Make friends
         *
         * @param $iProfileId integer
         * @return void
         */
        function _makeFriends($iProfileId)
        {
            if(!$this -> _oConfig -> bAutoFriends) {
                return;
            }

            try {
                //get friends from facebook
                $aFacebookFriends = $this -> oFacebook -> api('/me/friends/');
            } catch (FacebookApiException $e) {
                return;
            }

            //process friends
            if( !empty($aFacebookFriends) && is_array($aFacebookFriends) ) {
                $aFacebookFriends = array_shift($aFacebookFriends);

                foreach($aFacebookFriends as $iKey => $aFriend)
                {
                    $iFriendId = $this -> _oDb -> getProfileId($aFriend['id']);
                    if($iFriendId && !is_friends($iProfileId, $iFriendId) ) {
                        //add to friends list
                        $this -> _oDb -> makeFriend($iProfileId, $iFriendId);

                        //create system alert
                        $oZ = new BxDolAlerts('friend', 'accept', $iProfileId, $iFriendId);
                        $oZ -> alert();
                    }
                }
            }
        }

        /**
         * Create new profile;
         *
         * @param  : $aProfileInfo (array) - some profile's information;
         *          @see : $this -> aFacebookProfileFields;
         *
         * @param  : $sAlternativeName (string) - profiles alternative nickname;
         * @return : (integer) profile's id;
         */
        function _createProfile($aProfileInfo, $sAlternativeName = '')
        {
            $sCountry = '';
            $sCity = '';

            $bAvatarRedirect = false;
            $sMemberAvatar   = !empty($aProfileInfo['picture'])
                ? $aProfileInfo['picture']
                : '';

            //-- join by invite only --//
            if( getParam('reg_by_inv_only') == 'on'
                && (!isset($_COOKIE['idFriend']) ||  getID($_COOKIE['idFriend']) == 0) ){

                $this -> _oTemplate -> getPage( _t('_bx_facebook')
                       , MsgBox(_t('_registration by invitation only')));
                exit;
               }
            //--

            // process the date of birth;
            if( isset($aProfileInfo['birthday']) ) {
                $aProfileInfo['birthday'] = isset($aProfileInfo['birthday'])
                    ?  date('Y-m-d', strtotime($aProfileInfo['birthday']) )
                    :  '';
            }

            // generate new password for profile;
            $sNewPassword = genRndPwd();
            $sPasswordSalt =  genRndSalt();

            $aProfileInfo['password'] = encryptUserPwd($sNewPassword,$sPasswordSalt);

            //-- define user's country and city --//

            $aLocation = array();

            if( isset($aProfileInfo['location']['name']) ) {
                $aLocation = $aProfileInfo['location']['name'];
            }
              else if( isset($aProfileInfo['hometown']['name']) ) {
                  $aLocation = $aProfileInfo['hometown']['name'];
              }

              if($aLocation) {
                  $aCountryInfo = explode(',', $aLocation);
                  $sCountry = $this -> _oDb -> getCountryCode( trim($aCountryInfo[1]) );
                  $sCity = trim($aCountryInfo[0]);

                //set default country name, especially for American brothers
                  if($sCity && !$sCountry) {
                      $sCountry = $this -> _oConfig -> sDefaultCountryCode;
                  }
              }

            //--

              //try define the user's email
              $sEmail = !empty($aProfileInfo['email'])
                  ? $aProfileInfo['email']
                  : $aProfileInfo['proxied_email'];

            //check email
            if( $this -> _oDb -> isEmailExisting($sEmail) ) {
                $this -> _oTemplate -> getPage( _t('_bx_facebook'), MsgBox(_t('_bx_facebook_error_email')));
                exit;
            }

            //-- fill array with all needed values --//
            $aProfileFields = array(
                'NickName'              => $aProfileInfo['nick_name'] . $sAlternativeName,
                'Email'                 => $sEmail,
                'Sex'                   => isset($aProfileInfo['gender']) ? $aProfileInfo['gender'] : '',
                'DateOfBirth'           => $aProfileInfo['birthday'],

                'Password'              => $aProfileInfo['password'],

                'FirstName'                => isset($aProfileInfo['first_name']) ? $aProfileInfo['first_name'] : '',
                'LastName'                => isset($aProfileInfo['last_name']) ? $aProfileInfo['last_name'] : '',

                'DescriptionMe'         => isset($aProfileInfo['bio']) ? $aProfileInfo['bio'] : '',
                'Interests'             => isset($aProfileInfo['interests']) ? $aProfileInfo['interests'] : '',

                'Religion'              => isset($aProfileInfo['religion']) ? $aProfileInfo['religion'] : '',
                'Country'               => $sCountry,
                'City'                   => $sCity,
            );
            //--

            // check fields existence;
            foreach($aProfileFields as $sKey => $mValue) {
                if( !$this -> _oDb -> isFieldExist($sKey) ) {
                    // (field not existence) remove from array;
                    unset($aProfileFields[$sKey]);
                }
            }

            //-- add some system values --//
            $aProfileFields['Role']       = BX_DOL_ROLE_MEMBER;
            $aProfileFields['DateReg']       = date( 'Y-m-d H:i:s' ); // set current date;
            $aProfileFields['Salt']       = $sPasswordSalt;
            //--

            //check redirect page
            switch($this -> _oConfig -> sRedirectPage) {
                case 'join' :
                    return $this -> _getJoinPage($aProfileFields, $aProfileInfo['id']);

                case 'pedit'  :
                    $sRedirectUrl = BX_DOL_URL_ROOT . 'pedit.php';
                    break;

                case 'avatar' :
                    $bAvatarRedirect = true;
                    break;

                case 'index'  :
                    $sRedirectUrl = BX_DOL_URL_ROOT;
                    break;

                case 'member' :
                default       :
                    $sRedirectUrl = BX_DOL_URL_ROOT . 'member.php';
                    break;
            }

            // create new profile;
            $iProfileId = $this -> _oDb -> createProfile($aProfileFields);
            $oProfileFields = new BxDolProfilesController();

            //remember FB uid for created member
            $this -> _oDb -> saveFbUid($iProfileId, $aProfileInfo['id']);

            // check profile status;
            if ( getParam('autoApproval_ifNoConfEmail') == 'on' ) {
                if ( getParam('autoApproval_ifJoin') == 'on' ) {
                    $sProfileStatus = 'Active';
                    if( !empty($aProfileInfo['email']) ) {
                        $oProfileFields -> sendActivationMail($iProfileId);
                    }
                }
                else {
                    $sProfileStatus = 'Approval';
                    if( !empty($aProfileInfo['email']) ) {
                        $oProfileFields -> sendApprovalMail($iProfileId);
                    }
                }
            }
            else {
                if( !empty($aProfileInfo['email']) ) {
                    $oProfileFields -> sendConfMail($iProfileId);
                    $sProfileStatus = 'Unconfirmed';
                }
                else {
                    if ( getParam('autoApproval_ifJoin') == 'on' ) {
                        $sProfileStatus = 'Active';
                    }
                    else {
                        $sProfileStatus = 'Approval';
                    }
                }
            }

            // update profile's status;
            $this -> _oDb -> updateProfileStatus($iProfileId, $sProfileStatus);
            $oProfileFields -> createProfileCache($iProfileId);

            if( !empty($aProfileInfo['email']) ) {
                //-- send email notification --//
                $oEmailTemplate = new BxDolEmailTemplates();
                $aTemplate = $oEmailTemplate -> getTemplate('t_fb_connect_password_generated') ;
                $aNewProfileInfo = getProfileInfo($iProfileId);

                $aPlus = array(
                    'NickName'       => $aNewProfileInfo['NickName'],
                    'NewPassword' => $sNewPassword,
                );

                sendMail( $aNewProfileInfo['Email'], $aTemplate['Subject']
                    , $aTemplate['Body'], '', $aPlus );
             }
            //--

            // create system event
            $oZ = new BxDolAlerts('profile', 'join', $iProfileId);
            $oZ -> alert();

            //Auto-friend members if they are already friends on Facebook
            $this -> _makeFriends($iProfileId);

            // set logged
            $aProfileInfo = getProfileInfo($iProfileId);
            $this -> setLogged($iProfileId, $aProfileInfo['Password'], '', false);

             //redirect to avatar page
            if($bAvatarRedirect) {
                if( BxDolInstallerUtils::isModuleInstalled('avatar') ) {
                    // check profile's logo;
                    if($sMemberAvatar) {
                        BxDolService::call('avatar', 'set_image_for_cropping', array ($iProfileId, $sMemberAvatar));
                    }

                    if (BxDolService::call('avatar', 'join', array ($iProfileId, '_Join complete'))) {
                        exit;
                    }
                }
                else {
                    header('location:' . $this -> _oConfig -> sDefaultRedirectUrl);
                    exit;
                }
            }
            else {
                //assign avatar
                if($sMemberAvatar) {
                    $this -> _assignAvatar($sMemberAvatar);
                }

                //redirect to other page
                header('location:' . $sRedirectUrl);
                exit;
            }
        }

         /**
         * get join page
         *
         * @param $aProfileFields array
         * @param $iFacebookUserId integer
         * @return void
         */
        function _getJoinPage($aProfileFields, $iFacebookUserId)
        {
            bx_import('BxDolSession');
            $oSession = BxDolSession::getInstance();
            $oSession -> setValue($this -> _oConfig -> sFacebookSessionUid, $iFacebookUserId);

            bx_import("BxDolJoinProcessor");

            $GLOBALS['oSysTemplate']->addJsTranslation('_Errors in join form');
            $GLOBALS['oSysTemplate']->addJs(array('join.js', 'jquery.form.js'));

            $oJoin = new BxDolJoinProcessor();

            //process recived fields
            foreach($aProfileFields as $sFieldName => $sValue) {
                $oJoin -> aValues[0][$sFieldName] = $sValue;
            }

            $this -> _oTemplate -> getPage( _t( '_JOIN_H' ), $oJoin->process());
            exit;
        }

        /**
         * Function will clear all unnecessary sybmols from profile's nickname;
         *
         * @param  : $sProfileName (string) - profile's nickname;
         * @return : (string) - cleared nickname;
         */
        function _proccesNickName($sProfileName)
        {
            $sProfileName = preg_replace("/^http:\/\/|^https:\/\/|\/$/", '', $sProfileName);
            $sProfileName = str_replace('/', '_', $sProfileName);
            $sProfileName = str_replace('.', '-', $sProfileName);

            return $sProfileName;
        }
    }