/*****************************************************************************
 * 
 * This file is part of Mapnik (c++ mapping toolkit)
 *
 * Copyright (C) 2007 Artem Pavlenko
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 *
 *****************************************************************************/
//$Id$

// mapnik
#include <mapnik/global.hpp>
#include <mapnik/datasource.hpp>
#include <mapnik/envelope.hpp>
#include <mapnik/geometry.hpp>
#include <mapnik/feature.hpp>
#include <mapnik/feature_layer_desc.hpp>
#include <mapnik/wkb.hpp>
#include <mapnik/unicode.hpp>

// boost
#include <boost/iostreams/stream.hpp>
#include <boost/iostreams/device/file.hpp>
#include <boost/iostreams/device/mapped_file.hpp>

// ogr
#include "ogr_index_featureset.hpp"
#include "ogr_converter.hpp"
#include "ogr_index.hpp"
#include "ogr_feature_ptr.hpp"

using std::clog;
using std::endl;

using mapnik::query;
using mapnik::Envelope;
using mapnik::CoordTransform;
using mapnik::Feature;
using mapnik::feature_ptr;
using mapnik::geometry_utils;
using mapnik::transcoder;

using namespace boost::iostreams;


template <typename filterT>
ogr_index_featureset<filterT>::ogr_index_featureset(OGRDataSource & dataset,
                                                    OGRLayer & layer,
                                                    const filterT& filter,
                                                    const std::string& index_file,
                                                    const std::string& encoding,
                                                    const bool multiple_geometries)
   : dataset_(dataset),
     layer_(layer),
     layerdef_(layer.GetLayerDefn()),
     filter_(filter),
     tr_(new transcoder(encoding)),
     fidcolumn_(layer_.GetFIDColumn ()),
     multiple_geometries_(multiple_geometries),
     count_(0)
{
    stream<mapped_file_source> file (index_file);
    if (file)
    {
       ogr_index<filterT,stream<mapped_file_source> >::query(filter,file,ids_);
       file.close();
    }
    std::sort(ids_.begin(),ids_.end());    
    
#ifdef MAPNIK_DEBUG
    std::clog<< "query size=" << ids_.size() << "\n";
#endif

    itr_ = ids_.begin();

    // reset reading            
    layer_.ResetReading();
}

template <typename filterT>
ogr_index_featureset<filterT>::~ogr_index_featureset() {}

template <typename filterT>
feature_ptr ogr_index_featureset<filterT>::next()
{
    if (itr_ != ids_.end())
    {
       int pos = *itr_++;
       layer_.SetNextByIndex (pos);

       ogr_feature_ptr feat (layer_.GetNextFeature());
       if ((*feat) != NULL)
       {
          OGRGeometry* geom=(*feat)->GetGeometryRef();
          if (!geom->IsEmpty())
          {
              feature_ptr feature(new Feature((*feat)->GetFID()));

              ogr_converter::convert_geometry (geom, feature, multiple_geometries_);
              ++count_;

              int fld_count = layerdef_->GetFieldCount();
              for (int i = 0; i < fld_count; i++)
              {
                  OGRFieldDefn* fld = layerdef_->GetFieldDefn (i);
                  OGRFieldType type_oid = fld->GetType ();
                  std::string fld_name = fld->GetNameRef ();

                  switch (type_oid)
                  {
                   case OFTInteger:
                   {
                       boost::put(*feature,fld_name,(*feat)->GetFieldAsInteger (i));
                       break;
                   }

                   case OFTReal:
                   {
                       boost::put(*feature,fld_name,(*feat)->GetFieldAsDouble (i));
                       break;
                   }
                           
                   case OFTString:
                   case OFTWideString:     // deprecated !
                   {
                       UnicodeString ustr = tr_->transcode((*feat)->GetFieldAsString (i));
                       boost::put(*feature,fld_name,ustr);
                       break;
                   }

                   case OFTIntegerList:
                   case OFTRealList:
                   case OFTStringList:
                   case OFTWideStringList: // deprecated !
                   {
#ifdef MAPNIK_DEBUG
                       clog << "unhandled type_oid=" << type_oid << endl;
#endif
                       break;
                   }

                   case OFTBinary:
                   {
#ifdef MAPNIK_DEBUG
                       clog << "unhandled type_oid=" << type_oid << endl;
#endif
                       //boost::put(*feature,name,feat->GetFieldAsBinary (i, size));
                       break;
                   }
                       
                   case OFTDate:
                   case OFTTime:
                   case OFTDateTime:       // unhandled !
                   {
#ifdef MAPNIK_DEBUG
                       clog << "unhandled type_oid=" << type_oid << endl;
#endif
                       break;
                   }

                   default: // unknown
                   {
#ifdef MAPNIK_DEBUG
                       clog << "unknown type_oid=" << type_oid << endl;
#endif
                       break;
                   }
                  }
              }
          
              return feature;
          }
       }
   }

#ifdef MAPNIK_DEBUG
   clog << count_ << " features" << endl;
#endif
   return feature_ptr();
}

template class ogr_index_featureset<mapnik::filter_in_box>;
template class ogr_index_featureset<mapnik::filter_at_point>;