<?php
/**
* @brief Purchases
* @author <a href='https://www.invisioncommunity.com'>Invision Power Services, Inc.</a>
* @copyright (c) Invision Power Services, Inc.
* @license https://www.invisioncommunity.com/legal/standards/
* @package Invision Community
* @subpackage Nexus
* @since 11 Feb 2014
*/
namespace IPS\nexus\modules\admin\customers;
/* To prevent PHP errors (extending class does not exist) revealing path */
if ( !defined( '\IPS\SUITE_UNIQUE_KEY' ) )
{
header( ( isset( $_SERVER['SERVER_PROTOCOL'] ) ? $_SERVER['SERVER_PROTOCOL'] : 'HTTP/1.0' ) . ' 403 Forbidden' );
exit;
}
/**
* Purchases
*/
class _purchases extends \IPS\Dispatcher\Controller
{
/**
* View
*
* @return void
*/
public function execute()
{
\IPS\Dispatcher::i()->checkAcpPermission( 'purchases_view' );
if ( \IPS\Request::i()->do !== 'findHostingAccount' )
{
try
{
$this->purchase = \IPS\nexus\Purchase::load( \IPS\Request::i()->id );
}
catch ( \OutOfRangeException $e )
{
\IPS\Output::i()->error( 'node_error', '2X195/2', 404, '' );
}
\IPS\Output::i()->title = $this->purchase->name . " (#{$this->purchase->id})";
}
\IPS\Output::i()->cssFiles = array_merge( \IPS\Output::i()->cssFiles, \IPS\Theme::i()->css( 'purchases.css', 'nexus', 'admin' ) );
parent::execute();
}
/**
* Manage
*
* @return void
*/
protected function manage()
{
$this->view();
}
/**
* View
*
* @return void
*/
protected function view()
{
/* Popup view */
if ( \IPS\Request::i()->isAjax() and isset( \IPS\Request::i()->hovercard ) )
{
\IPS\Output::i()->output = \IPS\Theme::i()->getTemplate( 'purchases' )->hovercard( $this->purchase );
return;
}
/* Create children tree */
$children = \IPS\nexus\Purchase::tree( $this->purchase->acpUrl(), array(), "p{$this->purchase->id}", $this->purchase, FALSE );
if ( \IPS\Request::i()->isAjax() )
{
\IPS\Output::i()->output = $children;
return;
}
/* Create associated invoices table */
try
{
$originalInvoice = $this->purchase->original_invoice;
$invoices = \IPS\nexus\Invoice::table( array( array( 'i_id=? OR ' . \IPS\Db::i()->findInSet( 'i_renewal_ids', array( $this->purchase->id ) ), $originalInvoice->id ) ), $this->purchase->acpUrl(), "p.{$this->purchase->id}" );
}
catch ( \OutOfRangeException $e )
{
$invoices = \IPS\nexus\Invoice::table( array( array( \IPS\Db::i()->findInSet( 'i_renewal_ids', array( $this->purchase->id ) ) ) ), $this->purchase->acpUrl(), "p.{$this->purchase->id}" );
}
$invoices->filters = array(
'paid' => array( 'i_status=?', \IPS\nexus\Invoice::STATUS_PAID )
);
$invoices->advancedSearch = array(
'i_status' => array( \IPS\Helpers\Table\SEARCH_SELECT, array( 'options' => \IPS\nexus\Invoice::statuses(), 'multiple' => TRUE ) ),
'i_total' => \IPS\Helpers\Table\SEARCH_NUMERIC,
'i_date' => \IPS\Helpers\Table\SEARCH_DATE_RANGE,
);
/* Custom Fields */
$customFields = array();
foreach ( $this->purchase->custom_fields as $k => $v )
{
try
{
if ( $displayValue = trim( \IPS\nexus\Package\CustomField::load( $k )->displayValue( $v, TRUE ) ) )
{
$customFields[ $k ] = $displayValue;
}
}
catch ( \OutOfRangeException $e ) { }
}
/* Get customer */
try
{
$customer = $this->purchase->member;
}
catch ( \OutOfRangeException $e )
{
$customer = NULL;
}
/* Display */
\IPS\Output::i()->sidebar['actions'] = $this->purchase->buttons();
\IPS\Output::i()->output = \IPS\Theme::i()->getTemplate( 'purchases' )->view( $this->purchase, $customer, $children, $invoices, $customFields );
}
/**
* Edit
*
* @return void
*/
protected function edit()
{
\IPS\Dispatcher::i()->checkAcpPermission( 'purchases_edit' );
/* Work stuff out */
$renewals = $this->purchase->renewals ?: NULL;
$groupedChildren = array();
if ( $renewals and \IPS\Db::i()->select( 'COUNT(*)', 'nexus_purchases', array( 'ps_parent=? AND ps_grouped_renewals<>? AND ps_cancelled=0', $this->purchase->id, '' ) )->first() )
{
$renewals = $this->purchase->renewals;
foreach ( $this->purchase->children() as $child )
{
if ( $child->grouped_renewals and !$child->cancelled )
{
$groupedChildren[] = $child;
$childGroupedRenewals = $child->grouped_renewals;
try
{
$childGroupedRenewalTerm = new \IPS\nexus\Purchase\RenewalTerm( new \IPS\nexus\Money( $childGroupedRenewals['price'], $this->purchase->renewals->cost->currency ), new \DateInterval( 'P' . $childGroupedRenewals['term'] . mb_strtoupper( $childGroupedRenewals['unit'] ) ) );
$renewals = new \IPS\nexus\Purchase\RenewalTerm( $renewals->subtract( $childGroupedRenewalTerm ), $renewals->interval );
}
catch ( \Exception $e ) { }
}
}
}
/* Build form */
$form = new \IPS\Helpers\Form;
$this->purchase->acpEdit( $form, $renewals );
/* Handle submissions */
if ( $values = $form->values() )
{
/* Ungroup children */
foreach ( $groupedChildren as $child )
{
$child->ungroupFromParent();
}
/* Update purchase */
$this->purchase->acpEditSave( $values );
/* Regroup children */
foreach ( $groupedChildren as $child )
{
$child->groupWithParent();
}
/* Log */
$this->purchase->member->log( 'purchase', array( 'type' => 'info', 'id' => $this->purchase->id, 'name' => $this->purchase->name ) );
/* Redirect */
$this->_redirect();
}
/* Display */
\IPS\Output::i()->output = $form;
}
/**
* Transfer
*
* @return void
*/
protected function transfer()
{
\IPS\Dispatcher::i()->checkAcpPermission( 'purchases_transfer' );
if ( $this->purchase->grouped_renewals )
{
\IPS\Output::i()->error( 'not_with_grouped', '2X195/6', 403, '' );
}
if ( $this->purchase->billing_agreement and !$this->purchase->billing_agreement->canceled )
{
\IPS\Output::i()->error( 'not_with_billing_agreement', '2X195/G', 403, '' );
}
/* Build form */
$form = new \IPS\Helpers\Form;
$form->add( new \IPS\Helpers\Form\Member( 'ps_member', NULL, TRUE ) );
/* Handle submissions */
if ( $values = $form->values() )
{
/* Transfer */
$previousOwner = $this->purchase->member;
try
{
$this->purchase->transfer( $values['ps_member'] );
}
catch ( \DomainException $e )
{
\IPS\Output::i()->error( $e->getMessage(), '2X195/8', 403 );
}
/* Log */
$previousOwner->log( 'purchase', array( 'type' => 'transfer_from', 'id' => $this->purchase->id, 'name' => $this->purchase->name, 'to' => $values['ps_member']->member_id ) );
$this->purchase->member->log( 'purchase', array( 'type' => 'transfer_to', 'id' => $this->purchase->id, 'name' => $this->purchase->name, 'from' => $previousOwner->member_id ) );
/* Redirect */
$this->_redirect();
}
/* Display */
\IPS\Output::i()->output = $form;
}
/**
* Renew
*
* @return void
*/
public function renew()
{
\IPS\Dispatcher::i()->checkAcpPermission( 'invoices_add', 'nexus', 'payments' );
if ( $this->purchase->grouped_renewals )
{
\IPS\Output::i()->error( 'not_with_grouped', '2X195/7', 403, '' );
}
if ( $this->purchase->billing_agreement and !$this->purchase->billing_agreement->canceled )
{
\IPS\Output::i()->error( 'not_with_billing_agreement', '2X195/D', 403, '' );
}
/* If this purchase has renewal term, we cannot generate a renewal invoice */
if ( !$this->purchase->renewals )
{
\IPS\Output::i()->error( 'purchase_no_renew', '2X195/3', 403, '' );
}
/* Build form */
$form = new \IPS\Helpers\Form;
$cycles = $this->purchase->canRenewUntil( NULL, TRUE, TRUE );
$form->add( new \IPS\Helpers\Form\Number( 'renew_cycles', 1, TRUE, array( 'min' => 1, 'max' => ( $cycles === TRUE ? NULL : $cycles ) ) ) );
/* Handle submissions */
if ( $values = $form->values() )
{
/* Generate Invoice */
$invoice = new \IPS\nexus\Invoice;
$invoice->currency = $this->purchase->renewal_currency;
$invoice->member = $this->purchase->member;
$invoice->addItem( \IPS\nexus\Invoice\Item\Renewal::create( $this->purchase, $values['renew_cycles'] ) );
$invoice->save();
$invoice->sendNotification();
/* Update the purchase */
$this->purchase->invoice_pending = $invoice;
$this->purchase->save();
/* Take us to that invoice */
\IPS\Output::i()->redirect( $invoice->acpUrl() );
}
/* If this purchase already has an unpaid renewal invoice, display a warning */
if ( $this->purchase->invoice_pending )
{
/* Which will be a proper warning if that invoice is still pending */
if ( $this->purchase->invoice_pending->status === \IPS\nexus\Invoice::STATUS_PENDING )
{
\IPS\Output::i()->output .= \IPS\Theme::i()->getTemplate( 'global', 'core' )->message( \IPS\Member::loggedIn()->language()->addToStack('warn_renew_invoice_pending', FALSE, array( 'sprintf' => array( $this->purchase->invoice_pending->acpUrl() ) ) ), 'warning', NULL, FALSE, TRUE );
}
/* Or just informational if it is canceled or expired */
elseif ( $this->purchase->invoice_pending->status !== \IPS\nexus\Invoice::STATUS_PAID )
{
\IPS\Output::i()->output .= \IPS\Theme::i()->getTemplate( 'global', 'core' )->message( \IPS\Member::loggedIn()->language()->addToStack('info_renew_invoice_pending', FALSE, array( 'sprintf' => array( $this->purchase->invoice_pending->acpUrl() ) ) ), 'information', NULL, FALSE, TRUE );
}
}
/* Display */
\IPS\Output::i()->output .= $form;
}
/**
* Cancel
*
* @return void
*/
protected function cancel()
{
\IPS\Dispatcher::i()->checkAcpPermission( 'purchases_cancel' );
$parent = $this->purchase->parent();
if ( ( $this->purchase->billing_agreement and !$this->purchase->billing_agreement->canceled ) or ( $this->purchase->grouped_renewals and $parent->billing_agreement and !$parent->billing_agreement->canceled ) )
{
\IPS\Output::i()->error( 'not_with_billing_agreement', '2X195/H', 403, '' );
}
/* What options are available for cancelling? */
$options = array();
if ( $this->purchase->renewals )
{
$options['no_renew'] = 'cancel_type_no_renew';
}
$options['cancel'] = 'cancel_type_cancel';
/* Build form */
$form = new \IPS\Helpers\Form;
$form->add( new \IPS\Helpers\Form\Radio( 'cancel_type', 'no_renew', FALSE, array(
'options' => $options,
'toggles' => array( 'cancel' => array( 'form_cancel_type_warning' ) )
) ) );
$form->add( new \IPS\Helpers\Form\YesNo( 'ps_can_reactivate', FALSE ) );
if ( $onCancelWarning = $this->purchase->onCancelWarning() )
{
\IPS\Member::loggedIn()->language()->words['cancel_type_warning'] = $onCancelWarning;
}
/* Handle submissions */
if ( $values = $form->values() )
{
/* If grouped, ungroup */
$grouped = $this->purchase->grouped_renewals;
if ( $grouped )
{
$this->purchase->ungroupFromParent();
$this->purchase->save();
}
/* Update purchase and log */
if ( $values['cancel_type'] === 'no_renew' )
{
$this->purchase->renewals = NULL;
$this->purchase->member->log( 'purchase', array( 'type' => 'info', 'id' => $this->purchase->id, 'name' => $this->purchase->name, 'info' => 'remove_renewals' ) );
}
else
{
$this->purchase->cancelled = TRUE;
$this->purchase->member->log( 'purchase', array( 'type' => 'cancel', 'id' => $this->purchase->id, 'name' => $this->purchase->name ) );
}
$this->purchase->can_reactivate = $values['ps_can_reactivate'];
$this->purchase->save();
/* If grouped, regroup */
if ( $grouped )
{
$this->purchase->groupWithParent();
$this->purchase->save();
}
/* Redirect */
$this->_redirect();
}
/* Display form */
\IPS\Output::i()->output = $form;
}
/**
* Reactivate
*
* @return void
*/
protected function reactivate()
{
\IPS\Dispatcher::i()->checkAcpPermission( 'purchases_cancel' );
$parent = $this->purchase->parent();
if ( ( $this->purchase->billing_agreement and !$this->purchase->billing_agreement->canceled ) or ( $this->purchase->grouped_renewals and $parent->billing_agreement and !$parent->billing_agreement->canceled ) )
{
\IPS\Output::i()->error( 'not_with_billing_agreement', '2X195/I', 403, '' );
}
/* If grouped, ungroup */
$grouped = $this->purchase->grouped_renewals;
if ( $grouped )
{
$this->purchase->ungroupFromParent();
$this->purchase->save();
}
/* Do it */
$this->purchase->cancelled = FALSE;
$this->purchase->save();
$this->purchase->member->log( 'purchase', array( 'type' => 'uncancel', 'id' => $this->purchase->id, 'name' => $this->purchase->name ) );
/* If grouped, regroup */
if ( $grouped )
{
$this->purchase->groupWithParent();
$this->purchase->save();
}
/* Redirect */
$this->_redirect();
}
/**
* Delete
*
* @return void
*/
protected function delete()
{
\IPS\Dispatcher::i()->checkAcpPermission( 'purchases_delete' );
\IPS\Request::i()->confirmedDelete();
$parent = $this->purchase->parent();
if ( ( $this->purchase->billing_agreement and !$this->purchase->billing_agreement->canceled ) or ( $this->purchase->grouped_renewals and $parent->billing_agreement and !$parent->billing_agreement->canceled ) )
{
\IPS\Output::i()->error( 'not_with_billing_agreement', '2X195/J', 403, '' );
}
if ( $this->purchase->grouped_renewals )
{
$this->purchase->ungroupFromParent();
$this->purchase->save();
}
$this->purchase->member->log( 'purchase', array( 'type' => 'delete', 'id' => $this->purchase->id, 'name' => $this->purchase->name ) );
$this->purchase->delete();
if ( $parent )
{
\IPS\Output::i()->redirect( $parent->acpUrl() );
}
else
{
\IPS\Output::i()->redirect( $this->purchase->member->acpUrl() );
}
}
/**
* Extra
*
* @return void
*/
protected function extra()
{
if ( $output = $this->purchase->acpAction() )
{
\IPS\Output::i()->output = $output;
}
else
{
\IPS\Output::i()->redirect( $this->purchase->acpUrl() );
}
}
/**
* Group
*
* @return void
*/
protected function group()
{
\IPS\Dispatcher::i()->checkAcpPermission( 'purchases_edit' );
if ( $this->purchase->billing_agreement and !$this->purchase->billing_agreement->canceled )
{
\IPS\Output::i()->error( 'not_with_billing_agreement', '2X195/E', 403, '' );
}
try
{
$this->purchase->groupWithParent();
$this->purchase->member->log( 'purchase', array( 'type' => 'group', 'id' => $this->purchase->id, 'name' => $this->purchase->name ) );
}
catch ( \LogicException $e )
{
\IPS\Output::i()->error( 'grouperr_' . $e->getMessage(), '1X195/4', 403, '' );
}
$this->_redirect();
}
/**
* Ungroup
*
* @return void
*/
protected function ungroup()
{
\IPS\Dispatcher::i()->checkAcpPermission( 'purchases_edit' );
if ( $this->purchase->billing_agreement and !$this->purchase->billing_agreement->canceled )
{
\IPS\Output::i()->error( 'not_with_billing_agreement', '2X195/F', 403, '' );
}
try
{
$this->purchase->ungroupFromParent();
$this->purchase->member->log( 'purchase', array( 'type' => 'ungroup', 'id' => $this->purchase->id, 'name' => $this->purchase->name ) );
}
catch ( \LogicException $e )
{
\IPS\Output::i()->error( '', '1X195/5', 403, '' );
}
$this->_redirect();
}
/**
* Redirect
*
* @return void
*/
protected function _redirect()
{
if ( isset( \IPS\Request::i()->r ) )
{
switch ( mb_substr( \IPS\Request::i()->r, 0, 1 ) )
{
case 'p':
try
{
\IPS\Output::i()->redirect( \IPS\nexus\Purchase::load( $this->purchase->parent )->acpUrl() );
}
catch ( \OutOfRangeException $e )
{
\IPS\Output::i()->redirect( $this->purchase->member->acpUrl() );
}
break;
case 'v':
\IPS\Output::i()->redirect( $this->purchase->acpUrl() );
break;
case 'c':
\IPS\Output::i()->redirect( $this->purchase->member->acpUrl() );
break;
case 's':
\IPS\Output::i()->redirect( \IPS\nexus\Support\Request::load( mb_substr( \IPS\Request::i()->r, 2 ) )->acpUrl() );
break;
}
}
\IPS\Output::i()->redirect( $this->purchase->acpUrl() );
}
/**
* Find Hosting Account
*
* @return void
*/
protected function findHostingAccount()
{
try
{
\IPS\Output::i()->redirect( \IPS\nexus\Purchase::load( \IPS\Db::i()->select( 'ps_id', 'nexus_hosting_accounts', array( 'account_username=?', \IPS\Request::i()->username ) )->first() )->acpUrl() );
}
catch ( \UnderflowException $e )
{
\IPS\Output::i()->error( 'node_error', '2X195/B', 404, '' );
}
}
}