Add some APIs to create resources

4 files changed, 117 insertions, 2 deletions

diff --git a/lib/azure_ex.ex b/lib/azure_ex.ex
index 64b3122..3f4e29e 100644
--- a/lib/azure_ex.ex
+++ b/lib/azure_ex.ex
@@ -40,4 +40,14 @@ defmodule AzureEx do
     "RestartVirtualMachines",
     "POST https://management.azure.com/subscriptions/{subscriptionId}/resourceGroups/{resourceGroupName}/providers/Microsoft.Compute/virtualMachines/{vmName}/restart?api-version=2020-06-01"
   )
+
+  defendpoint(
+    "CreateOrUpdateNetworkInterfaces",
+    "PUT https://management.azure.com/subscriptions/{subscriptionId}/resourceGroups/{resourceGroupName}/providers/Microsoft.Network/networkInterfaces/{networkInterfaceName}?api-version=2020-05-01"
+  )
+
+  defendpoint(
+    "CreateOrUpdateSubnets",
+    "PUT https://management.azure.com/subscriptions/{subscriptionId}/resourceGroups/{resourceGroupName}/providers/Microsoft.Network/virtualNetworks/{virtualNetworkName}/subnets/{subnetName}?api-version=2020-05-01"
+  )
 end
diff --git a/lib/azure_ex/model/network_interfaces/create_or_update.ex b/lib/azure_ex/model/network_interfaces/create_or_update.ex
new file mode 100644
index 0000000..bff597c
--- /dev/null
+++ b/lib/azure_ex/model/network_interfaces/create_or_update.ex
@@ -0,0 +1,41 @@
+defmodule AzureEx.Model.NetworkInterfaces.CreateOrUpdate do
+  @moduledoc false
+
+  use TypedStruct
+
+  alias __MODULE__.{Properties}
+
+  typedstruct module: Subnet do
+    @derive Jason.Encoder
+
+    field :id, String.t()
+  end
+
+  typedstruct module: NetworkInterfaceIPConfiguration.Properties do
+    @derive Jason.Encoder
+
+    field :subnet, Subnet.t()
+  end
+
+  typedstruct module: NetworkInterfaceIPConfiguration do
+    @derive Jason.Encoder
+
+    field :name, String.t()
+    field :properties, NetworkInterfaceIPConfiguration.Properties.t()
+  end
+
+  typedstruct module: Properties do
+    @derive Jason.Encoder
+
+    field :ipConfigurations, [NetworkInterfaceIPConfiguration.t()]
+  end
+
+  typedstruct do
+    @derive Jason.Encoder
+
+    field :id, String.t()
+
+    field :location, String.t()
+    field :properties, Properties.t(), default: %Properties{}
+  end
+end
diff --git a/lib/azure_ex/model/virtual_machines/create_or_update.ex b/lib/azure_ex/model/virtual_machines/create_or_update.ex
new file mode 100644
index 0000000..e719c0d
--- /dev/null
+++ b/lib/azure_ex/model/virtual_machines/create_or_update.ex
@@ -0,0 +1,64 @@
+defmodule AzureEx.Model.VirtualMachines.CreateOrUpdate do
+  @moduledoc false
+
+  use TypedStruct
+
+  alias __MODULE__.{Properties, NetworkInterfaceReference, StorageProfile}
+
+  typedstruct module: HardwareProfile do
+    @derive Jason.Encoder
+
+    field :vmSize, String.t()
+  end
+
+  typedstruct module: ImageReference do
+    @derive Jason.Encoder
+
+    field :offer, String.t()
+    field :publisher, String.t()
+    field :sku, String.t()
+    field :version, String.t()
+  end
+
+  typedstruct module: StorageProfile do
+    @derive Jason.Encoder
+
+    field :imageReference, ImageReference.t()
+  end
+
+  typedstruct module: NetworkInterfaceReference do
+    @derive Jason.Encoder
+
+    field :id, String.t()
+  end
+
+  typedstruct module: NetworkProfile do
+    @derive Jason.Encoder
+
+    field :networkInterfaces, [NetworkInterfaceReference.t()]
+  end
+
+  typedstruct module: OSProfile do
+    @derive Jason.Encoder
+
+    field :adminPassword, String.t()
+    field :adminUsername, String.t()
+    field :computerName, String.t()
+  end
+
+  typedstruct module: Properties do
+    @derive Jason.Encoder
+
+    field :hardwareProfile, HardwareProfile.t()
+    field :networkProfile, NetworkProfile.t()
+    field :storageProfile, StorageProfile.t()
+    field :osProfile, OSProfile.t()
+  end
+
+  typedstruct do
+    @derive Jason.Encoder
+
+    field :location, String.t()
+    field :properties, Properties.t(), default: %Properties{}
+  end
+end
diff --git a/lib/azure_ex/request.ex b/lib/azure_ex/request.ex
index c33cd51..88763f3 100644
--- a/lib/azure_ex/request.ex
+++ b/lib/azure_ex/request.ex
@@ -12,8 +12,8 @@ defmodule AzureEx.Request do
   @type httpoison_result :: {:ok, HTTPoison.Response.t()} | {:error, HTTPoison.Error.t()}
 
   @spec call(binary, method, data) :: {:ok, result} | {:error, error}
-  def call(endpoint, method, body \\ %{}) do
-    method |> send(endpoint, body) |> handle_response()
+  def call(endpoint, method, data \\ %{}) do
+    method |> send(endpoint, data) |> handle_response()
   end
 
   @spec handle_response({:ok, HTTPoison.Response.t()}) :: {:ok, result} | {:error, error}