1 // Copyright (C) The Arvados Authors. All rights reserved.
3 // SPDX-License-Identifier: AGPL-3.0
6 // How to manually run individual tests against the real cloud:
8 // $ go test -v git.curoverse.com/arvados.git/lib/cloud/azure -live-azure-cfg azconfig.yml -check.f=TestCreate
10 // Tests should be run individually and in the order they are listed in the file:
12 // Example azconfig.yml:
14 // ImageIDForTestSuite: "https://example.blob.core.windows.net/system/Microsoft.Compute/Images/images/zzzzz-compute-osDisk.XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX.vhd"
16 // SubscriptionID: XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX
17 // ClientID: XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX
18 // Location: centralus
19 // CloudEnvironment: AzurePublicCloud
20 // ClientSecret: XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
21 // TenantId: XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX
22 // ResourceGroup: zzzzz
24 // Subnet: zzzzz-subnet-private
25 // StorageAccount: example
26 // BlobContainer: vhds
27 // DeleteDanglingResourcesAfter: 20s
28 // AdminUsername: crunch
45 "git.curoverse.com/arvados.git/lib/cloud"
46 "git.curoverse.com/arvados.git/sdk/go/arvados"
47 "git.curoverse.com/arvados.git/sdk/go/config"
48 "github.com/Azure/azure-sdk-for-go/services/compute/mgmt/2018-06-01/compute"
49 "github.com/Azure/azure-sdk-for-go/services/network/mgmt/2018-06-01/network"
50 "github.com/Azure/azure-sdk-for-go/storage"
51 "github.com/Azure/go-autorest/autorest"
52 "github.com/Azure/go-autorest/autorest/azure"
53 "github.com/Azure/go-autorest/autorest/to"
54 "github.com/jmcvetta/randutil"
55 "github.com/sirupsen/logrus"
56 "golang.org/x/crypto/ssh"
57 check "gopkg.in/check.v1"
60 // Gocheck boilerplate
61 func Test(t *testing.T) {
65 type AzureInstanceSetSuite struct{}
67 var _ = check.Suite(&AzureInstanceSetSuite{})
69 type VirtualMachinesClientStub struct{}
71 var testKey = []byte(`ssh-rsa AAAAB3NzaC1yc2EAAAADAQABAAABAQDLQS1ExT2+WjA0d/hntEAyAtgeN1W2ik2QX8c2zO6HjlPHWXL92r07W0WMuDib40Pcevpi1BXeBWXA9ZB5KKMJB+ukaAu22KklnQuUmNvk6ZXnPKSkGxuCYvPQb08WhHf3p1VxiKfP3iauedBDM4x9/bkJohlBBQiFXzNUcQ+a6rKiMzmJN2gbL8ncyUzc+XQ5q4JndTwTGtOlzDiGOc9O4z5Dd76wtAVJneOuuNpwfFRVHThpJM6VThpCZOnl8APaceWXKeuwOuCae3COZMz++xQfxOfZ9Z8aIwo+TlQhsRaNfZ4Vjrop6ej8dtfZtgUFKfbXEOYaHrGrWGotFDTD example@example`)
73 func (*VirtualMachinesClientStub) createOrUpdate(ctx context.Context,
74 resourceGroupName string,
76 parameters compute.VirtualMachine) (result compute.VirtualMachine, err error) {
77 parameters.ID = &VMName
78 parameters.Name = &VMName
79 return parameters, nil
82 func (*VirtualMachinesClientStub) delete(ctx context.Context, resourceGroupName string, VMName string) (result *http.Response, err error) {
86 func (*VirtualMachinesClientStub) listComplete(ctx context.Context, resourceGroupName string) (result compute.VirtualMachineListResultIterator, err error) {
87 return compute.VirtualMachineListResultIterator{}, nil
90 type InterfacesClientStub struct{}
92 func (*InterfacesClientStub) createOrUpdate(ctx context.Context,
93 resourceGroupName string,
95 parameters network.Interface) (result network.Interface, err error) {
96 parameters.ID = to.StringPtr(nicName)
97 (*parameters.IPConfigurations)[0].PrivateIPAddress = to.StringPtr("192.168.5.5")
98 return parameters, nil
101 func (*InterfacesClientStub) delete(ctx context.Context, resourceGroupName string, VMName string) (result *http.Response, err error) {
105 func (*InterfacesClientStub) listComplete(ctx context.Context, resourceGroupName string) (result network.InterfaceListResultIterator, err error) {
106 return network.InterfaceListResultIterator{}, nil
109 type testConfig struct {
110 ImageIDForTestSuite string
111 DriverParameters json.RawMessage
114 var live = flag.String("live-azure-cfg", "", "Test with real azure API, provide config file")
116 func GetInstanceSet() (cloud.InstanceSet, cloud.ImageID, arvados.Cluster, error) {
117 cluster := arvados.Cluster{
118 InstanceTypes: arvados.InstanceTypeMap(map[string]arvados.InstanceType{
119 "tiny": arvados.InstanceType{
121 ProviderType: "Standard_D1_v2",
124 Scratch: 10000000000,
130 var exampleCfg testConfig
131 err := config.LoadFile(&exampleCfg, *live)
133 return nil, cloud.ImageID(""), cluster, err
136 ap, err := newAzureInstanceSet(exampleCfg.DriverParameters, "test123", logrus.StandardLogger())
137 return ap, cloud.ImageID(exampleCfg.ImageIDForTestSuite), cluster, err
139 ap := azureInstanceSet{
140 azconfig: azureInstanceSetConfig{
141 BlobContainer: "vhds",
143 dispatcherID: "test123",
144 namePrefix: "compute-test123-",
145 logger: logrus.StandardLogger(),
146 deleteNIC: make(chan string),
147 deleteBlob: make(chan storage.Blob),
149 ap.ctx, ap.stopFunc = context.WithCancel(context.Background())
150 ap.vmClient = &VirtualMachinesClientStub{}
151 ap.netClient = &InterfacesClientStub{}
152 return &ap, cloud.ImageID("blob"), cluster, nil
155 func (*AzureInstanceSetSuite) TestCreate(c *check.C) {
156 ap, img, cluster, err := GetInstanceSet()
158 c.Fatal("Error making provider", err)
161 pk, _, _, _, err := ssh.ParseAuthorizedKey(testKey)
162 c.Assert(err, check.IsNil)
164 nodetoken, err := randutil.String(40, "abcdefghijklmnopqrstuvwxyz0123456789")
165 c.Assert(err, check.IsNil)
167 inst, err := ap.Create(cluster.InstanceTypes["tiny"],
168 img, map[string]string{
169 "node-token": nodetoken},
172 c.Assert(err, check.IsNil)
175 log.Printf("Result %v %v %v", inst.String(), inst.Address(), tg)
179 func (*AzureInstanceSetSuite) TestListInstances(c *check.C) {
180 ap, _, _, err := GetInstanceSet()
182 c.Fatal("Error making provider", err)
185 l, err := ap.Instances(nil)
187 c.Assert(err, check.IsNil)
189 for _, i := range l {
191 log.Printf("%v %v %v", i.String(), i.Address(), tg)
195 func (*AzureInstanceSetSuite) TestManageNics(c *check.C) {
196 ap, _, _, err := GetInstanceSet()
198 c.Fatal("Error making provider", err)
201 ap.(*azureInstanceSet).manageNics()
205 func (*AzureInstanceSetSuite) TestManageBlobs(c *check.C) {
206 ap, _, _, err := GetInstanceSet()
208 c.Fatal("Error making provider", err)
211 ap.(*azureInstanceSet).manageBlobs()
215 func (*AzureInstanceSetSuite) TestDestroyInstances(c *check.C) {
216 ap, _, _, err := GetInstanceSet()
218 c.Fatal("Error making provider", err)
221 l, err := ap.Instances(nil)
222 c.Assert(err, check.IsNil)
224 for _, i := range l {
225 c.Check(i.Destroy(), check.IsNil)
229 func (*AzureInstanceSetSuite) TestDeleteFake(c *check.C) {
230 ap, _, _, err := GetInstanceSet()
232 c.Fatal("Error making provider", err)
235 _, err = ap.(*azureInstanceSet).netClient.delete(context.Background(), "fakefakefake", "fakefakefake")
237 de, ok := err.(autorest.DetailedError)
239 rq := de.Original.(*azure.RequestError)
241 log.Printf("%v %q %q", rq.Response.StatusCode, rq.ServiceError.Code, rq.ServiceError.Message)
245 func (*AzureInstanceSetSuite) TestWrapError(c *check.C) {
246 retryError := autorest.DetailedError{
247 Original: &azure.RequestError{
248 DetailedError: autorest.DetailedError{
249 Response: &http.Response{
251 Header: map[string][]string{"Retry-After": []string{"123"}},
254 ServiceError: &azure.ServiceError{},
257 wrapped := wrapAzureError(retryError)
258 _, ok := wrapped.(cloud.RateLimitError)
259 c.Check(ok, check.Equals, true)
261 quotaError := autorest.DetailedError{
262 Original: &azure.RequestError{
263 DetailedError: autorest.DetailedError{
264 Response: &http.Response{
268 ServiceError: &azure.ServiceError{
269 Message: "No more quota",
273 wrapped = wrapAzureError(quotaError)
274 _, ok = wrapped.(cloud.QuotaError)
275 c.Check(ok, check.Equals, true)
278 func (*AzureInstanceSetSuite) TestSetTags(c *check.C) {
279 ap, _, _, err := GetInstanceSet()
281 c.Fatal("Error making provider", err)
283 l, err := ap.Instances(nil)
284 c.Assert(err, check.IsNil)
287 err = l[0].SetTags(map[string]string{"foo": "bar"})
289 c.Fatal("Error setting tags", err)
292 l, err = ap.Instances(nil)
293 c.Assert(err, check.IsNil)
297 log.Printf("tags are %v", tg)
301 func (*AzureInstanceSetSuite) TestSSH(c *check.C) {
302 ap, _, _, err := GetInstanceSet()
304 c.Fatal("Error making provider", err)
306 l, err := ap.Instances(nil)
307 c.Assert(err, check.IsNil)
311 sshclient, err := SetupSSHClient(c, l[0])
312 c.Assert(err, check.IsNil)
314 sess, err := sshclient.NewSession()
315 c.Assert(err, check.IsNil)
317 out, err := sess.Output("cat /home/crunch/node-token")
318 c.Assert(err, check.IsNil)
320 log.Printf("%v", string(out))
322 sshclient.Conn.Close()
326 func SetupSSHClient(c *check.C, inst cloud.Instance) (*ssh.Client, error) {
327 addr := inst.Address() + ":2222"
329 return nil, errors.New("instance has no address")
332 f, err := os.Open("azconfig_sshkey")
333 c.Assert(err, check.IsNil)
335 keybytes, err := ioutil.ReadAll(f)
336 c.Assert(err, check.IsNil)
338 priv, err := ssh.ParsePrivateKey(keybytes)
339 c.Assert(err, check.IsNil)
341 var receivedKey ssh.PublicKey
342 client, err := ssh.Dial("tcp", addr, &ssh.ClientConfig{
344 Auth: []ssh.AuthMethod{
345 ssh.PublicKeys(priv),
347 HostKeyCallback: func(hostname string, remote net.Addr, key ssh.PublicKey) error {
351 Timeout: time.Minute,
356 } else if receivedKey == nil {
357 return nil, errors.New("BUG: key was never provided to HostKeyCallback")
360 err = inst.VerifyHostKey(receivedKey, client)
361 c.Assert(err, check.IsNil)