Schema DDL: separate redshift-specific code from standard SQL (Closes #372)

Author: szareiangm

0-common/schema-ddl/src/main/scala/com.snowplowanalytics/iglu.schemaddl/redshift/ColumnAttribute.scala

@@ -10,21 +10,10 @@
  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  * See the Apache License Version 2.0 for the specific language governing permissions and limitations there under.
  */
-package com.snowplowanalytics.iglu.schemaddl.redshift
+package com.snowplowanalytics.iglu.schemaddl
+package redshift
 
-/**
- * column_attributes are:
- * [ DEFAULT default_expr ]
- * [ IDENTITY ( seed, step ) ]
- * [ ENCODE encoding ]
- * [ DISTKEY ]
- * [ SORTKEY ]
- */
-sealed trait ColumnAttribute extends Ddl
-
-case class Default(value: String) extends ColumnAttribute {
-  def toDdl = s"DEFAULT $value"
-}
+import sql.{ColumnAttribute, Ddl}
 
 case class Identity(seed: Int, step: Int) extends ColumnAttribute {
   def toDdl = s"IDENTITY ($seed, $step)"

0-common/schema-ddl/src/main/scala/com.snowplowanalytics/iglu.schemaddl/redshift/DataType.scala

@@ -10,63 +10,17 @@
  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  * See the Apache License Version 2.0 for the specific language governing permissions and limitations there under.
  */
-package com.snowplowanalytics.iglu.schemaddl.redshift
+package com.snowplowanalytics.iglu.schemaddl
+package redshift
+
+import sql.DataType
 
 /**
  * Data types
  * http://docs.aws.amazon.com/redshift/latest/dg/c_Supported_data_types.html
  */
-sealed trait DataType extends Ddl
-
-case object RedshiftTimestamp extends DataType {
-  def toDdl = "TIMESTAMP"
-}
-
-case object RedshiftDate extends DataType {
-  def toDdl = "DATE"
-}
-
-case object RedshiftSmallInt extends DataType {
-  def toDdl = "SMALLINT"
-}
-
-case object RedshiftInteger extends DataType {
-  def toDdl = "INT"
-}
-
-case object RedshiftBigInt extends DataType {
-  def toDdl = "BIGINT"
-}
-
-case object RedshiftReal extends DataType {
-  def toDdl = "REAL"
-}
-
-case object RedshiftDouble extends DataType {
-  def toDdl = "DOUBLE PRECISION"
-}
-
-case class RedshiftDecimal(precision: Option[Int], scale: Option[Int]) extends DataType {
-  def toDdl = (precision, scale) match {
-    case (Some(p), Some(s)) => s"DECIMAL ($p, $s)"
-    case _ => "DECIMAL"
-  }
-}
-
-case object RedshiftBoolean extends DataType {
-  def toDdl = "BOOLEAN"
-}
-
-case class RedshiftVarchar(size: Int) extends DataType {
-  def toDdl = s"VARCHAR($size)"
-}
-
-case class RedshiftChar(size: Int) extends DataType {
-  def toDdl = s"CHAR($size)"
-}
 
 // CUSTOM
-
 /**
  * These predefined data types assembles into usual Redshift data types, but
  * can store additional information such as warnings.

0-common/schema-ddl/src/main/scala/com.snowplowanalytics/iglu.schemaddl/redshift/TableAttribute.scala

@@ -13,15 +13,19 @@
 package com.snowplowanalytics.iglu.schemaddl.redshift
 
 // Scalaz
+import com.snowplowanalytics.iglu.schemaddl.sql.TableAttribute
 import scalaz.NonEmptyList
 
+// This project
+import com.snowplowanalytics.iglu.schemaddl.sql.Ddl
+
+
 /**
  * table_attributes are:
  * [ DISTSTYLE { EVEN | KEY | ALL } ]
  * [ DISTKEY ( column_name ) ]
  * [ [COMPOUND | INTERLEAVED ] SORTKEY ( column_name [, ...] ) ]
  */
-sealed trait TableAttribute extends Ddl
 
 sealed trait DiststyleValue extends Ddl
 case object Even extends DiststyleValue { def toDdl = "EVEN" }