<?php
/**
 * This source file is part of the open source project
 * ExpressionEngine (https://expressionengine.com)
 *
 * @link      https://expressionengine.com/
 * @copyright Copyright (c) 2003-2022, Packet Tide, LLC (https://www.packettide.com)
 * @license   https://expressionengine.com/license Licensed under Apache License, Version 2.0
 */

/**
 * Channel Fields API library
 */
class Api_channel_fields extends Api
{
    public $custom_fields = array();
    public $field_types = array();
    public $ft_paths = array();
    public $settings = array();
    public $native = array();

    public $ee_base_ft = false;
    public $global_settings;

    protected $custom_field_modules;

    public function __construct()
    {
        parent::__construct();

        $this->native = array(
            'field_id', 'site_id',
            'field_name', 'field_label', 'field_instructions',
            'field_type', 'field_list_items', 'field_pre_populate',
            'field_pre_channel_id', 'field_pre_field_id',
            'field_ta_rows', 'field_maxl', 'field_required',
            'field_text_direction', 'field_search', 'field_is_hidden', 'field_is_conditional', 'field_fmt', 'field_show_fmt',
            'field_order'
        );
    }

    /**
     * Set settings
     *
     * @access	public
     */
    public function set_settings($field_id, $settings)
    {
        if (! array_key_exists('field_name', $settings)) {
            $settings['field_name'] = $field_id;
        }

        if (! array_key_exists($settings['field_type'], $this->field_types)) {
            $this->field_types[$settings['field_type']] = $this->include_handler($settings['field_type']);
        }

        $this->settings[$field_id] = $settings;
    }

    /**
     * Get settings
     *
     * @access	public
     */
    public function get_settings($field_id)
    {
        return isset($this->settings[$field_id]) ? $this->settings[$field_id] : array();
    }

    /**
     * Get global settings
     *
     * @access	public
     */
    public function get_global_settings($field_type)
    {
        if (! $this->global_settings) {
            $this->global_settings = array();
            $this->fetch_installed_fieldtypes();
        }

        if (isset($this->global_settings[$field_type])) {
            return $this->global_settings[$field_type];
        }

        return array();
    }

    /**
     * Fetch all fieldtypes
     *
     * @access	public
     */
    public function fetch_all_fieldtypes()
    {
        return $this->_fetch_fts('get_files');
    }

    /**
     * Fetch defined custom fields
     *
     * @access	public
     */
    public function fetch_installed_fieldtypes()
    {
        return $this->_fetch_fts('get_installed');
    }

    /**
     * Fetch fieldtypes
     *
     * Convenience method to reduce code duplication
     *
     * @access	private
     */
    public function _fetch_fts($method)
    {
        if (!isset(ee()->addons)) {
            ee()->load->library('addons');
        }
        $fts = ee()->addons->$method('fieldtypes');

        foreach ($fts as $key => $data) {
            if (($this->field_types[$key] = $this->include_handler($key)) === false) {
                continue;
            }

            if (isset($data['settings'])) {
                $this->global_settings[$key] = unserialize(base64_decode($data['settings']));
            }

            $opts = get_class_vars($data['class']);
            $fts[$key] = array_merge($fts[$key], $opts['info']);
        }

        return $fts;
    }

    /**
     * Fetch defined custom fields
     *
     * @access	public
     */
    public function fetch_custom_channel_fields()
    {
        ee()->db->select('field_id, field_type, field_fmt, field_name, site_id, field_settings');
        $query = ee()->db->get('channel_fields');

        $cfields = array();
        $dfields = array();
        $rfields = array();
        $gfields = array();
        $pfields = array();
        $ffields = array();
        $tfields = array();

        foreach ($query->result_array() as $row) {
            if (! array_key_exists($row['field_type'], $this->field_types)) {
                $this->field_types[$row['field_type']] = $this->include_handler($row['field_type']);
            }

            $this->custom_fields[$row['field_id']] = $row['field_type'];

            if ($row['field_type'] == 'date') {
                $dfields[$row['site_id']][$row['field_name']] = $row['field_id'];
            } elseif ($row['field_type'] == 'relationship') {
                $rfields[$row['site_id']][$row['field_name']] = $row['field_id'];
            } else {
                $field_handler = $this->field_types[$row['field_type']];
                $field_handler = is_object($field_handler) ? get_class($field_handler) : $field_handler;

                // Yay for PHP 4
                $class_vars = get_class_vars($field_handler);

                if (isset($class_vars['has_array_data']) && $class_vars['has_array_data'] === true) {
                    $pfields[$row['site_id']][$row['field_id']] = $row['field_type'];
                }
            }

            if (isset($row['field_settings']) && $row['field_settings'] != '') {
                $settings = unserialize(base64_decode($row['field_settings']));
                $settings['field_type'] = $row['field_type'];
                $settings['field_fmt'] = $row['field_fmt'];
                $settings['field_name'] = $row['field_name'];

                $this->set_settings($row['field_id'], $settings);
            }

            if ($row['field_type'] == 'grid' || $row['field_type'] == 'file_grid') {
                $gfields[$row['site_id']][$row['field_name']] = $row['field_id'];
            } elseif ($row['field_type'] == 'fluid_field') {
                $ffields[$row['site_id']][$row['field_name']] = $row['field_id'];
            } elseif ($row['field_type'] == 'toggle') {
                $tfields[$row['site_id']][$row['field_name']] = $row['field_id'];
            }

            $cfields[$row['site_id']][$row['field_name']] = $row['field_id'];
        }

        return array(
            'custom_channel_fields' => $cfields,
            'date_fields' => $dfields,
            'relationship_fields' => $rfields,
            'grid_fields' => $gfields,
            'pair_custom_fields' => $pfields,
            'fluid_field_fields' => $ffields,
            'toggle_fields' => $tfields,
        );
    }

