func quake(w http.ResponseWriter, r *http.Request) {
if len(r.URL.Query()) != 0 {
web.BadRequest(w, r, "incorrect number of query parameters.")
return
}
publicID := r.URL.Path[quakeLen:]
// TODO bother with this?
if !publicIDRe.MatchString(publicID) {
web.BadRequest(w, r, "invalid publicID: "+publicID)
return
}
var d string
// Check that the publicid exists in the DB. This is needed as the handle method will return empty
// JSON for an invalid publicID.
err := db.QueryRow("select publicid FROM qrt.quake_materialized where publicid = $1", publicID).Scan(&d)
if err == sql.ErrNoRows {
web.NotFound(w, r, "invalid publicID: "+publicID)
return
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
err = db.QueryRow(
`SELECT row_to_json(fc)
FROM ( SELECT 'FeatureCollection' as type, array_to_json(array_agg(f)) as features
FROM (SELECT 'Feature' as type,
ST_AsGeoJSON(q.origin_geom)::json as geometry,
row_to_json((SELECT l FROM
(
SELECT
publicid AS "publicID",
to_char(origintime, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"') as "time",
depth,
magnitude,
type,
agency,
locality,
qrt.mmi_to_intensity(maxmmi) as intensity,
qrt.mmi_to_intensity(mmi_newzealand) as "regionIntensity",
qrt.quake_quality(status, usedphasecount, magnitudestationcount) as quality,
to_char(updatetime, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"') as "modificationTime"
) as l
)) as properties FROM qrt.quake_materialized as q where publicid = $1 ) As f ) as fc`, publicID).Scan(&d)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b := []byte(d)
web.Ok(w, r, &b)
}
func felt(w http.ResponseWriter, r *http.Request) {
if err := feltD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
publicID := r.URL.Query().Get("publicID")
var d string
err := db.QueryRow("select publicid FROM qrt.quake_materialized where publicid = $1", publicID).Scan(&d)
if err == sql.ErrNoRows {
web.NotFound(w, r, "invalid publicID: "+publicID)
return
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
res, err := client.Get(feltURL + publicID + ".geojson")
defer res.Body.Close()
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b, err := ioutil.ReadAll(res.Body)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
// Felt returns a 400 when it should probably be a 404. Tapestry quirk?
switch {
case 200 == res.StatusCode:
web.Ok(w, r, &b)
return
case 4 == res.StatusCode/100:
web.NotFound(w, r, string(b))
return
case 5 == res.StatusCode/500:
web.ServiceUnavailable(w, r, errors.New("error proxying felt resports. Shrug."))
return
}
web.ServiceUnavailable(w, r, errors.New("unknown response from felt."))
}
// just quake regions at the moment.
func regions(w http.ResponseWriter, r *http.Request) {
if err := regionsD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
if r.URL.Query().Get("type") != "quake" {
web.BadRequest(w, r, "type must be quake.")
return
}
var d string
err := db.QueryRow(`SELECT row_to_json(fc)
FROM ( SELECT 'FeatureCollection' as type, array_to_json(array_agg(f)) as features
FROM (SELECT 'Feature' as type,
ST_AsGeoJSON(q.geom)::json as geometry,
row_to_json((SELECT l FROM
(
SELECT
regionname as "regionID",
title,
groupname as group
) as l
)) as properties FROM qrt.region as q where groupname in ('region', 'north', 'south')) as f ) as fc`).Scan(&d)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
w.Header().Set("Surrogate-Control", web.MaxAge86400)
b := []byte(d)
web.Ok(w, r, &b)
}
/*
returns a zero length list if no sites are found.
*/
func getSites(w http.ResponseWriter, r *http.Request) ([]siteQ, bool) {
var sites = make([]siteQ, 0)
for _, ns := range strings.Split(r.URL.Query().Get("sites"), ",") {
nss := strings.Split(ns, ".")
if len(nss) != 2 {
web.BadRequest(w, r, "invalid sites query.")
return sites, false
}
sites = append(sites, siteQ{networkID: nss[0], siteID: nss[1]})
}
for _, s := range sites {
err := db.QueryRow("select name FROM fits.site join fits.network using (networkpk) where siteid = $2 and networkid = $1", s.networkID, s.siteID).Scan(&s.name)
if err == sql.ErrNoRows {
web.NotFound(w, r, "invalid siteID and networkID combination: "+s.siteID+" "+s.networkID)
return sites, false
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return sites, false
}
}
return sites, true
}
func alertLevel(w http.ResponseWriter, r *http.Request) {
if len(r.URL.Query()) != 0 {
web.BadRequest(w, r, "incorrect number of query parameters.")
return
}
var d string
err := db.QueryRow(`SELECT row_to_json(fc)
FROM ( SELECT 'FeatureCollection' as type, array_to_json(array_agg(f)) as features
FROM (SELECT 'Feature' as type,
ST_AsGeoJSON(v.location)::json as geometry,
row_to_json((SELECT l FROM
(
SELECT
id AS "volcanoID",
title AS "volcanoTitle",
alert_level as "level",
activity,
hazards
) as l
)) as properties FROM (qrt.volcano JOIN qrt.volcanic_alert_level using (alert_level)) as v ) As f ) as fc`).Scan(&d)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b := []byte(d)
web.Ok(w, r, &b)
}
func intensityMeasuredLatest(w http.ResponseWriter, r *http.Request) {
if err := intensityMeasuredLatestD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
if r.URL.Query().Get("type") != "measured" {
web.BadRequest(w, r, "type must be measured.")
return
}
var d string
err := db.QueryRow(
`SELECT row_to_json(fc)
FROM ( SELECT 'FeatureCollection' as type, COALESCE(array_to_json(array_agg(f)), '[]') as features
FROM (SELECT 'Feature' as type,
ST_AsGeoJSON(s.location)::json as geometry,
row_to_json(( select l from
(
select mmi
) as l ))
as properties from (select location, mmi
FROM impact.intensity_measured) as s
) As f ) as fc`).Scan(&d)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b := []byte(d)
web.Ok(w, r, &b)
}
func region(w http.ResponseWriter, r *http.Request) {
if len(r.URL.Query()) != 0 {
web.BadRequest(w, r, "incorrect number of query parameters.")
return
}
regionID := r.URL.Path[regionLen:]
var d string
err := db.QueryRow("select regionname FROM qrt.region where regionname = $1", regionID).Scan(&d)
if err == sql.ErrNoRows {
web.BadRequest(w, r, "invalid regionID: "+regionID)
return
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
err = db.QueryRow(`SELECT row_to_json(fc)
FROM ( SELECT 'FeatureCollection' as type, array_to_json(array_agg(f)) as features
FROM (SELECT 'Feature' as type,
ST_AsGeoJSON(q.geom)::json as geometry,
row_to_json((SELECT l FROM
(
SELECT
regionname as "regionID",
title,
groupname as group
) as l
)) as properties FROM qrt.region as q where regionname = $1 ) as f ) as fc`, regionID).Scan(&d)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
w.Header().Set("Surrogate-Control", web.MaxAge86400)
b := []byte(d)
web.Ok(w, r, &b)
}
// validType checks that the typeID exists in the DB.
func validType(w http.ResponseWriter, r *http.Request, typeID string) bool {
var d string
err := db.QueryRow("select typeID FROM fits.type where typeID = $1", typeID).Scan(&d)
if err == sql.ErrNoRows {
web.NotFound(w, r, "invalid typeID: "+typeID)
return false
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return false
}
return true
}
// validTypeMethod checks that the typeID and methodID exists in the DB
// and are a valid combination.
func validTypeMethod(w http.ResponseWriter, r *http.Request, typeID, methodID string) bool {
var d string
err := db.QueryRow("SELECT typepk FROM fits.type join fits.type_method using (typepk) join fits.method using (methodpk) WHERE typeid = $1 and methodid = $2", typeID, methodID).Scan(&d)
if err == sql.ErrNoRows {
web.NotFound(w, r, "invalid methodID for typeID: "+methodID+" "+typeID)
return false
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return false
}
return true
}
// validSite checks that the siteID and networkID combination exists in the DB.
func validSite(w http.ResponseWriter, r *http.Request, networkID, siteID string) bool {
var d string
err := db.QueryRow("select siteID FROM fits.site join fits.network using (networkpk) where siteid = $2 and networkid = $1", networkID, siteID).Scan(&d)
if err == sql.ErrNoRows {
web.NotFound(w, r, "invalid siteID and networkID combination: "+siteID+" "+networkID)
return false
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return false
}
return true
}
func news(w http.ResponseWriter, r *http.Request) {
if len(r.URL.Query()) != 0 {
web.BadRequest(w, r, "incorrect number of query parameters.")
return
}
j, err := fetchRSS(newsURL)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
w.Header().Set("Surrogate-Control", web.MaxAge300)
web.Ok(w, r, &j)
}
// validSrs checks that the srs represented by auth and srid exists in the DB.
func validSrs(w http.ResponseWriter, r *http.Request, auth string, srid int) bool {
var d string
err := db.QueryRow(`select auth_name FROM public.spatial_ref_sys where auth_name = $1
AND srid = $2`, auth, srid).Scan(&d)
if err == sql.ErrNoRows {
web.BadRequest(w, r, "invalid srsName")
return false
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return false
}
return true
}
func intensityReportedLatest(w http.ResponseWriter, r *http.Request) {
if err := intensityReportedLatestD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
if r.URL.Query().Get("type") != "reported" {
web.BadRequest(w, r, "type must be reported.")
return
}
zoom := r.URL.Query().Get("zoom")
if !zoomRe.MatchString(r.URL.Query().Get("zoom")) {
web.BadRequest(w, r, "Invalid zoom")
return
}
var d string
err := db.QueryRow(
`SELECT row_to_json(fc)
FROM ( SELECT 'FeatureCollection' as type, COALESCE(array_to_json(array_agg(f)), '[]') as features
FROM (SELECT 'Feature' as type,
ST_AsGeoJSON(s.location)::json as geometry,
row_to_json(( select l from
(
select max_mmi,
min_mmi,
count
) as l ))
as properties from (select st_pointfromgeohash(geohash` + zoom + `) as location,
min(mmi) as min_mmi,
max(mmi) as max_mmi,
count(mmi) as count
FROM impact.intensity_reported
WHERE time >= (now() - interval '60 minutes')
group by (geohash` + zoom + `)) as s
) As f ) as fc`).Scan(&d)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b := []byte(d)
web.Ok(w, r, &b)
}
func siteType(w http.ResponseWriter, r *http.Request) {
if err := siteTypeD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
v := r.URL.Query()
if v.Get("methodID") != "" && v.Get("typeID") == "" {
web.BadRequest(w, r, "typeID must be specified when methodID is specified.")
return
}
var typeID, methodID, within string
if v.Get("typeID") != "" {
typeID = v.Get("typeID")
if !validType(w, r, typeID) {
return
}
if v.Get("methodID") != "" {
methodID = v.Get("methodID")
if !validTypeMethod(w, r, typeID, methodID) {
return
}
}
}
if v.Get("within") != "" {
within = strings.Replace(v.Get("within"), "+", "", -1)
if !validPoly(w, r, within) {
return
}
}
w.Header().Set("Content-Type", web.V1GeoJSON)
b, err := geoJSONSites(typeID, methodID, within)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
web.Ok(w, r, &b)
}
func getType(w http.ResponseWriter, r *http.Request) (typeQ, bool) {
t := typeQ{
typeID: r.URL.Query().Get("typeID"),
}
err := db.QueryRow("select type.name, type.description, unit.symbol FROM fits.type join fits.unit using (unitpk) where typeID = $1",
t.typeID).Scan(&t.name, &t.description, &t.unit)
if err == sql.ErrNoRows {
web.NotFound(w, r, "invalid typeID: "+t.typeID)
return t, false
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return t, false
}
return t, true
}
func getSite(w http.ResponseWriter, r *http.Request) (siteQ, bool) {
s := siteQ{
networkID: r.URL.Query().Get("networkID"),
siteID: r.URL.Query().Get("siteID"),
}
err := db.QueryRow("select name FROM fits.site join fits.network using (networkpk) where siteid = $2 and networkid = $1", s.networkID, s.siteID).Scan(&s.name)
if err == sql.ErrNoRows {
web.NotFound(w, r, "invalid siteID and networkID combination: "+s.siteID+" "+s.networkID)
return s, false
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return s, false
}
return s, true
}
func method(w http.ResponseWriter, r *http.Request) {
if err := methodD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
typeID := r.URL.Query().Get("typeID")
if typeID != "" && !validType(w, r, typeID) {
return
}
var d string
var err error
switch typeID {
case "":
err = db.QueryRow(
`select row_to_json(fc) from (select array_to_json(array_agg(m)) as method
from (select methodid as "methodID", method.name, method.description, method.reference
from
fits.type join fits.type_method using (typepk)
join fits.method using (methodpk)) as m) as fc`).Scan(&d)
default:
err = db.QueryRow(
`select row_to_json(fc) from (select array_to_json(array_agg(m)) as method
from (select methodid as "methodID", method.name, method.description, method.reference
from
fits.type join fits.type_method using (typepk)
join fits.method using (methodpk)
where type.typeID = $1) as m) as fc`, typeID).Scan(&d)
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
w.Header().Set("Content-Type", web.V1JSON)
b := []byte(d)
web.Ok(w, r, &b)
}
func typeH(w http.ResponseWriter, r *http.Request) {
if len(r.URL.Query()) != 0 {
web.BadRequest(w, r, "incorrect number of query params.")
return
}
w.Header().Set("Content-Type", web.V1JSON)
var d string
err := db.QueryRow(
`select row_to_json(fc) from (select array_to_json(array_agg(t)) as type
from (select typeid as "typeID", type.name, symbol as unit, description
from fits.type join fits.unit using (unitpk)) as t) as fc`).Scan(&d)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b := []byte(d)
web.Ok(w, r, &b)
}
func site(w http.ResponseWriter, r *http.Request) {
if err := siteD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
networkID := r.URL.Query().Get("networkID")
siteID := r.URL.Query().Get("siteID")
if !validSite(w, r, networkID, siteID) {
return
}
w.Header().Set("Content-Type", web.V1GeoJSON)
b, err := geoJSONSite(networkID, siteID)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
web.Ok(w, r, &b)
}
func intensityReported(w http.ResponseWriter, r *http.Request) {
if err := intensityReportedD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
if r.URL.Query().Get("type") != "reported" {
web.BadRequest(w, r, "type must be reported.")
return
}
zoom := r.URL.Query().Get("zoom")
if !zoomRe.MatchString(r.URL.Query().Get("zoom")) {
web.BadRequest(w, r, "Invalid zoom")
return
}
// Check that the publicid exists in the DB.
// If it does we keep the origintime - we need it later on.
publicID := r.URL.Query().Get("publicID")
originTime := time.Time{}
err := db.QueryRow("select origintime FROM qrt.quake_materialized where publicid = $1", publicID).Scan(&originTime)
if err == sql.ErrNoRows {
web.NotFound(w, r, "invalid publicID: "+publicID)
return
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
query := `SELECT row_to_json(fc)
FROM ( SELECT 'FeatureCollection' as type, COALESCE(array_to_json(array_agg(f)), '[]') as features
FROM (SELECT 'Feature' as type,
ST_AsGeoJSON(s.location)::json as geometry,
row_to_json(( select l from
(
select max_mmi,
min_mmi,
count
) as l ))
as properties from (select st_pointfromgeohash(geohash` + zoom + `) as location,
min(mmi) as min_mmi,
max(mmi) as max_mmi,
count(mmi) as count
FROM impact.intensity_reported
WHERE time >= $1
AND time <= $2
group by (geohash` + zoom + `)) as s
) As f ) as fc`
var d string
err = db.QueryRow(query, originTime.Add(time.Duration(-1*time.Minute)), originTime.Add(time.Duration(15*time.Minute))).Scan(&d)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b := []byte(d)
web.Ok(w, r, &b)
}
func spatialObs(w http.ResponseWriter, r *http.Request) {
if err := spatialObsD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
v := r.URL.Query()
var err error
var days int
days, err = strconv.Atoi(v.Get("days"))
if err != nil || days > 7 || days <= 0 {
web.BadRequest(w, r, "Invalid days query param.")
return
}
start, err := time.Parse(time.RFC3339, v.Get("start"))
if err != nil {
web.BadRequest(w, r, "Invalid start query param.")
return
}
end := start.Add(time.Duration(days) * time.Hour * 24)
var srsName, authName string
var srid int
if v.Get("srsName") != "" {
srsName = v.Get("srsName")
srs := strings.Split(srsName, ":")
if len(srs) != 2 {
web.BadRequest(w, r, "Invalid srsName.")
return
}
authName = srs[0]
var err error
srid, err = strconv.Atoi(srs[1])
if err != nil {
web.BadRequest(w, r, "Invalid srsName.")
return
}
if !validSrs(w, r, authName, srid) {
return
}
} else {
srid = 4326
authName = "EPSG"
srsName = "EPSG:4326"
}
typeID := v.Get("typeID")
var methodID string
if v.Get("methodID") != "" {
methodID = v.Get("methodID")
if !validTypeMethod(w, r, typeID, methodID) {
return
}
}
var within string
if v.Get("within") != "" {
within = strings.Replace(v.Get("within"), "+", "", -1)
if !validPoly(w, r, within) {
return
}
}
var unit string
err = db.QueryRow("select symbol FROM fits.type join fits.unit using (unitPK) where typeID = $1", typeID).Scan(&unit)
if err == sql.ErrNoRows {
web.NotFound(w, r, "unit not found for typeID: "+typeID)
return
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
var d string
var rows *sql.Rows
switch {
case within == "" && methodID == "":
rows, err = db.Query(
`SELECT format('%s,%s,%s,%s,%s,%s,%s,%s,%s', networkid, siteid,
ST_X(ST_Transform(location::geometry, $4)), ST_Y(ST_Transform(location::geometry, $4)),
height,ground_relationship, to_char(time, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"'), value, error)
as csv FROM fits.observation join fits.site using (sitepk) join fits.network using (networkpk)
WHERE typepk = (SELECT typepk FROM fits.type WHERE typeid = $1) AND
time >= $2 and time < $3 order by siteid asc`, typeID, start, end, srid)
case within != "" && methodID == "":
rows, err = db.Query(
`SELECT format('%s,%s,%s,%s,%s,%s,%s,%s,%s', networkid, siteid,
ST_X(ST_Transform(location::geometry, $4)), ST_Y(ST_Transform(location::geometry, $4)),
height,ground_relationship, to_char(time, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"'), value, error)
as csv FROM fits.observation join fits.site using (sitepk) join fits.network using (networkpk)
WHERE typepk = (SELECT typepk FROM fits.type WHERE typeid = $1)
AND ST_Within(location::geometry, ST_GeomFromText($5, 4326))
AND time >= $2 and time < $3 order by siteid asc`, typeID, start, end, srid, within)
case within == "" && methodID != "":
rows, err = db.Query(
`SELECT format('%s,%s,%s,%s,%s,%s,%s,%s,%s', networkid, siteid,
ST_X(ST_Transform(location::geometry, $4)), ST_Y(ST_Transform(location::geometry, $4)),
height,ground_relationship, to_char(time, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"'), value, error)
as csv FROM fits.observation join fits.site using (sitepk) join fits.network using (networkpk)
WHERE typepk = (SELECT typepk FROM fits.type WHERE typeid = $1)
AND methodpk = (SELECT methodpk FROM fits.method WHERE methodid = $5)
AND time >= $2 and time < $3 order by siteid asc`, typeID, start, end, srid, methodID)
case within != "" && methodID != "":
rows, err = db.Query(
`SELECT format('%s,%s,%s,%s,%s,%s,%s,%s,%s', networkid, siteid,
ST_X(ST_Transform(location::geometry, $4)), ST_Y(ST_Transform(location::geometry, $4)),
height,ground_relationship, to_char(time, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"'), value, error)
as csv FROM fits.observation join fits.site using (sitepk) join fits.network using (networkpk)
WHERE typepk = (SELECT typepk FROM fits.type WHERE typeid = $1)
AND methodpk = (SELECT methodpk FROM fits.method WHERE methodid = $6)
AND ST_Within(location::geometry, ST_GeomFromText($5, 4326))
AND time >= $2 and time < $3 order by siteid asc`, typeID, start, end, srid, within, methodID)
}
if err != nil {
// not sure what a transformation error would look like.
// Return any errors as a 404. Could improve this by inspecting
// the error type to check for net dial errors that shoud 503.
web.NotFound(w, r, err.Error())
return
}
defer rows.Close()
var b bytes.Buffer
b.Write([]byte("networkID, siteID, X (" + srsName + "), Y (" + srsName + "), height, groundRelationship, date-time, " + typeID + " (" + unit + "), error (" + unit + ")"))
b.Write(eol)
for rows.Next() {
err := rows.Scan(&d)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b.Write([]byte(d))
b.Write(eol)
}
rows.Close()
w.Header().Set("Content-Type", web.V1CSV)
if methodID != "" {
w.Header().Set("Content-Disposition", `attachment; filename="FITS-`+typeID+`-`+methodID+`.csv"`)
} else {
w.Header().Set("Content-Disposition", `attachment; filename="FITS-`+typeID+`.csv"`)
}
web.OkBuf(w, r, &b)
}
func siteTypeMap(w http.ResponseWriter, r *http.Request) {
if err := siteTypeMapD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
v := r.URL.Query()
bbox := v.Get("bbox")
err := map180.ValidBbox(bbox)
if err != nil {
web.BadRequest(w, r, err.Error())
return
}
var insetBbox, typeID, methodID, within string
width := 130
if v.Get("insetBbox") != "" {
insetBbox = v.Get("insetBbox")
err := map180.ValidBbox(insetBbox)
if err != nil {
web.BadRequest(w, r, err.Error())
return
}
}
if v.Get("width") != "" {
width, err = strconv.Atoi(v.Get("width"))
if err != nil {
web.BadRequest(w, r, "invalid width.")
return
}
}
if v.Get("methodID") != "" && v.Get("typeID") == "" {
web.BadRequest(w, r, "typeID must be specified when methodID is specified.")
return
}
if v.Get("typeID") != "" {
typeID = v.Get("typeID")
if !validType(w, r, typeID) {
return
}
if v.Get("methodID") != "" {
methodID = v.Get("methodID")
if !validTypeMethod(w, r, typeID, methodID) {
return
}
}
}
if v.Get("within") != "" {
within = strings.Replace(v.Get("within"), "+", "", -1)
if !validPoly(w, r, within) {
return
}
} else if bbox != "" {
within, err = map180.BboxToWKTPolygon(bbox)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
}
g, err := geoJSONSites(typeID, methodID, within)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
m, err := geoJSONToMarkers(g)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b, err := wm.SVG(bbox, width, m, insetBbox)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
w.Header().Set("Content-Type", "image/svg+xml")
web.OkBuf(w, r, &b)
}
func siteMap(w http.ResponseWriter, r *http.Request) {
if err := siteMapD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
v := r.URL.Query()
bbox := v.Get("bbox")
var insetBbox string
if v.Get("insetBbox") != "" {
insetBbox = v.Get("insetBbox")
err := map180.ValidBbox(insetBbox)
if err != nil {
web.BadRequest(w, r, err.Error())
return
}
}
if v.Get("sites") == "" && (v.Get("siteID") == "" && v.Get("networkID") == "") {
web.BadRequest(w, r, "please specify sites or networkID and siteID")
return
}
if v.Get("sites") != "" && (v.Get("siteID") != "" || v.Get("networkID") != "") {
web.BadRequest(w, r, "please specify either sites or networkID and siteID")
return
}
if v.Get("sites") == "" && (v.Get("siteID") == "" || v.Get("networkID") == "") {
web.BadRequest(w, r, "please specify networkID and siteID")
return
}
err := map180.ValidBbox(bbox)
if err != nil {
web.BadRequest(w, r, err.Error())
return
}
width := 130
if v.Get("width") != "" {
width, err = strconv.Atoi(v.Get("width"))
if err != nil {
web.BadRequest(w, r, "invalid width.")
return
}
}
var s []st
if v.Get("sites") != "" {
for _, ns := range strings.Split(v.Get("sites"), ",") {
nss := strings.Split(ns, ".")
if len(nss) != 2 {
web.BadRequest(w, r, "invalid sites query.")
return
}
s = append(s, st{networkID: nss[0], siteID: nss[1]})
}
} else {
s = append(s, st{networkID: v.Get("networkID"),
siteID: v.Get("siteID")})
}
markers := make([]map180.Marker, 0)
for _, site := range s {
if !validSite(w, r, site.networkID, site.siteID) {
return
}
g, err := geoJSONSite(site.networkID, site.siteID)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
m, err := geoJSONToMarkers(g)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
markers = append(markers, m...)
}
b, err := wm.SVG(bbox, width, markers, insetBbox)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
w.Header().Set("Content-Type", "image/svg+xml")
web.OkBuf(w, r, &b)
}
func quakes(w http.ResponseWriter, r *http.Request) {
if err := quakesD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
v := r.URL.Query()
number := v.Get("number")
regionID := v.Get("regionID")
intensity := v.Get("intensity")
quality := strings.Split(v.Get("quality"), ",")
if !numberRe.MatchString(number) {
web.BadRequest(w, r, "Invalid query parameter number: "+number)
return
}
if !intensityRe.MatchString(intensity) {
web.BadRequest(w, r, "Invalid intensity: "+intensity)
return
}
for _, q := range quality {
if !qualityRe.MatchString(q) {
web.BadRequest(w, r, "Invalid quality: "+q)
return
}
}
var d string
err := db.QueryRow("select regionname FROM qrt.region where regionname = $1 AND groupname in ('region', 'north', 'south')", regionID).Scan(&d)
if err == sql.ErrNoRows {
web.BadRequest(w, r, "invalid quake regionID: "+regionID)
return
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
err = db.QueryRow(
`SELECT row_to_json(fc)
FROM ( SELECT 'FeatureCollection' as type, COALESCE(array_to_json(array_agg(f)), '[]') as features
FROM (SELECT 'Feature' as type,
ST_AsGeoJSON(q.origin_geom)::json as geometry,
row_to_json((SELECT l FROM
(
SELECT
publicid AS "publicID",
to_char(origintime, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"') as "time",
depth,
magnitude,
type,
agency,
locality,
intensity,
intensity_`+regionID+` as "regionIntensity",
quality,
to_char(updatetime, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"') as "modificationTime"
) as l
)) as properties FROM qrt.quakeinternal_v2 as q where maxmmi >= qrt.intensity_to_mmi($1)
AND quality in ('`+strings.Join(quality, `','`)+`') AND ST_Contains((select geom from qrt.region where regionname = $3), ST_Shift_Longitude(origin_geom)) limit $2 ) as f ) as fc`, intensity, number, regionID).Scan(&d)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b := []byte(d)
web.Ok(w, r, &b)
}
/**
* query end point for observation statistics including: max, min, mean, std, first and last values
* http://fits.geonet.org.nz/observation/stats?typeID=e&siteID=HOLD&networkID=CG&days=100
*/
func observationStats(w http.ResponseWriter, r *http.Request) {
//1. check query parameters
if err := observationD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
v := r.URL.Query()
typeID := v.Get("typeID")
networkID := v.Get("networkID")
siteID := v.Get("siteID")
if !validType(w, r, typeID) {
return
}
var days int
var err error
var tmin, tmax time.Time
if v.Get("days") != "" {
days, err = strconv.Atoi(v.Get("days"))
if err != nil || days > 365000 {
web.BadRequest(w, r, "Invalid days query param.")
return
}
tmax = time.Now().UTC()
tmin = tmax.Add(time.Duration(days*-1) * time.Hour * 24)
}
var methodID string
if v.Get("methodID") != "" {
methodID = v.Get("methodID")
if !validTypeMethod(w, r, typeID, methodID) {
return
}
}
//2. Find the unit
var unit string
err = db.QueryRow("select symbol FROM fits.type join fits.unit using (unitPK) where typeID = $1", typeID).Scan(&unit)
if err == sql.ErrNoRows {
web.NotFound(w, r, "unit not found for typeID: "+typeID)
return
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
// retrieve values using existing functions
values, err := loadObs(networkID, siteID, typeID, methodID, tmin)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
mean, stdDev, err := stddevPop(networkID, siteID, typeID, methodID, tmin)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
stats := obstats{Unit: unit,
Mean: mean,
StddevPopulation: stdDev}
//4. get maximum, minimum, first, last values
stats.First = values[0]
stats.Last = values[len(values)-1]
iMin, iMax, _ := extremes(values)
stats.Minimum = values[iMin]
stats.Maximum = values[iMax]
//5. send result response
w.Header().Set("Content-Type", web.V1JSON)
b, err := json.Marshal(stats)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
web.Ok(w, r, &b)
}
func observation(w http.ResponseWriter, r *http.Request) {
if err := observationD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
v := r.URL.Query()
typeID := v.Get("typeID")
networkID := v.Get("networkID")
siteID := v.Get("siteID")
if !validType(w, r, typeID) {
return
}
var days int
if v.Get("days") != "" {
var err error
days, err = strconv.Atoi(v.Get("days"))
if err != nil || days > 365000 {
web.BadRequest(w, r, "Invalid days query param.")
return
}
}
var methodID string
if v.Get("methodID") != "" {
methodID = v.Get("methodID")
if !validTypeMethod(w, r, typeID, methodID) {
return
}
}
// Find the unit for the CSV header
var unit string
err := db.QueryRow("select symbol FROM fits.type join fits.unit using (unitPK) where typeID = $1", typeID).Scan(&unit)
if err == sql.ErrNoRows {
web.NotFound(w, r, "unit not found for typeID: "+typeID)
return
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
var d string
var rows *sql.Rows
switch {
case days == 0 && methodID == "":
rows, err = db.Query(
`SELECT format('%s,%s,%s', to_char(time, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"'), value, error) as csv FROM fits.observation
WHERE
sitepk = (
SELECT DISTINCT ON (sitepk) sitepk from fits.site join fits.network using (networkpk) where siteid = $2 and networkid = $1
)
AND typepk = (
SELECT typepk FROM fits.type WHERE typeid = $3
)
ORDER BY time ASC;`, networkID, siteID, typeID)
case days != 0 && methodID == "":
rows, err = db.Query(
`SELECT format('%s,%s,%s', to_char(time, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"'), value, error) as csv FROM fits.observation
WHERE
sitepk = (
SELECT DISTINCT ON (sitepk) sitepk from fits.site join fits.network using (networkpk) where siteid = $2 and networkid = $1
)
AND typepk = (
SELECT typepk FROM fits.type WHERE typeid = $3
)
AND time > (now() - interval '`+strconv.Itoa(days)+` days')
ORDER BY time ASC;`, networkID, siteID, typeID)
case days == 0 && methodID != "":
rows, err = db.Query(
`SELECT format('%s,%s,%s', to_char(time, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"'), value, error) as csv FROM fits.observation
WHERE
sitepk = (
SELECT DISTINCT ON (sitepk) sitepk from fits.site join fits.network using (networkpk) where siteid = $2 and networkid = $1
)
AND typepk = (
SELECT typepk FROM fits.type WHERE typeid = $3
)
AND methodpk = (
SELECT methodpk FROM fits.method WHERE methodid = $4
)
ORDER BY time ASC;`, networkID, siteID, typeID, methodID)
case days != 0 && methodID != "":
rows, err = db.Query(
`SELECT format('%s,%s,%s', to_char(time, 'YYYY-MM-DD"T"HH24:MI:SS.MS"Z"'), value, error) as csv FROM fits.observation
WHERE
sitepk = (
SELECT DISTINCT ON (sitepk) sitepk from fits.site join fits.network using (networkpk) where siteid = $2 and networkid = $1
)
AND typepk = (
SELECT typepk FROM fits.type WHERE typeid = $3
)
AND methodpk = (
SELECT methodpk FROM fits.method WHERE methodid = $4
)
AND time > (now() - interval '`+strconv.Itoa(days)+` days')
ORDER BY time ASC;`, networkID, siteID, typeID, methodID)
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
defer rows.Close()
// Use a buffer for reading the data from the DB. Then if a there
// is an error we can let the client know without sending
// a partial data response.
var b bytes.Buffer
b.Write([]byte("date-time, " + typeID + " (" + unit + "), error (" + unit + ")"))
b.Write(eol)
for rows.Next() {
err := rows.Scan(&d)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b.Write([]byte(d))
b.Write(eol)
}
rows.Close()
if methodID != "" {
w.Header().Set("Content-Disposition", `attachment; filename="FITS-`+networkID+`-`+siteID+`-`+typeID+`-`+methodID+`.csv"`)
} else {
w.Header().Set("Content-Disposition", `attachment; filename="FITS-`+networkID+`-`+siteID+`-`+typeID+`.csv"`)
}
w.Header().Set("Content-Type", web.V1CSV)
web.OkBuf(w, r, &b)
}
func plotSite(w http.ResponseWriter, r *http.Request) {
if err := plotSiteD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
var plotType string
var s siteQ
var t typeQ
var start time.Time
var days int
var ymin, ymax float64
var showMethod bool
var stddev string
var ok bool
if plotType, ok = getPlotType(w, r); !ok {
return
}
if showMethod, ok = getShowMethod(w, r); !ok {
return
}
if stddev, ok = getStddev(w, r); !ok {
return
}
if start, ok = getStart(w, r); !ok {
return
}
if days, ok = getDays(w, r); !ok {
return
}
if ymin, ymax, ok = getYRange(w, r); !ok {
return
}
if t, ok = getType(w, r); !ok {
return
}
if s, ok = getSite(w, r); !ok {
return
}
var p plt
switch {
case start.IsZero() && days == 0:
// do nothing - autorange on the data.
case start.IsZero() && days > 0:
n := time.Now().UTC()
start = n.Add(time.Duration(days*-1) * time.Hour * 24)
p.SetXAxis(start, n)
days = 0 // add all data > than start by setting 0. Allows for adding start end to URL.
case !start.IsZero() && days > 0:
p.SetXAxis(start, start.Add(time.Duration(days*1)*time.Hour*24))
case !start.IsZero() && days == 0:
web.BadRequest(w, r, "Invalid start specified without days")
return
}
switch {
case ymin == 0 && ymax == 0:
case ymin == ymax:
p.SetYRange(ymin)
default:
p.SetYAxis(ymin, ymax)
}
p.SetTitle(fmt.Sprintf("%s (%s) - %s", s.siteID, s.name, t.description))
p.SetUnit(t.unit)
p.SetYLabel(fmt.Sprintf("%s (%s)", t.name, t.unit))
var err error
switch showMethod {
case false:
err = p.addSeries(t, start, days, s)
case true:
err = p.addSeriesLabelMethod(t, start, days, s)
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
if stddev == `pop` {
err = p.setStddevPop(s, t, start, days)
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b := new(bytes.Buffer)
switch plotType {
case ``, `line`:
err = ts.Line.Draw(p.Plot, b)
case `scatter`:
err = ts.Scatter.Draw(p.Plot, b)
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
w.Header().Set("Content-Type", "image/svg+xml")
web.OkBuf(w, r, b)
}
func spark(w http.ResponseWriter, r *http.Request) {
if err := sparkD.CheckParams(r.URL.Query()); err != nil {
web.BadRequest(w, r, err.Error())
return
}
var plotType string
var s siteQ
var t typeQ
var days int
var ymin, ymax float64
var stddev string
var label string
var ok bool
if plotType, ok = getPlotType(w, r); !ok {
return
}
if stddev, ok = getStddev(w, r); !ok {
return
}
if label, ok = getSparkLabel(w, r); !ok {
return
}
if days, ok = getDays(w, r); !ok {
return
}
if ymin, ymax, ok = getYRange(w, r); !ok {
return
}
if t, ok = getType(w, r); !ok {
return
}
if s, ok = getSite(w, r); !ok {
return
}
var p plt
var tmin time.Time
if days > 0 {
n := time.Now().UTC()
tmin = n.Add(time.Duration(days*-1) * time.Hour * 24)
p.SetXAxis(tmin, n)
days = 0 // add all data > than tmin
}
switch {
case ymin == 0 && ymax == 0:
case ymin == ymax:
p.SetYRange(ymin)
default:
p.SetYAxis(ymin, ymax)
}
p.SetUnit(t.unit)
var err error
if stddev == `pop` {
err = p.setStddevPop(s, t, tmin, days)
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
err = p.addSeries(t, tmin, days, s)
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
b := new(bytes.Buffer)
switch plotType {
case ``, `line`:
switch label {
case ``, `all`:
err = ts.SparkLineAll.Draw(p.Plot, b)
case `latest`:
err = ts.SparkLineLatest.Draw(p.Plot, b)
case `none`:
err = ts.SparkLineNone.Draw(p.Plot, b)
}
case `scatter`:
switch label {
case ``, `all`:
err = ts.SparkScatterAll.Draw(p.Plot, b)
case `latest`:
err = ts.SparkScatterLatest.Draw(p.Plot, b)
case `none`:
err = ts.SparkScatterNone.Draw(p.Plot, b)
}
}
if err != nil {
web.ServiceUnavailable(w, r, err)
return
}
w.Header().Set("Content-Type", "image/svg+xml")
web.OkBuf(w, r, b)
}
