FactoryObjectStock.cxx

Go to the documentation of this file.

#include "FactoryObjectStock.h"

#include "TypeObjectLine.h"

// needed for Add ObjectLine to THStock
#include "THStock.h"
//#include "ObjectLine.h"
#include "ListObjectStock.h"



// mandatory ?? should static must be initialized
ObjectLine * FactoryObjectStock::obj = nullptr;


//AbstractObjectStock* FactoryObjectStock::CreateObjectStock( Indicator indic, UInt_t size, THStock* parent )
IndicatorObjectStock* FactoryObjectStock::CreateObjectStock( Indicator indic, std::string full_name_indic, unsigned int size,
                      THStock * parent, std::string opt_string )
{
#ifdef DEBUG_OBJSTOCK
  std::cout << "Entry FactoryObjectStock::CreateObjectStock " << std::endl;
  //std::cout << "name " << listdata_stock->GetName() << std::endl;
  //Indicator indic = Indicator::GetIndicator ( listdata_stock->GetName() );
  std::cout << "Indicator " << indic.label() << " " << indic.GetDescription() << std::endl;
  std::cout << "Full_name_indic " << full_name_indic << std::endl;
  std::cout << "size " << size << std::endl;

  //std::cout << "opt_pair " << opt_pair.first << " , " << opt_pair.second << std::endl;
  std::cout << "opt_string :" << opt_string << "!!" << std::endl;
#endif

  // used for Collection, can contain ObjectLine
  //AbstractObjectStock * sub_object = 0;
  // problem with collection and DistancetoPrimitive
  IndicatorObjectStock * sub_object = 0;
  IndicatorObjectStock * object = 0;

  // type L = ListObjectStock, K = Collection
  std::string type;

  // stores information : type, (object), color
  //std::vector< std::pair<std::string, std::string> > obj_color;
  std::vector<std::string> obj_color;
  //std::vector< std::vector<std::string> > obj_color;

  std::vector<std::string> descp;

  if ( opt_string.size() > 0 ) {
#ifdef DEBUG_OBJSTOCK
    std::cout << " An optional opt_string was given " << std::endl;
#endif
    // need to set descp
    descp.push_back ( opt_string );
#ifdef DEBUG_OBJSTOCK
    std::cout << "update descp[0] " << descp[0] << std::endl;
#endif

  } else {
#ifdef DEBUG_OBJSTOCK
    std::cout << "Will call parse description" << std::endl;
#endif
    // should return a string "LC0" / "P0R"
    descp = indic.parse_description();
  }

#ifdef DEBUG_OBJSTOCK
  std::cout << "\tPrint Factory, get description of the indicator " << std::endl;
  std::cout << " summary in Factory " << std::endl;
  //std::cout << " type " << type << std::endl;
  for ( unsigned int i = 0; i < descp.size(); i ++ ) {
      std::cout << "descp " << descp[i] << std::endl;
  }
#endif
  //exit(1);

  // make a ListDataStock
  if ( descp[0][0] == 'L' ) {
#ifdef DEBUG_OBJSTOCK
      std::cout << "case L" << std::endl;
#endif
      // list of candles
      if ( descp[0][1] == 'C' ) {
#ifdef DEBUG_OBJSTOCK
          std::cout << " case C for Candle " << std::endl;
#endif
          object = new ListObjectStock<CandleStock> ( size, full_name_indic );
      // list of bar
      } else if ( descp[0][1] == 'B' ) {
#ifdef DEBUG_OBJSTOCK
          std::cout << " case B for Bar " << std::endl;
#endif
          // problem with name...
          object = new ListObjectStock<BarStock> ( size, full_name_indic );
          //set color, more tricky here
          //object descp[0][2] contains color

      }
  // PStockLine
  } else if ( descp[0][0] == 'P' ) {
#ifdef DEBUG_OBJSTOCK
     std::cout << "case P" << std::endl;
#endif
     object = new PStockLine( full_name_indic, size );
     //std::cout << " kBlue" << kBlue << std::endl;
    // object->SetLineColor ( kBlue );
#ifdef DEBUG_OBJSTOCK
     std::cout << "get color " << descp[0][2] << std::endl;
#endif

     // works directly with SetLineColor
     //object->SetLineColor( FactoryObjectStock::MakeColor( descp[0][2]) );
     object->SetLineColor( indic.MakeEColor( descp[0][2]) );

  // Collection need to loop over all elements
  } else if ( descp[0][0] == 'K' ) {
#ifdef DEBUG_OBJSTOCK
     std::cout << "case K" << std::endl;
#endif

     object = new CollectionObjectStock( size, full_name_indic );
     // need at least 3 LBR for instance
     // goal Create with string ( "LBR" / "P0B" / "LC0" ...)
     for ( unsigned int i = 1; i < descp.size(); i++ ) {
        //std::cout  << "obj " << obj_color[i].first << " color " << obj_color[i].second << std::endl;
        //sub_pair.first = obj_color[i].first;
        //sub_pair.second = obj_color[i].second;
        // here the trick, should be in indicator
#ifdef DEBUG_OBJSTOCK
        std::cout << "Call Factory::CreateObject descp[i] " << descp[i] << std::endl;
#endif
        sub_object = FactoryObjectStock::CreateObjectStock( indic, full_name_indic, size, parent, descp[i] );
        // maybe name to give
        // can be in an other array in Indicator
        //dynamic_cast<>object->AddObject( sub_object );
        // function defined in IndicatorObjectStock
        object->AddToVecObject( sub_object );
        // variant make directly because no want to loose the type
        // not working better, always call base class, missing virtual in base class
        //(dynamic_cast<CollectionObjectStock *>(object))->vec_object.push_back( sub_object );
     }
  } else {
     std::cout <<"descriptor not implemented " << descp[0][0] << std::endl;
}


  // need additional descriptor in Indicator
  if ( indic == Indicator::RSI ) {
#ifdef DEBUG_OBJSTOCK
     std::cout << "indic == RSI add ObjectLineIndicator " << std::endl;
#endif
     ObjectLineIndicator * line1 = new ObjectLineIndicator("RSI 30", 30 );
     line1->SetLineColor ( kBlack );
     ObjectLineIndicator * line2 = new ObjectLineIndicator("RSI 70", 70 );
     line2->SetLineColor ( kBlack );

     // need explicit, not contained in a collection ?
     line1->SetParent( parent );
     line2->SetParent( parent );

     //std::cout << "Add to parent THStock " << std::endl;
     // Can choose, add to parent ( THStock ) send by argument
     // call complexe function originally, done for all lines
     // RSI PStockLine, need to assign to THStock, or make RSI a collection..
     parent->Add ( line1 );
     parent->Add ( line2 );
     // or add to Collection, both are acceptable
     // simple and logic, belong to the indicator
     // RSI is not a Collection, it is a simple PStockLine
     // cannot do this ! why ?
     //object->AddToVecObject ( line1 );
     //object->AddToVecObject ( line2 );

  } //else if ( indic == XXX )

  /*
  } else {
      std::cout << " FactoryObjectStock::CreateObjectStock indicator not known " << indic.label() << std::endl;
      return 0;
  }
  */

#ifdef DEBUG_OBJSTOCK
  std::cout << "Exit FactoryObjectStock::CreateObjectStock object" << object << std::endl;
  std::cout << "GetSize of new object " << object->GetSize() << std::endl;
  std::cout << "Return object ObjectName" << object->GetNameObject() << std::endl;
#endif

  return object;
}


