package  com.forward.ejb.main.parametersLayout;

 import  java.sql.*;
 import  java.util.*;

 import  javax.ejb.*;

 import  com.forward.db.cover.*;
 import  com.forward.ejb.main.parameters.*;
 import  com.forward.system.*;
 import  org.apache.log4j.*;
 import  org.json.*;

/**
 * <p>Title: Forward 1.38 EE 4</p>
 *
 * <p>Description: Биллинговая система</p>
 *
 * <p>Copyright: © 2006—2007, Forward Telecom</p>
 *
 * <p>Company: Forward Telecom</p>
 *
 * <p>
 * Бин для управления разметкой параметров — сохранение и загрузка настроек в БД.
 *
 * <p>
 * <b>Принцип хранения разметки</b>:
 * <ul>
 *   <li>Таблицы могут быть вложены друг в друга (с теоретически неограниченным уровнем вложенности)
 *   <li>У каждой таблицы есть набор ячеек, которых также сохраняются
 *   <li>В каждой ячейке может быть помещена как новая таблица, так и параметр
 *   <li>Для хранения подобных вложенных настроек используется древовидная структура
 *   <li>Для хранение свойств каждого объекта использует текст в JSON-совместимом формате (это
 * позволит гибко менять свойства объектов, не переписывая код)
 * </ul>
 *
 * <p>
 * JSON-совместимый формат — запись вида
 * <pre>
 * {"borders":true,"rows":1,"header":false,"cellAlign":"left","tableWidth":"100%","headerName":"",
 * "columns":2,"tableClass":"table-form"}
 * </pre>
 * Состоит из наборов "код":значение, разделенный запятой
 *
 * <p>
 * <b>Описание формата хранения данных</b>:
 * <table width="100%">
 * <tr bgcolor="#ccccff">
 *   <th>Название поля
 *   <th>Тип
 *   <th>Описание
 *
 * <tr>
 *   <td>ID_OBJECT
 *   <td>varchar(255)
 *   <td>Идентификатор объекта. В зависимости от типа (поле TYPE) имеет следующий вид:
 * <ul>
 *   <li>Для таблицы выглядит как tableid@4151015 (где 4151015 — некий уникальный код)
 *   <li>Для ячейки выглядит как id@5421018 (где 5421018 — некий уникальный код)
 *   <li>Для параметра выглядит как 1015 (1015 — код данного параметра из таблицы <code>CII_SYSOBJECT_PARAM</code>)
 * </ul>
 *
 * <tr bgcolor="#eeeeff">
 *   <td>ID_PARENT
 *   <td>varchar(255)
 *   <td>Ссылка на родительский код (имеет ровно тот же вид, что и ID_OBJECT). Если это запись относится к таблице
 * или параметру, то ссылка может быть только на ячейку; если к ячейку — то ссылка на таблицу, которой принадлежит
 * эта ячейка.
 *
 * <tr>
 *   <td>PROPERTIES
 *   <td>varchar(1024)
 *   <td>Свойства объекта. В этом поле данные записываются в JSON-совместимом формате.
 * В зависимости от типа (поле TYPE) имеют следующие параметры:<br>
 *   <b>Для таблицы:</b>
 *   <table width="100%">
 *   <tr bgcolor="#ccccff">
 *     <th>Название
 *     <th>Описание
 *   <tr>
 *     <td>borders
 *     <td>true или false — наличие или отсутствие границы
 *   <tr bgcolor="#eeeeff">
 *     <td>rows
 *     <td>1 — количество строк
 *   <tr>
 *     <td>columns
 *     <td>2 — количество столбцов
 *   <tr bgcolor="#eeeeff">
 *     <td>header
 *     <td>true или false — наличие или отсутствие заголовка
 *   <tr>
 *     <td>headerName
 *     <td>текст заголовка; если header:false, то значение будет пустым
 *   <tr bgcolor="#eeeeff">
 *     <td>tableWidth
 *     <td>100% или пустое значение — максимальная или минимальная ширина
 *   <tr>
 *     <td>tableClass
 *     <td>CSS-класс отображения, по-умолчанию имеет значение table-form
 *   </table>
 *   <br>
 *   <b>Для ячейки:</b>
 *   <table width="100%">
 *   <tr bgcolor="#ccccff">
 *     <th>Название
 *     <th>Описание
 *   <tr>
 *     <td>align
 *     <td>center, left или right — выравнивание данных в ячейке по-центру, по левому или по правому краю
 *   </table>
 *   <br>
 *   <b>Для параметра:</b>
 *   <table width="100%">
 *   <tr bgcolor="#ccccff">
 *     <th>Название
 *     <th>Описание
 *   <tr>
 *     <td>styleClass
 *     <td>CSS-стиль отображения, по-умолчанию пуст
 *   <tr bgcolor="#eeeeff">
 *     <td>styleType
 *     <td>S, L или N — стиль отображения (Раздельно, В одной строке слитно, В одной строке c переносом)
 *   </table>
 *
 * <tr bgcolor="#eeeeff">
 *   <td>ID_SYSOBJECT
 *   <td>numeric(10)
 *   <td>Код sysobject — ссылка на системный объект, настройки которого сохранены в строке
 *
 * <tr>
 *   <td>TYPE
 *   <td>char
 *   <td>Тип сохраняемой в строке сущности. T, C, P — таблица, ячейка или параметр.
 *
 * <tr bgcolor="#eeeeff">
 *   <td>N_ORDER
 *   <td>numeric(10)
 *   <td>Порядковый номер в списке отображения одного уровня
 *
 * </table>
 *
 * @author raidan
 * @version 1.0
 */
 public   class  ParametersLayoutBean  implements  SessionBean
{

