# NOT RUN {
# account SAS valid for 7 days
get_account_sas("mystorage", "access_key", start=Sys.Date(), expiry=Sys.Date() + 7)
# SAS with read/write/create/delete permissions
get_account_sas("mystorage", "access_key", permissions="rwcd")
# SAS limited to blob (+ADLS2) and file storage
get_account_sas("mystorage", "access_key", services="bf")
# SAS for file storage, allows access to files only (not shares)
get_account_sas("mystorage", "access_key", services="f", resource_types="o")
# getting the key from an endpoint object
endp <- storage_endpoint("https://mystorage.blob.core.windows.net", key="access_key")
get_account_sas(endp, permissions="rwcd")
# }
# NOT RUN {
# user delegation key valid for 24 hours
token <- AzureRMR::get_azure_token("https://storage.azure.com", "mytenant", "app_id")
endp <- storage_endpoint("https://mystorage.blob.core.windows.net", token=token)
userkey <- get_user_delegation_key(endp, start=Sys.Date(), expiry=Sys.Date() + 1)
# user delegation SAS for a container
get_user_delegation_sas(endp, userkey, resource="mycontainer")
# user delegation SAS for a specific file, read/write/create/delete access
# (order of permissions is important!)
get_user_delegation_sas(endp, userkey, resource="mycontainer/myfile",
resource_types="b", permissions="rcwd")
# }
Run the code above in your browser using DataCamp Workspace