<?php
/**
 * Add a used item, fast: one screen that works on a phone at the counter -- photos from
 * the camera, the title, grade, purchase price, price, seller -- and "copy from the last
 * one of this model": its description, categories, specs and shipping, so the second
 * A7 III or Brompton takes a minute, not a quarter of an hour. Listing is the work a
 * one-of-a-kind shop does most; WooCommerce's product screen is built for a catalogue.
 */

if (!defined('ABSPATH')) {
    exit;
}

add_action('admin_menu', function () {
    add_submenu_page('edit.php?post_type=product', __('Add used item', 'usedkit'), __('Add used item', 'usedkit'),
                     'edit_products', 'usedkit-intake', 'usedkit_intake_page', 2);
}, 20);

/* The screen's few styles, on that screen only. */
add_action('admin_enqueue_scripts', function ($hook) {
    if (strpos((string) $hook, 'usedkit-intake') === false) {
        return;
    }
    wp_register_style('usedkit-intake', false, array(), USEDKIT_VERSION);
    wp_enqueue_style('usedkit-intake');
    wp_add_inline_style('usedkit-intake', '.usedkit-intake form{max-width:560px}.usedkit-intake label{display:block;margin:14px 0 4px;font-weight:600}.usedkit-intake input[type=text],.usedkit-intake input[type=number],.usedkit-intake select,.usedkit-intake textarea{width:100%;font-size:16px;padding:8px}.usedkit-intake .row{display:flex;gap:12px}.usedkit-intake .row>div{flex:1}.usedkit-intake .button-hero{margin:18px 8px 0 0}.usedkit-intake .check{font-weight:400}');
});

/** The most recent other product of the same model, to copy from; null if none. */
function usedkit_intake_source($title, $except = 0) {
    $key = function_exists('usedkit_plain_key') ? usedkit_plain_key($title) : '';
    $recent = wc_get_products(array('limit' => 300, 'status' => array('publish', 'private', 'draft'), 'orderby' => 'date',
                                    'order' => 'DESC', 'exclude' => $except ? array($except) : array()));
    foreach ($recent as $p) {
        if (mb_strtolower(trim($p->get_name())) === mb_strtolower(trim($title))) {
            return $p;
        }
    }
    if ($key === '') {
        return null;
    }
    $keys = function_exists('usedkit_model_keys') ? usedkit_model_keys($recent, false) : array();
    foreach ($recent as $p) {
        if (($keys[$p->get_id()] ?? '') === $key) {
            return $p;
        }
    }
    return null;
}

/** Copy what describes the model, not the unit, from one product to another. */
function usedkit_intake_copy($from, $to) {
    $to->set_description($from->get_description());
    $to->set_short_description($from->get_short_description());
    $to->set_category_ids($from->get_category_ids());
    $to->set_tag_ids($from->get_tag_ids());
    $to->set_shipping_class_id($from->get_shipping_class_id());
    $to->set_weight($from->get_weight());
    $to->set_length($from->get_length());
    $to->set_width($from->get_width());
    $to->set_height($from->get_height());
    $to->set_tax_class($from->get_tax_class());
    $to->set_attributes(array_map(function ($a) { return clone $a; }, $from->get_attributes()));
    foreach (array('_usedkit_specs', '_usedkit_margin', '_usedkit_match_key') as $key) {
        if ($from->get_meta($key) !== '') {
            $to->update_meta_data($key, $from->get_meta($key));
        }
    }
    $brands = wp_get_post_terms($from->get_id(), 'product_brand', array('fields' => 'ids'));
    return is_array($brands) ? $brands : array();
}

