1 CREATE OR REPLACE FUNCTION planetid(x integer, y integer, z integer, tick integer) RETURNS integer
2 AS $_$SELECT pid FROM planet_stats WHERE x = $1 AND y = $2 AND z = $3 AND (tick >= $4 OR tick =( SELECT max(tick) FROM planet_stats)) ORDER BY tick ASC LIMIT 1$_$
5 CREATE OR REPLACE FUNCTION planetcoords(id integer, tick integer, OUT x integer, OUT y integer, OUT z integer) RETURNS record
6 AS $_$SELECT x,y,z FROM planet_stats WHERE pid = $1 AND (tick >= $2 OR tick =( SELECT max(tick) FROM planet_stats)) ORDER BY tick ASC LIMIT 1$_$
9 CREATE OR REPLACE FUNCTION find_planet_id(_ruler text, _planet text, _race race) RETURNS integer
16 SELECT pid, race INTO p FROM planets WHERE ruler = _ruler AND planet = _planet;
18 IF _race <> p.race THEN
19 UPDATE planets SET race = _race WHERE pid = p.pid;
23 INSERT INTO forum_threads (fbid,subject,uid) VALUES(-2, _ruler || ' OF ' || _planet, -3)
24 RETURNING ftid INTO thread;
25 INSERT INTO planets(ruler,planet,race,ftid) VALUES(_ruler,_planet,_race,thread)
26 RETURNING pid INTO id;
33 CREATE OR REPLACE FUNCTION find_alliance_id(alli text) RETURNS integer
38 SELECT aid FROM INTO id alliances WHERE alliance = alli;
40 INSERT INTO alliances(alliance) VALUES($1)
41 RETURNING aid INTO id;
48 CREATE OR REPLACE FUNCTION coords(x integer, y integer, z integer) RETURNS text
50 SELECT $1 || ':' || $2 || ':' || $3
52 LANGUAGE sql IMMUTABLE;