[occt.git] / src / IGESSelect / IGESSelect_Activator.cxx

// Copyright (c) 1999-2012 OPEN CASCADE SAS
//
// The content of this file is subject to the Open CASCADE Technology Public
// License Version 6.5 (the "License"). You may not use the content of this file
// except in compliance with the License. Please obtain a copy of the License
// at http://www.opencascade.org and read it completely before using this file.
//
// The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
// main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
//
// The Original Code and all software distributed under the License is
// distributed on an "AS IS" basis, without warranty of any kind, and the
// Initial Developer hereby disclaims all such warranties, including without
// limitation, any warranties of merchantability, fitness for a particular
// purpose or non-infringement. Please see the License for the specific terms
// and conditions governing the rights and limitations under the License.

#include <Standard_ErrorHandler.hxx>
#include <Standard_Failure.hxx>

#include <IGESSelect_Activator.ixx>
#include <Interface_EntityIterator.hxx>
#include <Interface_Macros.hxx>
#include <IFSelect_WorkSession.hxx>
#include <IFSelect_WorkLibrary.hxx>

#include <IGESData_IGESModel.hxx>
#include <IGESData_IGESEntity.hxx>
#include <IGESData_Protocol.hxx>
#include <IFSelect_IntParam.hxx>
#include <TCollection_HAsciiString.hxx>

#include <IGESSelect_IGESTypeForm.hxx>

#include <IGESSelect_ViewSorter.hxx>
#include <IFSelect_PacketList.hxx>

#include <IGESSelect_DispPerSingleView.hxx>
#include <IGESSelect_DispPerDrawing.hxx>

#include <IFSelect_SelectSignature.hxx>
#include <IGESSelect_SelectVisibleStatus.hxx>
#include <IGESSelect_SelectLevelNumber.hxx>
#include <IGESSelect_SelectName.hxx>

#include <IGESSelect_SelectFromSingleView.hxx>
#include <IGESSelect_SelectFromDrawing.hxx>
#include <IGESSelect_SelectSingleViewFrom.hxx>
#include <IGESSelect_SelectDrawingFrom.hxx>

#include <IGESSelect_SelectBypassGroup.hxx>

#include <IGESSelect_FloatFormat.hxx>
#include <IGESSelect_UpdateCreationDate.hxx>
#include <IGESSelect_UpdateLastChange.hxx>
#include <IGESSelect_UpdateFileName.hxx>
#include <IGESSelect_SetVersion5.hxx>
#include <IGESSelect_SetGlobalParameter.hxx>

#include <IGESSelect_AutoCorrect.hxx>
#include <IGESSelect_ComputeStatus.hxx>
#include <IGESSelect_RebuildDrawings.hxx>
#include <IGESSelect_RebuildGroups.hxx>
#include <IGESSelect_AddGroup.hxx>

#include <IGESSelect_SplineToBSpline.hxx>

#include <TColStd_HSequenceOfTransient.hxx>
#include <IGESSelect_WorkLibrary.hxx>
#include <stdio.h>


