Protótipo de um weaver para programação orientada a aspectos em ...

AOPDelphi – Protótipo de um weaver para programaçãoorientada a aspectos em DelphiEdmar Soares de Oliveira, Marcel HugoDepartamento de Sistemas e ComputaçãoUniversidade Regional de Blumenal (FURB) – Blumenau, SCedmar.mg@gmail.com, marcel@furb.brResumo. Este trabalho apresenta uma ferramenta de suporte à programaçãoorientada a aspectos na linguagem Delphi. É composto por uma linguagem deprogramação orientada a aspectos e um weaver. A ferramenta recebe comoentrada um projeto Delphi, um ou mais programas de aspectos e gera umprojeto Delphi mesclando as funcionalidades dos programas de entrada.1. IntroduçãoAo longo dos últimos anos, a Engenharia de Software tem disponibilizado para osdesenvolvedores vários métodos, técnicas e ferramentas, para auxiliá-los a produzir commaior qualidade. Entre as características perseguidas, a busca pela reusabilidade emanutenibilidade são as mais importantes para a produtividade (RESENDE; SILVA,2005). Nessa evolução se destaca o surgimento da orientação a objetos, onde houve umamudança radical na maneira de se desenvolver software. Porém, com o crescimento dossistemas e conseqüentemente o aumento de sua complexidade, surgiram problemas,como entrelaçamento e espalhamento de código, que os métodos propostos pelaorientação a objetos não são totalmente eficazes para resolver (KICZALES et al., 1997).Assim nasceu a programação orientada a aspectos (POA), com o objetivo de apresentartécnicas capazes de cobrir essas falhas.A POA trabalha com o princípio de separação de interesses (separation ofconcerns), que prega que as preocupações envolvidas no desenvolvimento de umsoftware devem ser focadas e trabalhadas separadamente, concentrando em uma de cadavez, reduzindo a probabilidade de ocorrência de erros em cada módulo econseqüentemente no sistema como um todo (KULESZA; SANT’ANNA; LUCENA,2005). Estes conceitos favorecem a reusabilidade e manutenibilidade do software. Éuma tecnologia criada para a implementação de interesses transversais (crosscutingconcerns), que são aqueles cuja implementação atravessam os componentesresponsáveis pela modularização do sistema (RESENDE; SILVA, 2005).A POA oferece uma estrutura que encapsula implementações de umaresponsabilidade que ficariam espalhadas no modelo orientado a objetos. Esta unidade échamada de aspecto (NELSON, 2005). Para uma implementação básica de POA, énecessário: uma linguagem para programação dos componentes, como por exemplo oJava; uma linguagem para programação dos aspectos, como o AspectJ; um weaver; umprograma de componentes e um programa de aspectos (STEINMACHER, 2001). Oweaver (ou montador) é o combinador de aspectos. Sua função é combinar os programasescritos em linguagem de componentes, no caso, as regras de negócio implementadas

com orientação a objeto, com os escritos em linguagem de aspecto. O resultado será umprograma mesclando as funcionalidades implementadas nos programas de componentese aspecto (GROTT, 2005).Na POA não há chamada explícita de métodos entre as partes. Ao invés disso, éespecificada em uma unidade separada, como uma parte deve reagir a eventos queocorrem em outra parte (NELSON, 2005).Este artigo apresenta o desenvolvimento de um protótipo de um weaver parageração de código na linguagem Delphi com suporte a programação orientada aaspectos. Por se tratar de uma ferramenta de engenharia de software, ela é voltada para odesenvolvedor. A ferramenta recebe como entrada um arquivo de projeto do Delphi(arquivo .dpr), e um ou mais programas na linguagem de aspecto AOPDelphi, que foicriada neste trabalho. A ferramenta realiza análises léxica e sintática dos programas deaspectos fornecidos como entrada. Como saída, gera programas fontes na linguagemDelphi, mesclando as funcionalidades dos programas fornecidos como entrada. Esteweaver foi desenvolvido baseado no AspectJ 1 .2. Linguagem AOPDelphiA linguagem AOPDelphi é uma linguagem não case sensitive. Apesar de ter sidoinspirada na linguagem de aspectos do AspectJ, sua sintaxe e seus comandos sãosemelhantes aos da linguagem Delphi, pois ela é uma extensão dessa última linguagem.2.1 EspecificaçãoPara especificação da linguagem foi utilizada a ferramenta GALS (GESSER, 2003). Asdefinições regulares de auxílio para definição de tokens, ostokens e a gramática dalinguagem foram definidas nesta ferramenta. Baseado nessas especificações o GALSgera os fontes dos analisadores léxico e sintático da linguagem.Na definição da gramática foi utilizada a notação Backus-Naur Form (BNF). Oquadro 1 apresenta a gramática da linguagem AOPDelphi e algumas definiçõesregulares por ela utilizada.1 ¡ £ ¥ ¡ ¨AspectJ é uma ferramenta de apoio a programação orientada a aspectos na linguagem Java que possui o seude aspectos.e sua linguagem

