Herezh_dev/Lecture/LectBloc_T.h

203 lines
8.9 KiB
C
Raw Permalink Normal View History

// This file is part of the Herezh++ application.
//
// The finite element software Herezh++ is dedicated to the field
// of mechanics for large transformations of solid structures.
// It is developed by Gérard Rio (APP: IDDN.FR.010.0106078.000.R.P.2006.035.20600)
// INSTITUT DE RECHERCHE DUPUY DE LÔME (IRDL) <https://www.irdl.fr/>.
//
// Herezh++ is distributed under GPL 3 license ou ultérieure.
//
2023-05-03 17:23:49 +02:00
// Copyright (C) 1997-2022 Université Bretagne Sud (France)
// AUTHOR : Gérard Rio
// E-MAIL : gerardrio56@free.fr
//
// This program is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License,
// or (at your option) any later version.
//
// This program 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 General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program. If not, see <https://www.gnu.org/licenses/>.
//
// For more information, please consult: <https://herezh.irdl.fr/>.
/************************************************************************
* DATE: 23/01/97 *
* $ *
* AUTEUR: G RIO (mailto:gerardrio56@free.fr) *
* $ *
* PROJET: Herezh++ *
* $ *
************************************************************************
* BUT: Class template pour la lecture d'unbloc delimite par : *
* mots cles. *
* $ *
* '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' * *
* VERIFICATION: *
* *
* ! date ! auteur ! but ! *
* ------------------------------------------------------------ *
* ! ! ! ! *
* $ *
* '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' *
* MODIFICATIONS: *
* ! date ! auteur ! but ! *
* ------------------------------------------------------------ *
* $ *
************************************************************************/
#ifndef LECTBLOC_T_H
#define LECTBLOC_T_H
#include <stdlib.h>
using namespace std; //introduces namespace std
#include <iostream>
#include <stdlib.h>
#include "Sortie.h"
#include "UtilLecture.h"
#include "LesReferences.h"
#include "string"
#include "MotCle.h"
#include <list>
#include "string.h"
#include "Tableau_T.h"
#include "Constante.h"
#include "ParaGlob.h"
template <class T>
/// @addtogroup Goupe_relatif_aux_entrees_sorties
/// @{
///
class LectBloc
{
public :
// CONSTRUCTEURS :
LectBloc () {};
// DESTRUCTEUR :
~LectBloc () {};
// METHODES PUBLIQUES :
// lecture d'un bloc
// entreePrinc : stream de lecture ( sur le fichier d'entree)
// lesRef : liste des references generale lue
// motcle de debut de lecture
// message : a afficher en cas d'erreur
// tab : tableau des information a lire
// il faut que la classe T possede les proprietees suivantes :
// 1) constructeur par defaut, 2) NomRef() fourni une reference sur un string contenant la
// reference d'identification de l'instance, 3) les operators == , !=
// et = doivent etre surcharges, 4) Lecture(UtilLecture &) une fonction qui permet de lire
// une instance de T sur l'unite UtilLecture , 5) Affiche () une fonction qui affiche les infos
// specifique a la classe T, 6) NomMaillage() qui ramène un pointeur sur un nom de maillage
// éventuelle, le pointeur peut sinon être null.
// les derniers arguments sont par defaut, il permet de specifier un tableau de sous mot cle
// delimitant des sous blocs.
// la lecture s'arretera lorsque l'on aura trouve soit un mot cle ou soit un sous mot cle
// saut : indique si l'instance T est a lire immediatement ou s'il faut demander une
// nouvelle ligne avant sa lecture
void Lecture(UtilLecture & entreePrinc,LesReferences& lesRef,
string motcle, string message,Tableau<T>& tab,
Tableau<string>& TsousMot = tab_Zero_string, bool saut = true);
private :
// VARIABLES PROTEGEES :
// CONSTRUCTEURS :
// DESTRUCTEUR :
// METHODES PROTEGEES :
};
/// @} // end of group
template <class T>
// lecture d'un bloc
void LectBloc<T>::Lecture(UtilLecture & entreePrinc,LesReferences& lesRef,
string motcle, string message,Tableau<T>& tab,Tableau<string>& TsousMot,
bool saut )
{ MotCle motCle(TsousMot); // ref aux mots cle
if (strstr(entreePrinc.tablcar,motcle.c_str())!=NULL)
{ if (ParaGlob::NiveauImpression() >= 7)
cout << " lecture " << motcle << flush;
if (saut) entreePrinc.NouvelleDonnee();
list <T> lili;
T elem;
while ( !motCle.SimotCle(entreePrinc.tablcar))
{ // on initialise elem à partir d'une variable nouvellement construite par défaut
T initial;
elem = initial;
// lecture
elem.Lecture(entreePrinc);
// on regarde si cela correspond bien a une reference existante
if (!lesRef.Existe(elem.NomRef(),elem.NomMaillage()))
{ cout << "\n erreur, la ref " << elem.NomRef() << " de(s) " << motcle << " ne correspond a aucun element"
<< " de la liste de reference lue !! \n";
elem.Affiche();
cout << " LectBloc::Lecture( etc ..."
<< endl;
entreePrinc.MessageBuffer(message);
throw (UtilLecture::ErrNouvelleDonnee(-1));
Sortie (1);
};
// on verifie que l'on n'utilise pas deux fois la meme reference
// pour deux cibles differentes
typename list <T>::iterator ii;
for (ii=lili.begin() ; ii != lili.end(); ii++)
// if (((*ii).NomRef() == elem.NomRef()) && ((*ii) != elem)) pour adaptation linux
if (((*ii).NomRef() == elem.NomRef()) && (!(elem == (*ii)))
&& ((*ii).MemeCibleMaisDataDifferents(elem)) )
{ // on regarde pour le nom de maillage
bool message = true;
// si les deux maillages sont différents il n'y a pas d'erreur
if (((*ii).NomMaillage() != NULL) && (elem.NomMaillage()!=NULL))
if ( *((*ii).NomMaillage()) != *(elem.NomMaillage())) message = false;
if ((message) && (ParaGlob::NiveauImpression() > 0))
{// on écrit un message pour avertir de l'utilisation d'une référence plusieurs
// fois
cout << "\n ---- remarque ----- , un meme nom de reference est utilisee pour"
<< " deux cibles differentes \n";
cout << " premiere cible : "; (*ii).Affiche();
cout << " seconde cible : "; elem.Affiche() ;
if (ParaGlob::NiveauImpression() >= 4)
cout << " LectBloc::Lecture( etc etc .." ;
cout << endl;
};
/* cout << "\n erreur , un meme nom de reference est utilisee pour"
<< " deux cibles differentes \n";
cout << " premiere cible : "; (*ii).Affiche();
cout << " seconde cible : "; elem.Affiche();
cout << " LectBloc::Lecture( etc etc .." << endl;
entreePrinc.MessageBuffer(message);
throw (UtilLecture::ErrNouvelleDonnee(-1));
Sortie (1); */
};
// stockage
lili.push_back(elem);
entreePrinc.NouvelleDonnee();
}
// enregistrement des infos
int ancien = tab.Taille();
tab.Change_taille(((int)lili.size())+ancien);
typename list <T>::iterator i,ifin=lili.end();
int j;
for (i=lili.begin(),j=1 ; i != ifin; i++,j++)
tab(j+ancien) = *i;
};
}
#endif