/*
Copyright (C) 2005-2012, by the President and Fellows of Harvard College.
Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at
http://www.apache.org/licenses/LICENSE-2.0
Unless required by applicable law or agreed to in writing, software
distributed under the License is distributed on an "AS IS" BASIS,
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
See the License for the specific language governing permissions and
limitations under the License.
Dataverse Network - A web application to share, preserve and analyze research data.
Developed at the Institute for Quantitative Social Science, Harvard University.
Version 3.0.
*/
/*
* AnalysisApplicationBean.java
*
* Created on October 16, 2006, 11:16 PM
*/
package edu.harvard.iq.dvn.core.web.subsetting;
import edu.harvard.iq.dvn.ingest.dsb.AdvancedStatGUIdata;
// Commenting out: -- a VWP component. - L.A.
//import com.sun.rave.web.ui.appbase.AbstractApplicationBean;
import javax.faces.FacesException;
import edu.harvard.iq.dvn.ingest.dsb.DSBWrapper;
import javax.xml.bind.*;
import java.util.*;
import java.util.logging.*;
import static java.lang.System.*;
import java.io.StringReader;
// for BigInteger 2 int
import java.math.*;
import java.io.IOException;
// zelig-config class
import edu.harvard.iq.dvn.ingest.dsb.zelig.*;
// zelig-menu option
import javax.faces.model.SelectItem;
import javax.faces.model.SelectItemGroup;
import edu.harvard.iq.dvn.ingest.dsb.*;
import edu.harvard.iq.dvn.ingest.dsb.impl.*;
import edu.harvard.iq.dvn.core.web.common.*;
/**
* <p>Application scope data bean for your application. Create properties
* here to represent cached data that should be made available to all users
* and pages in the application.</p>
*
* <p>An instance of this class will be created for you automatically,
* the first time your application evaluates a value binding expression
* or method binding expression that references a managed bean using
* this class.</p>
*/
public class AnalysisApplicationBean extends VDCBaseBean
implements java.io.Serializable {
// <editor-fold defaultstate="collapsed" desc="field Definition">
/** Sets the logger (use the package name) */
private static Logger dbgLog =
Logger.getLogger(AnalysisApplicationBean.class.getPackage().getName());
private int __placeholder;
protected static Zelig zlg;
protected static Zelig zlgxtb;
protected AdvancedStatGUIdata guiSpec;
protected Map<String, AdvancedStatGUIdata.Model> specMap;
protected List<SelectItem> modelMenuOptions;
// </editor-fold>
/**
* <p>Construct a new application data bean instance.</p>
*/
public AnalysisApplicationBean() {
init();
}
/**
* <p>This method is called when this bean is initially added to
* application scope. Typically, this occurs as a result of evaluating
* a value binding or method binding expression, which utilizes the
* managed bean facility to instantiate this bean and store it into
* application scope.</p>
*
* <p>You may customize this method to initialize and cache application wide
* data values (such as the lists of valid options for dropdown list
* components), or to allocate resources that are required for the
* lifetime of the application.</p>
*/
public Map<String, AdvancedStatGUIdata.Model> getSpecMap() {
return this.specMap;
}
public List<SelectItem> getModelMenuOptions() {
return this.modelMenuOptions;
}
public void init() {
/*
add the zelig-specific initialization code
*/
try {
// create a JAXBContext capable of handling classes generated into
// the r.zelig package
JAXBContext jc = JAXBContext.newInstance("edu.harvard.iq.dvn.ingest.dsb.zelig");
// create an Unmarshaller
Unmarshaller u = jc.createUnmarshaller();
//DSBWrapper dsb = new DSBWrapper();
// String zeligConfig = dsb. getZeligConfig();
// log("zeligconfig:\n"+zeligConfig);
//zlg = (Zelig)u.unmarshal( new StringReader(dsb. getZeligConfig()) );
//zlg = (Zelig)u.unmarshal( new FileInputStream( "configZeligGUI.xml" ) );
DvnRDataAnalysisServiceImpl das = new DvnRDataAnalysisServiceImpl();
zlg = (Zelig) u.unmarshal(new StringReader(das.getGUIconfigData()));
} catch (JAXBException je) {
je.printStackTrace();
}
guiSpec = new AdvancedStatGUIdata(zlg.getModel());
specMap = guiSpec.getModelId2SpecMap();
dbgLog.finer("specMap: " + specMap + "\n");
Set kyzlg = specMap.keySet();
dbgLog.fine("entry keys of zelig=" + kyzlg);
// x-tab and other non-zelig options
// currently x-tab only
// this part might be done by properties or resourcebundle or pref
StringBuilder sbxtb = new StringBuilder(
"<?xml version='1.0' encoding='UTF-8'?>" +
"<zelig xmlns='http://gking.harvard.edu/zelig' " +
"xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' " +
"xsi:schemaLocation='http://gking.harvard.edu/zelig " +
"http://vdc-hmdc.harvard.edu/VDC/Schema/analysis/ZeligInterfaceDefinition.xsd'>" +
"<model name='xtb' label='Categorical Data Analysis'>" +
"<description>Cross-Tabulation</description>" +
"<helpLink url=''/><packageDependency name='stats' version= '0.1'/>" +
"<formula minEquations='1' maxEquations='1' simulEq='0'>" +
"<equation name='mu'><outcome minVar='2' label='Classification'>" +
"<modelingType>discrete</modelingType><modelingType>nominal</modelingType>" +
"<modelingType>ordinal</modelingType><modelingType>binary</modelingType></outcome>" +
"<outcome maxVar='1' minVar='0' label='Frequency'>" +
"<modelingType>discrete</modelingType></outcome>" +
"</equation></formula><setx maxSetx='0'/></model></zelig>");
String configXtabGUI = sbxtb.toString();
dbgLog.fine("config Xtab:\n" + configXtabGUI + "\n");
try {
// create a JAXBContext
JAXBContext jc = JAXBContext.newInstance("edu.harvard.iq.dvn.ingest.dsb.zelig");
// create an Unmarshaller
Unmarshaller u = jc.createUnmarshaller();
zlgxtb = (Zelig) u.unmarshal(new StringReader(configXtabGUI));
} catch (JAXBException je) {
je.printStackTrace();
}
AdvancedStatGUIdata xtbSpec = new AdvancedStatGUIdata(zlgxtb.getModel());
Map<String, AdvancedStatGUIdata.Model> specMapXtb = xtbSpec.getModelId2SpecMap();
dbgLog.fine("specMapXtb: " + specMapXtb + "\n");
Set kyxtb = specMapXtb.keySet();
dbgLog.fine("entry keys of xtb=" + kyxtb);
// add xtab to the map by category
Set kyXtb = specMapXtb.entrySet();
for (Iterator it = kyXtb.iterator(); it.hasNext();) {
Map.Entry et = (Map.Entry) it.next();
dbgLog.fine("xtab key=" + et.getKey() + "\n=" + et.getValue());
specMap.put((String) et.getKey(), (AdvancedStatGUIdata.Model) et.getValue());
}
dbgLog.fine("new specMapXtb:\n" + specMapXtb);
dbgLog.fine("entry keys of zelig(after update)=" + kyzlg);
// add xtab to the map by mdlName
Map<String, List> tmpId = guiSpec.getModelCategoryId();
dbgLog.fine("tmpId(before update)\n" + tmpId);
Map<String, List> tmpIdxtb = xtbSpec.getModelCategoryId();
Set kyTmpIdxtb = tmpIdxtb.entrySet();
for (Iterator it = kyTmpIdxtb.iterator(); it.hasNext();) {
Map.Entry et = (Map.Entry) it.next();
dbgLog.fine("xtab cat key=" + et.getKey() + " value=" + et.getValue());
tmpId.put((String) et.getKey(), (List) et.getValue());
}
dbgLog.fine("\ntmpId(after update)\n" + tmpId);
Set entr = tmpId.entrySet();
dbgLog.fine("How many model categories=" + entr.size());
// object to be used in the subsetting page
modelMenuOptions = new ArrayList<SelectItem>();
modelMenuOptions.add(new SelectItem("Choose a Statistical Model"));
// add xtab option here
// category = Categorical Data Analysis
// title = Cross-Tabulation
// name = xtb
/*
sessionObj.ngc['xtb'] = new guiCntrlr('xtb','xtb','stats','Categorical Data Analysis','',2,2,'','Cross-Tabulation',0);
sessionObj.ngc['xtb'].bxAttr['xtb_BxR1'] = ['D',2,NOVARS,'NOTcontinuous','Classification'];
sessionObj.ngc['xtb'].bxAttr['xtb_BxR2'] = ['D',0,1,'NOTcontinuous','Frequency'];
*/
/*
OptionGroup cdaGrp = new OptionGroup();
cdaGrp.setValue("Categorical Data Analysis");
cdaGrp.setLabel("Categorical Data Analysis");
cdaGrp.setDisabled(false);
cdaGrp.setSelectItems( new SelectItem[] {
new Option("xtb", "Cross-Tabulation") });
modelMenuOptions.add(cdaGrp);
*/
int ii = 0;
for (Iterator it = entr.iterator(); it.hasNext();) {
Map.Entry et = (Map.Entry) it.next();
ii++;
dbgLog.fine(et.getKey() + "\n=" + et.getValue());
SelectItemGroup mdlGrp = new SelectItemGroup();
String sigNo = String.format("%02d", ii);
StringBuilder sb = new StringBuilder("MdlGrp_");
sb.append(sigNo);
String mdlGrpId = sb.toString();
dbgLog.fine("group ID token=" + mdlGrpId + "\n");
List<String> IdSet = (List) et.getValue();
dbgLog.fine("IdSet=" + IdSet + "\n");
// for each Id set
List<SelectItem> tmp = new ArrayList<SelectItem>();
int flcnt = 0;
for (int i = 0; i < IdSet.size(); i++) {
if (specMap.containsKey(IdSet.get(i))) {
tmp.add(
new SelectItem(specMap.get(IdSet.get(i)).getMdlName(),
specMap.get(IdSet.get(i)).getTitle()));
dbgLog.fine(specMap.get(IdSet.get(i)).getMdlName() + "\t" +
specMap.get(IdSet.get(i)).getTitle());
} else {
flcnt++;
}
} // for each model
if (IdSet.size() > flcnt) {
mdlGrp.setValue((String) et.getKey());
mdlGrp.setLabel((String) et.getKey());
mdlGrp.setDisabled(false);
mdlGrp.setSelectItems((SelectItem[]) (tmp.toArray(new SelectItem[tmp.size()])));
modelMenuOptions.add(mdlGrp);
} else {
dbgLog.fine("former" + ii + "-th group was empty and excluded ");
ii--;
}
dbgLog.fine("end of " + ii + "-th group\n\n");
} // for each model-category
dbgLog.fine("\nmodelMenuOptions(size)=" + modelMenuOptions.size() + "\n");
dbgLog.fine("dump of modelMenuOptions[AnalysisApplicationBean]\n" +
modelMenuOptions);
// contents check of modelMenuOptions
// JEE5 tutorila book provides an example that uses an ArrayList
// instead of arrary to hold SelectItemGroups
for (SelectItem sige : modelMenuOptions) {
dbgLog.finer("1st element(label)="+sige.getLabel());
dbgLog.finer("2nd element(desc) ="+sige.getDescription());
}
}
/**
* <p>This method is called when this bean is removed from
* application scope. Typically, this occurs as a result of
* the application being shut down by its owning container.</p>
*
* <p>You may customize this method to clean up resources allocated
* during the execution of the <code>init()</code> method, or
* at any later time during the lifetime of the application.</p>
*/
public void destroy() {
}
/**
* <p>Return an appropriate character encoding based on the
* <code>Locale</code> defined for the current JavaServer Faces
* view. If no more suitable encoding can be found, return
* "UTF-8" as a general purpose default.</p>
*
* <p>The default implementation uses the implementation from
* our superclass, <code>AbstractApplicationBean</code>.</p>
*/
public String getLocaleCharacterEncoding() {
return super.getLocaleCharacterEncoding();
} // TODO - add the creation statement of the zelig-config object
/*
private object_type XXXXXXX;
*/ // TODO - add getter for the above the zelig-config object.
/*
public object_type getXXXXXX () {
return this.XXXXXXX;
}
*/
}