From eb2ec45ab96b0968c5bfc5d17ec6c6d7a57ebe37 Mon Sep 17 00:00:00 2001
From: Michael Andreen <harv@ruin.nu>
Date: Sun, 30 Mar 2008 18:09:21 +0200
Subject: [PATCH] Use race enum instead of character

---
 database/enums.sql | 60 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 60 insertions(+)
 create mode 100644 database/enums.sql

diff --git a/database/enums.sql b/database/enums.sql
new file mode 100644
index 0000000..3c0a7b3
--- /dev/null
+++ b/database/enums.sql
@@ -0,0 +1,60 @@
+DROP VIEW current_planet_stats_full;
+DROP VIEW current_planet_stats;
+
+CREATE TYPE race AS ENUM ('Ter','Cat','Xan','Zik','Etd');
+ALTER TABLE planets ALTER COLUMN race TYPE race USING race::race;
+ALTER TABLE planets ALTER COLUMN race SET NOT NULL;
+ALTER TABLE planets ALTER COLUMN ftid SET NOT NULL;
+
+CREATE VIEW current_planet_stats AS
+    SELECT p.id, p.nick, p.planet_status, p.hit_us, ps.x, ps.y, ps.z, p.ruler, p.planet, p.race, ps.size, ps.score, ps.value, ps.xp, ps.sizerank, ps.scorerank, ps.valuerank, ps.xprank, alliances.name AS alliance, alliances.relationship, p.alliance_id, p.channel, p.ftid FROM (((SELECT planet_stats.id, planet_stats.tick, planet_stats.x, planet_stats.y, planet_stats.z, planet_stats.size, planet_stats.score, planet_stats.value, planet_stats.xp, planet_stats.sizerank, planet_stats.scorerank, planet_stats.valuerank, planet_stats.xprank FROM planet_stats WHERE (planet_stats.tick = (SELECT max(planet_stats.tick) AS max FROM planet_stats))) ps NATURAL JOIN planets p) LEFT JOIN alliances ON ((alliances.id = p.alliance_id)));
+
+
+CREATE VIEW current_planet_stats_full AS
+    SELECT p.id, p.nick, p.planet_status, p.hit_us, ps.x, ps.y, ps.z, p.ruler, p.planet, p.race, ps.size, ps.score, ps.value, ps.xp, ps.sizerank, ps.scorerank, ps.valuerank, ps.xprank, alliances.name AS alliance, alliances.relationship, p.alliance_id, p.channel, p.ftid, ps.size_gain, ps.score_gain, ps.value_gain, ps.xp_gain, ps.sizerank_gain, ps.scorerank_gain, ps.valuerank_gain, ps.xprank_gain, ps.size_gain_day, ps.score_gain_day, ps.value_gain_day, ps.xp_gain_day, ps.sizerank_gain_day, ps.scorerank_gain_day, ps.valuerank_gain_day, ps.xprank_gain_day FROM (((SELECT planet_stats.id, planet_stats.tick, planet_stats.x, planet_stats.y, planet_stats.z, planet_stats.size, planet_stats.score, planet_stats.value, planet_stats.xp, planet_stats.sizerank, planet_stats.scorerank, planet_stats.valuerank, planet_stats.xprank, planet_stats.size_gain, planet_stats.score_gain, planet_stats.value_gain, planet_stats.xp_gain, planet_stats.sizerank_gain, planet_stats.scorerank_gain, planet_stats.valuerank_gain, planet_stats.xprank_gain, planet_stats.size_gain_day, planet_stats.score_gain_day, planet_stats.value_gain_day, planet_stats.xp_gain_day, planet_stats.sizerank_gain_day, planet_stats.scorerank_gain_day, planet_stats.valuerank_gain_day, planet_stats.xprank_gain_day FROM planet_stats WHERE (planet_stats.tick = (SELECT max(planet_stats.tick) AS max FROM planet_stats))) ps NATURAL JOIN planets p) LEFT JOIN alliances ON ((alliances.id = p.alliance_id)));
+
+CREATE OR REPLACE FUNCTION findplanetid(character varying, character varying, character varying) RETURNS integer
+    AS $_$
+my ($ruler, $planet, $race) = @_;
+my $query = spi_prepare('SELECT id, race FROM planets WHERE ruler=$1 AND planet=$2','varchar','varchar');
+my $rv = spi_exec_prepared($query,$ruler,$planet);
+spi_freeplan($query);
+my $status = $rv->{status};
+my $nrows = $rv->{processed};
+my $id;
+if ($nrows == 1){
+    $id = $rv->{rows}[0]->{id};
+    unless ($race eq $rv->{rows}[0]->{race}){
+        $query = spi_prepare('UPDATE planets SET race=$1 where id=$2','race','int4');
+        spi_exec_prepared($query,$race,$id);
+        spi_freeplan($query);
+    }
+}else {
+    $rv = spi_exec_query("SELECT nextval('public.forum_threads_ftid_seq') AS id");
+    if ($rv->{processed} != 1){
+        return;
+    }
+    $ftid = $rv->{rows}[0]->{id};
+    $query = spi_prepare('INSERT INTO forum_threads (fbid,ftid,subject,uid) VALUES($1,$2,$3,-3)','int4','int4','varchar');
+    $rv = spi_exec_prepared($query,-2,$ftid,"$ruler OF $planet");
+    spi_freeplan($query);
+    if (rv->{status} != SPI_OK_INSERT){
+        return;
+    }
+    $rv = spi_exec_query("SELECT nextval('public.planets_id_seq') AS id");
+    if ($rv->{processed} != 1){
+        return;
+    }
+    $id = $rv->{rows}[0]->{id};
+    $query = spi_prepare('INSERT INTO planets(id,ruler,planet,race,ftid) VALUES($1,$2,$3,$4,$5)','int4','varchar','varchar','race','int4
+');
+    $rv = spi_exec_prepared($query,$id,$ruler,$planet,$race,$ftid);
+    spi_freeplan($query);
+    if (rv->{status} != SPI_OK_INSERT){
+        return;
+    }
+
+}
+return $id;
+$_$
+    LANGUAGE plperl;
-- 
2.39.2