+
+// returns name with suffix, not existing in the existing set
+static std::wstring findName(
+ const std::wstring theOrigin, int& theSuffix, std::set<std::wstring>& theExisting)
+{
+ std::wstring aRes;
+ do {
+ std::wostringstream aName;
+ aName<<theOrigin<<"_"<<theSuffix;
+ aRes = aName.str();
+ theSuffix++;
+ } while(theExisting.count(aRes));
+ theExisting.insert(aRes);
+ return aRes;
+
+}
+
+static int getDepth(AttributeSelectionPtr& theAttr) {
+ if (theAttr->contextFeature().get())
+ return 0;
+ ResultBodyPtr aRes = std::dynamic_pointer_cast<ModelAPI_ResultBody>(theAttr->context());
+ if (aRes.get()) {
+ int aDepth = 0;
+ for(aRes = ModelAPI_Tools::bodyOwner(aRes); aRes.get(); aRes = ModelAPI_Tools::bodyOwner(aRes))
+ aDepth++;
+ return aDepth;
+ }
+ return 0;
+}
+
+bool CollectionPlugin_Group::customAction(const std::string& theActionId)
+{
+ if (theActionId == "split") {
+ DocumentPtr aDoc = document();
+ // collect all existing names of features to give unique names
+ std::set<std::wstring> aFeatNames, aResNames;
+ std::list<FeaturePtr> allFeat = aDoc->allFeatures();
+ std::list<FeaturePtr>::iterator allFeatIter = allFeat.begin();
+ for(; allFeatIter != allFeat.end(); allFeatIter++) {
+ FeaturePtr aFeat = *allFeatIter;
+ if (aFeat->data().get() && aFeat->data()->isValid()) {
+ aFeatNames.insert(aFeat->name());
+ if (aFeat->getKind() == ID() && aFeat->data().get() && aFeat->data()->isValid()) {
+ std::list<ResultPtr>::const_iterator aRess = aFeat->results().cbegin();
+ for(; aRess != aFeat->results().cend(); aRess++) {
+ ResultPtr aRes = *aRess;
+ if (aRes->data().get() && aRes->data()->isValid()) {
+ aResNames.insert(aRes->data()->name());
+ }
+ }
+ }
+ }
+ }
+ // searching for the depth on the results, minimal for all contextes:
+ // groups will be collected at this depth; the root is 0
+ int aMinDepth = -1;
+ std::map<ObjectPtr, int> aStoredDepth;
+ AttributeSelectionListPtr aList = selectionList(LIST_ID());
+ for (int a = aList->size() - 1; a >= 0; a--) {
+ AttributeSelectionPtr anAttr = aList->value(a);
+ if (!anAttr->isInvalid() && anAttr->contextObject().get()) {
+ int aDepth = getDepth(anAttr);
+ aStoredDepth[anAttr->contextObject()] = aDepth;
+ if (aMinDepth == -1 || aDepth < aMinDepth)
+ aMinDepth = aDepth;
+ }
+ }
+ // get common fathers at the minimal depth and set index of group to them
+ std::map<ObjectPtr, ObjectPtr> aFathers;
+ std::map<ObjectPtr, int> aFatherGroup;
+ bool aSplitAnyway = false;
+ for(int aCurrentDepth = 0; aCurrentDepth <= aMinDepth; aCurrentDepth++) {
+ aFathers.clear();
+ aFatherGroup.clear();
+ for (int a = aList->size() - 1; a >= 0; a--) {
+ // start from zero (this group index), then from the end - as in the next iteration
+ AttributeSelectionPtr anAttr = aList->value(a);
+ if (!anAttr->isInvalid() && anAttr->contextObject().get()) {
+ ObjectPtr anObj = anAttr->contextObject();
+ int aDepth = aStoredDepth[anObj];
+ if (!aSplitAnyway && aDepth > aCurrentDepth) {
+ ResultBodyPtr aRes = std::dynamic_pointer_cast<ModelAPI_ResultBody>(anObj);
+ while (aDepth > aCurrentDepth) {
+ aRes = ModelAPI_Tools::bodyOwner(aRes);
+ aDepth--;
+ }
+ anObj = aRes;
+ }
+ aFathers[anAttr->contextObject()] = anObj;
+ if (aFatherGroup.find(anObj) == aFatherGroup.end()) {
+ int aSize = (int)aFatherGroup.size();
+ aFatherGroup[anObj] = aSize; // the first is zero
+ }
+ }
+ }
+ if (aFatherGroup.size() < (size_t)aList->size() && aFatherGroup.size() != 1) // already good
+ break;
+ if (aFatherGroup.size() == (size_t)aList->size()) // no sence to iterate further
+ break;
+ if (aFatherGroup.size() == 1 && aList->size() > 1 && aCurrentDepth == aMinDepth)
+ aSplitAnyway = true; // split anyway, better that just move
+ }
+
+ std::set<int> aRemoved;
+ bool aStay = false; // to indicate that the good attribute found stays in the list
+ // added in the order: 3 2 1 orig=0, so, keep the results to give names later
+ std::list<FeaturePtr> aResults;
+ for(int aNext = aList->size() - 1; aNext >= 0; aNext--) {
+ AttributeSelectionPtr anOldAttr = aList->value(aNext);
+ if (anOldAttr->isInvalid() || !anOldAttr->contextObject().get()) {// remove invalids
+ aRemoved.insert(aNext);
+ continue;
+ }
+ if (!aStay) {
+ aStay = true;
+ continue;
+ }
+ int aFGroup = aFatherGroup[aFathers[anOldAttr->contextObject()]];
+ if (!aSplitAnyway && aFGroup == 0) // to stay in this first group
+ continue;
+
+ aRemoved.insert(aNext);
+ FeaturePtr aNew;
+ if (aSplitAnyway || aFGroup > (int)aResults.size()) {
+ aNew = aDoc->addFeature(ID(), false);
+ aResults.push_front(aNew); // to keep the order
+ } else { // appending in already created new result
+ std::list<FeaturePtr>::reverse_iterator aResIter = aResults.rbegin();
+ for (; aFGroup > 1; aResIter++)
+ aFGroup--;
+ aNew = *aResIter;
+ }
+
+ AttributeSelectionListPtr aNewList = aNew->selectionList(LIST_ID());
+ aNewList->setSelectionType(aList->selectionType());
+ aNewList->append(anOldAttr->contextObject(), anOldAttr->value());
+ }
+ aResults.push_back(std::dynamic_pointer_cast<ModelAPI_Feature>(data()->owner()));
+ // remove all selections except the first
+ aList->remove(aRemoved);
+ // set names
+ if (aResults.size() > 1) { // rename if there are new groups appeared only
+ std::list<FeaturePtr>::iterator aResIter = aResults.begin();
+ for(int aSuffix = 1; aResIter != aResults.end(); aResIter++) {
+ FeaturePtr aFeat = std::dynamic_pointer_cast<ModelAPI_Feature>(*aResIter);
+ aFeat->execute();
+ aFeat->data()->setName(findName(name(), aSuffix, aFeatNames));
+ if (!aFeat->results().empty() && !results().empty()) {
+ int aResSuf = aSuffix - 1;
+ std::wstring aResName = findName(firstResult()->data()->name(), aResSuf, aResNames);
+ aFeat->firstResult()->data()->setName(aResName);
+ ModelAPI_Tools::copyVisualizationAttrs(firstResult(), aFeat->firstResult());
+ }
+ }
+ // remove also filters if split performed
+ FiltersFeaturePtr aFilters = aList->filters();
+ if (aFilters.get()) {
+ std::list<std::string> aFiltersList = aFilters->filters();
+ std::list<std::string>::iterator aFilterName = aFiltersList.begin();
+ for(; aFilterName != aFiltersList.end(); aFilterName++) {
+ aFilters->removeFilter(*aFilterName);
+ }
+ }
+ }
+ }
+ return true;
+}