    /**
     * Include a custom field handler
     *
     * @access	public
     */
    public function include_handler($field_type)
    {
        if (! $this->ee_base_ft) {
            $ee_path = (defined('EE_APPPATH')) ? EE_APPPATH : APPPATH;
            require_once $ee_path . 'fieldtypes/EE_Fieldtype.php';
            $this->ee_base_ft = true;
        }

        if (! isset($this->field_types[$field_type])) {
            $file = 'ft.' . $field_type . '.php';
            $paths = array(PATH_ADDONS . $field_type . '/');

            if (!isset(ee()->addons)) {
                ee()->load->library('addons');
            }

            $fts = ee()->addons->get_files('fieldtypes');

            if (isset($fts[$field_type])) {
                $paths[] = PATH_THIRD . $fts[$field_type]['package'] . '/';
                $paths[] = PATH_ADDONS . $fts[$field_type]['package'] . '/';
            }

            $paths[] = PATH_ADDONS . $field_type . '/';

            $found_path = false;

            foreach ($paths as $path) {
                if (file_exists($path . $file)) {
                    $found_path = true;

                    break;
                }
            }

            if (! $found_path) {
                show_error(sprintf(
                    ee()->lang->line('unable_to_load_field_type'),
                    strtolower($file)
                ));
            }

            if (INSTALLER && strpos($path, PATH_THIRD) !== false) {
                return false;
            }

            require_once $path . $file;

            $this->ft_paths[$field_type] = $path;
            $this->field_types[$field_type] = ucfirst($field_type . '_ft');
        }

        return $this->field_types[$field_type];
    }

    /**
     * Setup or re-initialize fieldtype handler
     *
     * @access	public
     */
    public function setup_handler($field_type, $return_obj = false)
    {
        $field_id = false;
        $frontend = false;

        // Quite frequently all you have convenient access to
        // is a field_id. We can do a lookup based on some of the
        // other data we have.

        if (isset($this->custom_fields[$field_type])) {
            $frontend = true;
            $field_id = $field_type;
            $field_type = $this->custom_fields[$field_type];
        } elseif (isset($this->settings[$field_type])) {
            $field_id = $field_type;
            $field_type = $this->settings[$field_id]['field_type'];
        }

        // Now that we know that we're definitely working
        // with a field_type name. Look for it.
        if (! isset($this->field_types[$field_type]) or
            $this->field_types[$field_type] === false) {
            return false;
        }

        // Instantiate it if we haven't used it yet.
        if (! is_object($this->field_types[$field_type])) {
            $this->include_handler($field_type);

            $this->field_types[$field_type] = $this->_instantiate_handler($field_type);
        }

        // If we started with a field_id, but we're not on the frontend
        // (which means fetch_custom_channel_fields didn't get called),
        // we need to make sure we have the proper field name.

        $field_name = false;

        $settings = $this->get_settings($field_id);

        if (isset($settings['field_name'])) {
            $field_name = $settings['field_name'];
        }

        // Merge field settings with the global settings
        $settings = array_merge($this->get_global_settings($field_type), $settings);

        // Initialize fieldtype with settings for this field
        $this->field_types[$field_type]->_init(array(
            'settings' => $settings,
            'field_id' => $field_id,
            'field_name' => $field_name
        ));

        // Remember what we set up so that apply
        // calls go to the right spot
        $this->field_type = $field_type;

        return ($return_obj) ? $this->field_types[$field_type] : true;
    }

    /**
     * Instantiate a fieldtype handler
     *
     * Normally this method does not need to be called, it's here for
     * convenience. Use setup_handler() unless you're 100% sure you
     * need this.
     *
     * @access	private
     */
    public function &_instantiate_handler($field_type)
    {
        $class = $this->field_types[$field_type];
        $_ft_path = $this->ft_paths[$field_type];

        ee()->load->add_package_path($_ft_path);

        $obj = new $class();

        ee()->load->remove_package_path();

        return $obj;
    }

    /**
     * Route the call to the proper handler
     *
     * Doing it this way so we don't have to pass objects around with PHP 4
     * being annoying as it is.
     *
     * Using the name of the identical javascript function, and yes, I like it.
     *
     * @access	public
     */
    public function apply($method, $parameters = array())
    {
        $_ft_path = $this->ft_paths[$this->field_type];

        ee()->load->add_package_path($_ft_path, false);

        $ft = & $this->field_types[$this->field_type];

        if (count($parameters)) {
            $parameters = $this->custom_field_data_hook($ft, $method, $parameters);
        }

        $res = call_user_func_array(array(&$ft, $method), $parameters);

        ee()->load->remove_package_path($_ft_path);

        return $res;
    }

    /**
     * Checks for the method
     *
     *
     * Used as a conditional before calling apply in some modules
     *
     * @access	public
     */
    public function check_method_exists($method)
    {
        $field_type = &$this->field_types[$this->field_type];

        if (method_exists($field_type, $method)) {
            return true;
        }

        return false;
    }

    /**
     * Adds new custom field table fields
     *
     *
     * Add new fields to channel_data on custom field creation
     *
     * @access	public
     * @param	array
     * @return	void
     */
    public function add_datatype($field_id, $data)
    {
        $this->set_datatype($field_id, $data, array(), true);
    }

