20. Application Exercise – Version 10
The previous version showed that tax data, shared by all users of the application, should be stored in an [Application]-scope cache. We will use a Redis server [https://redis.io] to implement this.
20.1. Redis
The [Application] scope memory will be implemented by a Redis server. The PHP scripts that need this application memory will be clients of this server:

20.2. Installing Redis
Laragon comes with a Redis server that is not enabled by default. You must therefore start by enabling it:

- In [3], enable the [Redis] server;
- In [4], leave port [6379] as the default used by Redis clients;
Laragon services are automatically restarted after Redis is enabled:

20.3. The Redis client in command mode
The Redis server can be queried in command mode. Open a Laragon terminal (see link section):

- In [1], the [redis-cli] command launches the client in command mode for the Redis server;
As of July 2019, the Redis client supports 172 commands for interacting with the server [https://redis.io/commands#list]. One of them [command count] [2] displays this number [3].
We will only cover the ones we need for our PHP application. We will use Redis for a single purpose: storing an array [‘attribute’=>’value’] in Redis memory. This is done with the Redis command [set attribute value] [4]. The value can then be retrieved using the [get attribute] command [5]. That’s all we’ll need.
It may be necessary to clear Redis’s memory. This is done with the [flushdb] command [6]. Then, if we query the value of the [title] attribute [7], we get a [nil] reference [8] indicating that the attribute was not found. We can also use the [exists] command [9-10] to check if an attribute exists.
To exit the Redis client, type the [quit] command [11].
20.4. Installing a Redis Client for PHP
We now need to install a Redis client for PHP:

There are several libraries that implement a Redis client. We will use the [Predis] library [https://github.com/nrk/predis] (July 2019). Like the previous ones, this one is installed with [composer] in a Laragon terminal:

20.5. Server code

The configuration file [config-server.json] changes as follows:
{
"rootDirectory": "C:/myprograms/laragon-lite/www/php7/scripts-web/impots/version-10",
"databaseFilename": "Data/database.json",
"relativeDependencies": [
"/../version-08/Entities/BaseEntity.php",
"/../version-08/Entities/ExceptionImpots.php",
"/../version-08/Entities/TaxAdminData.php",
"/../version-08/Entities/Database.php",
"/../version-08/Dao/InterfaceServerDao.php",
"/../version-08/Dao/ServerDao.php",
"/../version-09/Dao/ServerDaoWithSession.php",
"/../version-08/Business/BusinessServerInterface.php",
"/../version-08/Business/ServerBusiness.php",
"/../version-09/Utilities/Logger.php",
"/../version-09/Utilities/SendAdminMail.php"
],
"absoluteDependencies": [
"C:/myprograms/laragon-lite/www/vendor/autoload.php",
"C:/myprograms/laragon-lite/www/vendor/predis/predis/autoload.php"
],
"users": [
{
"login": "admin",
"passwd": "admin"
}
],
"adminMail": {
"smtp-server": "localhost",
"smtp-port": "25",
"from": "guest@localhost",
"to": "guest@localhost",
"subject": "Tax calculation server crash",
"tls": "FALSE",
"attachments": []
},
"logsFilename": "Data/logs.txt"
}
Comments
- lines 5–15: Version 10 does not introduce anything new apart from the [impots-server.php] script. It uses elements from versions 08 and 09;
- line 19: a dependency required for the [predis] library that we just installed;
The server code [impots-server.php] changes as follows:
<?php
// Strict adherence to the declared types of function parameters
declare (strict_types=1);
// namespace
namespace Application;
// PHP error handling
ini_set("display_errors", "0");
//
// path to the configuration file
define("CONFIG_FILENAME", "Data/config-server.json");
// class alias
use \Application\ServerDaoWithSession as ServerDaoWithRedis;
// session
$session = new Session();
$session->start();
…
…
// 1st log
$logger->write("\n---new request\n");
// retrieve the current request
$request = Request::createFromGlobals();
// authentication only the first time
if (!$session->has("user")) {
…
} else {
// log
$logger->write("Authentication saved to session…\n");
}
// we have a valid user - we check the received parameters
$errors = [];
// we should have three GET parameters
$method = strtolower($request->getMethod());
…
// errors?
if ($errors) {
// send a 400 HTTP_BAD_REQUEST error code to the client
sendResponse($response, ["errors" => $errors], Response::HTTP_BAD_REQUEST, [], $logger);
// done
exit;
} else {
// logs
$logger->write("valid parameters ['married'=>$married, 'children'=>$children, 'salary'=>$salary]\n");
}
// we have everything we need to work
// Redis
\Predis\Autoloader::register();
try {
// [predis] client
$redis = new \Predis\Client();
// Connect to the server to check if it's available
$redis->connect();
} catch (\Predis\Connection\ConnectionException $ex) {
// internal server error
doInternalServerError("[redis], " . utf8_encode($ex->getMessage()), $response, $config['adminMail'], $logger);
// done
exit;
}
// creation of the [dao] layer
if (!$redis->get("taxAdminData")) {
// Tax data is retrieved from the database
$logger->write("Tax data retrieved from the database\n");
try {
// constructing the [DAO] layer
$dao = new ServerDaoWithRedis($config["databaseFilename"], NULL);
// Store tax data in the [application] scope
// The [TaxAdminData]->__toString method will be called implicitly
$redis->set("taxAdminData", $dao->getTaxAdminData());
} catch (\RuntimeException $ex) {
// log the error
doInternalServerError("[dao], " . utf8_encode($ex->getMessage()), $response, $config['adminMail'], $logger, $redis);
// done
exit;
}
} else {
// tax data is retrieved from the [application] scope
$arrayOfAttributes = \json_decode($redis->get("taxAdminData"), true);
$taxAdminData = (new TaxAdminData())->setFromArrayOfAttributes($arrayOfAttributes);
// instantiation of the [DAO] layer
$dao = new ServerDaoWithRedis(NULL, $taxAdminData);
// logs
$logger->write("tax data retrieved from Redis\n");
}
// creation of the [business] layer
$business = new ServerBusiness($dao);
// Calculate tax
$result = $businessLayer->calculateTax($married, (int) $children, (int) $salary);
// return the response
sendResponse($response, $result, Response::HTTP_OK, [], $logger, $redis);
// end
exit;
function doInternalServerError(string $message, Response $response, array $info,
Logger $logger = NULL, \Predis\Client $predisClient = NULL) {
// $message: the error message
// $response: HTTP response
// $infos: array of information for sending the email
// $result: results array
// $logger: the application logger
// $predisClient: a [predis] client
//
// we send an email to the administrator
// SendAdminMail catches all exceptions and logs them itself
$infos['message'] = $message;
$sendAdminMail = new SendAdminMail($infos, $logger);
$sendAdminMail->send();
// Send a 500 error code to the client
sendResponse($response, ["error" => $message], Response::HTTP_INTERNAL_SERVER_ERROR, [], $logger, $predisClient);
}
// function to send the HTTP response to the client
function sendResponse(Response $response, array $result, int $statusCode,
array $headers, Logger $logger = NULL, \Predis\Client $predisClient = NULL) {
// $response: HTTP response
// $result: array of results
// $statusCode: HTTP status of the response
// $headers: HTTP headers to include in the response
// $logger: the application logger
// $predisClient: a [predis] client
//
// HTTP status
$response->setStatusCode($statusCode);
// body
$body = \json_encode(["response" => $result], JSON_UNESCAPED_UNICODE);
$response->setContent($body);
// headers
$response->headers->add($headers);
// send
$response->send();
// log
if ($logger != NULL) {
$logger->write("$body\n");
$logger->close();
}
// Close the [redis] connection
if ($predisClient != NULL) {
$predisClient->disconnect();
}
}
Comments
- line 15: we give the alias [ServerDaoWithRedis] to the class [\Application\ServerDaoWithSession] to reflect the change in the server script’s implementation;
- lines 18–19: the session is maintained. Here, we need to keep two pieces of information in mind:
- the fact that the user has authenticated successfully. This information has [session] scope: it is tied to a specific user and is not valid for other users;
- the tax administration data. This information has [application] scope: it is not linked to a specific user but applies to all users;
- lines 54–64: creation of the [redis] client that will communicate with the [redis] server. This client will communicate with the server’s default port. If the server were not communicating on its default port or if it were not on the [localhost] machine, this information would need to be passed to the constructor of the [\Predis\Client] class;
- line 59: the client is immediately connected to the server to check if it responds;
- lines 60–65: if the connection to the Redis server fails, an error response is sent to the client and an email is sent to the application administrator;
- line 67: we query the [redis] server for the key [taxAdminData]. If it is not found, then the tax data is retrieved from the database (line 72);
- line 75: the key [taxAdminData] is stored in [redis] memory along with the JSON string of the variable [$taxAdminData], which is an object of type [TaxAdminData]. The [$redis→set] method expects a string for the key’s value. It will therefore attempt to convert the [TaxAdminData] object to a [string] type. This implicitly calls the [TaxAdminData->__toString] method, which produces the JSON string of the [TaxAdminData] object;
- line 84: the key [taxAdminData] is in the [redis] memory, so we retrieve its value. We know this is the JSON string of a [TaxAdminData] object. We then parse this to obtain an array of attributes;
- line 85: from this array, a new [TaxAdminData] object is instantiated;
- line 87: the [dao] layer is instantiated;
20.6. Client code

Client version 10 is identical to version 9. The only change is to the configuration file [config-client.json]:
{
"rootDirectory": "C:/Data/st-2019/dev/php7/poly/scripts-console/impots/version-10",
"taxPayersDataFileName": "Data/taxpayersdata.json",
"resultsFileName": "Data/results.json",
"errorsFileName": "Data/errors.json",
"dependencies": [
"/../version-08/Entities/BaseEntity.php",
"/../version-08/Entities/TaxPayerData.php",
"/../version-08/Entities/ExceptionImpots.php",
"/../version-08/Utilities/Utilitaires.php",
"/../version-08/Dao/DaoClientInterface.php",
"/../version-08/Dao/DaoProcess.php",
"/../version-09/Dao/ClientDao.php",
"/../version-08/Business/BusinessClientInterface.php",
"/../version-08/Business/BusinessClient.php"
],
"absoluteDependencies": [
"C:/myprograms/laragon-lite/www/vendor/autoload.php"
],
"user": {
"login": "admin",
"passwd": "admin"
},
"urlServer": "https://localhost:443/php7/scripts-web/impots/version-10/impots-server.php"
}
The only change is the server URL on line 24.
The results are the same as in version 09. Let’s just test a new error case:

The result in the console is as follows:
The following error occurred: {"HTTP status":500,"error":"[redis], No connection could be established because the target computer explicitly refused it. [tcp:\/\/127.0.0.1:6379]"}
Done
20.7. [Codeception] client tests

The [ClientMetierTest] test class in version 10 is identical to that in version 09 with one exception:
<?php
// Strict adherence to the declared types of function parameters
declare (strict_types=1);
// namespace
namespace Application;
// definition of constants
define("ROOT", "C:/Data/st-2019/dev/php7/poly/scripts-console/impots/version-10");
…
}
- line 10: the test environment is that of the version 10 client;
Before starting the tests, let’s use the [redis-cli] client to delete the [taxAdminData] key from the [redis] server’s memory:

Now, let’s run the test:

Now let’s examine the server logs [logs.txt]:
07/05/19 08:52:16:396:
---new request
07/05/19 08:52:16:403: Authenticating...
07/05/19 08:52:16:403: Authentication successful [admin, admin]
07/05/19 08:52:16:403: parameters ['married'=>yes, 'children'=>2, 'salary'=>55555] valid
07/05/19 08:52:16:407: Tax data retrieved from database
07/05/19 08:52:16:420: {"response":{"tax":2814,"surcharge":0,"discount":0,"reduction":0,"rate":0.14}}
07/05/19 08:52:16:546 :
---new request
07/05/19 08:52:16:555 : Authentication in progress…
07/05/19 08:52:16:555 : Authentication successful [admin, admin]
07/05/19 08:52:16:556 : parameters ['married'=>yes, 'children'=>2, 'salary'=>50000] valid
07/05/19 08:52:16:559: Tax data retrieved from Redis
07/05/19 08:52:16:559 : {"response":{"tax":1384,"surcharge":0,"discount":384,"reduction":347,"rate":0.14}}
07/05/19 08:52:16:668 :
---new request
07/05/19 08:52:16:675 : Authentication in progress…
07/05/19 08:52:16:675 : Authentication successful [admin, admin]
07/05/19 08:52:16:675 : parameters ['married'=>yes, 'children'=>3, 'salary'=>50000] valid
07/05/19 08:52:16:678: Tax data retrieved from Redis
07/05/19 08:52:16:678 : {"response":{"tax":0,"surcharge":0,"discount":720,"reduction":0,"rate":0.14}}
07/05/19 08:52:16:776 :
---new request
…
We have already mentioned that for each test, the test class constructor is re-executed, which means that the [ClientDao] class being tested is instantiated with a non-existent session cookie for each test. Everything therefore proceeds as if the 11 tests represented 11 different users, with 11 different sessions.
- line 6: tax data is retrieved from the database;
- lines 13, 20: tax data is retrieved from the [Redis] memory. We therefore have an [application] scope memory shared by all users of the application;
20.8. [Redis] Server Web Interface
We have seen that the [Redis] server can be managed in command mode. It can also be managed via a web interface:

- in [4], the administration URL;
- in [5], the keys stored by the server;
- in [6], the current server status;
By clicking on [5], you can view information about the [taxAdminData] key:

- in [7], the URL that provides access to the information for the [taxAdminData] key [8];
- in [9], the key’s status;
- in [10], its value: you can recognize the JSON string of a [TaxAdminData] object;
- In [11], you can delete the key;
- in [12], you can add another one;