Examples show below. Fairly straightforward to convert current HammerDB readline based interface into HTTP interface. Huddle https://wiki.tcl-lang.org/page/huddle provides a generic serialization/intermediary format that automates translation from JSON (or YAML) input to the dictonary/dict format used internally to enable the building of a service based interface:

Example client: 

puts "Getting Active Database"
    set res [rest::get http://localhost:8080/db "" ]
    set res [rest::format_json $res]
    puts $res

puts "Setting Warehouse Count to 800"
set body { "dict": "tpcc", "key": "count_ware", "value": "800" }
    set res [rest::post http://localhost:8080/diset $body ]

puts "Setting password to new password"
set body { "dict": "tpcc", "key": "tpcc_pass", "value": "new_password" }
    set res [rest::post http://localhost:8080/diset $body ]

puts "Retrieving dict in JSON format and converting to text"
    set res [rest::get http://localhost:8080/dict "" ]
    set res [rest::format_json $res]
    puts $res

./resttest2.tcl 
Getting Active Database
ora Oracle mssqls MSSQLServer db2 Db2 mysql MySQL pg PostgreSQL redis Redis
Setting Warehouse Count to 800
Setting password to new password
Retrieving dict in JSON format and converting to text
connection {system_user system system_password manager instance oracle rac 0} tpcc {count_ware 800 num_vu 1 tpcc_user tpcc tpcc_pass new_password tpcc_def_tab tpcctab tpcc_ol_tab tpcctab tpcc_def_temp temp partition false hash_clusters false tpcc_tt_compat false total_iterations 1000000 raiseerror false keyandthink false checkpoint false ora_driver test rampup 2 duration 5 allwarehouse false timeprofile false}

Example Server Output:

./hammerdbws 
HammerDB WS v3.1
Copyright (C) 2003-2018 Steve Shaw
Type "help" for a list of commands
The xml is well-formed, applying configuration
Listening for HTTP requests on TCP port 8080
mimetype received: application/x-www-form-urlencoded
content received: { "dict": "tpcc", "key": "count_ware", "value": "800" }
JSON converted to huddle for processing HUDDLE {D {dict {s tpcc} key {s count_ware} value {s 800}}}
Changed tpcc:count_ware from 1 to 800 for Oracle
mimetype received: application/x-www-form-urlencoded
content received: { "dict": "tpcc", "key": "tpcc_pass", "value": "new_password" }
JSON converted to huddle for processing HUDDLE {D {dict {s tpcc} key {s tpcc_pass} value {s new_password}}}
Changed tpcc:tpcc_pass from tpcc to new_password for Oracle

Example response from:
http://192.168.1.213:8080/dict

{
  "connection": {
    "system_user": "system",
    "system_password": "manager",
    "instance": "oracle",
    "rac": "0"
  },
  "tpcc": {
    "count_ware": "800",
    "num_vu": "1",
    "tpcc_user": "tpcc",
    "tpcc_pass": "new_password",
    "tpcc_def_tab": "tpcctab",
    "tpcc_ol_tab": "tpcctab",
    "tpcc_def_temp": "temp",
    "partition": "false",
    "hash_clusters": "false",
    "tpcc_tt_compat": "false",
    "total_iterations": "1000000",
    "raiseerror": "false",
    "keyandthink": "false",
    "checkpoint": "false",
    "ora_driver": "test",
    "rampup": "2",
    "duration": "5",
    "allwarehouse": "false",
    "timeprofile": "false"
  }
}

Web service implementation #45

Description

Metadata

Metadata

Assignees

Labels

Type

Projects

Milestone

Relationships

Development

Issue actions