static int initActivator = 0;

    IGESSelect_Activator::IGESSelect_Activator ()
{
  if (initActivator) return;  initActivator = 1;
//  Add ( 0,"load");
//  Add ( 0,"loadiges");    // homonyme
  SetForGroup ("XSTEP-IGES");

  Add ( 5,"listviews");
  Add ( 6,"listdrawings");
  Add ( 7,"listsviews");

  AddSet (10,"igestype");
  AddSet (11,"bypassgroup");
  AddSet (12,"igesname");
  AddSet (13,"igesvisible");
  AddSet (14,"igeslevel");

  AddSet (21,"igesfromdrawing");
  AddSet (22,"igesfromview");
  AddSet (23,"igesdrawingfrom");
  AddSet (24,"igesviewfrom");

  AddSet (31,"igesdispdrawing");
  AddSet (32,"igesdispview");

  AddSet (40,"floatformat");
  AddSet (41,"setglobalparam");
  AddSet (42,"setversion5");
  AddSet (43,"updatecreationdate");
  AddSet (44,"updatelastchange");
  AddSet (45,"updatefilename");

  AddSet (50,"autocorrect");
  AddSet (51,"computestatus");
  AddSet (52,"rebuildgroups");
  AddSet (53,"rebuilddrawings");
  AddSet (54,"addgroup");

  AddSet (60,"splinetobspline");

  Add    (70,"setuseflag");
}


    IFSelect_ReturnStatus  IGESSelect_Activator::Do
  (const Standard_Integer number,
   const Handle(IFSelect_SessionPilot)& pilot)
{
  Standard_Integer argc = pilot->NbWords();
  const Standard_CString arg1 = pilot->Word(1).ToCString();
  const Standard_CString arg2 = pilot->Word(2).ToCString();
//  const Standard_CString arg3 = pilot->Word(3).ToCString();
  Handle(IFSelect_WorkSession) WS = pilot->Session();

  switch (number) {

    case  5 :     //        ****    ListViews (sans tri complementaire)
    case  6 :     //        ****    ListDrawings
    case  7 : {   //        ****    ListS(ingle)Views
      Standard_Integer listmode = 0;
      if (argc == 2 && arg1[0] == '?') argc = -1;
      if (argc < 2) {
	cout<<"Ajouter un argument pour avoir :\n"<<
	  " l : liste resumee"<<
	  " c : liste complete par item (mais pas pour remaining)\n"<<
	  " r : idem + liste complete remaining\n"<<
	  "  sur tout le modele. Ajouter nom selection pour lister sur une partie"<<endl;
	return  (argc >= 0 ? IFSelect_RetError : IFSelect_RetVoid);
      }
      if (arg1[0] == 'l') {
	listmode = 0;  cout<<"Liste resumee";
      }
      else if (arg1[0] == 'c') {
	listmode = 1;  cout<<"Liste complete par item (pas pour Remaining)"<<endl;
      }
      else if (arg1[0] == 'r') {
	listmode = 2;  cout<<"Liste complete par item et pour Remaining"<<endl;
      }
      else {
	cout<<"Parametre de listage non compris"<<endl; return IFSelect_RetError;
      }

      Handle(IGESSelect_ViewSorter) vs = new IGESSelect_ViewSorter;
      vs->SetModel(GetCasted(IGESData_IGESModel,WS->Model()));
      if (argc == 2) vs->AddModel(WS->Model());
      else {
//   on demande une selection
	DeclareAndCast(IFSelect_Selection,sel,WS->NamedItem(arg2));
	if (sel.IsNull()) {
	  cout<<"Pas une selection : "<<arg2<<endl;
	  return IFSelect_RetError;
	}
	vs->AddList (WS->SelectionResult(sel));
      }
      Standard_Boolean listdr = (number > 5);
      if (number == 6) vs->SortDrawings(WS->Graph());
      if (number == 7) vs->SortSingleViews(Standard_True);
      Handle(IFSelect_PacketList) sets = vs->Sets(listdr);
      Standard_Integer nb = vs->NbSets(listdr);
      cout<<" --  ViewSorter for";
      if (number == 5) cout<<" Views & Drawings";
      if (number == 6) cout<<" Drawings only (complete)";
      if (number == 7) cout<<" Single Views & Drawing Frames";
      cout<<", on "<<vs->NbEntities()<<" ent.s, give "<<nb<<" Sets"<<endl;

      Interface_EntityIterator iter;
      for (Standard_Integer i = 1; i <= nb; i ++) {
	cout<<" --  Set n0 "<<i<<" Item=entity n0: "<<
	  WS->Model()->Number(vs->SetItem(i,listdr))<<"  List:";
        cout<<sets->NbEntities(i)<<" ent.s:"<<endl;
	if (listmode == 0) continue;
	iter = sets->Entities(i);
	WS->ListEntities (iter,0);
      }

      cout <<" --  Remaining Entities (not yet sorted) :"
	<<sets->NbDuplicated(0,Standard_False)<<endl;
      if (listmode < 2) return IFSelect_RetVoid;
      iter = sets->Duplicated(0,Standard_False);
      WS->ListEntities(iter,0);
      return IFSelect_RetVoid;
    }

    case 10 : {   //        ****    IGESType (form Type/Form)
      if (argc < 2) {
	cout<<"Donner le n0 de type desire, + en option la forme\n"
	  <<"  Si pas de forme, prend toutes les formes du type demande"<<endl;
	return IFSelect_RetError;
      }
      char signature[20];
      if (argc == 2) sprintf(signature,"%s",arg1);
      else sprintf(signature,"%s %s",arg1,arg2);
      Handle(IFSelect_SelectSignature) sel = new IFSelect_SelectSignature
	(new IGESSelect_IGESTypeForm, signature,(argc > 2));
      return pilot->RecordItem (sel);
    }

    case 11 : {   //        ****    IGES BypassGroup
      return pilot->RecordItem (new IGESSelect_SelectBypassGroup);
    }

    case 12 :  {  //        ****    IGES Name
      if (argc < 2) {
        cout<<"Donner un Nom de TextParam pour IGESName"<<endl;
        return IFSelect_RetError;
      }
      Handle(IGESSelect_SelectName) sel = new IGESSelect_SelectName;
      sel->SetName
	(GetCasted(TCollection_HAsciiString,WS->NamedItem(arg1)) );
      return pilot->RecordItem (sel);
    }

    case 13 : {   //        ****    IGES VisibleStatus
      return pilot->RecordItem (new IGESSelect_SelectVisibleStatus);
    }

    case 14 : {   //        ****    IGES LevelNumber
      if (argc < 2) {
        cout<<"Donner nom IntParam pour Level"<<endl;
        return IFSelect_RetError;
      }
      DeclareAndCast(IFSelect_IntParam,lev,WS->NamedItem(arg1));
      if (lev.IsNull()) {
        cout<<arg1<<" : pas un IntParam (pour Level)"<<endl;
        return IFSelect_RetError;
      }
      Handle(IGESSelect_SelectLevelNumber) sel = new IGESSelect_SelectLevelNumber;
      sel->SetLevelNumber(lev);
      return pilot->RecordItem (sel);
    }

    case 21 : {   //        ****    IGES FromDrawing
      return pilot->RecordItem (new IGESSelect_SelectFromDrawing);
    }
    case 22 : {   //        ****    IGES FromSingleView
      return pilot->RecordItem (new IGESSelect_SelectFromSingleView);
    }
    case 23 : {   //        ****    IGES FromDrawing
      return pilot->RecordItem (new IGESSelect_SelectDrawingFrom);
    }
    case 24 : {   //        ****    IGES FromDrawing
      return pilot->RecordItem (new IGESSelect_SelectSingleViewFrom);
    }

    case 31 : {   //        ****    IGES DispatchPerDrawing
      return pilot->RecordItem (new IGESSelect_DispPerDrawing);
    }
    case 32 : {   //        ****    IGES DispatchPerSingleView
      return pilot->RecordItem (new IGESSelect_DispPerSingleView);
    }

    case 40 : {   //        ****    FloatFormat
      char prem = ' ';
      if (argc < 2) prem = '?';
      else if (argc == 5) {
        cout<<"floatformat tout court donne les formes admises"<<endl;
        return IFSelect_RetError;
      }
      else prem = arg1[0];
      Standard_Boolean zerosup=Standard_False;
      Standard_Integer digits = 0;
      if      (prem == 'N' || prem == 'n') zerosup = Standard_False;
      else if (prem == 'Z' || prem == 'z') zerosup = Standard_True;
      else if (prem >= 48  && prem <= 57)  digits  = atoi(arg1);
      else {
	cout<<"floatformat digits, digits=nb de chiffres signifiants, ou\n"
	  <<  "floatformat NZ %mainformat [%rangeformat [Rmin Rmax]]\n"
	  <<"  NZ : N ou n pour Non-zero-suppress, Z ou z pour zero-suppress\n"
	  <<" %mainformat  : format principal type printf, ex,: %E\n"
	  <<" + optionnel  : format secondaire (flottants autour de 1.) :\n"
	  <<" %rangeformat Rmin Rmax : format type printf entre Rmin et Rmax\n"
	  <<" %rangeformat tout seul : format type printf entre 0.1 et 1000.\n"
	    <<flush;
	return (prem == '?' ? IFSelect_RetVoid : IFSelect_RetError);
      }
      Standard_Real Rmin=0., Rmax=0.;
      if (argc > 4) {
	Rmin = atof(pilot->Word(4).ToCString());
	Rmax = atof(pilot->Word(5).ToCString());
	if (Rmin <= 0 || Rmax <= 0) { cout<<"intervalle : donner reels > 0"<<endl; return IFSelect_RetError; }
      }
      Handle(IGESSelect_FloatFormat) fm = new IGESSelect_FloatFormat;
      if (argc == 2) fm->SetDefault(digits);
      else {
	fm->SetZeroSuppress(zerosup);
	fm->SetFormat (arg2);
	if      (argc == 4) fm->SetFormatForRange(pilot->Word(3).ToCString());
	else if (argc >= 6) fm->SetFormatForRange(pilot->Word(3).ToCString(),Rmin,Rmax);
	else                fm->SetFormatForRange("");
      }
      return pilot->RecordItem(fm);
    }

    case 41 : {   //        ****    SetGlobalParameter
      if (argc < 3) {
        cout<<"Donner entier=n0 param a changer + nom TextParam pour la valeur"<<endl;
        return IFSelect_RetError;
      }
      Standard_Integer numpar = atoi(arg1);
      if (numpar <= 0) {
        cout<<"Pas un n0 de param global correct:"<<arg1<<endl;
        return IFSelect_RetError;
      }
      DeclareAndCast(TCollection_HAsciiString,val,WS->NamedItem(arg2));
      if (val.IsNull()) {
        cout<<"Pas un nom de TextParam:"<<arg2<<endl;
        return IFSelect_RetError;
      }
      Handle(IGESSelect_SetGlobalParameter) mod =
	new IGESSelect_SetGlobalParameter(numpar);
      mod->SetValue(val);
      return pilot->RecordItem (mod);
    }

    case 42 : {   //        ****    Set IGES Version 5.1
      return pilot->RecordItem (new IGESSelect_SetVersion5);
    }
    case 43 : {   //        ****    Update Creation Date
      return pilot->RecordItem (new IGESSelect_UpdateCreationDate);
    }
    case 44 : {   //        ****    Update Last Change Date
      return pilot->RecordItem (new IGESSelect_UpdateLastChange);
    }
    case 45 : {   //        ****    Update File Name
      return pilot->RecordItem (new IGESSelect_UpdateFileName);
    }

    case 50 : {   //        ****    AutoCorrect
      return pilot->RecordItem (new IGESSelect_AutoCorrect);
    }
    case 51 : {   //        ****    Compute Status
      return pilot->RecordItem (new IGESSelect_ComputeStatus);
    }
    case 52 : {   //        ****    Rebuild Groups
      return pilot->RecordItem (new IGESSelect_RebuildGroups);
    }
    case 53 : {   //        ****    Rebuild Drawings
      return pilot->RecordItem (new IGESSelect_RebuildDrawings);
    }
    case 54 : {   //        ****    Add Group
      return pilot->RecordItem (new IGESSelect_AddGroup);
    }

    case 60 : {   //        ****    Spline To BSpline
      if (argc < 2) {
        cout<<"Pour SplineToBSpline, donner mode :\n"<<
			" n pour normal, t pour tryC2"<<endl;
        return IFSelect_RetError;
      }
      Standard_Boolean tryC2;
      if (arg1[0] == 'n' || arg1[0] == 'N')
        tryC2 = Standard_False;
      else if (arg1[0] == 't' || arg1[0] == 'T')
        tryC2 = Standard_True;
      else {
        cout<<" Mode incorrect : "<<arg1<<endl;
        return IFSelect_RetError;
      }
      Handle(IGESSelect_SplineToBSpline) conv =
	new IGESSelect_SplineToBSpline (tryC2);
      return pilot->RecordItem(conv);
    }

    case 70 : {   //        ****    SetUseFlag
      Standard_Integer usefl = atoi (arg1);
      if (argc > 2) {
	Handle(TColStd_HSequenceOfTransient) list = WS->GiveList(pilot->CommandPart(2));
	Standard_Integer i, nb = list->Length();
	for (i = 1; i <= nb; i ++) {
	  DeclareAndCast(IGESData_IGESEntity,ent,list->Value(i));
	  if (!ent.IsNull()) ent->InitStatus
	    (ent->BlankStatus(),ent->SubordinateStatus(),usefl,ent->HierarchyStatus());
	}
      }
      else {
	Standard_Integer i, nb = WS->NbStartingEntities();
	for (i = 1; i <= nb; i ++) {
	  DeclareAndCast(IGESData_IGESEntity,ent,WS->StartingEntity(i));
	  if (!ent.IsNull()) ent->InitStatus
	    (ent->BlankStatus(),ent->SubordinateStatus(),usefl,ent->HierarchyStatus());
	}
      }
      return IFSelect_RetDone;
    }

    default : break;
  }
  return IFSelect_RetVoid;

}

