Development-Excel Generation

/*
Copyright (c) 2003 Overhyped Technologies, LLC.

Permission is hereby granted, free of charge, to any person obtaining a copy
of this software and associated documentation files (the "Software"), to deal
in the Software without restriction, including without limitation the rights
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
copies of the Software, and to permit persons to whom the Software is
furnished to do so, subject to the following conditions: The above copyright
notice and this permission notice shall be included in all copies or
substantial portions of the Software.

THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
SOFTWARE. */

package com.overhyped.webobjects;

import com.webobjects.foundation.*;
import com.webobjects.appserver.*;
import com.webobjects.eocontrol.*;
import com.webobjects.eoaccess.*;
import com.webobjects.directtoweb.*;

import java.io.*;
import java.util.Date;

import org.apache.poi.hssf.usermodel.*;

public class OTCPOIArchive extends Object {
 protected D2WContext d2wContext;
 protected EOEnterpriseObject object;
 static String _fileUploadPath = null;

 /** Returns the current D2WContext. */
 public D2WContext d2wContext() {
   return d2wContext;
  }
 /** Sets the current D2WContext. */
 public void setLocalContext(D2WContext d2w) {
   d2wContext = d2w;
  }

 /** Returns the current EOEnterpriseObject. */
 public EOEnterpriseObject object() {
   return object;
  }
 /** Sets the current EOEnterpriseObject. */
 public void setObject(EOEnterpriseObject newEO) {
   object = newEO;
  }

 /** Creates an Excel Spreadsheet using Apache's POI project. If the objectArray
    * is null or empty, this method will fetch all objects from the database for
    * the given entityNameForArchive. If the  entityNameForArchive is null or
    * empty, this method will fetch all entities and iterate over them, while
    * fetching all objects for each entityName. This method will use aKey to set
    * an Integer into the target, allowing for feedback while the calculation is
    * occurring. The resulting file can be found in the /excel/ directory of the
    * WebServer. */
 public String calculate(NSArray objectArray, String entityNameForArchive, String aKey, WOComponent target) {

   try {
     EOEditingContext ec;
     HSSFWorkbook wb;
     NSArray entities;
     java.util.Enumeration entityEnum, attributeEnum, eoEnum;
     int sCount;
     String eName;
     HSSFSheet sheet;
     NSArray attributes;
     short col;
     HSSFRow row;
     String attribute, attribute2, value;
     short r;
     EOEnterpriseObject item;

     // set up the d2wcontext
     if (d2wContext() == null) setLocalContext( new D2WContext(target.session()) );
     // set the task for archive
     d2wContext().setTask("archive");
     // get an EditingContext
     ec = target.session().defaultEditingContext();
     // create a workbook
     wb = new HSSFWorkbook();
     // get the entities
     if ((entityNameForArchive == null) || (entityNameForArchive.length() == 0)) {
       entities = D2WUtils.allEntities();
       objectArray = null; // if there's no entity name, we'd better clear out any objects.
      }
     else {
       entities = new NSArray(EOUtilities.entityNamed(ec,entityNameForArchive));
      }
     // create an enumerator
     entityEnum = entities.objectEnumerator();
     // count the sheets
     sCount = 0;
     // enumerate
     while (entityEnum.hasMoreElements()) {
     // get the next entity
     eName = ((EOEntity)entityEnum.nextElement()).name();
     // set the entity into the D2WContext
     d2wContext().setEntity(EOUtilities.entityNamed(ec, eName));
     // get all objects for this entity
     if ((objectArray == null) || (objectArray.count() == 0)) objectArray = EOUtilities.objectsForEntityNamed(ec, eName);
     // check if there are any objects
     if ((objectArray == null) || (objectArray.count() == 0)) continue;
     // create a worksheet
     sheet = wb.createSheet(displayName());
             // get the propertyKeys for this entity
     attributes = (NSArray) d2wContext().valueForKey("displayPropertyKeys");
     // Label the columns
     attributeEnum = attributes.objectEnumerator();
     // zero out the column count
     col = 0;
             // Create a row and put some cells in it. Rows are 0 based.
             row = sheet.createRow((short)0);
     // iterate the attributes
     while ( attributeEnum.hasMoreElements() ) {
         // get the next attribute
         attribute = (String) attributeEnum.nextElement();
         // set the property into the D2WContext
         d2wContext().setPropertyKey(attribute);
         // insert it at the appropriate column
         // add the cell to the worksheet
                 row.createCell(col).setCellValue(d2wContext().displayNameForProperty());
         // move to the next column
         col++;
      }
     // Insert the Rows
     // make sure we start at row 1, otherwise we'll lose the column headings
     r = 1;
     // set up to iterate the EOs
     eoEnum = objectArray.objectEnumerator();
     // iterate the EOs
     while ( eoEnum.hasMoreElements() ) {
         try {
         // zero out the column count
         col = 0;
         // create a new row
         row = sheet.createRow(r);
         // an EO
         item = (EOEnterpriseObject) eoEnum.nextElement();
         // set it into the D2W page
         setObject(item);
         // set up to iterate the attributes again...
         attributeEnum = attributes.objectEnumerator();
         // iterate the attributes again...
         while ( attributeEnum.hasMoreElements() ) {
             // the attribute
             attribute2 = (String) attributeEnum.nextElement();
             // set the property into the D2WContext
             d2wContext().setPropertyKey(attribute2);
             try {
             // the final value to insert from the current object based on the d2wcontext
             value = currentValue();
             // create the cell for the spreadsheet
             row.createCell(col).setCellValue(value);
              }
             catch (Exception e1) {
             System.err.println(e1);
              }
             // move over a column
             col++;
          }
          }
         catch (Exception e2) {
         System.err.println(e2);
          }
         // move down a row, since there's a new object
         r++;
         target.takeValueForKey(new Integer(r),aKey);
      }
     // add another worksheet to the spreadsheet, since there's another entity
     sCount++;
     // clear out the objectArray, since there's another entity
     objectArray = null;

     // System.out.println("POIArchive: calculate: Completed Archive: " + eName);
      }
     // All sheets and cells added. Now write out the workbook
     String fn = fileUploadPath() + File.separator + "POI" + new NSTimestamp().getTime() + ".xls";
     File file = new File(fn);
         FileOutputStream fileOut = new FileOutputStream(file);
         wb.write(fileOut);
         fileOut.close();

     objectArray = null;
     entityNameForArchive = null;

     System.out.println("POI @ " + fn);
     return fn;
  }
 catch (Exception e) {
     ByteArrayOutputStream baos = new ByteArrayOutputStream();
     e.printStackTrace(new PrintStream(baos));
     System.out.println("POIArchive: archive(): error:" + baos.toString());
     return null;
  }
  }

