package server import ( "archive/zip" "context" "encoding/json" "fmt" "io" "net/http" "net/url" "os" "time" _ "embed" "cernobor.cz/oko-server/errs" "cernobor.cz/oko-server/models" "crawshaw.io/sqlite" "crawshaw.io/sqlite/sqlitex" mbsh "github.com/consbio/mbtileserver/handlers" geojson "github.com/paulmach/go.geojson" "github.com/sirupsen/logrus" ) //go:embed initdb.sql var initDB string type Server struct { config ServerConfig dbpool *sqlitex.Pool checkpointNotice chan struct{} log *logrus.Logger ctx context.Context tileserverSvSet *mbsh.ServiceSet mapPackSize int64 } type ServerConfig struct { VersionHash string BuildTime *time.Time Port int DbPath string TilepackPath string ApkPath string ReinitDB bool MinZoom int DefaultCenter models.Coords } func New(config ServerConfig) *Server { return &Server{ config: config, } } func (s *Server) Run(ctx context.Context) { s.log = logrus.New() s.log.SetLevel(logrus.DebugLevel) s.ctx = ctx s.setupDB() s.setupTiles() router := s.setupRouter() server := &http.Server{ Addr: fmt.Sprintf(":%d", s.config.Port), Handler: router, } s.log.Infof("Running on %s", server.Addr) go func() { if err := server.ListenAndServe(); err != nil && err != http.ErrServerClosed { s.log.Infof("listen: %s\n", err) } }() <-s.ctx.Done() s.log.Info("Shutting down server...") defer s.log.Info("Server exitting.") ctx, cancel := context.WithTimeout(context.Background(), time.Second*5) defer cancel() if err := server.Shutdown(ctx); err != nil { s.log.WithError(err).Fatal("Server forced to shutdown.") } close(s.checkpointNotice) s.log.Info("Closing db connection pool...") s.dbpool.Close() // manually force truncate checkpoint conn, err := sqlite.OpenConn(fmt.Sprintf("file:%s", s.config.DbPath), 0) if err != nil { s.log.WithError(err).Error("Failed to open connection for final checkpoint.") return } s.checkpointDb(conn, true) conn.Close() } func (s *Server) getDbConn() *sqlite.Conn { conn := s.dbpool.Get(s.ctx) _, err := conn.Prep("PRAGMA foreign_keys = ON").Step() if err != nil { panic(err) } return conn } func (s *Server) checkpointDb(conn *sqlite.Conn, truncate bool) { var query string if truncate { query = "PRAGMA wal_checkpoint(TRUNCATE)" } else { query = "PRAGMA wal_checkpoint(RESTART)" } stmt, _, err := conn.PrepareTransient(query) if err != nil { s.log.WithError(err).Error("Failed to prepare checkpoint query.") return } defer stmt.Finalize() has, err := stmt.Step() if err != nil { s.log.WithError(err).Error("Failed to step through checkpoint query.") return } if !has { s.log.Error("Checkpoint query returned no rows.") return } blocked := stmt.ColumnInt(0) noWalPages := stmt.ColumnInt(1) noReclaimedPages := stmt.ColumnInt(2) if blocked == 1 { s.log.Warn("Checkpoint query was blocked.") } s.log.Debugf("Checkpoint complete. %d pages written to WAL, %d pages written back to DB.", noWalPages, noReclaimedPages) } func (s *Server) setupDB() { sqlitex.PoolCloseTimeout = time.Second * 10 dbpool, err := sqlitex.Open(fmt.Sprintf("file:%s", s.config.DbPath), 0, 10) if err != nil { s.log.WithError(err).Fatal("Failed to open/create DB.") } s.dbpool = dbpool s.checkpointNotice = make(chan struct{}) if s.config.ReinitDB { err = s.reinitDB() if err != nil { s.log.WithError(err).Fatal("init DB transaction failed") } } // aggressively checkpoint the database on idle times go func() { s.log.Debug("Starting manual restart checkpointing.") defer s.log.Debug("Manual restart checkpointing stopped.") delay := time.Minute * 15 var ( timer <-chan time.Time ok bool ) for { select { case _, ok = <-s.checkpointNotice: if !ok { return } timer = time.After(delay) case <-timer: func() { conn := s.dbpool.Get(s.ctx) defer s.dbpool.Put(conn) s.checkpointDb(conn, false) timer = nil }() } } }() } func (s *Server) requestCheckpoint() { go func() { s.checkpointNotice <- struct{}{} }() } func (s *Server) setupTiles() { tsRootURL, err := url.Parse(URITileserverRoot) if err != nil { s.log.WithError(err).Fatal("Failed to parse tileserver root URL.") } svs, err := mbsh.New(&mbsh.ServiceSetConfig{ EnableServiceList: true, EnableTileJSON: true, EnablePreview: false, EnableArcGIS: false, RootURL: tsRootURL, }) if err != nil { s.log.WithError(err).Fatal("Failed to create tileserver service set.") } err = svs.AddTileset(s.config.TilepackPath, "map") if err != nil { s.log.WithError(err).Fatal("Failed to register tileset.") } s.tileserverSvSet = svs info, err := os.Stat(s.config.TilepackPath) if err != nil { s.log.WithError(err).Fatal("Failed to get info about tile pack file.") } s.mapPackSize = info.Size() } func (s *Server) reinitDB() error { s.log.Info("Reinitializing DB.") conn := s.getDbConn() defer s.dbpool.Put(conn) defer s.requestCheckpoint() return sqlitex.ExecScript(conn, initDB) } func (s *Server) handshake(hc models.HandshakeChallenge) (models.UserID, error) { conn := s.getDbConn() defer s.dbpool.Put(conn) userID, err := func() (uid int64, err error) { defer sqlitex.Save(conn)(&err) var id *int64 if hc.Exists { err = sqlitex.Exec(conn, "select id from users where name = ?", func(stmt *sqlite.Stmt) error { id = ptrInt64(stmt.ColumnInt64(0)) return nil }, hc.Name) if sqlite.ErrCode(err) != sqlite.SQLITE_OK { return 0, err } if id == nil { return 0, errs.ErrUserNotExists } if *id == 0 { return 0, errs.ErrAttemptedSystemUser } } else { err = sqlitex.Exec(conn, "insert into users(name) values(?)", func(stmt *sqlite.Stmt) error { id = ptrInt64(stmt.ColumnInt64(0)) return nil }, hc.Name) if sqlite.ErrCode(err) == sqlite.SQLITE_CONSTRAINT_UNIQUE { return 0, errs.ErrUserAlreadyExists } if sqlite.ErrCode(err) != sqlite.SQLITE_OK { return 0, err } id = ptrInt64(conn.LastInsertRowID()) s.requestCheckpoint() } return *id, nil }() if err != nil { return 0, fmt.Errorf("failed to insert/retrieve user from db: %w", err) } return models.UserID(userID), nil } func (s *Server) getData(conn *sqlite.Conn) (data models.Data, err error) { err = s.deleteExpiredFeatures(conn) if err != nil { return models.Data{}, fmt.Errorf("failed to delete expired featured: %w", err) } people, err := s.getPeople(conn) if err != nil { return models.Data{}, fmt.Errorf("failed to retreive people: %w", err) } features, err := s.getFeatures(conn) if err != nil { return models.Data{}, fmt.Errorf("failed to retreive features: %w", err) } return models.Data{ Users: people, Features: features, }, nil } func (s *Server) getDataOnly() (data models.Data, err error) { conn := s.getDbConn() defer s.dbpool.Put(conn) defer sqlitex.Save(conn)(&err) data, err = s.getData(conn) if err != nil { return models.Data{}, fmt.Errorf("failed to get json data: %w", err) } return data, err } func (s *Server) getDataWithPhotos() (file *os.File, err error) { conn := s.getDbConn() defer s.dbpool.Put(conn) defer sqlitex.Save(conn)(&err) makePhotoFilename := func(id models.FeaturePhotoID) string { return fmt.Sprintf("img%d", id) } makeThumbnailFilename := func(id models.FeaturePhotoID) string { return fmt.Sprintf("thumb_%s", makePhotoFilename(id)) } data, err := s.getData(conn) if err != nil { return nil, fmt.Errorf("failed to get json data: %w", err) } data.PhotoMetadata = make(map[string]models.PhotoMetadata, 100) err = sqlitex.Exec(conn, "select id, content_type, length(contents) from feature_photos", func(stmt *sqlite.Stmt) error { id := models.FeaturePhotoID(stmt.ColumnInt64(0)) contentType := stmt.ColumnText(1) fileSize := stmt.ColumnInt64(2) data.PhotoMetadata[makePhotoFilename(id)] = models.PhotoMetadata{ ContentType: contentType, Size: fileSize, ID: id, ThumbnailFilename: makeThumbnailFilename(id), } return nil }) if err != nil { return nil, fmt.Errorf("failed to collect photo metadata: %w", err) } dataBytes, err := json.MarshalIndent(&data, "", " ") if err != nil { return nil, fmt.Errorf("failed to marshal json data: %w", err) } f, err := os.CreateTemp("", "") if err != nil { return nil, fmt.Errorf("failed to create temporary file: %w", err) } zw := zip.NewWriter(f) defer zw.Close() w, err := zw.Create("data.json") if err != nil { return nil, fmt.Errorf("failed to create data zip entry: %w", err) } _, err = w.Write(dataBytes) if err != nil { return nil, fmt.Errorf("failed to write data zip entry: %w", err) } err = sqlitex.Exec(conn, "select id from feature_photos", func(stmt *sqlite.Stmt) error { id := stmt.ColumnInt64(0) blob, err := conn.OpenBlob("", "feature_photos", "thumbnail_contents", id, false) if err != nil { return fmt.Errorf("failed to open photo ID %d thumbnail content blob: %w", id, err) } err = func() error { defer blob.Close() w, err := zw.Create(makeThumbnailFilename(models.FeaturePhotoID(id))) if err != nil { return fmt.Errorf("failed to create zip entry: %w", err) } _, err = io.Copy(w, blob) if err != nil { return fmt.Errorf("failed to write zip entry: %w", err) } return nil }() if err != nil { return fmt.Errorf("failed to write photo ID %d thumbnail: %w", id, err) } blob, err = conn.OpenBlob("", "feature_photos", "contents", id, false) if err != nil { return fmt.Errorf("failed to open photo ID %d photo content blob: %w", id, err) } err = func() error { defer blob.Close() w, err := zw.Create(makePhotoFilename(models.FeaturePhotoID(id))) if err != nil { return fmt.Errorf("failed to create zip entry: %w", err) } _, err = io.Copy(w, blob) if err != nil { return fmt.Errorf("failed to write zip entry: %w", err) } return nil }() if err != nil { return fmt.Errorf("failed to write photo ID %d photo: %w", id, err) } return nil }) if err != nil { return nil, fmt.Errorf("failed to collect photo files: %w", err) } return f, nil } func (s *Server) update(data models.Update, photos map[string]models.Photo) error { s.log.Debugf("Updating data: %d created, %d created photos, %d updated, %d deleted, %d deleted photos, %d photo files", len(data.Create), len(data.CreatedPhotos), len(data.Update), len(data.Delete), len(data.DeletePhotos), len(photos)) conn := s.getDbConn() defer s.dbpool.Put(conn) return func() (err error) { defer sqlitex.Save(conn)(&err) var createdIDMapping map[models.FeatureID]models.FeatureID if data.Create != nil { createdIDMapping, err = s.addFeatures(conn, data.Create) if err != nil { err = fmt.Errorf("failed to add features: %w", err) return } } if data.CreatedPhotos != nil || data.AddPhotos != nil { if photos == nil { err = fmt.Errorf("photo assignment present but no photos provided") return } err = s.addPhotos(conn, data.CreatedPhotos, data.AddPhotos, createdIDMapping, photos) if err != nil { err = fmt.Errorf("failed to add photos: %w", err) return } } if data.Update != nil { err = s.updateFeatures(conn, data.Update) if err != nil { err = fmt.Errorf("failed to update features: %w", err) return } } if data.Delete != nil { err = s.deleteFeatures(conn, data.Delete) if err != nil { err = fmt.Errorf("failed to delete features: %w", err) return } } if data.DeletePhotos != nil { err = s.deletePhotos(conn, data.DeletePhotos) if err != nil { err = fmt.Errorf("failed to delete photos: %w", err) return } } return nil }() } func (s *Server) deleteExpiredFeatures(conn *sqlite.Conn) error { stmt, err := conn.Prepare("delete from features where deadline < ?") if err != nil { return fmt.Errorf("failed to prepare statement: %w", err) } defer stmt.Finalize() now := time.Now().Unix() err = sqlitex.Exec(conn, "delete from features where deadline < ?", func(stmt *sqlite.Stmt) error { return nil }, now) if err != nil { return fmt.Errorf("failed to delete expired features: %w", err) } s.requestCheckpoint() return nil } func (s *Server) getPeople(conn *sqlite.Conn) ([]models.User, error) { if conn == nil { conn = s.getDbConn() defer s.dbpool.Put(conn) } users := make([]models.User, 0, 50) err := sqlitex.Exec(conn, "select id, name from users", func(stmt *sqlite.Stmt) error { users = append(users, models.User{ ID: models.UserID(stmt.ColumnInt(0)), Name: stmt.ColumnText(1), }) return nil }) if err != nil { return nil, fmt.Errorf("failed to get users from db: %w", err) } return users, nil } func (s *Server) getFeatures(conn *sqlite.Conn) ([]models.Feature, error) { if conn == nil { conn = s.getDbConn() defer s.dbpool.Put(conn) } features := make([]models.Feature, 0, 100) err := sqlitex.Exec(conn, `select f.id, f.owner_id, f.name, f.deadline, f.properties, f.geom, '[' || coalesce(group_concat(p.id, ', '), '') || ']' from features f left join feature_photos p on f.id = p.feature_id group by f.id, f.owner_id, f.name, f.properties, f.geom`, func(stmt *sqlite.Stmt) error { id := stmt.ColumnInt64(0) ownerID := stmt.ColumnInt64(1) name := stmt.ColumnText(2) var deadline *time.Time if stmt.ColumnType(3) != sqlite.SQLITE_NULL { dl := time.Unix(stmt.ColumnInt64(3), 0) deadline = &dl } propertiesRaw := stmt.ColumnText(4) var properties map[string]interface{} err := json.Unmarshal([]byte(propertiesRaw), &properties) if err != nil { return fmt.Errorf("failed to parse properties for feature id=%d: %w", id, err) } geomRaw := stmt.ColumnText(5) var geom geojson.Geometry err = json.Unmarshal([]byte(geomRaw), &geom) if err != nil { return fmt.Errorf("failed to parse geometry for feature id=%d: %w", id, err) } photosRaw := stmt.ColumnText(6) var photos []models.FeaturePhotoID err = json.Unmarshal([]byte(photosRaw), &photos) if err != nil { return fmt.Errorf("failed to parse list of photo IDs: %w", err) } feature := models.Feature{ ID: models.FeatureID(id), OwnerID: models.UserID(ownerID), Name: name, Deadline: deadline, Properties: properties, Geometry: geom, PhotoIDs: photos, } features = append(features, feature) return nil }) if err != nil { return nil, fmt.Errorf("failed to get users from db: %w", err) } return features, nil } func (s *Server) addFeatures(conn *sqlite.Conn, features []models.Feature) (map[models.FeatureID]models.FeatureID, error) { stmt, err := conn.Prepare("insert into features(owner_id, name, deadline, properties, geom) values(?, ?, ?, ?, ?)") if err != nil { return nil, fmt.Errorf("failed to prepare statement: %w", err) } defer stmt.Finalize() localIDMapping := make(map[models.FeatureID]models.FeatureID, len(features)) for _, feature := range features { if _, ok := localIDMapping[feature.ID]; ok { return nil, errs.ErrNonUniqueCreatedFeatureIDs } err := stmt.Reset() if err != nil { return nil, fmt.Errorf("failed to reset prepared statement: %w", err) } err = stmt.ClearBindings() if err != nil { return nil, fmt.Errorf("failed to clear bindings of prepared statement: %w", err) } stmt.BindInt64(1, int64(feature.OwnerID)) stmt.BindText(2, feature.Name) if feature.Deadline == nil { stmt.BindNull(3) } else { stmt.BindInt64(3, feature.Deadline.Unix()) } if feature.Properties == nil { stmt.BindText(4, "{}") } else { propertiesBytes, err := json.Marshal(feature.Properties) if err != nil { return nil, fmt.Errorf("failed to marshal properties of feature id=%d: %w", feature.ID, err) } stmt.BindText(4, string(propertiesBytes)) } geomBytes, err := json.Marshal(feature.Geometry) if err != nil { return nil, fmt.Errorf("failed to marshal geometry of feature id=%d: %w", feature.ID, err) } stmt.BindText(5, string(geomBytes)) _, err = stmt.Step() if err != nil { return nil, fmt.Errorf("failed to evaluate prepared statement: %w", err) } localIDMapping[feature.ID] = models.FeatureID(conn.LastInsertRowID()) } s.requestCheckpoint() return localIDMapping, nil } func (s *Server) addPhotos(conn *sqlite.Conn, createdFeatureMapping, addedFeatureMapping map[models.FeatureID][]string, createdIDMapping map[models.FeatureID]models.FeatureID, photos map[string]models.Photo) error { stmt, err := conn.Prepare("insert into feature_photos(feature_id, thumbnail_content_type, content_type, thumbnail_contents, contents) values(?, ?, ?, ?, ?)") if err != nil { return fmt.Errorf("failed to prepare statement: %w", err) } defer stmt.Finalize() uploadPhotos := func(featureID models.FeatureID, photoNames []string) error { for _, photoName := range photoNames { photo, ok := photos[photoName] if !ok { return errs.NewErrPhotoNotProvided(photoName) } thumbnail, ok := photos[fmt.Sprintf("thumb_%s", photoName)] if !ok { return errs.NewErrPhotoThumbnailNotProvided(photoName) } if !checkImageContentType(photo.ContentType) { return errs.NewErrUnsupportedContentType(photoName) } err := stmt.Reset() if err != nil { return fmt.Errorf("failed to reset prepared statement: %w", err) } err = stmt.ClearBindings() if err != nil { return fmt.Errorf("failed to clear bindings of prepared statement: %w", err) } stmt.BindInt64(1, int64(featureID)) stmt.BindText(2, thumbnail.ContentType) stmt.BindText(3, photo.ContentType) stmt.BindZeroBlob(4, thumbnail.Size) stmt.BindZeroBlob(5, photo.Size) _, err = stmt.Step() if err != nil { return fmt.Errorf("failed to evaluate prepared statement: %w", err) } blob, err := conn.OpenBlob("", "feature_photos", "thumbnail_contents", conn.LastInsertRowID(), true) if err != nil { return fmt.Errorf("failed to open thumbnail content blob: %w", err) } err = func() error { defer blob.Close() defer thumbnail.File.Close() _, err := io.Copy(blob, thumbnail.File) return err }() if err != nil { return fmt.Errorf("failed to write to thumbnail content blob: %w", err) } blob, err = conn.OpenBlob("", "feature_photos", "contents", conn.LastInsertRowID(), true) if err != nil { return fmt.Errorf("failed to open photo content blob: %w", err) } err = func() error { defer blob.Close() defer photo.File.Close() _, err := io.Copy(blob, photo.File) return err }() if err != nil { return fmt.Errorf("failed to write to photo content blob: %w", err) } } return nil } changed := false defer func() { if changed { s.requestCheckpoint() } }() for localFeatureID, photoNames := range createdFeatureMapping { featureID, ok := createdIDMapping[localFeatureID] if !ok { return errs.NewErrFeatureForPhotoNotExists(int64(localFeatureID)) } err = uploadPhotos(featureID, photoNames) changed = true if err != nil { return fmt.Errorf("failed to upload photos for created features: %w", err) } } for featureID, photoNames := range addedFeatureMapping { err = uploadPhotos(featureID, photoNames) changed = true if err != nil { return fmt.Errorf("failed to upload photos for existing features: %w", err) } } return nil } func (s *Server) updateFeatures(conn *sqlite.Conn, features []models.Feature) error { stmt, err := conn.Prepare("update features set owner_id = ?, name = ?, deadline = ?, properties = ?, geom = ? where id = ?") if err != nil { return fmt.Errorf("failed to prepare statement: %w", err) } defer stmt.Finalize() for _, feature := range features { err := stmt.Reset() if err != nil { return fmt.Errorf("failed to reset prepared statement: %w", err) } err = stmt.ClearBindings() if err != nil { return fmt.Errorf("failed to clear bindings of prepared statement: %w", err) } stmt.BindInt64(1, int64(feature.OwnerID)) stmt.BindText(2, feature.Name) if feature.Deadline == nil { stmt.BindNull(3) } else { stmt.BindInt64(3, feature.Deadline.Unix()) } if feature.Properties == nil { stmt.BindText(4, "{}") } else { propertiesBytes, err := json.Marshal(feature.Properties) if err != nil { return fmt.Errorf("failed to marshal properties of feature id=%d: %w", feature.ID, err) } stmt.BindText(4, string(propertiesBytes)) } geomBytes, err := json.Marshal(feature.Geometry) if err != nil { return fmt.Errorf("failed to marshal geometry of feature ID %d: %w", feature.ID, err) } stmt.BindText(5, string(geomBytes)) stmt.BindInt64(6, int64(feature.ID)) _, err = stmt.Step() if err != nil { return fmt.Errorf("failed to evaluate prepared statement: %w", err) } } s.requestCheckpoint() return nil } func (s *Server) deleteFeatures(conn *sqlite.Conn, featureIDs []models.FeatureID) error { stmt, err := conn.Prepare("delete from features where id = ?") if err != nil { return fmt.Errorf("failed to prepare statement: %w", err) } defer stmt.Finalize() for _, featureID := range featureIDs { err := stmt.Reset() if err != nil { return fmt.Errorf("failed to reset prepared statement: %w", err) } err = stmt.ClearBindings() if err != nil { return fmt.Errorf("failed to clear bindings of prepared statement: %w", err) } stmt.BindInt64(1, int64(featureID)) _, err = stmt.Step() if err != nil { return fmt.Errorf("failed to evaluate prepared statement: %w", err) } } s.requestCheckpoint() return nil } func (s *Server) deletePhotos(conn *sqlite.Conn, photoIDs []models.FeaturePhotoID) error { stmt, err := conn.Prepare("delete from feature_photos where id = ?") if err != nil { return fmt.Errorf("failed to prepare statement: %w", err) } defer stmt.Finalize() for _, photoID := range photoIDs { err := stmt.Reset() if err != nil { return fmt.Errorf("failed to reset prepared statement: %w", err) } err = stmt.ClearBindings() if err != nil { return fmt.Errorf("failed to clear bindings of prepared statement: %w", err) } stmt.BindInt64(1, int64(photoID)) _, err = stmt.Step() if err != nil { return fmt.Errorf("failed to evaluate prepared statement: %w", err) } } s.requestCheckpoint() return nil } func (s *Server) getPhoto(featureID models.FeatureID, photoID models.FeaturePhotoID) ([]byte, string, error) { conn := s.getDbConn() defer s.dbpool.Put(conn) var contentType *string = nil var data []byte = nil found := false err := sqlitex.Exec(conn, "select content_type, contents from feature_photos where id = ? and feature_id = ?", func(stmt *sqlite.Stmt) error { if found { return fmt.Errorf("multiple photos returned for feature id %d, photo id %d", featureID, photoID) } contentType = ptrString(stmt.ColumnText(0)) data = make([]byte, stmt.ColumnLen(1)) stmt.ColumnBytes(1, data) found = true return nil }, photoID, featureID) if err != nil { return nil, "", fmt.Errorf("photo db query failed: %w", err) } if !found { return nil, "", errs.ErrPhotoNotExists } return data, *contentType, nil }