     private  Category cat = WU.getEJBLogger();

     private  Connection conn =  null ;

    /**
     * Конструктор по-умолчанию
     */
     public  ParametersLayoutBean ()
    {

    }

    /**
     * Конструктор для локальных вызовов с передачей внутрь <code>Connection</code>
     *
     * @param conn Connection
     */
     public  ParametersLayoutBean (Connection conn)
    {
         this .conn = conn;
    }

    SessionContext sessionContext;
     public   void  ejbCreate ()
             throws  CreateException
    {
    }

     public   void  ejbRemove ()
    {
    }

     public   void  ejbActivate ()
    {
    }

     public   void  ejbPassivate ()
    {
    }


     public   void  setSessionContext (SessionContext sessionContext)
    {
         this .sessionContext = sessionContext;
    }

    // Извлекает строку настроек из БД
     private  ParamLayoutDO fetchRow (ResultSet rs)
             throws  SQLException, JSONException
    {
        ParamLayoutDO data =  new  ParamLayoutDO();
        data.setId_sysobject(rs.getString("ID_SYSOBJECT"));
        data.setId(rs.getString("ID_OBJECT"));
        data.setProperties(rs.getString("PROPERTIES"));
        data.setId_parent(rs.getString("ID_PARENT"));
        data.setType(rs.getString("TYPE"));
        data.setOrder(rs.getString("N_ORDER"));

        JSONObject json =  new  JSONObject(data.getProperties());
        json.put("id", data.getId());
        json.put("parentId", data.getId_parent());
        data.setProperties(json.toString());

         return  data;
    }

    // Вызывается при сохранении
    // Управляет наличием параметра parentId в наборе JSON
    // Если parentId задан (это таблица), то подставляем это значение в отдельное поле ParamLayoutDO
     private  ParamLayoutDO processParamByJSON (ParamLayoutDO data)
             throws  JSONException
    {
        JSONObject json =  new  JSONObject(data.getProperties());
        data.setId(json.getString("id"));
        json.remove("id");
         if  (!json.isNull("parentId")) {
            data.setId_parent(json.getString("parentId"));
             if  (data.getId_parent().toLowerCase().equals("motherplace")) {
                data.setId_parent( null );
            }
            json.remove("parentId");
        }
        data.setProperties(json.toString());
         return  data;
    }

    /**
     * Обертка для метода. Загружает разметку без установки значений в параметры sysobject.
     *
     * @param data SystemObjectDO
     * @return SystemObjectDO
     */
     public  SystemObjectDO loadLayout (SystemObjectDO data)
    {
         return  loadLayout(data, false);
    }

