Tcl

Google Vision Web Detection

Demonstrates how to use the Cloud Cloud Vision API for the Web Detection method.

The Google Cloud Vision "web detection" API call performs web detection analysis on an image. When you send an image to the Vision API with the "web detection" feature enabled, the API returns information about web entities (objects, logos, landmarks, etc.) that are visually similar to objects in the image and are found on the web.

It includes:

Entity Recognition: The API identifies entities (objects, landmarks, logos, etc.) present in the image and provides information about them. This can include labels, descriptions, and additional metadata.
Web Pages: For recognized entities, the API retrieves information about web pages that contain visually similar images or information related to the entities found in the image.
Matching Images: The API may return URLs of images found on the web that are visually similar to the objects in the image being analyzed.
Best Guess Label: The API may also provide a "best guess" label or description for the image based on its analysis of the web entities.
Related Web Entities: Additionally, the API may return related web entities or concepts that are semantically related to the recognized objects.

Overall, the web detection feature of the Google Cloud Vision API allows you to perform reverse image search-like functionality, identifying objects in an image and providing information about similar objects found on the web. This can be useful for tasks such as image classification, content moderation, and visual search applications.

Chilkat Tcl Downloads

Download Chilkat for Tcl

Tcl


load ./chilkat.dll

set success 0

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

set http [new_CkHttp]

# The following JSON is sent in the request body.

# {
#   "requests": [
#     {
#       "image": {
#         "source": {
#           "imageUri": "gs://visionapi-demo/ali.jpg"
#         }
#       },
#       "features": [
#         {
#           "maxResults": 10,
#           "type": "WEB_DETECTION"
#         }
#       ]
#     }
#   ]
# }

# The following code creates the JSON request body.
set json [new_CkJsonObject]

CkJsonObject_UpdateString $json "requests[0].image.source.imageUri" "gs://visionapi-demo/ali.jpg"
CkJsonObject_UpdateInt $json "requests[0].features[0].maxResults" 10
CkJsonObject_UpdateString $json "requests[0].features[0].type" "WEB_DETECTION"

CkJsonObject_put_EmitCompact $json 0
puts [CkJsonObject_emit $json]

set resp [new_CkHttpResponse]

set success [CkHttp_HttpJson $http "POST" "https://vision.googleapis.com/v1/images:annotate?key=your-api-key-here" $json "application/json" $resp]
if {$success == 0} then {
    puts [CkHttp_lastErrorText $http]
    delete_CkHttp $http
    delete_CkJsonObject $json
    delete_CkHttpResponse $resp
    exit
}

set jResp [new_CkJsonObject]

CkHttpResponse_GetBodyJson $resp $jResp
CkJsonObject_put_EmitCompact $jResp 0

puts "Response Body:"
puts [CkJsonObject_emit $jResp]

set respStatusCode [CkHttpResponse_get_StatusCode $resp]
puts "Response Status Code = $respStatusCode"
if {$respStatusCode >= 400} then {
    puts "Response Header:"
    puts [CkHttpResponse_header $resp]
    puts "Failed."
    delete_CkHttp $http
    delete_CkJsonObject $json
    delete_CkHttpResponse $resp
    delete_CkJsonObject $jResp
    exit
}


delete_CkHttp $http
delete_CkJsonObject $json
delete_CkHttpResponse $resp
delete_CkJsonObject $jResp