function usedkit_intake_page() {
    if (!current_user_can('edit_products')) {
        return;
    }
    $done = null;
    $error = '';
    if (isset($_POST['usedkit_intake']) && check_admin_referer('usedkit_intake')) {
        $result = usedkit_intake_save();
        is_wp_error($result) ? $error = $result->get_error_message() : $done = wc_get_product($result);
    }
    $titles = array_unique(array_map(function ($p) { return $p->get_name(); },
                                     wc_get_products(array('limit' => 200, 'orderby' => 'date', 'order' => 'DESC', 'status' => array('publish', 'private', 'draft')))));
    $s = usedkit_settings();
    $cats = get_terms(array('taxonomy' => 'product_cat', 'hide_empty' => false)); ?>
    <div class="wrap usedkit-intake">
        <h1><?php esc_html_e('Add used item', 'usedkit'); ?></h1>
        <?php if ($done) : ?>
            <div class="notice notice-success"><p><?php
                /* translators: %s: product name */
                echo esc_html(sprintf($done->get_status() === 'publish' ? __('%s is for sale.', 'usedkit') : __('%s is saved as a draft.', 'usedkit'), $done->get_name())); ?>
                <a href="<?php echo esc_url(get_edit_post_link($done->get_id())); ?>"><?php esc_html_e('Edit', 'usedkit'); ?></a>
                <?php if ($done->get_status() === 'publish') : ?> &middot; <a href="<?php echo esc_url(get_permalink($done->get_id())); ?>"><?php esc_html_e('View', 'usedkit'); ?></a><?php endif; ?></p></div>
        <?php elseif ($error) : ?>
            <div class="notice notice-error"><p><?php echo esc_html($error); ?></p></div>
        <?php endif; ?>
        <form method="post" enctype="multipart/form-data">
            <?php wp_nonce_field('usedkit_intake'); ?>
            <label for="uk-photos"><?php esc_html_e('Photos', 'usedkit'); ?></label>
            <input id="uk-photos" type="file" name="photos[]" accept="image/*" multiple>
            <label for="uk-title"><?php esc_html_e('Title', 'usedkit'); ?></label>
            <input id="uk-title" type="text" name="title" required list="uk-titles" autocomplete="off" placeholder="<?php esc_attr_e('Make and model', 'usedkit'); ?>">
            <datalist id="uk-titles"><?php foreach ($titles as $t) : ?><option value="<?php echo esc_attr($t); ?>"><?php endforeach; ?></datalist>
            <label class="check"><input type="checkbox" name="copy" value="1" checked> <?php esc_html_e('Copy the description, categories, specs and shipping from the last one of this model', 'usedkit'); ?></label>
            <label for="uk-cat"><?php esc_html_e('Category', 'usedkit'); ?></label>
            <select id="uk-cat" name="cat"><option value=""><?php esc_html_e('As the last one, or none', 'usedkit'); ?></option>
                <?php foreach ((array) $cats as $c) : ?><option value="<?php echo esc_attr($c->term_id); ?>"><?php echo esc_html($c->name); ?></option><?php endforeach; ?></select>
            <?php if (function_exists('usedkit_condition_on') && usedkit_condition_on()) : ?>
                <label for="uk-grade"><?php esc_html_e('Condition', 'usedkit'); ?></label>
                <select id="uk-grade" name="grade"><option value=""><?php esc_html_e('Not graded', 'usedkit'); ?></option>
                    <?php foreach (usedkit_grades() as $k => $name) : ?><option value="<?php echo esc_attr($k); ?>"><?php echo esc_html($name); ?></option><?php endforeach; ?></select>
                <label for="uk-note"><?php esc_html_e('Condition note', 'usedkit'); ?></label>
                <textarea id="uk-note" name="note" rows="2"></textarea>
                <label for="uk-incl"><?php esc_html_e('Included', 'usedkit'); ?></label>
                <input id="uk-incl" type="text" name="included" placeholder="<?php esc_attr_e('Box, charger, manual', 'usedkit'); ?>">
            <?php endif; ?>
            <div class="row">
                <div><label for="uk-cost"><?php esc_html_e('Purchase price', 'usedkit'); ?></label>
                    <input id="uk-cost" type="number" name="cost" min="0" step="0.01" inputmode="decimal"></div>
                <div><label for="uk-price"><?php esc_html_e('Price', 'usedkit'); ?></label>
                    <input id="uk-price" type="number" name="price" min="0" step="0.01" inputmode="decimal" required></div>
            </div>
            <?php if (function_exists('usedkit_register_on') && usedkit_register_on()) : ?>
                <label for="uk-seller"><?php esc_html_e('Seller', 'usedkit'); ?></label>
                <input id="uk-seller" type="text" name="seller">
                <label for="uk-serial"><?php esc_html_e('Serial number', 'usedkit'); ?></label>
                <input id="uk-serial" type="text" name="serial">
            <?php endif; ?>
            <button class="button button-primary button-hero" name="usedkit_intake" value="publish"><?php esc_html_e('Put on sale', 'usedkit'); ?></button>
            <button class="button button-hero" name="usedkit_intake" value="draft"><?php esc_html_e('Save as draft', 'usedkit'); ?></button>
        </form>
    </div>
    <?php
}