    /**
     * Delete custom field table fields
     *
     *
     * Deletes fields from channel_data on custom field deletion
     *
     * @access	public
     * @param	array
     * @return	void
     */
    public function delete_datatype($field_id, $data, $overrides = array())
    {
        $defaults = array(
            'id_field' => 'field_id',
            'col_settings_method' => 'settings_modify_column',
            'col_prefix' => 'field',
            'data_table' => 'channel_data'
        );

        foreach ($overrides as $key => $value) {
            $defaults[$key] = $value;
        }

        extract($defaults);

        $id_field_name = $col_prefix . '_id_' . $field_id;
        $ft_field_name = $col_prefix . '_ft_' . $field_id;

        // merge in a few variables to the data array
        $data[$id_field] = $field_id;
        $data['ee_action'] = 'delete';

        $fields = $this->apply($col_settings_method, array($data));

        if (! isset($fields[$id_field_name])) {
            $fields[$id_field_name] = '';
        }

        if (! isset($fields[$ft_field_name]) && $id_field != 'col_id') {
            $fields[$ft_field_name] = '';
        }

        ee()->load->dbforge();
        $delete_fields = array_keys($fields);

        foreach ($delete_fields as $col) {
            ee()->dbforge->drop_column($data_table, $col);
        }
    }

    /**
     * Edit custom field table fields
     *
     *
     * Compares old field data to new field data and adds/modifies exp_channel_data
     * fields as needed
     *
     * @access	public
     * @param	mixed (field_id)
     * @param	string (field_type)
     * @param	array
     * @return	void
     */
    public function edit_datatype($field_id, $field_type, $data, $overrides = array())
    {
        $defaults = array(
            'id_field' => 'field_id',
            'type_field' => 'field_type',
            'col_settings_method' => 'settings_modify_column',
            'col_prefix' => 'field',
            'fields_table' => 'channel_fields',
            'data_table' => 'channel_data'
        );

        foreach ($overrides as $key => $value) {
            $defaults[$key] = $value;
        }

        extract($defaults);

        $id_field_name = $col_prefix . '_id_' . $field_id;
        $ft_field_name = $col_prefix . '_ft_' . $field_id;

        $old_fields = array();

        // First we get the data
        $query = ee()->db->get_where($fields_table, array($id_field => $field_id));

        $this->setup_handler($query->row($type_field));

        // fieldtype changed ?
        $type = ($query->row($type_field) == $field_type) ? 'get_data' : 'delete';

        $old_data = $query->row_array();

        if ($col_settings_method == 'grid_settings_modify_column') {
            $old_data = json_decode($old_data['col_settings'], true);
        }

        // merge in a few variables to the data array
        $old_data[$id_field] = $field_id;
        $old_data['ee_action'] = $type;

        $old_fields = $this->apply($col_settings_method, array($old_data));

        // Switch handler back to the new fieldtype
        $this->setup_handler($field_type);

        if (! isset($old_fields[$id_field_name])) {
            $old_fields[$id_field_name]['type'] = 'text';
            $old_fields[$id_field_name]['null'] = true;
        }

        if (! isset($old_fields[$ft_field_name]) && $id_field != 'col_id') {
            $old_fields[$ft_field_name]['type'] = 'tinytext';
            $old_fields[$ft_field_name]['null'] = true;
        }

        // Delete extra fields
        if ($type == 'delete') {
            ee()->load->dbforge();
            $delete_fields = array_keys($old_fields);

            foreach ($delete_fields as $col) {
                if ($col == $id_field_name or $col == $ft_field_name) {
                    continue;
                }

                ee()->dbforge->drop_column($data_table, $col);
            }
        }

        $type_change = ($type == 'delete') ? true : false;

        $this->set_datatype($field_id, $data, $old_fields, false, $type_change, $overrides);
    }

    /**
     * Set data type
     *
     *
     * Used primarily by add_datatype and edit_datatype to do the actual table manipulation
     * when a custom field is added or edited
     *
     * @access	public
     * @param	mixed (field_id)
     * @param	array (new custom field data)
     * @param	array (old custom field data)
     * @param	bool (TRUE if it is a new field)
     * @param	bool (TRUE if the fieldtype changed)
     * @return	void
     */
    public function set_datatype($field_id, $data, $old_fields = array(), $new = true, $type_change = false, $overrides = array())
    {
        $defaults = array(
            'id_field' => 'field_id',
            'col_settings_method' => 'settings_modify_column',
            'col_prefix' => 'field',
            'data_table' => 'channel_data'
        );

        foreach ($overrides as $key => $value) {
            $defaults[$key] = $value;
        }

        extract($defaults);

        $id_field_name = $col_prefix . '_id_' . $field_id;
        $ft_field_name = $col_prefix . '_ft_' . $field_id;

        ee()->load->dbforge();

        // merge in a few variables to the data array
        $data[$id_field] = $field_id;
        $data['ee_action'] = 'add';

        // We have to get the new fields regardless to check whether they were modified
        $fields = $this->apply($col_settings_method, array($data));

        if (! isset($fields[$id_field_name])) {
            $fields[$id_field_name]['type'] = 'text';
            $fields[$id_field_name]['null'] = true;
        }

        if (! isset($fields[$col_prefix . '_ft_' . $field_id]) && $id_field != 'col_id') {
            $fields[$ft_field_name]['type'] = 'tinytext';
            $fields[$ft_field_name]['null'] = true;
        }

        // Do we need to modify the field_id
        $modify = false;

        if (! $new) {
            $diff1 = array_diff_assoc($old_fields[$id_field_name], $fields[$id_field_name]);
            $diff2 = array_diff_assoc($fields[$id_field_name], $old_fields[$id_field_name]);

            if (! empty($diff1) or ! empty($diff2)) {
                $modify = true;
            }
        }

        // Add any new fields
        if ($type_change == true or $new == true) {
            foreach ($fields as $field => $prefs) {
                if (! $new) {
                    if ($field == $id_field_name or $field == $ft_field_name) {
                        continue;
                    }
                }

                ee()->dbforge->add_column($data_table, array($field => $prefs));

                // Make sure the value is correct, default to empty string
                if ($field == $ft_field_name) {
                    $default_value = $data['field_fmt'];
                } else {
                    $default_value = (isset($prefs['default'])) ? $prefs['default'] : '';
                }

                ee()->db->update(
                    $data_table,
                    array(
                        $field => $default_value
                    )
                );
            }
        }

        // And modify any necessary fields
        if ($modify == true) {
            $mod[$id_field_name] = $fields[$id_field_name];
            $mod[$id_field_name]['name'] = $id_field_name;

            ee()->dbforge->modify_column($data_table, $mod);
        }
    }