exemplo do quadro 2, identificado por logInsert, está se referindo ao métodoInsert da classe Arquivo, não importando quais sejam os parâmetros.2.2.2 AdviceOs advices são construções semelhantes aos métodos na orientação a objetos e sãoassociados aos pointcuts. Eles contêm o código que será inserido no ponto de junçãoquando o pointcut correspondente for atingido. Podem ser executados antes ou depoisdo método interceptado (KULESZA; SANT’ANNA; LUCENA, 2005). Todo pointcutdeve possuir um ou dois advices.Na linguagem AOPDelphi, o código Delphi contido no advice não é analisadopelo compilador. A linguagem permite que seja capturado o objeto que invocou ométodo interceptado, podendo utilizá-lo no escopo do advice, através da palavra self,como se tivesse sido criado localmente, porém é uma referência do objeto que chamou ométodo. No aspecto exemplificado no quadro 2, tem-se a implementação de um advicedo tipo before associado ao pointcut logInsert. Conforme o exemplo, o códigoShowMessage(‘Olá Mundo!’) será executado antes da execução do métodoInsert da classe Arquivo.3. AOPDelphiO AOPDelphi é uma ferramenta que provê suporte à programação orientada a aspectospara a linguagem Delphi e é composta por uma linguagem de aspecto e um weaver. Oweaver é o combinador de aspectos. Sua função é combinar os programas escritos emlinguagem de componentes, no caso, as regras de negócio implementadas comorientação a objeto, com os escritos em linguagem de aspectos, gerando um programaque mescle as funcionalidades definidas nesses programas de entrada. Este processo échamado de weaving (GROTT, 2005).A ferramenta foi implementada utilizando a linguagem de programação Delphino ambiente Borland Delphi 7. Na implementação do compilador dos programas deaspectos foi utilizada também a ferramenta GALS (GESSER, 2003). Através dele foramgeradas as classes para a implementação dos analisadores léxico e sintático, e a interfaceda classe do analisador semântico. Isso é feito com base nas definições regulares,palavras reservadas, símbolos especiais, gramática e outras informações que sãofornecidas como entrada na ferramenta.Na figura 1 é apresentado o diagrama de atividades do AOPDelphi onde estãoespecificadas suas funcionalidades de forma geral. Ele está dividido em duas raias,representadas pelo desenvolvedor e a ferramenta, com suas respectivas atividades.

Figura 1: Diagrama de atividades da ferramenta AOPDelphiConforme o diagrama da figura 1, após implementar e informar à ferramenta osprogramas de entrada, o programa de componentes (arquivo .dpr) é compilado paracertificar de que não contenha erros de compilação. Em seguida são compilados osprogramas de aspectos e organizados em objetos as informações necessárias pararealizar o processo de weaving. Não encontrando erros no processo de compilação, aferramenta faz uma cópia dos fontes do programa de componente fornecido na entrada.As alterações realizadas pelo weaver são feitas no programa cópia.Em seguida é realizado o processo de weaving. Baseado nos pointcuts extraídosem cada aspecto, a ferramenta gera expressões regulares para varrer os fontes do projetoDelphi, localizar os joinpoints que devem ser interceptados e implementar a alteraçãoescrita no respectivo advice. Para trabalhar com expressões regulares, foi utilizada abiblioteca RegExp Studio (SOROKIN), que é uma biblioteca freeware para uso deexpressões regulares no Delphi. Finalizado o processo de weaving, o projeto alterado écompilado e se não houver erros de compilação o programa é executado. Havendo erros,é informado pela ferramenta o nome do fonte, classe e método com problema, além doaspecto e advice que originaram o erro.

Dentre as atividades apresentadas no diagrama ilustrado na figura 1, se destaca aatividade Weaving, principal atividade da ferramenta. Nela é representado o processodesde a seleção das units que serão analisadas pelo weaver até a junção do códigocontido no advice, quando este é inserido no método interceptado por um pointcut. Odiagrama de atividades do processo weaving érepresentadonafigura2.Figura 2: Diagrama de atividades do processo de weavingNeste processo, inicialmente a ferramenta extrai do arquivo de projeto Delphi,que será afetado pelos aspectos, as units que estão diretamente associadas ao projeto eadiciona-as a uma fila. Essas units também são lidas, e delas são extraídas as units asquais elas se referem, e as mesmas são adicionadas à fila. Este processo se repete paratodas as units referenciadas no projeto. Em seguida, o weaver varre a lista de aspectosdo projeto e para cada aspecto, varre a lista de pointcuts, gerando expressões regularesbaseadas em suas informações. Essas expressões regulares são parâmetros de busca nas

