14324: Fix tests
[arvados.git] / lib / cloud / azure_test.go
1 // Copyright (C) The Arvados Authors. All rights reserved.
2 //
3 // SPDX-License-Identifier: AGPL-3.0
4 //
5 //
6 // How to manually run individual tests against the real cloud
7 //
8 // $ go test -v git.curoverse.com/arvados.git/lib/cloud -live-azure-cfg azconfig.yml -check.f=TestListInstances
9 //
10 // Example azconfig.yml:
11 //
12 // subscription_id: XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX
13 // key: XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX
14 // region: centralus
15 // cloud_environment: AzurePublicCloud
16 // secret: XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
17 // tenant_id: XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX
18 // resource_group: zzzzz
19 // network: zzzzz
20 // subnet: zzzzz-subnet-private
21 // storage_account: example
22 // blob_container: vhds
23 // image: "https://example.blob.core.windows.net/system/Microsoft.Compute/Images/images/zzzzz-compute-osDisk.XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX.vhd"
24 // delete_dangling_resources_after: 20
25 // authorized_key: "ssh-rsa AAAAB3NzaC1yc2EAAAADAQABAAABAQDLQS1ExT2+WjA0d/hntEAyAtgeN1W2ik2QX8c2zO6HjlPHWXL92r07W0WMuDib40Pcevpi1BXeBWXA9ZB5KKMJB+ukaAu22KklnQuUmNvk6ZXnPKSkGxuCYvPQb08WhHf3p1VxiKfP3iauedBDM4x9/bkJohlBBQiFXzNUcQ+a6rKiMzmJN2gbL8ncyUzc+XQ5q4JndTwTGtOlzDiGOc9O4z5Dd76wtAVJneOuuNpwfFRVHThpJM6VThpCZOnl8APaceWXKeuwOuCae3COZMz++xQfxOfZ9Z8aIwo+TlQhsRaNfZ4Vjrop6ej8dtfZtgUFKfbXEOYaHrGrWGotFDTD example@example"
26
27 package cloud
28
29 import (
30         "context"
31         "errors"
32         "flag"
33         "io/ioutil"
34         "log"
35         "net"
36         "net/http"
37         "os"
38         "time"
39
40         "git.curoverse.com/arvados.git/sdk/go/arvados"
41         "git.curoverse.com/arvados.git/sdk/go/config"
42         "github.com/Azure/azure-sdk-for-go/services/compute/mgmt/2018-06-01/compute"
43         "github.com/Azure/azure-sdk-for-go/services/network/mgmt/2018-06-01/network"
44         "github.com/Azure/azure-sdk-for-go/storage"
45         "github.com/Azure/go-autorest/autorest"
46         "github.com/Azure/go-autorest/autorest/azure"
47         "github.com/Azure/go-autorest/autorest/to"
48         "github.com/jmcvetta/randutil"
49         "github.com/sirupsen/logrus"
50         "golang.org/x/crypto/ssh"
51         check "gopkg.in/check.v1"
52 )
53
54 type AzureInstanceSetSuite struct{}
55
56 var _ = check.Suite(&AzureInstanceSetSuite{})
57
58 type VirtualMachinesClientStub struct{}
59
60 func (*VirtualMachinesClientStub) CreateOrUpdate(ctx context.Context,
61         resourceGroupName string,
62         VMName string,
63         parameters compute.VirtualMachine) (result compute.VirtualMachine, err error) {
64         parameters.ID = &VMName
65         parameters.Name = &VMName
66         return parameters, nil
67 }
68
69 func (*VirtualMachinesClientStub) Delete(ctx context.Context, resourceGroupName string, VMName string) (result *http.Response, err error) {
70         return nil, nil
71 }
72
73 func (*VirtualMachinesClientStub) ListComplete(ctx context.Context, resourceGroupName string) (result compute.VirtualMachineListResultIterator, err error) {
74         return compute.VirtualMachineListResultIterator{}, nil
75 }
76
77 type InterfacesClientStub struct{}
78
79 func (*InterfacesClientStub) CreateOrUpdate(ctx context.Context,
80         resourceGroupName string,
81         nicName string,
82         parameters network.Interface) (result network.Interface, err error) {
83         parameters.ID = to.StringPtr(nicName)
84         (*parameters.IPConfigurations)[0].PrivateIPAddress = to.StringPtr("192.168.5.5")
85         return parameters, nil
86 }
87
88 func (*InterfacesClientStub) Delete(ctx context.Context, resourceGroupName string, VMName string) (result *http.Response, err error) {
89         return nil, nil
90 }
91
92 func (*InterfacesClientStub) ListComplete(ctx context.Context, resourceGroupName string) (result network.InterfaceListResultIterator, err error) {
93         return network.InterfaceListResultIterator{}, nil
94 }
95
96 var live = flag.String("live-azure-cfg", "", "Test with real azure API, provide config file")
97
98 func GetInstanceSet() (InstanceSet, ImageID, arvados.Cluster, error) {
99         cluster := arvados.Cluster{
100                 InstanceTypes: arvados.InstanceTypeMap(map[string]arvados.InstanceType{
101                         "tiny": arvados.InstanceType{
102                                 Name:         "tiny",
103                                 ProviderType: "Standard_D1_v2",
104                                 VCPUs:        1,
105                                 RAM:          4000000000,
106                                 Scratch:      10000000000,
107                                 Price:        .02,
108                                 Preemptible:  false,
109                         },
110                 })}
111         if *live != "" {
112                 cfg := make(map[string]interface{})
113                 err := config.LoadFile(&cfg, *live)
114                 if err != nil {
115                         return nil, ImageID(""), cluster, err
116                 }
117                 ap, err := NewAzureInstanceSet(cfg, "test123", logrus.StandardLogger())
118                 return ap, ImageID(cfg["image"].(string)), cluster, err
119         } else {
120                 ap := AzureInstanceSet{
121                         azconfig: AzureInstanceSetConfig{
122                                 BlobContainer: "vhds",
123                         },
124                         dispatcherID: "test123",
125                         namePrefix:   "compute-test123-",
126                         logger:       logrus.StandardLogger(),
127                         deleteNIC:    make(chan string),
128                         deleteBlob:   make(chan storage.Blob),
129                 }
130                 ap.ctx, ap.stopFunc = context.WithCancel(context.Background())
131                 ap.vmClient = &VirtualMachinesClientStub{}
132                 ap.netClient = &InterfacesClientStub{}
133                 return &ap, ImageID("blob"), cluster, nil
134         }
135 }
136
137 func (*AzureInstanceSetSuite) TestCreate(c *check.C) {
138         ap, img, cluster, err := GetInstanceSet()
139         if err != nil {
140                 c.Fatal("Error making provider", err)
141         }
142
143         f, err := os.Open("azconfig_sshkey.pub")
144         c.Assert(err, check.IsNil)
145
146         keybytes, err := ioutil.ReadAll(f)
147         c.Assert(err, check.IsNil)
148
149         pk, _, _, _, err := ssh.ParseAuthorizedKey(keybytes)
150         c.Assert(err, check.IsNil)
151
152         nodetoken, err := randutil.String(40, "abcdefghijklmnopqrstuvwxyz0123456789")
153         c.Assert(err, check.IsNil)
154
155         inst, err := ap.Create(cluster.InstanceTypes["tiny"],
156                 img, map[string]string{
157                         "node-token": nodetoken},
158                 pk)
159
160         c.Assert(err, check.IsNil)
161
162         tg := inst.Tags()
163         log.Printf("Result %v %v %v", inst.String(), inst.Address(), tg)
164
165 }
166
167 func (*AzureInstanceSetSuite) TestListInstances(c *check.C) {
168         ap, _, _, err := GetInstanceSet()
169         if err != nil {
170                 c.Fatal("Error making provider", err)
171         }
172
173         l, err := ap.Instances(nil)
174
175         c.Assert(err, check.IsNil)
176
177         for _, i := range l {
178                 tg := i.Tags()
179                 log.Printf("%v %v %v", i.String(), i.Address(), tg)
180         }
181 }
182
183 func (*AzureInstanceSetSuite) TestManageNics(c *check.C) {
184         ap, _, _, err := GetInstanceSet()
185         if err != nil {
186                 c.Fatal("Error making provider", err)
187         }
188
189         ap.(*AzureInstanceSet).ManageNics()
190         ap.Stop()
191 }
192
193 func (*AzureInstanceSetSuite) TestManageBlobs(c *check.C) {
194         ap, _, _, err := GetInstanceSet()
195         if err != nil {
196                 c.Fatal("Error making provider", err)
197         }
198
199         ap.(*AzureInstanceSet).ManageBlobs()
200         ap.Stop()
201 }
202
203 func (*AzureInstanceSetSuite) TestDestroyInstances(c *check.C) {
204         ap, _, _, err := GetInstanceSet()
205         if err != nil {
206                 c.Fatal("Error making provider", err)
207         }
208
209         l, err := ap.Instances(nil)
210         c.Assert(err, check.IsNil)
211
212         for _, i := range l {
213                 c.Check(i.Destroy(), check.IsNil)
214         }
215 }
216
217 func (*AzureInstanceSetSuite) TestDeleteFake(c *check.C) {
218         ap, _, _, err := GetInstanceSet()
219         if err != nil {
220                 c.Fatal("Error making provider", err)
221         }
222
223         _, err = ap.(*AzureInstanceSet).netClient.Delete(context.Background(), "fakefakefake", "fakefakefake")
224
225         de, ok := err.(autorest.DetailedError)
226         if ok {
227                 rq := de.Original.(*azure.RequestError)
228
229                 log.Printf("%v %q %q", rq.Response.StatusCode, rq.ServiceError.Code, rq.ServiceError.Message)
230         }
231 }
232
233 func (*AzureInstanceSetSuite) TestWrapError(c *check.C) {
234         retryError := autorest.DetailedError{
235                 Original: &azure.RequestError{
236                         DetailedError: autorest.DetailedError{
237                                 Response: &http.Response{
238                                         StatusCode: 429,
239                                         Header:     map[string][]string{"Retry-After": []string{"123"}},
240                                 },
241                         },
242                         ServiceError: &azure.ServiceError{},
243                 },
244         }
245         wrapped := WrapAzureError(retryError)
246         _, ok := wrapped.(RateLimitError)
247         c.Check(ok, check.Equals, true)
248
249         quotaError := autorest.DetailedError{
250                 Original: &azure.RequestError{
251                         DetailedError: autorest.DetailedError{
252                                 Response: &http.Response{
253                                         StatusCode: 503,
254                                 },
255                         },
256                         ServiceError: &azure.ServiceError{
257                                 Message: "No more quota",
258                         },
259                 },
260         }
261         wrapped = WrapAzureError(quotaError)
262         _, ok = wrapped.(QuotaError)
263         c.Check(ok, check.Equals, true)
264 }
265
266 func (*AzureInstanceSetSuite) TestSetTags(c *check.C) {
267         ap, _, _, err := GetInstanceSet()
268         if err != nil {
269                 c.Fatal("Error making provider", err)
270         }
271         l, err := ap.Instances(nil)
272         c.Assert(err, check.IsNil)
273
274         if len(l) > 0 {
275                 err = l[0].SetTags(map[string]string{"foo": "bar"})
276                 if err != nil {
277                         c.Fatal("Error setting tags", err)
278                 }
279         }
280         l, err = ap.Instances(nil)
281         c.Assert(err, check.IsNil)
282
283         if len(l) > 0 {
284                 tg := l[0].Tags()
285                 log.Printf("tags are %v", tg)
286         }
287 }
288
289 func (*AzureInstanceSetSuite) TestSSH(c *check.C) {
290         ap, _, _, err := GetInstanceSet()
291         if err != nil {
292                 c.Fatal("Error making provider", err)
293         }
294         l, err := ap.Instances(nil)
295         c.Assert(err, check.IsNil)
296
297         if len(l) > 0 {
298
299                 sshclient, err := SetupSSHClient(c, l[0])
300                 c.Assert(err, check.IsNil)
301
302                 sess, err := sshclient.NewSession()
303                 c.Assert(err, check.IsNil)
304
305                 out, err := sess.Output("cat /home/crunch/node-token")
306                 c.Assert(err, check.IsNil)
307
308                 log.Printf("%v", string(out))
309
310                 sshclient.Conn.Close()
311         }
312 }
313
314 func SetupSSHClient(c *check.C, inst Instance) (*ssh.Client, error) {
315         addr := inst.Address() + ":2222"
316         if addr == "" {
317                 return nil, errors.New("instance has no address")
318         }
319
320         f, err := os.Open("azconfig_sshkey")
321         c.Assert(err, check.IsNil)
322
323         keybytes, err := ioutil.ReadAll(f)
324         c.Assert(err, check.IsNil)
325
326         priv, err := ssh.ParsePrivateKey(keybytes)
327         c.Assert(err, check.IsNil)
328
329         var receivedKey ssh.PublicKey
330         client, err := ssh.Dial("tcp", addr, &ssh.ClientConfig{
331                 User: "crunch",
332                 Auth: []ssh.AuthMethod{
333                         ssh.PublicKeys(priv),
334                 },
335                 HostKeyCallback: func(hostname string, remote net.Addr, key ssh.PublicKey) error {
336                         receivedKey = key
337                         return nil
338                 },
339                 Timeout: time.Minute,
340         })
341
342         if err != nil {
343                 return nil, err
344         } else if receivedKey == nil {
345                 return nil, errors.New("BUG: key was never provided to HostKeyCallback")
346         }
347
348         err = inst.VerifyHostKey(receivedKey, client)
349         c.Assert(err, check.IsNil)
350
351         return client, nil
352 }