Perl

Shopware 6 - Get OAuth2 Access Token using Username and Password

See more Shopware 6 Examples

Demonstrates how to get an OAuth2 access token using your username and password. Perl

use chilkat();

$success = 0;

# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

$http = chilkat::CkHttp->new();

# Sends the following POST

# 	{
# 	    "client_id": "administration",
# 	    "grant_type": "password",
# 	    "scopes": "write",
# 	    "username": "<user-username>",
# 	    "password": "<user-password>"
# 	}

# Use this online tool to generate code from sample JSON:
# Generate Code to Create JSON

# The following JSON is sent in the request body.

$json = chilkat::CkJsonObject->new();
$json->UpdateString("client_id","administration");
$json->UpdateString("grant_type","password");
$json->UpdateString("scopes","write");
$json->UpdateString("username","<user-username>");
$json->UpdateString("password","<user-password>");

$resp = chilkat::CkHttpResponse->new();
$success = $http->HttpJson("POST","https://my-shopware-6-shop.de/api/oauth/token",$json,"application/json",$resp);
if ($success == 0) {
    print $http->lastErrorText() . "\r\n";
    exit;
}

$sbResponseBody = chilkat::CkStringBuilder->new();
$resp->GetBodySb($sbResponseBody);
$jResp = chilkat::CkJsonObject->new();
$jResp->LoadSb($sbResponseBody);
$jResp->put_EmitCompact(0);

print "Response Body:" . "\r\n";
print $jResp->emit() . "\r\n";

$respStatusCode = $resp->get_StatusCode();
print "Response Status Code = " . $respStatusCode . "\r\n";
if ($respStatusCode >= 400) {
    print "Response Header:" . "\r\n";
    print $resp->header() . "\r\n";
    print "Failed." . "\r\n";
    exit;
}

# Sample JSON response:
# (Sample code for parsing the JSON response is shown below)

# {
#   "token_type": "Bearer",
#   "expires_in": 600,
#   "access_token": "xxxxxxxxxxxxxx",
#   "refresh_token": "token"
# }

# Sample code for parsing the JSON response...
# Use the following online tool to generate parsing code from sample JSON:
# Generate Parsing Code from JSON

$token_type = $jResp->stringOf("token_type");
$expires_in = $jResp->IntOf("expires_in");
$access_token = $jResp->stringOf("access_token");
$refresh_token = $jResp->stringOf("refresh_token");

# Save our JSON to a file (to be used in other examples..)
$success = $jResp->WriteFile("qa_data/tokens/shopware6.json");