Standard_CString  IGESSelect_Activator::Help
  (const Standard_Integer number) const
{
  switch (number) {
    case  5 : return "Liste Vues (tous types). Nom selection sinon tout modele";
    case  6 : return "Liste Drawings. Nom selection sinon tout modele";
    case  7 : return "Liste Vues SIMPLES. Nom selection sinon tout modele";

    case 10 : return "type:integer [form:integer]  : cree Select IGESType";
    case 11 : return "cree Select Bypass Group";
    case 12 : return "name:TextParam  : cree Select Name (Name/Label)";
    case 13 : return "cree Select Visible Status (Blank Status = 0 sinon 1)";
    case 14 : return "level:IntParam  : cree Select LevelNumber";

    case 21 : return "cree Select From Drawing";
    case 22 : return "cree Select From Single View";
    case 23 : return "cree Select Drawing From, drawing(s) pour une liste d entites";
    case 24 : return "cree Select View From, views pour une liste d entites";

    case 31 : return "cree Dispatch Per Drawing";
    case 32 : return "cree Dispatch Per SingleView";

    case 40 : return "options... : cree FloatFormat ... floatformat tout court->help";
    case 41 : return "numpar:integer  value:TextParam  : cree Set Global Param";
    case 42 : return "cree Set Version -> 5.1";
    case 43 : return "cree Update Creation Date";
    case 44 : return "cree Update Last Change Date";
    case 45 : return "cree Update File Name (dynamic)";

    case 50 : return "cree AutoCorrect";
    case 51 : return "cree Compute Status (in D.E.)";
    case 52 : return "cree Rebuild Groups";
    case 53 : return "cree Rebuild Drawings";
    case 54 : return "cree AddGroup";

    case 60 : return "cree SplineToBSpline Conversion";

    case 70 : return "useflag givelist  :  Set Use Flag to value";

    default : break;
  }
  return "??";
}
Commit	Line	Data
b311480e	1	// Copyright (c) 1999-2012 OPEN CASCADE SAS
	2	//
	3	// The content of this file is subject to the Open CASCADE Technology Public
	4	// License Version 6.5 (the "License"). You may not use the content of this file
	5	// except in compliance with the License. Please obtain a copy of the License
	6	// at http://www.opencascade.org and read it completely before using this file.
	7	//
	8	// The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
	9	// main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
	10	//
	11	// The Original Code and all software distributed under the License is
	12	// distributed on an "AS IS" basis, without warranty of any kind, and the
	13	// Initial Developer hereby disclaims all such warranties, including without
	14	// limitation, any warranties of merchantability, fitness for a particular
	15	// purpose or non-infringement. Please see the License for the specific terms
	16	// and conditions governing the rights and limitations under the License.
	17
