Noyau/N_JDC.py

   1 # -*- coding: utf-8 -*-
   2 #@ MODIF N_JDC Noyau  DATE 04/02/2004   AUTEUR CAMBIER S.CAMBIER
   3 #            CONFIGURATION MANAGEMENT OF EDF VERSION
   4 # ======================================================================
   5 # COPYRIGHT (C) 1991 - 2002  EDF R&D                  WWW.CODE-ASTER.ORG
   6 # THIS PROGRAM IS FREE SOFTWARE; YOU CAN REDISTRIBUTE IT AND/OR MODIFY
   7 # IT UNDER THE TERMS OF THE GNU GENERAL PUBLIC LICENSE AS PUBLISHED BY
   8 # THE FREE SOFTWARE FOUNDATION; EITHER VERSION 2 OF THE LICENSE, OR
   9 # (AT YOUR OPTION) ANY LATER VERSION.
  10 #
  11 # THIS PROGRAM IS DISTRIBUTED IN THE HOPE THAT IT WILL BE USEFUL, BUT
  12 # WITHOUT ANY WARRANTY; WITHOUT EVEN THE IMPLIED WARRANTY OF
  13 # MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. SEE THE GNU
  14 # GENERAL PUBLIC LICENSE FOR MORE DETAILS.
  15 #
  16 # YOU SHOULD HAVE RECEIVED A COPY OF THE GNU GENERAL PUBLIC LICENSE
  17 # ALONG WITH THIS PROGRAM; IF NOT, WRITE TO EDF R&D CODE_ASTER,
  18 #    1 AVENUE DU GENERAL DE GAULLE, 92141 CLAMART CEDEX, FRANCE.
  19 #
  20 #
  21 # ======================================================================
  22 """
  23    Ce module contient la classe JDC qui sert à interpréter un jeu de commandes
  24 """
  25
  26 # Modules Python
  27 import os,string,traceback
  28 import types,sys,linecache
  29
  30 # Modules EFICAS
  31 import N_OBJECT
  32 import N_CR
  33 from N_Exception import AsException
  34 from N_ASSD import ASSD
  35
  36 class JDC(N_OBJECT.OBJECT):
  37    """
  38       Cette classe interprete un jeu de commandes fourni sous
  39       la forme d'une chaine de caractères
  40
  41       Attributs de classe :
  42
  43       Attributs d'instance :
  44
  45    """
  46    nature = "JDC"
  47    CR=N_CR.CR
  48    exec_init="""
  49 import Accas
  50 from Accas import _F
  51 from Accas import *
  52 NONE = None
  53 """
  54
  55    from N_utils import SEP
  56
  57    def __init__(self,definition=None,procedure=None,cata=None,
  58                      cata_ord_dico=None,parent=None,
  59                      nom='SansNom',appli=None,context_ini=None,**args):
  60       self.procedure=procedure
  61       self.definition = definition
  62       self.cata=cata
  63       if type(self.cata) != types.TupleType and cata != None:
  64          self.cata=(self.cata,)
  65       self.cata_ordonne_dico=cata_ord_dico
  66       self.nom = nom
  67       self.appli=appli
  68       self.parent=parent
  69       self.context_ini=context_ini
  70       # On conserve les arguments supplémentaires. Il est possible de passer
  71       # des informations globales au JDC par ce moyen. Il pourrait etre plus
  72       # sur de mettre en place le mecanisme des mots-cles pour verifier la
  73       # validité des valeurs passées.
  74       # Ceci reste à faire
  75       # On initialise avec les parametres de la definition puis on
  76       # update avec ceux du JDC
  77       self.args=self.definition.args
  78       self.args.update(args)
  79       self.nstep=0
  80       self.nsd=0
  81       self.par_lot='OUI'
  82       if definition:
  83          self.regles=definition.regles
  84          self.code = definition.code
  85       else:
  86          self.regles=()
  87          self.code = "CODE"
  88       #
  89       #  Creation de l objet compte rendu pour collecte des erreurs
  90       #
  91       self.cr = self.CR(debut = "CR phase d'initialisation",
  92                         fin = "fin CR phase d'initialisation")
  93       self.g_context={}
  94       # Liste pour stocker tous les concepts produits dans le JDC
  95       self.sds=[]
  96       # Dictionnaire pour stocker tous les concepts du JDC (acces rapide par le nom)
  97       self.sds_dict={}
  98       self.etapes=[]
  99       self.mc_globaux={}
 100       self.current_context={}
 101       self.condition_context={}
 102       self.index_etape_courante=0
 103       self.UserError="UserError"
 104       self.alea = None
 105
 106    def compile(self):
 107       """
 108          Cette methode compile la chaine procedure
 109          Si des erreurs se produisent, elles sont consignées dans le
 110          compte-rendu self.cr
 111       """
 112       try:
 113         if self.appli != None :
 114            self.appli.affiche_infos('Compilation du fichier de commandes en cours ...')
 115         self.proc_compile=compile(self.procedure,self.nom,'exec')
 116       except SyntaxError,e:
 117         if CONTEXT.debug : traceback.print_exc()
 118         l=traceback.format_exception_only(SyntaxError,e)
 119         self.cr.exception("Compilation impossible : "+string.join(l))
 120       return
 121
 122    def exec_compile(self):
 123       """
 124          Cette méthode execute le jeu de commandes compilé dans le contexte
 125          self.g_context de l'objet JDC
 126       """
 127       CONTEXT.set_current_step(self)
 128       # Le module nommage utilise le module linecache pour accéder
 129       # au source des commandes du jeu de commandes.
 130       # Dans le cas d'un fichier, on accède au contenu de ce fichier
 131       # Dans le cas d'une chaine de caractères il faut accéder
 132       # aux commandes qui sont dans la chaine
 133       import linecache
 134       linecache.cache[self.nom]=0,0,string.split(self.procedure,'\n'),self.nom
 135       try:
 136          exec self.exec_init in self.g_context
 137          for obj_cata in self.cata:
 138             if type(obj_cata) == types.ModuleType :
 139                init2 = "from "+obj_cata.__name__+" import *"
 140                exec init2 in self.g_context
 141
 142          # Initialisation du contexte global pour l'évaluation des conditions de BLOC
 143          # On utilise une copie de l'initialisation du contexte du jdc
 144          self.condition_context=self.g_context.copy()
 145
 146          # Si l'attribut context_ini n'est pas vide, on ajoute au contexte global
 147          # le contexte initial (--> permet d'évaluer un JDC en récupérant un contexte
 148          # d'un autre par exemple)
 149          if self.context_ini :
 150             self.g_context.update(self.context_ini)
 151             # Update du dictionnaire des concepts
 152             for sdnom,sd in self.context_ini.items():
 153                if isinstance(sd,ASSD):self.sds_dict[sdnom]=sd
 154
 155          if self.appli != None :
 156             self.appli.affiche_infos('Interprétation du fichier de commandes en cours ...')
 157          # On sauve le contexte pour garder la memoire des constantes
 158          # En mode edition (EFICAS) ou lors des verifications le contexte
 159          # est recalculé
 160          # mais les constantes sont perdues
 161          self.const_context=self.g_context
 162          exec self.proc_compile in self.g_context
 163
 164          CONTEXT.unset_current_step()
 165          if self.appli != None : self.appli.affiche_infos('')
 166
 167       except EOFError:
 168         # Exception utilise pour interrompre un jeu
 169         # de commandes avant la fin
 170         # Fonctionnement normal, ne doit pas etre considere comme une erreur
 171         CONTEXT.unset_current_step()
 172
 173       except AsException,e:
 174         # une erreur a ete identifiee
 175         if CONTEXT.debug :
 176           traceback.print_exc()
 177         self.cr.exception(str(e))
 178         CONTEXT.unset_current_step()
 179
 180       except NameError,e:
 181         etype, value, tb = sys.exc_info()
 182         l= traceback.extract_tb(tb)
 183         s= traceback.format_exception_only("Erreur de nom",e)[0][:-1]
 184         message = "erreur de syntaxe,  %s ligne %d" % (s,l[-1][1])
 185         if CONTEXT.debug :
 186           traceback.print_exc()
 187         self.cr.exception(message)
 188         CONTEXT.unset_current_step()
 189
 190       except self.UserError,exc_val:
 191         self.traiter_user_exception(exc_val)
 192         CONTEXT.unset_current_step()
 193
 194       except :
 195         # erreur inattendue
 196         # sys_exc_typ,sys_exc_value,sys_exc_frame = sys_exc.info()
 197         # (tuple de 3 éléments)
 198         if CONTEXT.debug : traceback.print_exc()
 199
 200         exc_typ,exc_val,exc_fr=sys.exc_info()
 201         l=traceback.format_exception(exc_typ,exc_val,exc_fr)
 202         self.cr.exception("erreur non prevue et non traitee prevenir la maintenance "+
 203                            self.nom+'\n'+ string.join(l))
 204         del exc_typ,exc_val,exc_fr
 205         CONTEXT.unset_current_step()
 206
 207    def traiter_user_exception(self,exc_val):
 208        """Cette methode realise un traitement sur les exceptions utilisateur
 209           Par defaut il n'y a pas de traitement. La méthode doit etre
 210           surchargée pour en introduire un.
 211        """
 212        return
 213
 214    def register(self,etape):
 215       """
 216          Cette méthode ajoute etape dans la liste des etapes : self.etapes
 217          et retourne un numéro d'enregistrement
 218       """
 219       self.etapes.append(etape)
 220       return self.g_register(etape)
 221
 222    def o_register(self,sd):
 223       """
 224          Retourne un identificateur pour concept
 225       """
 226       self.nsd=self.nsd+1
 227       nom=sd.idracine + self.SEP + `self.nsd`
 228       return nom
 229
 230    def g_register(self,etape):
 231       """
 232           Retourne un identificateur pour etape
 233       """
 234       self.nstep=self.nstep+1
 235       idetape=etape.idracine + self.SEP + `self.nstep`
 236       return idetape
 237
 238    def create_sdprod(self,etape,nomsd):
 239       """
 240           Intention : Cette methode doit fabriquer le concept produit retourne
 241                   par l'etape etape et le nommer.
 242                   Elle est appelée à l'initiative de l'etape
 243                   pendant le processus de construction de cette etape :
 244                     methode __call__ de la classe CMD (OPER ou MACRO)
 245                   Ce travail est réalisé par le contexte supérieur
 246                   (etape.parent) car dans certains cas, le concept ne doit
 247                   pas etre fabriqué mais l'etape doit simplement utiliser
 248                   un concept préexistant.
 249                   Cas 1 : etape.reuse != None : le concept est réutilisé
 250                   Cas 2 : l'étape appartient à une macro qui a déclaré un
 251                           concept de sortie qui doit etre produit par cette
 252                           etape.
 253                   Dans le cas du JDC, le deuxième cas ne peut pas se produire.
 254       """
 255       sd= etape.get_sd_prod()
 256       if sd != None and (etape.definition.reentrant == 'n' or etape.reuse is None) :
 257          # ATTENTION : On ne nomme la SD que dans le cas de non reutilisation
 258          # d un concept. Commande non reentrante ou reuse absent.
 259          self.NommerSdprod(sd,nomsd)
 260       return sd
 261
 262    def NommerSdprod(self,sd,sdnom,restrict='non'):
 263       """
 264           Nomme la SD apres avoir verifie que le nommage est possible : nom
 265           non utilise
 266           Si le nom est deja utilise, leve une exception
 267           Met le concept créé dans le concept global g_context
 268       """
 269       if CONTEXT.debug : print "JDC.NommerSdprod ",sd,sdnom
 270
 271       o=self.sds_dict.get(sdnom,None)
 272       if isinstance(o,ASSD):
 273          raise AsException("Nom de concept deja defini : %s" % sdnom)
 274
 275       # ATTENTION : Il ne faut pas ajouter sd dans sds car il s y trouve deja.
 276       # Ajoute a la creation (appel de reg_sd).
 277       self.sds_dict[sdnom]=sd
 278       sd.nom=sdnom
 279
 280       # En plus si restrict vaut 'non', on insere le concept dans le contexte du JDC
 281       if restrict == 'non':
 282          self.g_context[sdnom]=sd
 283
 284    def reg_sd(self,sd):
 285       """
 286           Methode appelee dans l __init__ d un ASSD lors de sa creation
 287           pour s enregistrer
 288       """
 289       self.sds.append(sd)
 290       return self.o_register(sd)
 291
 292    def delete_concept_after_etape(self,etape,sd):
 293       """
 294           Met à jour les étapes du JDC qui sont après etape suite à
 295           la disparition du concept sd
 296       """
 297       # Cette methode est définie dans le noyau mais ne sert que pendant
 298       # la phase de creation des etapes et des concepts. Il n'y a aucun
 299       # traitement particulier à réaliser.
 300       # Dans d'autres conditions, il faut surcharger cette méthode
 301       return
 302
 303    def supprime(self):
 304       N_OBJECT.OBJECT.supprime(self)
 305       for etape in self.etapes:
 306          etape.supprime()
 307
 308    def get_file(self,unite=None,fic_origine=''):
 309       """
 310           Retourne le nom du fichier correspondant à un numero d'unité
 311           logique (entier) ainsi que le source contenu dans le fichier
 312       """
 313       if self.appli :
 314          # Si le JDC est relié à une application maitre, on délègue la recherche
 315          file,text= self.appli.get_file(unite,fic_origine)
 316       else:
 317          file = None
 318          if unite != None:
 319             if os.path.exists("fort."+str(unite)):
 320                file= "fort."+str(unite)
 321          if file == None :
 322             raise AsException("Impossible de trouver le fichier correspondant"
 323                                " a l unite %s" % unite)
 324          if not os.path.exists(file):
 325             raise AsException("%s n'est pas un fichier existant" % unite)
 326          fproc=open(file,'r')
 327          text=fproc.read()
 328          fproc.close()
 329       if file == None : return None,None
 330       text=string.replace(text,'\r\n','\n')
 331       linecache.cache[file]=0,0,string.split(text,'\n'),file
 332       return file,text
 333
 334    def set_par_lot(self,par_lot):
 335       """
 336           Met le mode de traitement a PAR LOT
 337           ou a COMMANDE par COMMANDE
 338           en fonction de la valeur du mot cle PAR_LOT et
 339           du contexte : application maitre ou pas
 340       """
 341       if self.appli == None:
 342         # Pas d application maitre
 343         self.par_lot=par_lot
 344       else:
 345         # Avec application maitre
 346         self.par_lot='OUI'
 347
 348    def accept(self,visitor):
 349       """
 350          Cette methode permet de parcourir l'arborescence des objets
 351          en utilisant le pattern VISITEUR
 352       """
 353       visitor.visitJDC(self)
 354
 355    def interact(self):
 356       """
 357           Cette methode a pour fonction d'ouvrir un interpreteur
 358           pour que l'utilisateur entre des commandes interactivement
 359       """
 360       CONTEXT.set_current_step(self)
 361       try:
 362          # Le module nommage utilise le module linecache pour accéder
 363          # au source des commandes du jeu de commandes.
 364          # Dans le cas d'un fichier, on accède au contenu de ce fichier
 365          # Dans le cas de la console interactive, il faut pouvoir accéder
 366          # aux commandes qui sont dans le buffer de la console
 367          import linecache,code
 368          console= code.InteractiveConsole(self.g_context,filename="<console>")
 369          linecache.cache["<console>"]=0,0,console.buffer,"<console>"
 370          banner="""***********************************************
 371 *          Interpreteur interactif %s
 372 ***********************************************""" % self.code
 373          console.interact(banner)
 374       finally:
 375          console=None
 376          CONTEXT.unset_current_step()
 377
 378    def get_contexte_avant(self,etape):
 379       """
 380          Retourne le dictionnaire des concepts connus avant etape
 381          On tient compte des commandes qui modifient le contexte
 382          comme DETRUIRE ou les macros
 383          Si etape == None, on retourne le contexte en fin de JDC
 384       """
 385       # L'étape courante pour laquelle le contexte a été calculé est
 386       # mémorisée dans self.index_etape_courante
 387       # XXX on pourrait faire mieux dans le cas PAR_LOT="NON" : en
 388       # mémorisant l'étape
 389       # courante pendant le processus de construction des étapes.
 390       # Si on insère des commandes (par ex, dans EFICAS), il faut préalablement
 391       # remettre ce pointeur à 0
 392       if etape:
 393          index_etape=self.etapes.index(etape)
 394       else:
 395          index_etape=len(self.etapes)
 396       if index_etape >= self.index_etape_courante:
 397          # On calcule le contexte en partant du contexte existant
 398          d=self.current_context
 399          if self.index_etape_courante==0 and self.context_ini:
 400             d.update(self.context_ini)
 401          liste_etapes=self.etapes[self.index_etape_courante:index_etape]
 402       else:
 403          d=self.current_context={}
 404          if self.context_ini:d.update(self.context_ini)
 405          liste_etapes=self.etapes
 406
 407       for e in liste_etapes:
 408          if e is etape:
 409             break
 410          if e.isactif():
 411             e.update_context(d)
 412       self.index_etape_courante=index_etape
 413       return d
 414
 415    def get_global_contexte(self):
 416       return self.g_context.copy()
 417
 418    def get_cmd(self,nomcmd):
 419       """
 420           Méthode pour recuperer la definition d'une commande
 421           donnee par son nom dans les catalogues declares
 422           au niveau du jdc
 423       """
 424       for cata in self.cata:
 425           if hasattr(cata,nomcmd):
 426              return getattr(cata,nomcmd)
 427