    /**
     * Get custom field info from modules
     *
     * @access	public
     */
    public function get_required_fields($channel_id)
    {
        $channel = ee('Model')->get('Channel', $channel_id)->first();
        $required = array('title', 'entry_date');

        if ($channel) {
            foreach ($channel->getAllCustomFields() as $field) {
                if ($field->field_required) {
                    $required[] = $field->field_id;
                }
            }
        }

        return $required;
    }

    /**
     * Get custom field info from modules
     *
     * @access	public
     */
    public function get_module_fields($channel_id, $entry_id = '')
    {
        $tab_modules = $this->get_modules();

        $set = [];

        if ($tab_modules == false) {
            return false;
        }

        foreach ($tab_modules as $name) {
            $directory = strtolower($name);
            $class_name = ucfirst($directory) . '_tab';

            $mod_base_path = $this->_include_tab_file($directory);

            ee()->load->add_package_path($mod_base_path, false);

            $OBJ = new $class_name();

            if (method_exists($OBJ, 'display') === true) {
                // fetch the content
                $fields = $OBJ->display($channel_id, $entry_id);

                // There's basically no way this *won't* be set, but let's check it anyhow.
                // When we find it, we'll append the module's classname to it to prevent
                // collission with other modules with similarly named fields. This namespacing
                // gets stripped as needed when the module data is processed in get_module_methods()
                // This function is called for insertion and editing of entries.

                foreach ($fields as $key => $field) {
                    if (isset($field['field_id'])) {
                        $fields[$key]['field_id'] = $name . '__' . $field['field_id']; // two underscores
                    }
                }

                $set[$name] = $fields;
            }

            // restore our package and view paths
            ee()->load->remove_package_path($mod_base_path);
        }

        return $set;
    }

    /**
     * Get custom field info from modules
     *
     * @access	public
     */
    public function get_module_methods($methods, $params = array())
    {
        $tab_modules = $this->get_modules();

        $set = false;

        if ($tab_modules == false) {
            return false;
        }

        if (! is_array($methods)) {
            $methods = array($methods);
        }

        foreach ($tab_modules as $name) {
            $directory = strtolower($name);
            $class_name = ucfirst($directory) . '_tab';

            $mod_base_path = $this->_include_tab_file($directory);

            ee()->load->add_package_path($mod_base_path, false);

            $OBJ = new $class_name();

            foreach ($methods as $method) {
                // if this data is getting inserted into the database, then we need to ensure we've
                // removed the automagically added classname from the field names
                if (isset($params['publish_data_db']['mod_data'])) {
                    $params['publish_data_db']['mod_data'] = $this->_clean_module_names($params['publish_data_db']['mod_data'], array($name));
                } elseif (isset($params['validate_publish'][0])) {
                    $params['validate_publish'][0] = $this->_clean_module_names($params['validate_publish'][0], array($name));
                }

                if (method_exists($OBJ, $method) === true) {
                    if (! isset($params[$method])) {
                        $params[$method] = '';
                    }

                    // fetch the content
                    if ($method == 'publish_tabs') {
                        $channel_id = $params['publish_tabs'][0];
                        $entry_id = $params['publish_tabs'][1];

                        // fetch the content
                        $fields = $OBJ->publish_tabs($channel_id, $entry_id);

                        $set[$name]['publish_tabs'] = $fields;
                    } else {
                        $set[$name][$method] = $OBJ->$method($params[$method]);
                    }
                }
            }

            // restore our package and view paths
            ee()->load->remove_package_path($mod_base_path);
        }

        return $set;
    }

    /**
     * Include Tab File
     *
     * Loads the tab if it hasn't been used and returns the base path that
     * can then be used to add the correct package paths.
     *
     * @access	public
     */
    public function _include_tab_file($name)
    {
        static $paths = array();

        // Have we encountered this one before?
        if (! isset($paths[$name])) {
            $class_name = ucfirst($name) . '_tab';

            // First or third party?
            foreach (array(PATH_ADDONS, PATH_THIRD) as $tmp_path) {
                if (file_exists($tmp_path . $name . '/tab.' . $name . '.php')) {
                    $paths[$name] = $tmp_path . $name . '/';

                    break;
                }
            }

            // Include file
            if (! class_exists($class_name)) {
                if (! isset($paths[$name])) {
                    show_error(sprintf(ee()->lang->line('unable_to_load_tab'), 'tab.' . $name . '.php'));
                }

                include_once($paths[$name] . 'tab.' . $name . '.php');
            }
        }

        return $paths[$name];
    }

