From 27e36a4f7d13584278d3249bf7f5b60facf76fea Mon Sep 17 00:00:00 2001
From: konrad <konrad@6e3c4bff-ac9f-4ac1-96c5-d2ea494d3e33>
Date: Wed, 30 Dec 2009 11:46:46 +0000
Subject: [PATCH] enable conditional abstracts in wob

git-svn-id: https://silmor.de/svn/softmagic/smoke/trunk@378 6e3c4bff-ac9f-4ac1-96c5-d2ea494d3e33
---
 src/dialogs/orderwin.cpp  |    8 +++-----
 wob/customer.wolf         |    4 ++--
 wob/order.wolf            |    3 +++
 woc/htmlout.cpp           |   15 ++++++++++++++-
 woc/phpout.h              |    2 +-
 woc/processor.cpp         |   11 +++++++++--
 woc/processor.h           |    8 ++++++--
 woc/qtout.cpp             |    2 +-
 www/inc/wext/autoload.php |    1 -
 www/inc/wext/customer.php |   15 ---------------
 10 files changed, 39 insertions(+), 30 deletions(-)
 delete mode 100644 www/inc/wext/customer.php

diff --git a/src/dialogs/orderwin.cpp b/src/dialogs/orderwin.cpp
index 9909304..8b60a08 100644
--- a/src/dialogs/orderwin.cpp
+++ b/src/dialogs/orderwin.cpp
@@ -77,16 +77,14 @@ MOrderWindow::MOrderWindow(QWidget*par,const MOOrder&o)
 	m->addAction(tr("&Close"),this,SLOT(close()));
 	
 	m=mb->addMenu(tr("&Payment"));
-	//FIXME: m->setEnabled(o.isStored());
 	m->addAction(tr("Receive &Payment..."),this,SLOT(payment()))
-	 ->setEnabled(req->hasRole("orderpay"));
+	 ->setEnabled(req->hasRight(req->ROrderPay));
 	m->addAction(tr("&Refund..."),this,SLOT(refund()))
-	 ->setEnabled(req->hasRole("orderrefund"));
+	 ->setEnabled(req->hasRight(req->ROrderRefund));
  	m->addAction(tr("Pay with &Voucher..."),this,SLOT(payvoucher()))
- 	 ->setEnabled(req->hasRole("usevoucher"));
+ 	 ->setEnabled(req->hasRight(req->RUseVoucher));
 	 
 	m=mb->addMenu(tr("P&rinting"));
-	//FIXME: m->setEnabled(o.isStored());
 	m->addAction(tr("Print &Bill..."),this,SLOT(printBill()));
 	m->addAction(tr("Save Bill &as file..."),this,SLOT(saveBill()));
 	m->addSeparator();
diff --git a/wob/customer.wolf b/wob/customer.wolf
index 120f926..6b8e23f 100644
--- a/wob/customer.wolf
+++ b/wob/customer.wolf
@@ -150,8 +150,8 @@
 			</Map>
 		</Mapping>
 	</Class>
-	<Class name="CustomerInfo" abstract="yes">
-		<!-- abstract is needed on C++ side -->
+	<Class name="CustomerInfo">
+		<Abstract lang="qt"/><!-- abstract is needed on C++ side -->
 		<Doc>This class encapsulates the most basic information about a customer.</Doc>
 		<Doc>For more complex tasks the Customer class is used.</Doc>
 		<Property name="customerid" type="int"/>
diff --git a/wob/order.wolf b/wob/order.wolf
index 5c29a22..16d8a2e 100644
--- a/wob/order.wolf
+++ b/wob/order.wolf
@@ -408,6 +408,9 @@
 	<Transaction name="CreateReservation"/>
 	<Transaction name="ReservationToOrder"/>
 	<Transaction name="CancelOrder"/>
+	<Transaction name="OrderPay"/>
+	<Transaction name="OrderRefund"/>
+	<Transaction name="UseVoucher"/>
 	
 	<Transaction name="GetAllShipping">
 		<Input/>
diff --git a/woc/htmlout.cpp b/woc/htmlout.cpp
index c15205f..50de719 100644
--- a/woc/htmlout.cpp
+++ b/woc/htmlout.cpp
@@ -217,8 +217,21 @@ void WocHtmlOut::newClass(const WocClass&cls)
 	QString hcd;
 	//class declaration
 	hcd+="<h1>";
-	if(cls.isAbstract())hcd+="Abstract ";
+	if(cls.isAbstract(""))hcd+="Abstract ";
 	hcd+="Class "+cn+"</h1>\n";
+	
+	//conditional abstract
+	QStringList ab=cls.abstractLangs();
+	if(ab.size()>0){
+		hcd+="<p>The class is conditionally abstract in: ";
+		for(int i=0;i<ab.size();i++){
+			if(i)hcd+=", ";
+			hcd+=ab[i];
+		}
+		hcd+="</p>\n";
+	}
+	
+	//docu
 	QStringList doc=cls.docStrings();
 	for(int i=0;i<doc.size();i++)
 		hcd+="<p>"+doc[i]+"</p>\n";
diff --git a/woc/phpout.h b/woc/phpout.h
index c5e986f..28bddeb 100644
--- a/woc/phpout.h
+++ b/woc/phpout.h
@@ -86,7 +86,7 @@ class WocPHPServerOut:public WocOutput
 		/**helper: return the PHP-class-name of a WocClass*/
 		QString className(const WocClass&c){return "WO"+c.name();}
 		/**helper: return the PHP-class-name of a WocClass plus Abstract if it is abstract*/
