Regenerate all clients with OAG 7.4.0 .

clients/ada-server/generated/src/aws/_aws.adb

@@ -0,0 +1,7 @@
+with Servlet.Server.Web;
+with defaultPackage.Server;
+procedure defaultPackage_AWS is
+   Container : Servlet.Server.Web.AWS_Container;
+begin
+   defaultPackage.Server (Container);
+end defaultPackage_AWS;

clients/ada-server/generated/src/ews/_ews.adb

@@ -0,0 +1,7 @@
+with Servlet.Server.EWS;
+with defaultPackage.Server;
+procedure defaultPackage_EWS is
+   Container : Servlet.Server.EWS.EWS_Container;
+begin
+   defaultPackage.Server (Container);
+end defaultPackage_EWS;

clients/ada/generated/.openapi-generator-ignore

@@ -0,0 +1,23 @@
+# OpenAPI Generator Ignore
+# Generated by openapi-generator https://github.com/openapitools/openapi-generator
+
+# Use this file to prevent files from being overwritten by the generator.
+# The patterns follow closely to .gitignore or .dockerignore.
+
+# As an example, the C# client generator defines ApiClient.cs.
+# You can make changes and tell OpenAPI Generator to ignore just this file by uncommenting the following line:
+#ApiClient.cs
+
+# You can match any string of characters against a directory, file or extension with a single asterisk (*):
+#foo/*/qux
+# The above matches foo/bar/qux and foo/baz/qux, but not foo/bar/baz/qux
+
+# You can recursively match patterns against a directory, file or extension with a double asterisk (**):
+#foo/**/qux
+# This matches foo/bar/qux, foo/baz/qux, and foo/bar/baz/qux
+
+# You can also negate patterns with an exclamation (!).
+# For example, you can ignore all files in a docs folder with the file extension .md:
+#docs/*.md
+# Then explicitly reverse the ignore rule for a single file:
+#!docs/README.md

clients/ada/generated/.openapi-generator/FILES

@@ -0,0 +1,9 @@
+.openapi-generator-ignore
+config.gpr
+defaultpackage.gpr
+src/-client.adb
+src/.ads
+src/client/-clients.adb
+src/client/-clients.ads
+src/model/-models.adb
+src/model/-models.ads

clients/ada/generated/.openapi-generator/VERSION

@@ -0,0 +1 @@
+7.4.0

clients/ada/generated/config.gpr

@@ -0,0 +1,78 @@
+abstract project Config is
+   for Source_Dirs use ();
+
+   type Yes_No is ("yes", "no");
+
+   type Library_Type_Type is ("relocatable", "static", "static-pic");
+
+   type Build_Type is ("distrib", "debug", "optimize", "profile", "coverage");
+   Mode : Build_Type := external ("BUILD", "debug");
+
+   Processors := External ("PROCESSORS", "1");
+
+   package Builder is
+       for Default_Switches ("Ada") use ("-j" & Processors);
+   end Builder;
+
+   package compiler is
+      warnings := ("-gnatwua");
+      defaults := ("-gnat2012");
+      case Mode is
+         when "distrib" =>
+            for Default_Switches ("Ada") use defaults & ("-O2", "-gnatafno", "-gnatVa", "-gnatwa");
+
+         when "debug" =>
+            for Default_Switches ("Ada") use defaults & warnings
+               & ("-g", "-gnata", "-gnatVaMI", "-gnaty3abcefhiklmnprstxM127");
+
+         when "coverage" =>
+            for Default_Switches ("Ada") use defaults & warnings
+               & ("-g", "-O2", "-gnata", "-gnatVaMI", "-gnaty3abcefhiklmnprstxM127",
+                  "-fprofile-arcs", "-ftest-coverage");
+
+         when "optimize" =>
+            for Default_Switches ("Ada") use defaults & warnings
+               & ("-O2", "-gnatn", "-gnatp", "-fdata-sections", "-ffunction-sections");
+
+         when "profile" =>
+            for Default_Switches ("Ada") use defaults & warnings & ("-pg");
+
+      end case;
+   end compiler;
+
+   package binder is
+      case Mode is
+         when "debug" =>
+            for Default_Switches ("Ada") use ("-E");
+
+         when others =>
+            for Default_Switches ("Ada") use ("-E");
+
+      end case;
+   end binder;
+
+   package linker is
+      case Mode is
+         when "profile" =>
+            for Default_Switches ("Ada") use ("-pg");
+
+         when "distrib" =>
+            for Default_Switches ("Ada") use ("-s");
+
+         when "optimize" =>
+            for Default_Switches ("Ada") use ("-Wl,--gc-sections");
+
+         when "coverage" =>
+            for Default_Switches ("ada") use ("-fprofile-arcs");
+
+         when others =>
+            null;
+      end case;
+
+   end linker;
+
+   package Ide is
+      for VCS_Kind use "git";
+   end Ide;
+
+end Config;