 /** Returns the current value provided by the d2wContext. Found objects use
    * the d2wContext for timestamp formatting, relationships, etc. If a
    * relationship fo an EOEnterpriseObject is resolved, and no keyForRelationship
    * is found, this method will use the EO's userPresentableDescription. */
 public String currentValue() {
 Object o = null;
 try {
     if (d2wContext().propertyKeyIsKeyPath()) {
     o = NSKeyValueCodingAdditions.Utility.valueForKeyPath(object(), d2wContext().propertyKey());
      } else {
     o = NSKeyValueCoding.DefaultImplementation.valueForKey(object(), d2wContext().propertyKey());
      }
     if ( (o != null) && (o instanceof EOEnterpriseObject) ) {
     o = ((EOEnterpriseObject) o).valueForKey(d2wContext().keyWhenRelationship());
     if ( (o != null) && (o instanceof EOEnterpriseObject) ) {
         try {
         return ((EOEnterpriseObject)o).userPresentableDescription();
          }
         catch (Exception ex) {
         ByteArrayOutputStream baos = new ByteArrayOutputStream();
         ex.printStackTrace(new PrintStream(baos));
         System.out.println("POIArchive: currentValue(): error" + baos.toString());
         return o.toString();
          }
      }
      }
     if ( (o != null) && (o instanceof NSArray) ) {
     /***** ENHANCE ME: could use componentsSeparatedByString along with userPresentableDescription. jpaul. *****/
     int count;
     count = ((NSArray) o).count();
     if (count == 0) return "0";
     return " " + count;
      }
     if ( (o != null) && (o instanceof NSTimestamp) ) {
     NSTimestampFormatter formatter = new NSTimestampFormatter((String) d2wContext().valueForKey(D2WModel.FormatterKey));
     return formatter.format((NSTimestamp) o);
      }
     if ( (o != null) && (o instanceof java.lang.Number) ) {
     NSNumberFormatter formatter;
     String pattern = (String) d2wContext().valueForKey(D2WModel.FormatterKey);
     if ((pattern != null) && (pattern.length() > 0)) {
         formatter = new NSNumberFormatter(pattern);
      }
     else {
         formatter = new NSNumberFormatter();
      }
     return formatter.stringForObjectValue(o);
      }
     if (o != null) return o.toString();
     return "";
  }
 catch (Exception e) {
     return "(Binary Data)";
  }
  }

 /** Returns an EOEnterpriseObject's 'displayNameForEntity', using the d2wContext.
    * If it is not found, the method will check the userInfoDictionary for
    * displayName. If all else fails, it will return the entity's name. */
 public String displayName() {
 String s;

 s = (String) d2wContext().valueForKey("displayNameForEntity");
 if (s == null) {
     s = (String) d2wContext().entity().userInfo().objectForKey("displayName");
     if (s != null) return s;
     return (String) d2wContext().entity().name();
  }
 return s;
  }

     /**
  * Returns the directory where uploaded files will be written to disk.
   */
 public static String fileUploadPath() {
 if (_fileUploadPath == null) {
     String tmpdir = System.getProperty("OTCUploadDirectory");
     if (tmpdir != null) {
     File tmpPath = new File(tmpdir);
     if (tmpPath.exists()) {
         _fileUploadPath = tmpPath.getAbsolutePath();
      }
      }
     if (_fileUploadPath == null) {
     NSLog.err.appendln("FileUpload: 'OTCUploadDirectory' does not exist."
         + " Please launch this application again with the 'OTCUploadDirectory'"
         + " System Property set to a directory to which you have write permission.");
      }
  }
 return _fileUploadPath;
  }
}