    /**
     * Clean Module Names
     *
     * This function removes the automatically added module classname from its field inputs
     *
     * @access	public
     */
    public function _clean_module_names($array_to_clean = array(), $module_names = array())
    {
        if (empty($module_names)) {
            return $array_to_clean;
        }

        if (isset($array_to_clean['revision_post'])) {
            $array_to_clean['revision_post'] = $this->_clean_module_names($array_to_clean['revision_post'], $module_names);
        }

        foreach ($array_to_clean as $field => $value) {
            // loop through each module name
            foreach ($module_names as $module_name) {
                $module_name .= "__";

                if (strncmp($field, $module_name, strlen($module_name)) == 0) {
                    // new name
                    $cleared_field_name = str_replace($module_name, '', $field); // avoid passing the entire $module_names array for swapping to avoid common naming situations

                    // unset old
                    unset($array_to_clean[$field]);
                    //reset new
                    $array_to_clean[$cleared_field_name] = $value;
                }
            }
        }

        return $array_to_clean;
    }

    public function get_modules()
    {
        if (isset($this->custom_field_modules)) {
            return $this->custom_field_modules;
        }

        // Do we have modules in play
        ee()->load->model('addons_model');
        $custom_field_modules = [];

        $mquery = ee()->addons_model->get_installed_modules(false, true);

        if ($mquery->num_rows() > 0) {
            foreach ($mquery->result_array() as $row) {
                $custom_field_modules[] = $row['module_name'];
            }
        }

        $this->custom_field_modules = $custom_field_modules;

        return $custom_field_modules;
    }

    public function setup_entry_settings($channel_id, $entry_data, $bookmarklet = false)
    {
        // Let's grab our channel data- note should be cached if already called via api
        ee()->legacy_api->instantiate('channel_structure');

        $channel_query = ee()->api_channel_structure->get_channel_info($channel_id);

        if ($channel_query->num_rows() == 0) {
            // bad return false?
        }

        $channel_data = $channel_query->row_array();

        // We start by setting our default fields

        $title = (isset($entry_data['title'])) ? $entry_data['title'] : '';

        if ($channel_data['default_entry_title'] != '' && $title == '') {
            $title = $channel_data['default_entry_title'];
        }

        $url_title = (isset($entry_data['url_title'])) ? $entry_data['url_title'] : '';

        $deft_fields = array(
            'title' => array(
                'field_id' => 'title',
                'field_label' => lang('title'),
                'field_required' => 'y',
                'field_data' => $title,
                'field_show_fmt' => 'n',
                'field_instructions' => '',
                'field_text_direction' => 'ltr',
                'field_type' => 'text',
                'field_maxl' => 100
            ),
            'url_title' => array(
                'field_id' => 'url_title',
                'field_label' => lang('url_title'),
                'field_required' => 'n',
                'field_data' => $url_title,
                'field_fmt' => 'xhtml',
                'field_instructions' => '',
                'field_show_fmt' => 'n',
                'field_text_direction' => 'ltr',
                'field_type' => 'text',
                'field_maxl' => URL_TITLE_MAX_LENGTH
            ),
            'entry_date' => array(
                'field_id' => 'entry_date',
                'field_label' => lang('entry_date'),
                'field_required' => 'y',
                'field_type' => 'date',
                'field_text_direction' => 'ltr',
                'field_data' => (isset($entry_data['entry_date'])) ? $entry_data['entry_date'] : '',
                'field_fmt' => 'text',
                'field_instructions' => '',
                'field_show_fmt' => 'n',
                'always_show_date' => 'y',
                'default_offset' => 0,
                'selected' => 'y',
            ),
            'expiration_date' => array(
                'field_id' => 'expiration_date',
                'field_label' => lang('expiration_date'),
                'field_required' => 'n',
                'field_type' => 'date',
                'field_text_direction' => 'ltr',
                'field_data' => (isset($entry_data['expiration_date'])) ? $entry_data['expiration_date'] : '',
                'field_fmt' => 'text',
                'field_instructions' => '',
                'field_show_fmt' => 'n',
                'default_offset' => 0,
                'selected' => 'y',
            )
        );

        // comment expiry here.
        $deft_fields['comment_expiration_date'] = array(
            'field_id' => 'comment_expiration_date',
            'field_label' => lang('comment_expiration_date'),
            'field_required' => 'n',
            'field_type' => 'date',
            'field_text_direction' => 'ltr',
            'field_data' => (isset($entry_data['comment_expiration_date'])) ? $entry_data['comment_expiration_date'] : '',
            'field_fmt' => 'text',
            'field_instructions' => '',
            'field_show_fmt' => 'n',
            'default_offset' => $channel_data['comment_expiration'] * 86400,
            'selected' => 'y',
        );

        foreach ($deft_fields as $field_name => $f_data) {
            $this->set_settings($field_name, $f_data);
        }

        // Now we set our custom fields

        // Get Channel fields in the field group
        $channel = ee('Model')->get('Channel', $channel_id)->first();
        $channel_fields = $channel->getAllCustomFields();

        $field_settings = array();

        foreach ($channel_fields as $field) {
            $row = $field->getValues();

            $field_fmt = $row['field_fmt'];
            $field_dt = '';
            $field_data = '';

            if ($bookmarklet) {
                // Bookmarklet data perhaps?
                if (($field_data = ee()->input->get('field_id_' . $row['field_id'])) !== false) {
                    $field_data = ee()->functions->bm_qstr_decode(ee()->input->get('tb_url') . "\n\n" . $field_data);
                }
            } else {
                $field_data = (isset($entry_data['field_id_' . $row['field_id']])) ? $entry_data['field_id_' . $row['field_id']] : $field_data;
                $field_dt = (isset($entry_data['field_dt_' . $row['field_id']])) ? $entry_data['field_dt_' . $row['field_id']] : 'y';
                $field_fmt = (isset($entry_data['field_ft_' . $row['field_id']])) ? $entry_data['field_ft_' . $row['field_id']] : $field_fmt;
            }

            $settings = array(
                'field_instructions' => trim($row['field_instructions']),
                'field_text_direction' => ($row['field_text_direction'] == 'rtl') ? 'rtl' : 'ltr',
                'field_fmt' => $field_fmt,
                'field_dt' => $field_dt,
                'field_data' => $field_data,
                'field_name' => 'field_id_' . $row['field_id'],
            );

            $ft_settings = array();
            if (isset($row['field_settings']) && is_string($row['field_settings'])) {
                $ft_settings = unserialize(base64_decode($row['field_settings']));
            }

            $settings = array_merge($row, $settings, $ft_settings);
            ee()->api_channel_fields->set_settings($row['field_id'], $settings);

            $field_settings[$settings['field_name']] = $settings;
        }

        // Merge the default and custom fields

        return array_merge($deft_fields, $field_settings);
    }