Figura 4: Apresentação da ferramenta AOPDelphiA tela é dividida em duas guias: Projeto AOP e Editor de Aspectos.A guia Editor de Aspectos é o ambiente para programação dos aspectos. Há comandosgerais para manipulação de arquivos, como solicitar um arquivo novo ou abrir, salvarum existente, além da função para compilar. Na guia Projeto AOP são definidos osparâmetros para compilação de um projeto orientado a aspectos.No campo Projeto Delphi é informado o arquivo de projeto Delphi(arquivo .dpr) que será envolvido no projeto orientado a aspectos. Todas as units quefazem parte desse projeto serão aspectadas 2 , com exceção daquelas que estiveremincluídas nas listas de units que não devem ser afetadas por aspectos. O AOPDelphioferece mecanismos para criar tais listas.Após informar o projeto Delphi, o desenvolvedor deve indicar à ferramentaquais são os programas de aspectos que irão interagir com o projeto Delphi informado.A ferramenta dispõe de funcionalidades para adicionar e remover programas de aspectos(arquivo .dao) na lista de aspectos do projeto. O quadro 3 apresenta uma implementaçãode um aspecto de autenticação, onde o objetivo é permitir que somente usuáriosautorizados possam efetuar determinadas operações (inserção, alteração e exclusão) nastabelas da base de dados de um sistema.2 Trata-se de um neologismo. É o mesmo que ser afetado pelo aspecto.

Quadro 3: Aspecto de autenticaçãoAAutenticacao = AspectImplementationAutenticaInsert : Pointcut = (* *.SQLInsert(*));AutenticaUpdate : Pointcut = (* *.SQLUpdate(*));AutenticaDelete : Pointcut = (* *.SQLDelete(*));Advice AutenticaInsert: Before;beginWith DMTaskMan.qryAutentica dobeginClose;Sql.Clear;Sql.Add(’Select count(*) from DIREITO_USUARIO’);Sql.Add(’Where IDUSUARIO = :IDUSUARIO and OPERACAO = :OPERACAO’);Sql.Add(’ and TABELA = :TABELA’);ParamByName(’IDUSUARIO’).AsInteger := giCodUsuario;ParamByName(’OPERACAO’).AsInteger := 1; //1=Insert, 2=Update, 3=DeleteParamByName(’TABELA’).AsInteger := Self.NomeTabela;ExecSQL;ifFields[0].AsInteger = 0 thenRaise Exception.Create('Você não tem permissão para essa atividade. '+ Chr(13) + 'Entre em contato com o seu superior.');end;EndAdvice;Advice AutenticaUpdate: Before;beginWith DMTaskMan.qryAutentica dobegin...ParamByName('OPERACAO').AsInteger := 2;...end;EndAdvice;Advice AutenticaDelete: Before;beginWith DMTaskMan.qryAutentica dobegin...ParamByName('OPERACAO').AsInteger := 3;...end;EndAdvice;//1=Insert, 2=Update, 3=Delete//1=Insert, 2=Update, 3=DeleteEnd.Em seguida o desenvolvedor pode indicar à ferramenta as listas de units que nãoserão afetadas pelos aspectos do projeto. A cada lista adicionada, suas units sãoinseridas no campo Units não afetadas por aspectos. Durante o processode weaving, cadaunit referenciada em algum fonte lido será analisada, a menos de queseu nome conste nesta lista de restrição.Tendo informado esses parâmetros, o projeto AOPDelphi está pronto para sercompilado. Ao executar o comando Weaving, é feita a consistência no projeto Delphi eem seguida são compilados os programas de aspectos. É feita a cópia do projeto Delphioriginal e inicia-se a junção dos programas de aspectos e do programa de componentes.Os fontes gerados são compilados e ocorrendo sucesso a aplicação será executada.Havendo erros de compilação no projeto Delphi após o weaving, a ferramenta apresentaos tais erros e sua origem.Os quadros 4 e 5 mostram um método SQLDelete de uma classe afetada peloaspecto, antes e depois do processo de weaving, respectivamente.