clients/ada/generated/defaultpackage.gpr

@@ -0,0 +1,25 @@
+--  Swaggy Jenkins
+--  Jenkins API clients generated from Swagger / Open API specification
+--  The version of the OpenAPI document: 1.0.0
+--
+--  https://openapi-generator.tech
+--
+--  NOTE: Auto generated by OpenAPI Generator (https://openapi-generator.tech).
+with "config";
+with "utilada_sys";
+with "utilada_xml";
+with "utilada_curl";
+with "security";
+with "swagger";
+project defaultPackage is
+
+   for Object_Dir use "obj/";
+   for Source_Dirs use ("src", "src/model", "src/client");
+   Mains := ("-client.adb");
+
+   package Binder renames Config.Binder;
+   package Builder renames Config.Builder;
+   package Compiler renames Config.Compiler;
+   package Linker renames Config.Linker;
+
+end defaultPackage;

clients/ada/generated/src/-client.adb

@@ -0,0 +1,57 @@
+--  ------------ EDIT NOTE ------------
+--  Swaggy Jenkins
+--  Jenkins API clients generated from Swagger / Open API specification
+--  This file was generated with openapi-generator.  You can modify it to implement
+--  the client.  After you modify this file, you should add the following line
+--  to the .openapi-generator-ignore file:
+--
+--  src/.ads
+--
+--  Then, you can drop this edit note comment.
+--  ------------ EDIT NOTE ------------
+with .Clients;
+with .Models;
+with Swagger;
+with Swagger.Credentials.OAuth;
+with Util.Http.Clients.Curl;
+with Ada.Text_IO;
+with Ada.Command_Line;
+with Ada.Calendar.Formatting;
+with Ada.Exceptions;
+procedure .Client is
+
+   use Ada.Text_IO;
+
+   procedure Usage;
+
+   Server    : constant Swagger.UString := Swagger.To_UString ("http://localhost:8080/v2");
+   Arg_Count : constant Natural := Ada.Command_Line.Argument_Count;
+   Arg       : Positive := 1;
+
+   procedure Usage is
+   begin
+      Put_Line ("Usage: defaultPackage {params}...");
+   end Usage;
+
+begin
+   if Arg_Count <= 1 then
+      Usage;
+      return;
+   end if;
+   Util.Http.Clients.Curl.Register;
+   declare
+      Command : constant String := Ada.Command_Line.Argument (Arg);
+      Item    : constant String := Ada.Command_Line.Argument (Arg + 1);
+      Cred    : aliased Swagger.Credentials.OAuth.OAuth2_Credential_Type;
+      C       : .Clients.Client_Type;
+   begin
+      C.Set_Server (Server);
+      C.Set_Credentials (Cred'Unchecked_Access);
+      Arg := Arg + 2;
+
+   exception
+      when E : Constraint_Error =>
+         Put_Line ("Constraint error raised: " & Ada.Exceptions.Exception_Message (E));
+
+   end;
+end .Client;

clients/ada/generated/src/.ads

@@ -0,0 +1,14 @@
+--  Swaggy Jenkins
+--  Jenkins API clients generated from Swagger / Open API specification
+--  ------------ EDIT NOTE ------------
+--  This file was generated with openapi-generator.  You can modify it to implement
+--  the server.  After you modify this file, you should add the following line
+--  to the .openapi-generator-ignore file:
+--
+--  src/.ads
+--
+--  Then, you can drop this edit note comment.
+--  ------------ EDIT NOTE ------------
+package  is
+
+end ;