    /**
     * update/add field
     *
     * omit field_id in $field_data to create a new field
     *
     * @param array $field_data the field settings;
     *                          uses the following keys: group_id, site_id, field_name, field_label, field_type, field_order,
     *                          and also fieldtype-specific settings, e.g. text_field_text_direction.
     *                          works in concert with data submitted using Api_channel_fields::field_edit_vars()
     *
     * @return int|string|FALSE the field_id or FALSE if the process failed
     */
    public function update_field(array $field_data)
    {
        $this->errors = array();

        ee()->load->helper('array');

        if (! isset($field_data['group_id'])) {
            $this->_set_error('unauthorized_access');

            return false;
        }

        ee()->lang->loadfile('admin_content');

        // If the $field_id variable has data we are editing an
        // existing group, otherwise we are creating a new one

        $edit = (! isset($field_data['field_id']) or $field_data['field_id'] == '') ? false : true;

        // We need this as a variable as we'll unset the array index

        $group_id = element('group_id', $field_data);

        // Check for required fields

        $error = array();
        ee()->load->model('field_model');

        // little check in case they switched sites in MSM after leaving a window open.
        // otherwise the landing page will be extremely confusing
        if (! isset($field_data['site_id']) or $field_data['site_id'] != ee()->config->item('site_id')) {
            $this->_set_error('site_id_mismatch');
        }

        // Was a field name supplied?
        if ($field_data['field_name'] == '') {
            $this->_set_error('no_field_name');
        }
        // Is the field one of the reserved words?
        elseif (in_array($field_data['field_name'], ee()->cp->invalid_custom_field_names())) {
            $this->_set_error('reserved_word');
        }

        // Was a field label supplied?
        if ($field_data['field_label'] == '') {
            $this->_set_error('no_field_label');
        }

        // Does field name contain invalid characters?
        if (preg_match('/[^a-z0-9\_\-]/i', $field_data['field_name'])) {
            $this->errors[] = lang('invalid_characters') . ': ' . $field_data['field_name'];
        }

        if ($field_data['field_label'] != ee('Security/XSS')->clean($field_data['field_label'])
            or $field_data['field_instructions'] != ee('Security/XSS')->clean($field_data['field_instructions'])) {
            ee()->lang->loadfile('admin');
            $this->errors[] = sprintf(lang('invalid_xss_check'), ee('CP/URL')->make('homepage'));
        }

        // Truncated field name to test against duplicates
        $trunc_field_name = substr(element('field_name', $field_data), 0, 32);

        // Is the field name taken?
        ee()->db->where(array(
            'site_id' => ee()->config->item('site_id'),
            'field_name' => $trunc_field_name,
        ));

        if ($edit == true) {
            ee()->db->where('field_id !=', element('field_id', $field_data));
        }

        if (ee()->db->count_all_results('channel_fields') > 0) {
            if ($trunc_field_name != element('field_name', $field_data)) {
                $this->_set_error('duplicate_truncated_field_name');
            } else {
                $this->_set_error('duplicate_field_name');
            }
        }

        $field_type = $field_data['field_type'];

        // If they are setting a file type, ensure there is at least one upload directory available
        if ($field_type == 'file') {
            ee()->load->model('file_upload_preferences_model');
            $upload_dir_prefs = ee()->file_upload_preferences_model->get_file_upload_preferences();

            // count upload dirs
            if (count($upload_dir_prefs) === 0) {
                ee()->lang->loadfile('filemanager');
                $this->_set_error('please_add_upload');
            }
        }

        // Are there errors to display?

        if ($this->error_count() > 0) {
            return false;
        }

        // Get the fieldtype settings
        $this->fetch_all_fieldtypes();
        $this->setup_handler($field_type);
        $ft_settings = $this->apply('save_settings', array($this->get_posted_field_settings($field_type)));

        // Default display options
        foreach (array('smileys', 'formatting_btns', 'file_selector') as $key) {
            $tmp = $this->_get_ft_data($field_type, 'field_show_' . $key, $field_data);
            $ft_settings['field_show_' . $key] = $tmp ? 'y' : 'n';
        }

        // Now that they've had a chance to mess with the POST array,
        // grab post values for the native fields (and check namespaced fields)
        foreach ($this->native as $key) {
            $native_settings[$key] = $this->_get_ft_data($field_type, $key, $field_data);
        }

        // Set some defaults
        $native_settings['field_list_items'] = ($tmp = $this->_get_ft_data($field_type, 'field_list_items', $field_data)) ? $tmp : '';

        $native_settings['field_text_direction'] = ($native_settings['field_text_direction'] !== false) ? $native_settings['field_text_direction'] : 'ltr';
        $native_settings['field_show_fmt'] = ($native_settings['field_show_fmt'] !== false) ? $native_settings['field_show_fmt'] : 'n';
        $native_settings['field_fmt'] = ($native_settings['field_fmt'] !== false) ? $native_settings['field_fmt'] : 'xhtml';

        if ($native_settings['field_list_items'] != '') {
            // This results in double encoding later on
            //$native_settings['field_list_items'] = quotes_to_entities($native_settings['field_list_items']);
        }

        if ($native_settings['field_pre_populate'] == 'y') {
            $x = explode('_', $this->_get_ft_data($field_type, 'field_pre_populate_id', $field_data));

            $native_settings['field_pre_channel_id'] = $x['0'];
            $native_settings['field_pre_field_id'] = $x['1'];
        }

        // If they returned a native field value as part of their settings instead of changing the post array,
        // we'll merge those changes into our native settings

        foreach ($ft_settings as $key => $val) {
            if (in_array($key, $this->native)) {
                unset($ft_settings[$key]);
                $native_settings[$key] = $val;
            }
        }

        if ($field_data['field_order'] == 0 or $field_data['field_order'] == '') {
            $query = ee()->db->select('MAX(field_order) as max')
                ->where('site_id', ee()->config->item('site_id'))
                ->where('group_id', (int) $group_id)
                ->get('channel_fields');

            $native_settings['field_order'] = (int) $query->row('max') + 1;
        }

        $native_settings['field_settings'] = base64_encode(serialize($ft_settings));

        // Construct the query based on whether we are updating or inserting
        if ($edit === true) {
            if (! is_numeric($native_settings['field_id'])) {
                return false;
            }

            // Update the formatting for all existing entries
            if ($this->_get_ft_data($field_type, 'update_formatting', $field_data) == 'y') {
                ee()->db->update(
                    'channel_data',
                    array('field_ft_' . $native_settings['field_id'] => $native_settings['field_fmt'])
                );
            }

            // Send it over to drop old fields, add new ones, and modify as needed
            $this->edit_datatype(
                $native_settings['field_id'],
                $field_type,
                $native_settings
            );

            unset($native_settings['group_id']);

            ee()->db->where('field_id', $native_settings['field_id']);
            ee()->db->where('group_id', $group_id);
            ee()->db->update('channel_fields', $native_settings);

            // Update saved layouts if necessary
            $collapse = ($native_settings['field_is_hidden'] == 'y') ? true : false;
            $buttons = ($ft_settings['field_show_formatting_btns'] == 'y') ? true : false;

            // Add to any custom layouts
            // First, figure out what channels are associated with this group
            // Then using the list of channels, figure out the layouts associated with those channels
            // Then update each layout individually

            $channels_for_group = ee()->field_model->get_assigned_channels($group_id);

            if ($channels_for_group->num_rows() > 0) {
                ee()->load->model('layout_model');

                foreach ($channels_for_group->result() as $channel) {
                    $channel_ids[] = $channel->channel_id;
                }

                ee()->db->select('layout_id');
                ee()->db->where_in('channel_id', $channel_ids);
                $layouts_for_group = ee()->db->get('layout_publish');

                foreach ($layouts_for_group->result() as $layout) {
                    // Figure out visibility for the field in the layout
                    $layout_settings = ee()->layout_model->get_layout_settings(array('layout_id' => $layout->layout_id), true);

                    $visibility = true;
                    $width = '100%';

                    if (array_key_exists('field_id_' . $native_settings['field_id'], $layout_settings)) {
                        $field_settings = $layout_settings['field_id_' . $native_settings['field_id']];

                        $width = ($field_settings['width'] !== null) ?
                            $field_settings['width'] :
                            $width;

                        $visibility = ($field_settings['visible'] !== null) ?
                            $field_settings['visible'] :
                            $visibility;
                    }

                    $field_info[$native_settings['field_id']] = array(
                        'visible' => $visibility,
                        'collapse' => $collapse,
                        'htmlbuttons' => $buttons,
                        'width' => $width
                    );

                    ee()->layout_model->edit_layout_group_fields($field_info, $layout->layout_id);
                }
            }
        } else {
            if (! $native_settings['field_ta_rows']) {
                $native_settings['field_ta_rows'] = 0;
            }

            // as its new, there will be no field id, unset it to prevent an empty string from attempting to pass
            unset($native_settings['field_id']);

            ee()->db->insert('channel_fields', $native_settings);

            $insert_id = ee()->db->insert_id();
            $native_settings['field_id'] = $insert_id;

            $this->add_datatype(
                $insert_id,
                $native_settings
            );

            $collapse = ($native_settings['field_is_hidden'] == 'y') ? true : false;
            $buttons = ($ft_settings['field_show_formatting_btns'] == 'y') ? true : false;

            $field_info['publish'][$insert_id] = array(
                'visible' => 'true',
                'collapse' => $collapse,
                'htmlbuttons' => $buttons,
                'width' => '100%'
            );

            // Add to any custom layouts
            $query = ee()->field_model->get_assigned_channels($group_id);

            if ($query->num_rows() > 0) {
                foreach ($query->result() as $row) {
                    $channel_ids[] = $row->channel_id;
                }

                ee()->load->library('layout');
                ee()->layout->add_layout_fields($field_info, $channel_ids);
            }
        }

        $_final_settings = array_merge($native_settings, $ft_settings);
        unset($_final_settings['field_settings']);

        $this->set_settings($native_settings['field_id'], $_final_settings);
        $this->setup_handler($native_settings['field_id']);
        $this->apply('post_save_settings', array($_final_settings));

        ee()->functions->clear_caching('all', '');

        return $native_settings['field_id'];
    }