/** Make the product from the posted form; its id, or an error. */
function usedkit_intake_save() {
    // phpcs:disable WordPress.Security.NonceVerification -- checked by the caller
    $title = sanitize_text_field(wp_unslash($_POST['title'] ?? ''));
    $price = wc_format_decimal(sanitize_text_field(wp_unslash($_POST['price'] ?? '')));
    if ($title === '' || $price === '') {
        return new WP_Error('usedkit_intake', __('A title and a price are needed.', 'usedkit'));
    }
    $p = new WC_Product_Simple();
    $p->set_name($title);
    $brands = array();
    if (!empty($_POST['copy']) && ($from = usedkit_intake_source($title))) {
        $brands = usedkit_intake_copy($from, $p);
    }
    if ($cat = absint($_POST['cat'] ?? 0)) {
        $p->set_category_ids(array($cat));
    }
    $p->set_regular_price($price);
    $p->set_manage_stock(true);
    $p->set_stock_quantity(1);
    $p->set_sold_individually(true);
    $p->set_status(sanitize_key(wp_unslash($_POST['usedkit_intake'] ?? '')) === 'publish' && current_user_can('publish_products') ? 'publish' : 'draft');
    $meta = array(
        '_usedkit_cost'           => wc_format_decimal(sanitize_text_field(wp_unslash($_POST['cost'] ?? ''))),
        '_usedkit_condition'      => in_array($_POST['grade'] ?? '', usedkit_grade_keys(), true) ? sanitize_key($_POST['grade']) : '',
        '_usedkit_condition_note' => sanitize_textarea_field(wp_unslash($_POST['note'] ?? '')),
        '_usedkit_included'       => sanitize_text_field(wp_unslash($_POST['included'] ?? '')),
        '_usedkit_seller'         => sanitize_text_field(wp_unslash($_POST['seller'] ?? '')),
        '_usedkit_serial'         => sanitize_text_field(wp_unslash($_POST['serial'] ?? '')),
    );
    foreach ($meta as $key => $value) {
        if ($value !== '') {
            $p->update_meta_data($key, $value);
        }
    }
    if ($meta['_usedkit_cost'] !== '' || $meta['_usedkit_seller'] !== '') {
        $p->update_meta_data('_usedkit_bought', current_time('Y-m-d'));
    }
    $id = $p->save();
    if ($brands) {
        wp_set_object_terms($id, $brands, 'product_brand');
    }
    // The photos: the first is the product image, the rest its gallery.
    $images = usedkit_intake_photos($id);
    if ($images) {
        $p = wc_get_product($id);
        $p->set_image_id(array_shift($images));
        $p->set_gallery_image_ids($images);
        $p->save();
    }
    // phpcs:enable
    return $id;
}

/** Upload the posted photos to the media library, attached to the product. */
function usedkit_intake_photos($product_id) {
    if (empty($_FILES['photos']['name']) || !is_array($_FILES['photos']['name'])) { // phpcs:ignore WordPress.Security.NonceVerification
        return array();
    }
    require_once ABSPATH . 'wp-admin/includes/file.php';
    require_once ABSPATH . 'wp-admin/includes/media.php';
    require_once ABSPATH . 'wp-admin/includes/image.php';
    $files = $_FILES['photos']; // phpcs:ignore WordPress.Security.NonceVerification, WordPress.Security.ValidatedSanitizedInput -- handed to media_handle_upload, which validates
    $ids = array();
    foreach (array_keys($files['name']) as $i) {
        if ((int) $files['error'][$i] !== UPLOAD_ERR_OK) {
            continue;
        }
        $_FILES['usedkit_photo'] = array('name' => $files['name'][$i], 'type' => $files['type'][$i],
                                         'tmp_name' => $files['tmp_name'][$i], 'error' => $files['error'][$i], 'size' => $files['size'][$i]);
        $id = media_handle_upload('usedkit_photo', $product_id);
        if (!is_wp_error($id)) {
            $ids[] = $id;
        }
    }
    unset($_FILES['usedkit_photo']);
    return $ids;
}