-		QString abstractClassName(const WocClass&c){return "WO"+c.name()+QString(c.isAbstract()?"Abstract":"");}
+		QString abstractClassName(const WocClass&c){return "WO"+c.name()+QString(c.isAbstract("php")?"Abstract":"");}
 		
 		/**helper: returns the PHP-class-name for a WocTransaction*/
 		QString trnClassName(const WocTransaction&t){return "WTr"+t.name();}
diff --git a/woc/processor.cpp b/woc/processor.cpp
index 576af3c..4c64a0a 100644
--- a/woc/processor.cpp
+++ b/woc/processor.cpp
@@ -477,9 +477,15 @@ WocClass::WocClass(const QDomElement&cls)
 		if(s!="")m_docstrings<<s;
 	}
 	//check abstraction
-	if(!m_abstract && isAbstract()){
+	if(!m_abstract && isAbstract("")){
 		qDebug("Warning: class %s should be declared abstract.",m_name.toAscii().data());
 	}
+	//conditional abstraction (must be after check or we'll get false positives)
+	nl=cls.elementsByTagName("Abstract");
+	for(int i=0;i<nl.size();i++){
+		QString s=nl.at(i).toElement().attribute("lang").trimmed();
+		if(s!="")m_cabstract<<s;
+	}
 }
 
 bool WocClass::hasProperty(QString p)const
@@ -518,8 +524,9 @@ bool WocClass::propertyIsAbstract(QString p)const
 	return false;
 }
 
-bool WocClass::isAbstract()const
+bool WocClass::isAbstract(QString l)const
 {
+	if(m_cabstract.contains(l))return true;
 	for(int i=0;i<m_props.size();i++)
 		if(m_props[i].isabstract)return true;
 	return m_abstract;
diff --git a/woc/processor.h b/woc/processor.h
index d318ec9..9e19246 100644
--- a/woc/processor.h
+++ b/woc/processor.h
@@ -88,8 +88,10 @@ class WocClass
 		/**returns whether the property type is blob*/
 		bool propertyIsBlob(QString p)const{QString pt=propertyPlainType(p);return pt=="blob";}
 		
-		/**returns whether the class is abstract (needs to be customized); it is automatically abstract if any property is abstract*/
-		bool isAbstract()const;
+		/**returns whether the class is abstract in the requested language (needs to be customized); it is automatically abstract if any property is abstract*/
+		bool isAbstract(QString)const;
+		/**returns the languages in which the class is conditionally abstract*/
+		QStringList abstractLangs()const{return m_cabstract;}
 		
 		/**returns the names of all enum types of this class*/
 		QStringList enumTypes()const{return m_enumvals.keys();}
@@ -118,7 +120,9 @@ class WocClass
 	private:
 		//valid: parsing the WOLF succeeded
 		//abstract: the class is declared abstract (isAbstract may return true even if this is false)
+		//cabstract: conditional abstract - just for one or two languages; abstract overrides cabstract!
 		bool m_valid,m_abstract;
+		QStringList m_cabstract;
 		//name: class name
 		//base: name of parent class (s=server, c=client)
 		QString m_name,m_sbase,m_cbase;
diff --git a/woc/qtout.cpp b/woc/qtout.cpp
index 487c594..396c629 100644
--- a/woc/qtout.cpp
+++ b/woc/qtout.cpp
@@ -122,7 +122,7 @@ void WocQtClientOut::newClass(const WocClass&cls)
 {
 	QString cn=m_prefix+"O"+cls.name();
 	QString cna=cn;
-	if(cls.isAbstract())cna+="Abstract";
+	if(cls.isAbstract("qt"))cna+="Abstract";
 	addFile(cna);
 	QFile hdr(m_basedir+"/"+m_subdir+"/"+cna+".h");
 	QFile src(m_basedir+"/"+m_subdir+"/"+cna+".cpp");
diff --git a/www/inc/wext/autoload.php b/www/inc/wext/autoload.php
index c446bc5..ae21d53 100644
--- a/www/inc/wext/autoload.php
+++ b/www/inc/wext/autoload.php
@@ -14,6 +14,5 @@
 $AUTOCLASS["WORole"]="inc/wext/role.php";
 $AUTOCLASS["WOOrderInfo"]="inc/wext/order.php";
 $AUTOCLASS["WOOrder"]="inc/wext/order.php";
-$AUTOCLASS["WOCustomerInfo"]="inc/wext/customer.php";
 $AUTOCLASS["WOTicket"]="inc/wext/ticket.php";
 ?>
\ No newline at end of file
diff --git a/www/inc/wext/customer.php b/www/inc/wext/customer.php
deleted file mode 100644
index 9c2fa50..0000000
--- a/www/inc/wext/customer.php
+++ /dev/null
@@ -1,15 +0,0 @@
-<?
-//
-// PHP Implementation: customer
-//
-// Description: 
-//
-//
-// Author: Konrad Rosenbaum <konrad@silmor.de>, (C) 2009
-//
-// Copyright: See README/COPYING files that come with this distribution
-//
-//
-
-class WOCustomerInfo extends WOCustomerInfoAbstract {};
-?>
\ No newline at end of file
-- 
1.7.2.5