    /**
     * Creates an array of field settings to pass to a fieldtype's validate_settings
     * and save_settings methods
     *
     * @return mixed the fieldtype setting requested
     */
    public function get_posted_field_settings($field_type)
    {
        $keys = array_merge(
            $this->native,
            preg_grep('/^' . $field_type . '_.*/', array_keys($_POST))
        );

        $posted = array();
        foreach ($keys as $key) {
            if (isset($_POST[$key])) {
                $posted[$key] = $_POST[$key];
            }
        }

        return $posted;
    }

    /**
     * A utility to get fieldtype-specific settings from the $field_data array
     * supplied by Api_channel_fields::update_field()
     *
     * @param string $field_type the name of the field_type, e.g. text or select
     * @param string $key the key of the setting to retrieve, e.g. field_text_direction
     * @param array $field_data the full array of settings provided by the update_field() method
     *
     * @return mixed the fieldtype setting requested
     */
    protected function _get_ft_data($field_type, $key, $field_data)
    {
        if (isset($field_data[$key])) {
            return $field_data[$key];
        }

        $key = $field_type . '_' . $key;

        return (isset($field_data[$key])) ? $field_data[$key] : false;
    }

    /**
     * Gets field pair template tags for a specified field name in specified
     * tag data with an optional prefix
     *
     * @param	string	Tag data
     * @param	string	Field name to get variables for
     * @param	string	Optional tag prefix, i.e. for Relationships or Grid
     * @return	array	Structured tag pair template tags
     */
    public function get_pair_field($tagdata, $field_name, $prefix = '')
    {
        //in complex cases, Pro edit link might sneak into tagdata. It's causing regex issues, remove it.
        $tagdata = str_replace('{' . $field_name . ':frontedit}', '', $tagdata);
        $pfield_chunk = array();
        $offset = 0;
        $field_name = $prefix . $field_name;
        $end = strpos($tagdata, LD . '/' . $field_name, $offset);

        while ($end !== false) {
            // This hurts soo much. Using custom fields as pair and single vars in the same
            // channel tags could lead to something like this: {field}...{field}inner{/field}
            // There's no efficient regex to match this case, so we'll find the last nested
            // opening tag and re-cut the chunk.

            $modifier = '';

            if (preg_match("/" . LD . "{$field_name}((?::\S+)?)(\s.*?)?" . RD . "(.*?)" . LD . '\/' . "{$field_name}\\1" . RD . "/s", $tagdata, $matches, 0, $offset)) {
                $chunk = $matches[0];
                $modifier = $matches[1];
                $params = $matches[2];
                $content = $matches[3];

                // We might've sandwiched a single tag - no good, check again (:sigh:)
                if ((strpos($chunk, LD . $field_name . $modifier, 1) !== false) && preg_match_all("/" . LD . "{$field_name}{$modifier}(\s.*?)?" . RD . "/s", $chunk, $match)) {
                    // Let's start at the end
                    $idx = count($match[0]) - 1;
                    $tag = $match[0][$idx];

                    // Reassign the parameter
                    $params = $match[1][$idx];

                    // Cut the chunk at the last opening tag
                    $chunk_offset = strrpos($chunk, $tag);
                    $chunk = substr($chunk, $chunk_offset);
                    $chunk = strstr($chunk, LD . $field_name);
                    $content = substr($chunk, strlen($tag), -strlen(LD . '/' . $field_name . $modifier . RD));
                }

                $params = ee('Variables/Parser')->parseTagParameters($params);
                $params = $params ? $params : array();

                $chunk_array = array(
                    ltrim($modifier, ':'),
                    $content,
                    $params,
                    $chunk
                );

                $pfield_chunk[] = $chunk_array;
            }

            $end = strpos($tagdata, LD . '/' . $field_name . $modifier . RD, $offset);
            $offset = (int) $end + 1;
        }

        return $pfield_chunk;
    }