// could add THStock as parameter for anchor, anyway THStock known by all lines...
// to see later
ObjectLine * FactoryObjectStock::CreateDrawableObjectLine( int stage_draw, double valueX, double valueY, TypeLine mode_obj )
{
#ifdef DEBUG_OBJSTOCK
    std::cout << "\n\tEntry FactoryObjectStock::CreateDrawableObjectLine " << std::endl;
    std::cout << "stage_draw " << stage_draw << std::endl;
    std::cout << "valueX " << valueX << " valueY " << valueY << std::endl;
#endif

#ifdef DEBUG_OBJSTOCK
    if ( obj != nullptr ) {
        //std::cout << "obj different of nullptr get x0,Y0 " << obj->GetX0() << " " << obj->GetY0 << std::endl;
        std::cout << "obj different of nullptr" << std::endl;
    } else
        std::cout << "obj is nullptr " << std::endl;
#endif
    // creates the line
    if ( stage_draw == kBeginDraw ) {

        // test not needed, because send to ObjectLineTendance...,
        // maybe for later
        if ( ( mode_obj== TypeLine::kSupport ) || ( mode_obj== TypeLine::kTendance ) ) {
#ifdef DEBUG_OBJSTOCK
            std::cout << "Draw a support or a tendance at stage 1 creation " << std::endl;
#endif

            // should take care for deletion, or re-initialisation
            obj = new ObjectLineTendance ( mode_obj, valueX, valueY );

            if ( obj != nullptr ) {
                obj->SetLineColor(4); //Blue, can use function
                return obj;
            } else {
                std::cout << "Error in creating ObjectLineTendance, stage begin object null" << std::endl;
                return 0; //nullptr;
            }
        }

    // move the line, if only one factory, need to test kSupport or kTendance
    } else if ( stage_draw == kMoveDraw ) {
#ifdef DEBUG_OBJSTOCK
        std::cout << "move a support or a tendance " << std::endl;
        //std::cout << "move to " << gPad->AbsPixeltoX( px ) << " " << gPad->AbsPixeltoY( py ) << std::endl;
        std::cout << "move to " << valueX << " " << valueY << std::endl;
        /*
        std::cout << "gPadXtoAbsPixel " << gPad->XtoAbsPixel(obj->GetX0())
                  << " " << gPad->YtoAbsPixel(obj->GetY0())
                  << " " <<  gPad->XtoAbsPixel(obj->GetX1())
                  << " " << gPad->YtoAbsPixel(obj->GetY1()) << std::endl;
        */
#endif
        // works here, not in TPadStock ?? why ??
        // DrawLine must be in pixel
        // act like if draw 2 times, it deletes the line !! both are necessary !! ??
        gVirtualX->DrawLine( gPad->XtoAbsPixel(obj->GetX0()),
                             gPad->YtoAbsPixel(obj->GetY0()),
                             gPad->XtoAbsPixel(obj->GetX1()),
                             gPad->YtoAbsPixel(obj->GetY1()) );

        // works if moved here !! just between
        // set X1 value
        obj->SetX1( valueX );

        // set Y1 value
        // here use object, could use parameter ?? no if reset !!
        if ( obj->GetTypeLine() == TypeLine::kSupport ) {
            obj->SetY1( obj->GetY0() );
        } else if ( obj->GetTypeLine() == TypeLine::kTendance ) {
            obj->SetY1( valueY );
        }

        // creates the new line
        gVirtualX->DrawLine( gPad->XtoAbsPixel(obj->GetX0()),
                             gPad->YtoAbsPixel(obj->GetY0()),
                             gPad->XtoAbsPixel(obj->GetX1()),
                             gPad->YtoAbsPixel(obj->GetY1()) );

        //return obj;

    // finalize the creation of a line
    } else if ( stage_draw == kEndDraw ) {
#ifdef DEBUG_OBJSTOCK
        std::cout << "finalize a support or a tendance " << std::endl;
        std::cout << "get X0 X1 " << obj->GetX0() << " " << obj->GetX1() << std::endl;
        std::cout << "get Y0 Y1 " << obj->GetY0() << " " << obj->GetY1() << std::endl;
        //std::cout << "SetX1/Y1 " <<  gPad->AbsPixeltoX( px ) << " " << gPad->AbsPixeltoY( py ) << std::endl;
        std::cout << "SetX1/Y1 " << valueX << " " << valueY << std::endl;
#endif

        if ( obj->GetTypeLine() == TypeLine::kSupport ) {
            obj->SetY1( obj->GetY0() );
        } else if ( obj->GetTypeLine() == TypeLine::kTendance ) {
            obj->SetY1( valueY );
        } else {
            std::cout << "Mode is not known, make default behaviour setX1 " << std::endl;
            obj->SetX1 ( valueX );
        }

        // here works ?? yes, but try in TPadStock
        // works in TPad, to check all and delete
        /*
        if ( obj->InheritsFrom("ObjectLineTendance") ) {
#ifdef DEBUG_OBJSTOCK
            std::cout << "Inherits from ObjTendance, call Finalise " << std::endl;
#endif
            dynamic_cast<ObjectLineTendance *>(obj)->FinaliseDrawableLine( obj->GetParent()->GetCommonXAxis() );
        }
#ifdef DEBUG_OBJSTOCK
        else {
           std::cout << "Do not inherits from ObjectLineTendance, nothing to do for finalize " << std::endl;
        }
#endif
        */
        // not used anyway
        return obj;
    }
    // retrun null when moving line
    return nullptr;
}