7 8 : ; < = > < @ A B C < ; > D > C G I K L B M D O < Q R @ S T < >7/ 2 3DMTaskMan.qryAutentica + (- 1. / 0 *0 + 5 *7 8 : ; < = > < @ A B C < ; > D > C G I K L B M D O < Q V < X7Quadro 4: Método SQLDelete antes do processo de weaving& ( ) * + , & *TClientes.SQLDelete(vId: Integer);%* . / 0 -/ 2 3DMTaskMan.SqlQuery + (- 1. / 0 *Close;Sql.Clear;Sql.Add(’Delete from CLIENTE Where CL_CODIGO = :CL_CODIGO’);ParamByName(’CL_CODIGO’).AsInteger := vID;ExecSql;* 0 + 5* 0 + 5Quadro 5: Método SQLDelete após o processo de weaving& ( ) * + , & *TClientes.SQLDelete(vId: Integer);%* . / 0 -Close;Sql.Clear;Sql.Add(’Select count(*) from DIREITO_USUARIO’);Sql.Add(’Where IDUSUARIO = :IDUSUARIO and OPERACAO = :OPERACAO’);Sql.Add(’ and TABELA = :TABELA’);ParamByName(’IDUSUARIO’).AsInteger := giCodUsuario;ParamByName(’OPERACAO’).AsInteger := 3; //1=Insert, 2=Update,3=DeleteParamByName(’TABELA’).AsInteger := Self.NomeTabela;ExecSQL;UFields[0].AsInteger = 0 2 3 * 0/Raise Exception.Create('Você não tem permissão para essaatividade. ' + Chr(13) +'Entre em contato com o seu superior.');/ 2 3DMTaskMan.SqlQuery + (- 1. / 0 *Close;Sql.Clear;Sql.Add('Delete from CLIENTE Where CL_CODIGO = :CL_CODIGO');ParamByName('CL_CODIGO').AsInteger := vID;ExecSql;* 0 + 5* 0 + 5Conforme definido no advice AutenticaDelete do tipo before, o códigonele contido foi inserido no método interceptado, antes das instruções que já estavam aliimplementadas.4. ConclusõesConsiderando a proposta e as vantagens da programação orientada a aspectos, ossoftwares desenvolvidos com essas técnicas tendem a serem mais flexíveis, melhorandoa manutenibilidade e reusabilidade, pois a implementação dos interesses transversaisfica encapsulada em módulos fisicamente separados do restante do código. Dessa forma,cada componente terá apenas código específico da implementação de seu negócio,permitindo uma melhor evolução do software.

Sendo uma tecnologia relativamente nova, e pelo fato das linguagens deprogramação existentes não proverem suporte nativo a POA, é importante o surgimentode novas ferramentas de apoio nessa área.Na implementação do aspecto de autenticação na seção anterior, observa-se afacilidade e a confiabilidade que a ferramenta pode proporcionar no desenvolvimento.Nessa implementação através do AOPDelphi, foi necessário a implementação de umaspecto com três pointcuts etrêsadvices. Além de manter íntegros os programas quetêm seu interesse específico, não gerando entrelaçamento de código, a implementaçãodo controle de autenticação está pronta até mesmo para as novas classes que vierem aserem adicionadas no sistema.Uma limitação da linguagem de aspecto é a não possibilidade de criar variáveis,procedimentos e funções locais dentro dos advices, o que poderia facilitar bastantealgumas implementações.5. ReferênciasGESSER, Carlos E. “GALS: gerador de analisadores léxicos e sintáticos”. 2003. 150 f.Trabalho de Conclusão de Curso (Bacharelado em Ciências da Computação) –Centro Tecnológico, Universidade Federal de Santa Catarina, Florianópolis.GROTT, Márcio C. “Estudo de caso aplicando programação orientada a aspectos”.2005. 65 f. Monografia (Especialização em Tecnologia da Informação na GestãoIntegrada de Negócios) – Universidade Regional de Blumenau, Blumenau.KICZALES, Gregor et al. “Aspect-oriented programming”, in Proceeding ofECOOP’97, Finland: Springer - Verlag, 1997.KULESZA, Uirá; SANT’ANNA, Cláudio; LUCENA, Carlos J. P. “Técnicas de projetoorientado a aspectos”. Uberlândia, 2005. Disponível em: .Acesso em: 01 maio 2006.NELSON, Torsten. Apostila do curso de programação orientada a aspectos comAspectJ. Belo Horizonte, 2005. Disponível em:. Acesso em: 26 abr.2006.OLIVEIRA, Edmar Soares. “protótipo de um weaver para programação orientada aaspectos em delphi”. 2006. 72 f. Trabalho de Conclusão de Curso (Bacharelado emCiências da Computação) – Centro de Ciências Exatas e Naturais, UniversidadeRegional de Blumenau, Blumenau.RESENDE, Antônio M. P.; SILVA, Claudiney C. “Programação orientada a aspectosem Java”. Rio de Janeiro: Brasoft, 2005.SOROKIN, Andrey V. “RegExp studio”. Saint Petersburg, Rússia, 2004. Disponívelem: . Acesso em: 01 mar.2006.STEINMACHER, Igor F. “Estudo de caso aplicando programação orientada aaspectos”. 2002. 72 f. Trabalho de Conclusão de Curso (Bacharelado em Ciências daComputação) – Universidade Estadual de Maringá, Maringá.