    /**
     * Gets information for a single variable field in a template
     *
     * Deprecated in 4.0.0
     *
     * @see	ExpressionEngine\Service\Template\Variables\LegacyParser::parseVariableProperties()
     */
    public function get_single_field($tag, $prefix = '')
    {
        ee()->load->library('logger');
        ee()->logger->deprecated('4.0', "ee('Variables/Parser')->parseVariableProperties()");

        return ee('Variables/Parser')->parseVariableProperties($tag, $prefix);
    }

    /**
     * Notify any extensions of incoming fieldtype data
     *
     * @param	object	Fieldtype that will be called
     * @param	string	Method that will be called on the fieldtype
     * @param	mixed	Fieldtype parameters
     * @return	mixed	Modified fieldtype data
     */
    public function custom_field_data_hook(EE_Fieldtype $obj, $method, $parameters)
    {
        // -------------------------------------------
        // 'custom_field_modify_data' hook.
        //  - Modify the parameters passed to the fieldtype
        //  - Can be used to modify the fieldtype prior to most fieldtype functions
        //  - Please be careful with that second option.
        //
        if (isset(ee()->extensions) && ee()->extensions->active_hook('custom_field_modify_data') === true) {
            return ee()->extensions->call('custom_field_modify_data', $obj, $method, $parameters);
        }
        //
        // -------------------------------------------

        return $parameters;
    }
}

// END Api_channel_fields class

// EOF