7fd59977	18	#include <Standard_ErrorHandler.hxx>
	19	#include <Standard_Failure.hxx>
	20
	21	#include <IGESSelect_Activator.ixx>
	22	#include <Interface_EntityIterator.hxx>
	23	#include <Interface_Macros.hxx>
	24	#include <IFSelect_WorkSession.hxx>
	25	#include <IFSelect_WorkLibrary.hxx>
	26
	27	#include <IGESData_IGESModel.hxx>
	28	#include <IGESData_IGESEntity.hxx>
	29	#include <IGESData_Protocol.hxx>
	30	#include <IFSelect_IntParam.hxx>
	31	#include <TCollection_HAsciiString.hxx>
	32
	33	#include <IGESSelect_IGESTypeForm.hxx>
	34
	35	#include <IGESSelect_ViewSorter.hxx>
	36	#include <IFSelect_PacketList.hxx>
	37
	38	#include <IGESSelect_DispPerSingleView.hxx>
	39	#include <IGESSelect_DispPerDrawing.hxx>
	40
	41	#include <IFSelect_SelectSignature.hxx>
	42	#include <IGESSelect_SelectVisibleStatus.hxx>
	43	#include <IGESSelect_SelectLevelNumber.hxx>
	44	#include <IGESSelect_SelectName.hxx>
	45
	46	#include <IGESSelect_SelectFromSingleView.hxx>
	47	#include <IGESSelect_SelectFromDrawing.hxx>
	48	#include <IGESSelect_SelectSingleViewFrom.hxx>
	49	#include <IGESSelect_SelectDrawingFrom.hxx>
	50
	51	#include <IGESSelect_SelectBypassGroup.hxx>
	52
	53	#include <IGESSelect_FloatFormat.hxx>
	54	#include <IGESSelect_UpdateCreationDate.hxx>
	55	#include <IGESSelect_UpdateLastChange.hxx>
	56	#include <IGESSelect_UpdateFileName.hxx>
	57	#include <IGESSelect_SetVersion5.hxx>
	58	#include <IGESSelect_SetGlobalParameter.hxx>
	59
	60	#include <IGESSelect_AutoCorrect.hxx>
	61	#include <IGESSelect_ComputeStatus.hxx>
	62	#include <IGESSelect_RebuildDrawings.hxx>
	63	#include <IGESSelect_RebuildGroups.hxx>
	64	#include <IGESSelect_AddGroup.hxx>
	65
	66	#include <IGESSelect_SplineToBSpline.hxx>
	67
	68	#include <TColStd_HSequenceOfTransient.hxx>
	69	#include <IGESSelect_WorkLibrary.hxx>
	70	#include <stdio.h>
	71
	72
	73
	74	static int initActivator = 0;
	75
	76	IGESSelect_Activator::IGESSelect_Activator ()
	77	{
	78	if (initActivator) return; initActivator = 1;
	79	// Add ( 0,"load");
	80	// Add ( 0,"loadiges"); // homonyme
	81	SetForGroup ("XSTEP-IGES");
82
83	Add ( 5,"listviews");
84	Add ( 6,"listdrawings");
85	Add ( 7,"listsviews");
86
87	AddSet (10,"igestype");
88	AddSet (11,"bypassgroup");
89	AddSet (12,"igesname");
90	AddSet (13,"igesvisible");
91	AddSet (14,"igeslevel");
92
93	AddSet (21,"igesfromdrawing");
94	AddSet (22,"igesfromview");
95	AddSet (23,"igesdrawingfrom");
96	AddSet (24,"igesviewfrom");
97
98	AddSet (31,"igesdispdrawing");
99	AddSet (32,"igesdispview");
100
101	AddSet (40,"floatformat");
102	AddSet (41,"setglobalparam");
103	AddSet (42,"setversion5");
104	AddSet (43,"updatecreationdate");
105	AddSet (44,"updatelastchange");
106	AddSet (45,"updatefilename");
107
108	AddSet (50,"autocorrect");
109	AddSet (51,"computestatus");
110	AddSet (52,"rebuildgroups");
111	AddSet (53,"rebuilddrawings");
112	AddSet (54,"addgroup");
113
114	AddSet (60,"splinetobspline");
115
116	Add (70,"setuseflag");
117	}
118
119
120	IFSelect_ReturnStatus IGESSelect_Activator::Do
121	(const Standard_Integer number,
122	const Handle(IFSelect_SessionPilot)& pilot)
123	{
124	Standard_Integer argc = pilot->NbWords();
125	const Standard_CString arg1 = pilot->Word(1).ToCString();
126	const Standard_CString arg2 = pilot->Word(2).ToCString();
127	// const Standard_CString arg3 = pilot->Word(3).ToCString();
128	Handle(IFSelect_WorkSession) WS = pilot->Session();
129
130	switch (number) {
131
132	case 5 : // **** ListViews (sans tri complementaire)
133	case 6 : // **** ListDrawings
134	case 7 : { // **** ListS(ingle)Views
135	Standard_Integer listmode = 0;
136	if (argc == 2 && arg1[0] == '?') argc = -1;
137	if (argc < 2) {
138	cout<<"Ajouter un argument pour avoir :\n"<<
139	" l : liste resumee"<<
140	" c : liste complete par item (mais pas pour remaining)\n"<<
141	" r : idem + liste complete remaining\n"<<
142	" sur tout le modele. Ajouter nom selection pour lister sur une partie"<<endl;
143	return (argc >= 0 ? IFSelect_RetError : IFSelect_RetVoid);
144	}
145	if (arg1[0] == 'l') {
146	listmode = 0; cout<<"Liste resumee";
147	}
148	else if (arg1[0] == 'c') {
149	listmode = 1; cout<<"Liste complete par item (pas pour Remaining)"<<endl;
150	}
151	else if (arg1[0] == 'r') {
152	listmode = 2; cout<<"Liste complete par item et pour Remaining"<<endl;
153	}
154	else {
155	cout<<"Parametre de listage non compris"<<endl; return IFSelect_RetError;
156	}
157
158	Handle(IGESSelect_ViewSorter) vs = new IGESSelect_ViewSorter;
159	vs->SetModel(GetCasted(IGESData_IGESModel,WS->Model()));
160	if (argc == 2) vs->AddModel(WS->Model());
161	else {
162	// on demande une selection
163	DeclareAndCast(IFSelect_Selection,sel,WS->NamedItem(arg2));
164	if (sel.IsNull()) {
165	cout<<"Pas une selection : "<<arg2<<endl;
166	return IFSelect_RetError;
167	}
168	vs->AddList (WS->SelectionResult(sel));
169	}
170	Standard_Boolean listdr = (number > 5);
171	if (number == 6) vs->SortDrawings(WS->Graph());
172	if (number == 7) vs->SortSingleViews(Standard_True);
173	Handle(IFSelect_PacketList) sets = vs->Sets(listdr);
174	Standard_Integer nb = vs->NbSets(listdr);
175	cout<<" -- ViewSorter for";
176	if (number == 5) cout<<" Views & Drawings";
177	if (number == 6) cout<<" Drawings only (complete)";
178	if (number == 7) cout<<" Single Views & Drawing Frames";
179	cout<<", on "<<vs->NbEntities()<<" ent.s, give "<<nb<<" Sets"<<endl;
180
181	Interface_EntityIterator iter;
182	for (Standard_Integer i = 1; i <= nb; i ++) {
183	cout<<" -- Set n0 "<<i<<" Item=entity n0: "<<
184	WS->Model()->Number(vs->SetItem(i,listdr))<<" List:";
185	cout<<sets->NbEntities(i)<<" ent.s:"<<endl;
186	if (listmode == 0) continue;
187	iter = sets->Entities(i);
188	WS->ListEntities (iter,0);
189	}
190
191	cout <<" -- Remaining Entities (not yet sorted) :"
192	<<sets->NbDuplicated(0,Standard_False)<<endl;
193	if (listmode < 2) return IFSelect_RetVoid;
194	iter = sets->Duplicated(0,Standard_False);
195	WS->ListEntities(iter,0);
196	return IFSelect_RetVoid;
197	}
198
199	case 10 : { // **** IGESType (form Type/Form)
200	if (argc < 2) {
201	cout<<"Donner le n0 de type desire, + en option la forme\n"
202	<<" Si pas de forme, prend toutes les formes du type demande"<<endl;
203	return IFSelect_RetError;
204	}
205	char signature[20];
206	if (argc == 2) sprintf(signature,"%s",arg1);
207	else sprintf(signature,"%s %s",arg1,arg2);
208	Handle(IFSelect_SelectSignature) sel = new IFSelect_SelectSignature
209	(new IGESSelect_IGESTypeForm, signature,(argc > 2));
210	return pilot->RecordItem (sel);
211	}
212
213	case 11 : { // **** IGES BypassGroup
214	return pilot->RecordItem (new IGESSelect_SelectBypassGroup);
215	}
216
217	case 12 : { // **** IGES Name
218	if (argc < 2) {
219	cout<<"Donner un Nom de TextParam pour IGESName"<<endl;
220	return IFSelect_RetError;
221	}
222	Handle(IGESSelect_SelectName) sel = new IGESSelect_SelectName;
223	sel->SetName
224	(GetCasted(TCollection_HAsciiString,WS->NamedItem(arg1)) );
225	return pilot->RecordItem (sel);
226	}
227
228	case 13 : { // **** IGES VisibleStatus
229	return pilot->RecordItem (new IGESSelect_SelectVisibleStatus);
230	}
231
232	case 14 : { // **** IGES LevelNumber
233	if (argc < 2) {
234	cout<<"Donner nom IntParam pour Level"<<endl;
235	return IFSelect_RetError;
236	}
237	DeclareAndCast(IFSelect_IntParam,lev,WS->NamedItem(arg1));
238	if (lev.IsNull()) {
239	cout<<arg1<<" : pas un IntParam (pour Level)"<<endl;
240	return IFSelect_RetError;
241	}
242	Handle(IGESSelect_SelectLevelNumber) sel = new IGESSelect_SelectLevelNumber;
243	sel->SetLevelNumber(lev);
244	return pilot->RecordItem (sel);
245	}
246
247	case 21 : { // **** IGES FromDrawing
248	return pilot->RecordItem (new IGESSelect_SelectFromDrawing);
249	}
250	case 22 : { // **** IGES FromSingleView
251	return pilot->RecordItem (new IGESSelect_SelectFromSingleView);
252	}
253	case 23 : { // **** IGES FromDrawing
254	return pilot->RecordItem (new IGESSelect_SelectDrawingFrom);
255	}
256	case 24 : { // **** IGES FromDrawing
257	return pilot->RecordItem (new IGESSelect_SelectSingleViewFrom);
258	}
259
260	case 31 : { // **** IGES DispatchPerDrawing
261	return pilot->RecordItem (new IGESSelect_DispPerDrawing);
262	}
263	case 32 : { // **** IGES DispatchPerSingleView
264	return pilot->RecordItem (new IGESSelect_DispPerSingleView);
265	}
266
267	case 40 : { // **** FloatFormat
268	char prem = ' ';
269	if (argc < 2) prem = '?';
270	else if (argc == 5) {
271	cout<<"floatformat tout court donne les formes admises"<<endl;
272	return IFSelect_RetError;
273	}
274	else prem = arg1[0];
275	Standard_Boolean zerosup=Standard_False;
276	Standard_Integer digits = 0;
277	if (prem == 'N' \|\| prem == 'n') zerosup = Standard_False;
278	else if (prem == 'Z' \|\| prem == 'z') zerosup = Standard_True;
279	else if (prem >= 48 && prem <= 57) digits = atoi(arg1);
280	else {
281	cout<<"floatformat digits, digits=nb de chiffres signifiants, ou\n"
282	<< "floatformat NZ %mainformat [%rangeformat [Rmin Rmax]]\n"
283	<<" NZ : N ou n pour Non-zero-suppress, Z ou z pour zero-suppress\n"
284	<<" %mainformat : format principal type printf, ex,: %E\n"
285	<<" + optionnel : format secondaire (flottants autour de 1.) :\n"
286	<<" %rangeformat Rmin Rmax : format type printf entre Rmin et Rmax\n"
287	<<" %rangeformat tout seul : format type printf entre 0.1 et 1000.\n"
288	<<flush;
289	return (prem == '?' ? IFSelect_RetVoid : IFSelect_RetError);
290	}
291	Standard_Real Rmin=0., Rmax=0.;
292	if (argc > 4) {
293	Rmin = atof(pilot->Word(4).ToCString());
294	Rmax = atof(pilot->Word(5).ToCString());
295	if (Rmin <= 0 \|\| Rmax <= 0) { cout<<"intervalle : donner reels > 0"<<endl; return IFSelect_RetError; }
296	}
297	Handle(IGESSelect_FloatFormat) fm = new IGESSelect_FloatFormat;
298	if (argc == 2) fm->SetDefault(digits);
299	else {
300	fm->SetZeroSuppress(zerosup);
301	fm->SetFormat (arg2);
302	if (argc == 4) fm->SetFormatForRange(pilot->Word(3).ToCString());
303	else if (argc >= 6) fm->SetFormatForRange(pilot->Word(3).ToCString(),Rmin,Rmax);
304	else fm->SetFormatForRange("");
305	}
306	return pilot->RecordItem(fm);
307	}
308
309	case 41 : { // **** SetGlobalParameter
310	if (argc < 3) {
311	cout<<"Donner entier=n0 param a changer + nom TextParam pour la valeur"<<endl;
312	return IFSelect_RetError;
313	}
314	Standard_Integer numpar = atoi(arg1);
315	if (numpar <= 0) {
316	cout<<"Pas un n0 de param global correct:"<<arg1<<endl;
317	return IFSelect_RetError;
318	}
319	DeclareAndCast(TCollection_HAsciiString,val,WS->NamedItem(arg2));
320	if (val.IsNull()) {
321	cout<<"Pas un nom de TextParam:"<<arg2<<endl;
322	return IFSelect_RetError;
323	}
324	Handle(IGESSelect_SetGlobalParameter) mod =
325	new IGESSelect_SetGlobalParameter(numpar);
326	mod->SetValue(val);
327	return pilot->RecordItem (mod);
328	}
329
330	case 42 : { // **** Set IGES Version 5.1
331	return pilot->RecordItem (new IGESSelect_SetVersion5);
332	}
333	case 43 : { // **** Update Creation Date
334	return pilot->RecordItem (new IGESSelect_UpdateCreationDate);
335	}
336	case 44 : { // **** Update Last Change Date
337	return pilot->RecordItem (new IGESSelect_UpdateLastChange);
338	}
339	case 45 : { // **** Update File Name
340	return pilot->RecordItem (new IGESSelect_UpdateFileName);
341	}
342
343	case 50 : { // **** AutoCorrect
344	return pilot->RecordItem (new IGESSelect_AutoCorrect);
345	}
346	case 51 : { // **** Compute Status
347	return pilot->RecordItem (new IGESSelect_ComputeStatus);
348	}
349	case 52 : { // **** Rebuild Groups
350	return pilot->RecordItem (new IGESSelect_RebuildGroups);
351	}
352	case 53 : { // **** Rebuild Drawings
353	return pilot->RecordItem (new IGESSelect_RebuildDrawings);
354	}
355	case 54 : { // **** Add Group
356	return pilot->RecordItem (new IGESSelect_AddGroup);
357	}
358
359	case 60 : { // **** Spline To BSpline
360	if (argc < 2) {
361	cout<<"Pour SplineToBSpline, donner mode :\n"<<
362	" n pour normal, t pour tryC2"<<endl;
363	return IFSelect_RetError;
364	}
365	Standard_Boolean tryC2;
366	if (arg1[0] == 'n' \|\| arg1[0] == 'N')
367	tryC2 = Standard_False;
368	else if (arg1[0] == 't' \|\| arg1[0] == 'T')
369	tryC2 = Standard_True;
370	else {
371	cout<<" Mode incorrect : "<<arg1<<endl;
372	return IFSelect_RetError;
373	}
374	Handle(IGESSelect_SplineToBSpline) conv =
375	new IGESSelect_SplineToBSpline (tryC2);
376	return pilot->RecordItem(conv);
377	}
378
379	case 70 : { // **** SetUseFlag
380	Standard_Integer usefl = atoi (arg1);
381	if (argc > 2) {
382	Handle(TColStd_HSequenceOfTransient) list = WS->GiveList(pilot->CommandPart(2));
383	Standard_Integer i, nb = list->Length();
384	for (i = 1; i <= nb; i ++) {
385	DeclareAndCast(IGESData_IGESEntity,ent,list->Value(i));
386	if (!ent.IsNull()) ent->InitStatus
387	(ent->BlankStatus(),ent->SubordinateStatus(),usefl,ent->HierarchyStatus());
388	}
389	}
390	else {
391	Standard_Integer i, nb = WS->NbStartingEntities();
392	for (i = 1; i <= nb; i ++) {
393	DeclareAndCast(IGESData_IGESEntity,ent,WS->StartingEntity(i));
394	if (!ent.IsNull()) ent->InitStatus
395	(ent->BlankStatus(),ent->SubordinateStatus(),usefl,ent->HierarchyStatus());
396	}
397	}
398	return IFSelect_RetDone;
399	}
400
401	default : break;
402	}
403	return IFSelect_RetVoid;
404
405	}
406
407	Standard_CString IGESSelect_Activator::Help
408	(const Standard_Integer number) const
409	{
410	switch (number) {
411	case 5 : return "Liste Vues (tous types). Nom selection sinon tout modele";
412	case 6 : return "Liste Drawings. Nom selection sinon tout modele";
413	case 7 : return "Liste Vues SIMPLES. Nom selection sinon tout modele";
414
415	case 10 : return "type:integer [form:integer] : cree Select IGESType";
416	case 11 : return "cree Select Bypass Group";
417	case 12 : return "name:TextParam : cree Select Name (Name/Label)";
418	case 13 : return "cree Select Visible Status (Blank Status = 0 sinon 1)";
419	case 14 : return "level:IntParam : cree Select LevelNumber";
420
421	case 21 : return "cree Select From Drawing";
422	case 22 : return "cree Select From Single View";
423	case 23 : return "cree Select Drawing From, drawing(s) pour une liste d entites";
424	case 24 : return "cree Select View From, views pour une liste d entites";
425
426	case 31 : return "cree Dispatch Per Drawing";
427	case 32 : return "cree Dispatch Per SingleView";
428
429	case 40 : return "options... : cree FloatFormat ... floatformat tout court->help";
430	case 41 : return "numpar:integer value:TextParam : cree Set Global Param";
431	case 42 : return "cree Set Version -> 5.1";
432	case 43 : return "cree Update Creation Date";
433	case 44 : return "cree Update Last Change Date";
434	case 45 : return "cree Update File Name (dynamic)";
435
436	case 50 : return "cree AutoCorrect";
437	case 51 : return "cree Compute Status (in D.E.)";
438	case 52 : return "cree Rebuild Groups";
439	case 53 : return "cree Rebuild Drawings";
440	case 54 : return "cree AddGroup";
441
442	case 60 : return "cree SplineToBSpline Conversion";
443
444	case 70 : return "useflag givelist : Set Use Flag to value";
445
446	default : break;
447	}
448	return "??";
449	}