prolog-point-of-sale/main.pl

:- use_module(library(http/http_server)).
:- use_module(library(http/http_client)).
:- use_module(library(http/http_json)).
:- use_module(library(http/http_header)).
:- use_module(library(http/json_convert)).
:- use_module(library(http/json)).
:- use_module(library(persistency)).

:- initialization
    http_server([port(8080)]).
:- initialization
    absolute_file_name('database.db', File, [access(write)]),
    db_attach(File, []).

:- json_object
    product(name:atom, price:integer).
:- persistent
    product(name:atom, price:integer).

:- json_object
    login(username:atom, password:atom).

:- json_object
    user(username:atom).
:- persistent
    user(username:atom, password_hash:atom).

:- json_object
    token(username:atom, token:atom).
:- persistent
    token(username:atom, token:atom).

:- json_object
    error(error:atom).

:- consult('routes/products.pl').
:- consult('routes/login.pl').
:- consult('routes/users.pl').