-
Notifications
You must be signed in to change notification settings - Fork 4
/
users.clj
187 lines (163 loc) · 4.88 KB
/
users.clj
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
(ns happygapi.oslogin.users
"Cloud OS Login API: users.
You can use OS Login to manage access to your VM instances using IAM roles.
See: https://cloud.google.com/compute/docs/oslogin/api/reference/rest/v1/users"
(:require [cheshire.core :as json]
[clj-http.client :as http]
[happy.util :as util]))
(defn importSshPublicKey$
"https://cloud.google.com/compute/docs/oslogin/api/reference/rest/v1/users/importSshPublicKey
Required parameters: parent
Optional parameters: projectId
Body:
{:key string,
:name string,
:expirationTimeUsec string,
:fingerprint string}
Adds an SSH public key and returns the profile information. Default POSIX
account information is set when no username and UID exist as part of the
login profile."
{:scopes ["https://www.googleapis.com/auth/cloud-platform"
"https://www.googleapis.com/auth/compute"]}
[auth args body]
{:pre [(util/has-keys? args #{:parent})]}
(util/get-response
(http/post
(util/get-url
"https://oslogin.googleapis.com/"
"v1/{+parent}:importSshPublicKey"
#{:parent}
args)
(merge-with
merge
{:content-type :json,
:body (json/generate-string body),
:throw-exceptions false,
:query-params args,
:accept :json,
:as :json}
auth))))
(defn getLoginProfile$
"https://cloud.google.com/compute/docs/oslogin/api/reference/rest/v1/users/getLoginProfile
Required parameters: name
Optional parameters: projectId, systemId
Retrieves the profile information used for logging in to a virtual machine
on Google Compute Engine."
{:scopes ["https://www.googleapis.com/auth/cloud-platform"
"https://www.googleapis.com/auth/compute"]}
[auth args]
{:pre [(util/has-keys? args #{:name})]}
(util/get-response
(http/get
(util/get-url
"https://oslogin.googleapis.com/"
"v1/{+name}/loginProfile"
#{:name}
args)
(merge-with
merge
{:throw-exceptions false,
:query-params args,
:accept :json,
:as :json}
auth))))
(defn sshPublicKeys-delete$
"https://cloud.google.com/compute/docs/oslogin/api/reference/rest/v1/users/sshPublicKeys/delete
Required parameters: name
Optional parameters: none
Deletes an SSH public key."
{:scopes ["https://www.googleapis.com/auth/cloud-platform"
"https://www.googleapis.com/auth/compute"]}
[auth args]
{:pre [(util/has-keys? args #{:name})]}
(util/get-response
(http/delete
(util/get-url
"https://oslogin.googleapis.com/"
"v1/{+name}"
#{:name}
args)
(merge-with
merge
{:throw-exceptions false,
:query-params args,
:accept :json,
:as :json}
auth))))
(defn sshPublicKeys-get$
"https://cloud.google.com/compute/docs/oslogin/api/reference/rest/v1/users/sshPublicKeys/get
Required parameters: name
Optional parameters: none
Retrieves an SSH public key."
{:scopes ["https://www.googleapis.com/auth/cloud-platform"
"https://www.googleapis.com/auth/compute"]}
[auth args]
{:pre [(util/has-keys? args #{:name})]}
(util/get-response
(http/get
(util/get-url
"https://oslogin.googleapis.com/"
"v1/{+name}"
#{:name}
args)
(merge-with
merge
{:throw-exceptions false,
:query-params args,
:accept :json,
:as :json}
auth))))
(defn sshPublicKeys-patch$
"https://cloud.google.com/compute/docs/oslogin/api/reference/rest/v1/users/sshPublicKeys/patch
Required parameters: name
Optional parameters: updateMask
Body:
{:key string,
:name string,
:expirationTimeUsec string,
:fingerprint string}
Updates an SSH public key and returns the profile information. This method
supports patch semantics."
{:scopes ["https://www.googleapis.com/auth/cloud-platform"
"https://www.googleapis.com/auth/compute"]}
[auth args body]
{:pre [(util/has-keys? args #{:name})]}
(util/get-response
(http/patch
(util/get-url
"https://oslogin.googleapis.com/"
"v1/{+name}"
#{:name}
args)
(merge-with
merge
{:content-type :json,
:body (json/generate-string body),
:throw-exceptions false,
:query-params args,
:accept :json,
:as :json}
auth))))
(defn projects-delete$
"https://cloud.google.com/compute/docs/oslogin/api/reference/rest/v1/users/projects/delete
Required parameters: name
Optional parameters: none
Deletes a POSIX account."
{:scopes ["https://www.googleapis.com/auth/cloud-platform"
"https://www.googleapis.com/auth/compute"]}
[auth args]
{:pre [(util/has-keys? args #{:name})]}
(util/get-response
(http/delete
(util/get-url
"https://oslogin.googleapis.com/"
"v1/{+name}"
#{:name}
args)
(merge-with
merge
{:throw-exceptions false,
:query-params args,
:accept :json,
:as :json}
auth))))