umbrello / codegenerators
perlwriter.h

00001 /***************************************************************************
00002                           perlwriter.h  -  description
00003                              -------------------
00004     begin                : Wed Jan 22 2003
00005     copyright            : (C) 2003 by David Hugh-Jones
00006     email                : hughjonesd@yahoo.co.uk
00007  ***************************************************************************/
00008 
00009 /***************************************************************************
00010  *                                                                         *
00011  *   This program is free software; you can redistribute it and/or modify  *
00012  *   it under the terms of the GNU General Public License as published by  *
00013  *   the Free Software Foundation; either version 2 of the License, or     *
00014  *   (at your option) any later version.                                   *
00015  *                                                                         *
00016  ***************************************************************************/
00017 
00018 #ifndef PERLWRITER_H
00019 #define PERLWRITER_H
00020 
00021 #include "simplecodegenerator.h"
00022 #include "../umlattributelist.h"
00023 #include "../umloperationlist.h"
00024 
00025 class UMLOperation;
00026 class UMLAttribute;
00027 class UMLClassifier;
00028 
00033 class PerlWriter : public SimpleCodeGenerator {
00034     Q_OBJECT
00035 public:
00036 
00037     PerlWriter();
00038     virtual ~PerlWriter();
00039 
00044     virtual void writeClass(UMLClassifier *c);
00045 
00049     virtual Uml::Programming_Language getLanguage();
00050 
00054     virtual const QStringList reservedKeywords() const;
00055 
00056     QStringList defaultDatatypes();
00057 
00058 private:
00059 
00064     bool bPrivateSectionCommentIsWritten;
00065 
00072     void writeOperations(UMLClassifier *c, QTextStream &perl);
00073 
00081     void writeOperations(const QString &classname, UMLOperationList &opList,
00082                          QTextStream &perl);
00083 
00088     void writeAttributes(UMLClassifier *c, QTextStream &perl);
00089 
00094     void writeAttributes(UMLAttributeList &atList, QTextStream &perl);
00095 
00096     bool GetUseStatements(UMLClassifier *c, QString &Ret,
00097                           QString &ThisPkgName);
00098 
00099 };
00100 
00101 #endif //PERLWRITER
umbrello API Documentation

perlwriter.h