//will deal with particular List or Collection,
//certainly better come back to previous one "general list" with aggregate or not, not sure problem of recursivity
// goal of factory call approprite method, cannot avoid this and point of it !!

//void FactoryObjectStock::Resize( ListDataStockBase * list_stock, UInt_t new_size )
//consider no problem of update last value

/* implements for each
//listdta already cu, and checked for update of last ( deleted before not sure )
//can keep new_size to check if delete/replace the last old data, checked beforie
//void FactoryObjectStock::Resize( IndicatorObjectStock* obj, Indicator indic, UInt_t new_size )
void FactoryObjectStock::Resize( AbstractObjectStock* obj, Indicator indic, UInt_t new_size )
{
#ifdef DEBUG_OBJSTOCK
  std::cout << "FactoryObjectStock::Resize() new size " << new_size << std::endl;
  std::cout << "Indicator " << indic.label() << std::endl;
  //std::cout << "new_size - ArrayObject.GetEntriesFast() " << new_size - ArrayObject.GetEntriesFast() << std::endl;
  //std::cout << "listdata_new name " << listdata->GetName() <<  " " << listdata->GetSize() << std::endl;
  std::cout << " obj " << obj << "ClassName " << obj->ClassName() << std::endl;
  //std::cout << " obj->GetSize() " <<  obj->GetSize() << std::endl;
#endif

  //call the function the most general, need to reimplement
  //obj->Resize( indic, new_size );

  //only for indicator ?? could be independent because ListObjectStock stores only Candle and Bar
  //Indicator indic = Indicator::GetIndicator ( list_stock->GetName() );
  //need to save old_size
}
*/

/*
enum EColor { kWhite =0,   kBlack =1,   kGray=920,
              kRed   =632, kGreen =416, kBlue=600, kYellow=400, kMagenta=616, kCyan=432,
              kOrange=800, kSpring=820, kTeal=840, kAzure =860, kViolet =880, kPink=900 };
*/
EColor FactoryObjectStock::MakeColor( const char str_color)
{
    //if ( str_color == "0" ) return 0;
    //else
    if ( str_color == 'B') return kBlue;
    else if ( str_color == 'R' ) return kRed;
    else if ( str_color ==  'V' ) return kViolet;
    else return kPink;
}