<?php
namespace StoreSuit;
defined( 'ABSPATH' ) || exit;

/**
 * Packing slips (0.59): one A4 page per selected order to put in the parcel: the store, the order number and date, where
 * it goes (the delivery address, or the billing address when there is no separate one; store pickup says so), and what
 * is in it (products with their options, SKU and units, less refunded units), with the customer's note. No prices: a
 * packing slip is not an invoice. Closed orders (cancelled, failed, refunded, drafts) are left out. Nothing is written;
 * read with the orders permission, like the address labels.
 *
 * Order summaries (0.60): the same page with prices, for the customer or the counter: the order as placed (units and
 * line prices, refunded units noted), WooCommerce's own totals rows (subtotal, discount, shipping, fees, taxes, payment
 * method, refunds, total, as in its order emails), the billing and delivery details and the status. Any order but a
 * draft can be printed. It says it is not a tax invoice: StoreSuit issues no fiscal documents.
 */
final class PackingSlips {
    public const ACTION = 'storesuit_packing_slips';

    /** The printed pages' style (A4, one order per page; the toolbar is not printed). */
    private const CSS = '@page{size:A4;margin:14mm}
*{box-sizing:border-box}
body{margin:0;color:#121212;font:13px/1.45 Arial,sans-serif;background:#eee}
.toolbar{display:flex;gap:10px;justify-content:center;padding:10px}
.toolbar button{font:inherit;padding:8px 14px}
.slip{background:#fff;max-width:190mm;margin:0 auto 12px;padding:12mm;min-height:250mm}
header{display:flex;justify-content:space-between;gap:16px;border-bottom:2px solid #121212;padding-bottom:10px}
h1{font-size:22px;margin:0 0 6px}
h2{font-size:12px;text-transform:uppercase;margin:14px 0 4px;color:#333}
dl{margin:0;display:grid;gap:4px;text-align:right}
dt{font-size:11px;color:#444}
dd{margin:0;font-weight:bold}
table{width:100%;border-collapse:collapse;margin-top:14px}
th,td{border-bottom:1px solid #bbb;padding:7px 5px;text-align:left;vertical-align:top}
th{font-size:11px;text-transform:uppercase}
td small{display:block;color:#444}
.code{font-family:monospace}
.qty{text-align:right;width:70px;font-weight:bold}
.money{text-align:right;white-space:nowrap}
.note{border:1px solid #bbb;padding:6px 10px;margin-top:14px}
.people{display:flex;gap:24px;flex-wrap:wrap}
.people .to{flex:1 1 220px}
.totals{width:auto;min-width:50%;margin-left:auto}
.totals th{text-transform:none;font-size:13px;text-align:right}
.totals tr:last-child th,.totals tr:last-child td{font-weight:bold;border-bottom:2px solid #121212}
.fine{margin-top:18px;font-size:11px;color:#444}
@media print{body{background:#fff}.toolbar{display:none}.slip{margin:0;padding:0;min-height:0;break-after:page}.slip:last-child{break-after:auto}tr{break-inside:avoid}}';

    public static function hooks(): void {
        add_action( 'admin_post_' . self::ACTION, array( __CLASS__, 'print_page' ) );
    }

    public static function print_page(): void {
        if ( ! current_user_can( 'storesuit_orders' ) ) { wp_die( esc_html( I18n::t( 'You do not have permission to perform this action.' ) ), '', array( 'response'=>403 ) ); }
        check_admin_referer( self::ACTION );
        $raw = isset( $_GET['order_ids'] ) ? array_map( 'absint', (array) wp_unslash( $_GET['order_ids'] ) ) : array();
        $ids = array_values( array_unique( array_filter( $raw ) ) );
        if ( ! $ids || count( $ids ) > 100 ) { wp_die( esc_html( I18n::t( 'Select 1–100 orders.' ) ), 400 ); }
        $prices = ! empty( $_GET['prices'] );
        // A selection with nothing to print (every order closed) says so instead of failing (review 0.59).
        try { $body = self::body( $ids, $prices ); } catch ( \Throwable $e ) { wp_die( esc_html( $e->getMessage() ), '', array( 'response'=>400, 'back_link'=>true ) ); }
        nocache_headers();
        header( 'Content-Type: text/html; charset=' . get_option( 'blog_charset' ) );
        self::render( 'storesuit-packing-slips', $prices ? I18n::t( 'Order summaries' ) : I18n::t( 'Packing slips' ), self::CSS, $body );
        exit;
    }

    /**
     * Prints one of StoreRuler's print pages (packing slips, order summaries, the pick list) as a complete document. Its style
     * and its Print button's script go out through WordPress (the inline style of a registered style handle, an inline script
     * tag); the body, built from escaped values, goes out through wp_kses_post().
     */
    public static function render( string $handle, string $title, string $css, string $body ): void {
        if ( ! wp_style_is( $handle, 'registered' ) ) {
            wp_register_style( $handle, false, array(), STORESUIT_VERSION );
            wp_add_inline_style( $handle, $css );
        }
        echo '<!doctype html><html lang="' . esc_attr( strtolower( str_replace( '_', '-', I18n::locale() ) ) ) . '"><head><meta charset="utf-8"><meta name="viewport" content="width=device-width,initial-scale=1"><title>' . esc_html( $title ) . "</title>\n";
        wp_styles()->do_item( $handle );
        echo '</head><body>';
        echo wp_kses_post( $body );
        wp_print_inline_script_tag( 'document.querySelectorAll(".ss-print").forEach(function(button){button.addEventListener("click",function(){window.print();});});', array( 'id'=>'storesuit-print-js' ) );
        echo '</body></html>';
    }

    /** A complete print document as a string (render()'s output). */
    public static function capture( string $handle, string $title, string $css, string $body ): string {
        $level = ob_get_level();
        ob_start();
        try { self::render( $handle, $title, $css, $body ); return (string) ob_get_contents(); }
        finally { while ( ob_get_level() > $level ) { ob_end_clean(); } }
    }

    /**
     * The pages' contents: per order, its number, date, address lines, delivery and lines (name, options, SKU, units).
     * With prices (an order summary): every order but a draft, the units as ordered with the refunded ones, the line
     * prices and WooCommerce's totals rows (as HTML it formats, kept to safe tags), the billing details and the status.
     */
    public static function build( array $ids, bool $prices = false ): array {
        Store::require_cap( 'storesuit_orders' );
        $slips = array(); $skipped = array();
        foreach ( array_slice( array_values( array_unique( array_filter( array_map( 'absint', $ids ) ) ) ), 0, 100 ) as $id ) {
            $order = wc_get_order( $id );
            if ( ! $order instanceof \WC_Order || $order->get_type() !== 'shop_order' ) { continue; }
            if ( $order->has_status( $prices ? array( 'trash', 'checkout-draft' ) : array( 'cancelled', 'failed', 'refunded', 'trash', 'checkout-draft' ) ) || SaleStatus::quote( $order ) ) { $skipped[] = (string) $order->get_order_number(); continue; }
            $lines = array();
            foreach ( $order->get_items() as $item_id => $item ) {
                if ( ! $item instanceof \WC_Order_Item_Product ) { continue; }
                $refunded = abs( (float) $order->get_qty_refunded_for_item( $item_id ) );
                $qty = $prices ? (float) $item->get_quantity() : (float) $item->get_quantity() - $refunded;
                if ( $qty <= 0 ) { continue; }
                $product = $item->get_product(); $what = array();
                foreach ( $item->get_formatted_meta_data( '_', true ) as $meta ) { $what[] = wp_strip_all_tags( (string) $meta->display_key ) . ': ' . wp_strip_all_tags( (string) $meta->display_value ); }
                $line = array( 'name'=>$item->get_name(), 'what'=>implode( ', ', $what ), 'sku'=>$product ? (string) $product->get_sku() : '', 'qty'=>$qty );
                if ( $prices ) { $line['refunded'] = $refunded; $line['price'] = wp_kses_post( (string) $order->get_formatted_line_subtotal( $item ) ); }
                $lines[] = $line;
            }
            $pickup = $order->get_meta( '_storesuit_delivery' ) === 'pickup';
            $type = $order->has_shipping_address() ? 'shipping' : 'billing';
            $address = $pickup ? '' : trim( wp_strip_all_tags( (string) WC()->countries->get_formatted_address( $order->get_address( $type ), "\n" ) ) );
            $slip = array(
                'number'=>(string) $order->get_order_number(), 'date'=>$order->get_date_created() ? wc_format_datetime( $order->get_date_created() ) : '',
                'pickup'=>$pickup, 'address'=>$address, 'phone'=>(string) ( $order->get_shipping_phone() ?: $order->get_billing_phone() ),
                'method'=>$pickup ? '' : trim( (string) $order->get_shipping_method() ), 'note'=>trim( (string) $order->get_customer_note() ), 'lines'=>$lines,
            );
            // More notes for the box (StoreRuler Pro's gift wrap and gift note): {title, text} pairs, printed as plain text.
            $slip['notes'] = array();
            foreach ( (array) apply_filters( 'storesuit_packing_slip_notes', array(), $order ) as $extra ) { if ( is_array( $extra ) && is_string( $extra['title'] ?? null ) && is_string( $extra['text'] ?? null ) && $extra['text'] !== '' ) { $slip['notes'][] = array( 'title'=>$extra['title'], 'text'=>$extra['text'] ); } }
            if ( $prices ) {
                $slip['status'] = wc_get_order_status_name( $order->get_status() );
                $slip['billing'] = trim( wp_strip_all_tags( (string) WC()->countries->get_formatted_address( $order->get_address( 'billing' ), "\n" ) ) );
                $slip['email'] = (string) $order->get_billing_email();
                $slip['totals'] = array();
                foreach ( (array) $order->get_order_item_totals() as $row ) { $slip['totals'][] = array( 'label'=>wp_kses_post( (string) ( $row['label'] ?? '' ) ), 'value'=>wp_kses_post( (string) ( $row['value'] ?? '' ) ) ); }
            }
            $slips[] = $slip;
        }
        return array( 'slips'=>$slips, 'skipped'=>$skipped );
    }

    /** The store's name and address, as WooCommerce's settings keep them. */
    private static function store(): array {
        $address = WC()->countries->get_formatted_address( array( 'company'=>get_bloginfo( 'name' ), 'address_1'=>WC()->countries->get_base_address(), 'address_2'=>WC()->countries->get_base_address_2(), 'city'=>WC()->countries->get_base_city(), 'state'=>WC()->countries->get_base_state(), 'postcode'=>WC()->countries->get_base_postcode(), 'country'=>WC()->countries->get_base_country() ), "\n" );
        return array( 'address'=>trim( wp_strip_all_tags( (string) $address ) ) );
    }

    /** The complete printed document of the selected orders (what print_page() prints). */
    public static function document( array $ids, bool $prices = false ): string {
        return self::capture( 'storesuit-packing-slips', $prices ? I18n::t( 'Order summaries' ) : I18n::t( 'Packing slips' ), self::CSS, self::body( $ids, $prices ) );
    }

    /** The document's body: the toolbar with its Print button, one page per order, the orders left out. */
    private static function body( array $ids, bool $prices ): string {
        $data = self::build( $ids, $prices );
        if ( ! $data['slips'] ) { throw new \InvalidArgumentException( esc_html( I18n::t( 'No orders found to print.' ) ) ); }
        $store = self::store(); $pages = '';
        foreach ( $data['slips'] as $slip ) {
            $rows = '';
            foreach ( $slip['lines'] as $line ) {
                $rows .= '<tr><td><strong>' . esc_html( $line['name'] ) . '</strong>' . ( $line['what'] !== '' ? '<small>' . esc_html( $line['what'] ) . '</small>' : '' ) . ( ! empty( $line['refunded'] ) ? '<small>' . esc_html( I18n::format( 'Refunded: %s', wc_stock_amount( $line['refunded'] ) ) ) . '</small>' : '' ) . '</td><td class="code">' . esc_html( $line['sku'] ) . '</td><td class="qty">' . esc_html( wc_stock_amount( $line['qty'] ) ) . '</td>' . ( $prices ? '<td class="money">' . $line['price'] . '</td>' : '' ) . '</tr>';
            }
            $totals = '';
            foreach ( $slip['totals'] ?? array() as $row ) { $totals .= '<tr><th scope="row">' . $row['label'] . '</th><td class="money">' . $row['value'] . '</td></tr>'; }
            $pages .= '<section class="slip"><header><div><h1>' . esc_html( $prices ? I18n::t( 'Order summary' ) : I18n::t( 'Packing slip' ) ) . '</h1><p>' . nl2br( esc_html( $store['address'] ) ) . '</p></div>'
                . '<dl><div><dt>' . esc_html( I18n::t( 'Order' ) ) . '</dt><dd>#' . esc_html( $slip['number'] ) . '</dd></div><div><dt>' . esc_html( I18n::t( 'Date' ) ) . '</dt><dd>' . esc_html( $slip['date'] ) . '</dd></div>'
                . ( $prices ? '<div><dt>' . esc_html( I18n::t( 'Status' ) ) . '</dt><dd>' . esc_html( $slip['status'] ) . '</dd></div>' : '' )
                . ( $slip['method'] !== '' ? '<div><dt>' . esc_html( I18n::t( 'Delivery' ) ) . '</dt><dd>' . esc_html( $slip['method'] ) . '</dd></div>' : '' ) . '</dl></header>'
                . '<div class="people">'
                . ( $prices ? '<div class="to"><h2>' . esc_html( I18n::t( 'Billing' ) ) . '</h2>' . ( $slip['billing'] !== '' ? '<p>' . nl2br( esc_html( $slip['billing'] ) ) . '</p>' : '' ) . ( $slip['email'] !== '' ? '<p>' . esc_html( $slip['email'] ) . '</p>' : '' ) . '</div>' : '' )
                . '<div class="to"><h2>' . esc_html( $slip['pickup'] ? I18n::t( 'Store pickup' ) : I18n::t( 'Deliver to' ) ) . '</h2>' . ( $slip['address'] !== '' ? '<p>' . nl2br( esc_html( $slip['address'] ) ) . '</p>' : '' ) . ( $slip['phone'] !== '' ? '<p>' . esc_html( $slip['phone'] ) . '</p>' : '' ) . '</div>'
                . '</div>'
                . ( $rows !== '' ? '<table><thead><tr><th>' . esc_html( I18n::t( 'Product' ) ) . '</th><th>' . esc_html( I18n::t( 'SKU' ) ) . '</th><th class="qty">' . esc_html( I18n::t( 'Units' ) ) . '</th>' . ( $prices ? '<th class="money">' . esc_html( I18n::t( 'Price' ) ) . '</th>' : '' ) . '</tr></thead><tbody>' . $rows . '</tbody></table>' : '<p>' . esc_html( I18n::t( 'Nothing left to send in this order.' ) ) . '</p>' )
                . ( $totals !== '' ? '<table class="totals"><tbody>' . $totals . '</tbody></table>' : '' )
                . ( $slip['note'] !== '' ? '<div class="note"><h2>' . esc_html( I18n::t( 'Customer note' ) ) . '</h2><p>' . nl2br( esc_html( $slip['note'] ) ) . '</p></div>' : '' )
                . implode( '', array_map( static fn( $extra ) => '<div class="note"><h2>' . esc_html( $extra['title'] ) . '</h2><p>' . nl2br( esc_html( $extra['text'] ) ) . '</p></div>', $slip['notes'] ?? array() ) )
                . ( $prices ? '<p class="fine">' . esc_html( I18n::t( 'This order summary is not a tax invoice.' ) ) . '</p>' : '' )
                . '</section>';
        }
        return '<div class="toolbar"><button type="button" class="ss-print">' . esc_html( I18n::t( 'Print' ) ) . '</button></div>'
            . $pages
            . ( $data['skipped'] ? '<p class="toolbar">' . esc_html( I18n::format( $prices ? 'Left out (drafts): %s' : 'Left out (closed): %s', '#' . implode( ', #', $data['skipped'] ) ) ) . '</p>' : '' );
    }
}