    /**
     * Загружает настройки разметки для системного объекта. В <code>data</code> уже должен быть
     * загруженный sysobject.
     *
     * @param data SystemObjectDO
     * @param fillParameters если true, то в каждый параметр sysobject, если для него задана разметка?
     * загружает настройки рендеринга этого параметра; если false — просто загружает настройки
     * @return SystemObjectDO
     */
     public  SystemObjectDO loadLayout (SystemObjectDO data,  boolean  fillParameters)
    {

        Collection result =  new  ArrayList();

         if  (cat.isDebugEnabled()) {
            cat.debug("loading layout for " + data.getId());
        }
         try  {
            DBQuery query =  new  DBQuery(conn, true);
             try  {

                query.prepare(
                        "select ID_SYSOBJECT, ID_OBJECT, ID_PARENT, PROPERTIES, N_ORDER, TYPE " +
                        "from CII_SYSOBJECT_LAYOUT where TYPE = ? order by N_ORDER");
                query.addString( Const .SYSTEM_OBJECTS.LAYOUT_TYPE_CELL);

                // Загружаем список всех ячеек всех таблиц
                ResultSet rs = query.executeQuery();
                Map cellMap =  new  HashMap();
                 while  (rs.next()) {
                    ParamLayoutDO layout = fetchRow(rs);
                    Collection list = (Collection) cellMap.get(layout.getId_parent());
                     if  (list ==  null ) {
                        list =  new  ArrayList();
                        cellMap.put(layout.getId_parent(), list);
                    }
                    list.add(layout);
                }

                // Создаем кэш параметров
                Map parametersMap =  new  HashMap();
                 if  (fillParameters) {
                     for  (Iterator iter = data.getParameters().iterator(); iter.hasNext(); ) {
                        SystemParameterDO param = (SystemParameterDO) iter.next();
                        parametersMap.put(param.getId(), param);
                    }
                }

                // Загружаем все настройки кроме ячеек
                query.prepare(
                        "select ID_SYSOBJECT, ID_OBJECT, ID_PARENT, PROPERTIES, N_ORDER, TYPE " +
                        " from CII_SYSOBJECT_LAYOUT where ID_SYSOBJECT = ? and TYPE <> ? order by TYPE, N_ORDER");
                query.addLongM(data.getId());
                query.addString( Const .SYSTEM_OBJECTS.LAYOUT_TYPE_CELL);
                rs = query.executeQuery();
                 while  (rs.next()) {
                    ParamLayoutDO layout = fetchRow(rs);
                    // Если это таблица — находим ячейки
                     if  (layout.getType().equals( Const .SYSTEM_OBJECTS.LAYOUT_TYPE_TABLE)) {
                        Collection list = (Collection) cellMap.get(layout.getId());
                         if  (list !=  null ) {
                            layout.setCells(list);
                        }
                        data.getLayouts().add(layout);
                    }  else  {
                        // Если задано заполнение параметров — подставляем загруженные properties
                         if  (fillParameters) {
                            SystemParameterDO param = (SystemParameterDO) parametersMap.get(layout.
                                                                                            getId());
                             if  (param !=  null ) {
                                param.setLayoutProperties(layout.getProperties());
                            }
                        }  else  {
                            data.getLayouts().add(layout);
                        }
                    }
                }
                 if  (cat.isDebugEnabled()) {
                    cat.debug("Extracted " + result.size() + " records in layout");
                }
            }  finally  {
                query.close();
            }
        }  catch  (Exception sql) {
             throw   new  EJBException(sql);
        }
         return  data;
    }

    /**
     * Сохраняем разметку параметров. Вся старая разметка удаляется, новая вставляется.
     *
     * @param data SystemObjectDO
     */
     public   void  saveLayout (SystemObjectDO data)
    {

         if  (cat.isDebugEnabled()) {
            cat.debug("saving layout for " + data.getId());
        }
         try  {
            DBQuery query =  new  DBQuery(conn, true);
             try  {
                query.prepare("delete from CII_SYSOBJECT_LAYOUT where ID_SYSOBJECT = ?");
                query.addLongM(data.getId());
                query.executeUpdate();

                query.prepare(
                        "insert into CII_SYSOBJECT_LAYOUT (ID_SYSOBJECT, ID_OBJECT, ID_PARENT, PROPERTIES, N_ORDER, TYPE)" +
                        "values (?, ?, ?, ?, ?, ?)");

                query.setLongM( 1 , data.getId());

                 for  (Iterator iter = data.getLayouts().iterator(); iter.hasNext(); ) {
                    ParamLayoutDO param = processParamByJSON( (ParamLayoutDO) iter.next());
                     if  (cat.isDebugEnabled()) {
                        cat.debug("saving parameter " + param);
                    }
                    query.setString( 2 , param.getId());
                    query.setString( 3 , param.getId_parent());
                    query.setString( 4 , param.getProperties());
                    query.setInt( 5 , param.getOrder());
                    query.setString( 6 , param.getType());
                    query.executeUpdate();

                     if  (param.getCells().size() >  0 ) {
                         for  (Iterator cells = param.getCells().iterator(); cells.hasNext(); ) {
                            ParamLayoutDO cell = processParamByJSON( (ParamLayoutDO) cells.next());

                            query.setString( 2 , cell.getId());
                            query.setString( 3 , param.getId());
                            query.setString( 4 , cell.getProperties());
                            query.setInt( 5 , cell.getOrder());
                            query.setString( 6 , cell.getType());
                            query.executeUpdate();
                        }
                    }
                }

            }  finally  {
                query.close();
            }
        }  catch  (Exception sql) {
             throw   new  EJBException(sql);
        }
    }

    /**
     * Удаляет всю разметку, относящиеся к текущему sysobject. Вызывается при удалении
     * системного объекта.
     *
     * @param id_sysobject Long
     */
     public   void  removeLayout ( Long  id_sysobject)
    {
         try  {
            DBQuery query =  new  DBQuery(conn, true);
             try  {

                 if  (cat.isDebugEnabled()) {
                    cat.debug(" Deleting layout for system object " + id_sysobject);
                }

                 int  rows =  0 ;

                query.prepare("delete from CII_SYSOBJECT_LAYOUT where ID_SYSOBJECT = ?");
                query.addLongM(id_sysobject);
                rows = query.executeUpdate();

                 if  (cat.isDebugEnabled()) {
                    cat.debug(" Removing CII_SYSOBJECT_LAYOUT : " + rows + " rows");
                }
            }  finally  {
                query.close();
            }
        }  catch  (SQLException sql) {
             throw   new  EJBException(sql);
        }
    }
}