on develop help sign in
Squash/rebase gogol-admin-directory
commitf4c9366a1c7f1956153053ebd72e511d3afd240d authorBrendan Hay <brendan.g.hay@gmail.com> dateTue 25 Oct 2016, 11:38 (10 years ago) parent59d86b5
7 files changed+334−13
gogol-admin-directory/gen/Network/Google/Directory.hs+21 gogol-admin-directory/gen/Network/Google/Directory/Types.hs+16 gogol-admin-directory/gen/Network/Google/Directory/Types/Product.hs+174−9 gogol-admin-directory/gen/Network/Google/Resource/Directory/ChromeosDevices/Action.hs+118 gogol-admin-directory/gen/Network/Google/Resource/Directory/Customers/Get.hs+2−2 gogol-admin-directory/gen/Network/Google/Resource/Directory/Domains/Get.hs+2−2 gogol-admin-directory/gogol-admin-directory.cabal+1
gogol-admin-directory/gen/Network/Google/Directory.hs+21
@@ -69,6 +69,9 @@ module Network.Google.Directory
6969 -- ** directory.asps.list
7070 , module Network.Google.Resource.Directory.Asps.List
7171
72+ -- ** directory.chromeosdevices.action
73+ , module Network.Google.Resource.Directory.ChromeosDevices.Action
74+
7275 -- ** directory.chromeosdevices.get
7376 , module Network.Google.Resource.Directory.ChromeosDevices.Get
7477
@@ -754,6 +757,12 @@ module Network.Google.Directory
754757 -- ** MobileDevicesListProjection
755758 , MobileDevicesListProjection (..)
756759
760+ -- ** ChromeOSDeviceAction
761+ , ChromeOSDeviceAction
762+ , chromeOSDeviceAction
763+ , codaAction
764+ , codaDeprovisionReason
765+
757766 -- ** Role
758767 , Role
759768 , role'
@@ -897,14 +906,19 @@ module Network.Google.Directory
897906 , mobileDevice
898907 , mobEmail
899908 , mobStatus
909+ , mobPrivilege
900910 , mobEtag
901911 , mobResourceId
912+ , mobManufacturer
902913 , mobBuildNumber
903914 , mobManagedAccountIsOnOwnerProFile
904915 , mobLastSync
905916 , mobOtherAccountsInfo
906917 , mobKind
907918 , mobAdbStatus
919+ , mobReleaseVersion
920+ , mobBrand
921+ , mobSecurityPatchLevel
908922 , mobNetworkOperator
909923 , mobKernelVersion
910924 , mobOS
@@ -913,16 +927,20 @@ module Network.Google.Directory
913927 , mobDeveloperOptionsStatus
914928 , mobUnknownSourcesStatus
915929 , mobMeid
930+ , mobBootLoaderVersion
916931 , mobDeviceId
917932 , mobFirstSync
918933 , mobUserAgent
919934 , mobImei
920935 , mobType
921936 , mobWifiMACAddress
937+ , mobEncryptionStatus
922938 , mobSerialNumber
939+ , mobDevicePasswordStatus
923940 , mobHardwareId
924941 , mobBasebandVersion
925942 , mobSupportsWorkProFile
943+ , mobHardware
926944 , mobDeviceCompromisedStatus
927945 , mobApplications
928946 , mobDefaultLanguage
@@ -931,6 +949,7 @@ module Network.Google.Directory
931949 , Member
932950 , member
933951 , memEmail
952+ , memStatus
934953 , memEtag
935954 , memKind
936955 , memRole
@@ -1051,6 +1070,7 @@ import Network.Google.Resource.Admin.Channels.Stop
10511070import Network.Google.Resource.Directory.Asps.Delete
10521071import Network.Google.Resource.Directory.Asps.Get
10531072import Network.Google.Resource.Directory.Asps.List
1073+import Network.Google.Resource.Directory.ChromeosDevices.Action
10541074import Network.Google.Resource.Directory.ChromeosDevices.Get
10551075import Network.Google.Resource.Directory.ChromeosDevices.List
10561076import Network.Google.Resource.Directory.ChromeosDevices.Patch
@@ -1240,6 +1260,7 @@ type DirectoryAPI =
12401260 :<|> ChromeosDevicesListResource
12411261 :<|> ChromeosDevicesPatchResource
12421262 :<|> ChromeosDevicesGetResource
1263+ :<|> ChromeosDevicesActionResource
12431264 :<|> ChromeosDevicesUpdateResource
12441265 :<|> AspsListResource
12451266 :<|> AspsGetResource
gogol-admin-directory/gen/Network/Google/Directory/Types.hs+16
@@ -458,6 +458,12 @@ module Network.Google.Directory.Types
458458 -- * MobileDevicesListProjection
459459 , MobileDevicesListProjection (..)
460460
461+ -- * ChromeOSDeviceAction
462+ , ChromeOSDeviceAction
463+ , chromeOSDeviceAction
464+ , codaAction
465+ , codaDeprovisionReason
466+
461467 -- * Role
462468 , Role
463469 , role'
@@ -601,14 +607,19 @@ module Network.Google.Directory.Types
601607 , mobileDevice
602608 , mobEmail
603609 , mobStatus
610+ , mobPrivilege
604611 , mobEtag
605612 , mobResourceId
613+ , mobManufacturer
606614 , mobBuildNumber
607615 , mobManagedAccountIsOnOwnerProFile
608616 , mobLastSync
609617 , mobOtherAccountsInfo
610618 , mobKind
611619 , mobAdbStatus
620+ , mobReleaseVersion
621+ , mobBrand
622+ , mobSecurityPatchLevel
612623 , mobNetworkOperator
613624 , mobKernelVersion
614625 , mobOS
@@ -617,16 +628,20 @@ module Network.Google.Directory.Types
617628 , mobDeveloperOptionsStatus
618629 , mobUnknownSourcesStatus
619630 , mobMeid
631+ , mobBootLoaderVersion
620632 , mobDeviceId
621633 , mobFirstSync
622634 , mobUserAgent
623635 , mobImei
624636 , mobType
625637 , mobWifiMACAddress
638+ , mobEncryptionStatus
626639 , mobSerialNumber
640+ , mobDevicePasswordStatus
627641 , mobHardwareId
628642 , mobBasebandVersion
629643 , mobSupportsWorkProFile
644+ , mobHardware
630645 , mobDeviceCompromisedStatus
631646 , mobApplications
632647 , mobDefaultLanguage
@@ -635,6 +650,7 @@ module Network.Google.Directory.Types
635650 , Member
636651 , member
637652 , memEmail
653+ , memStatus
638654 , memEtag
639655 , memKind
640656 , memRole
gogol-admin-directory/gen/Network/Google/Directory/Types/Product.hs+174−9
@@ -3508,6 +3508,54 @@ instance ToJSON User where
35083508 ("customSchemas" .=) <$> _useCustomSchemas,
35093509 ("suspensionReason" .=) <$> _useSuspensionReason])
35103510
3511+-- | JSON request template for firing actions on ChromeOs Device in Directory
3512+-- Devices API.
3513+--
3514+-- /See:/ 'chromeOSDeviceAction' smart constructor.
3515+data ChromeOSDeviceAction = ChromeOSDeviceAction'
3516+ { _codaAction :: !(Maybe Text)
3517+ , _codaDeprovisionReason :: !(Maybe Text)
3518+ } deriving (Eq,Show,Data,Typeable,Generic)
3519+
3520+-- | Creates a value of 'ChromeOSDeviceAction' with the minimum fields required to make a request.
3521+--
3522+-- Use one of the following lenses to modify other fields as desired:
3523+--
3524+-- * 'codaAction'
3525+--
3526+-- * 'codaDeprovisionReason'
3527+chromeOSDeviceAction
3528+ :: ChromeOSDeviceAction
3529+chromeOSDeviceAction =
3530+ ChromeOSDeviceAction'
3531+ { _codaAction = Nothing
3532+ , _codaDeprovisionReason = Nothing
3533+ }
3534+
3535+-- | Action to be taken on the ChromeOs Device
3536+codaAction :: Lens' ChromeOSDeviceAction (Maybe Text)
3537+codaAction
3538+ = lens _codaAction (\ s a -> s{_codaAction = a})
3539+
3540+codaDeprovisionReason :: Lens' ChromeOSDeviceAction (Maybe Text)
3541+codaDeprovisionReason
3542+ = lens _codaDeprovisionReason
3543+ (\ s a -> s{_codaDeprovisionReason = a})
3544+
3545+instance FromJSON ChromeOSDeviceAction where
3546+ parseJSON
3547+ = withObject "ChromeOSDeviceAction"
3548+ (\ o ->
3549+ ChromeOSDeviceAction' <$>
3550+ (o .:? "action") <*> (o .:? "deprovisionReason"))
3551+
3552+instance ToJSON ChromeOSDeviceAction where
3553+ toJSON ChromeOSDeviceAction'{..}
3554+ = object
3555+ (catMaybes
3556+ [("action" .=) <$> _codaAction,
3557+ ("deprovisionReason" .=) <$> _codaDeprovisionReason])
3558+
35113559-- | JSON template for role resource in Directory API.
35123560--
35133561-- /See:/ 'role'' smart constructor.
@@ -4581,14 +4629,19 @@ instance ToJSON UserPhoto where
45814629data MobileDevice = MobileDevice'
45824630 { _mobEmail :: !(Maybe [Text])
45834631 , _mobStatus :: !(Maybe Text)
4632+ , _mobPrivilege :: !(Maybe Text)
45844633 , _mobEtag :: !(Maybe Text)
45854634 , _mobResourceId :: !(Maybe Text)
4635+ , _mobManufacturer :: !(Maybe Text)
45864636 , _mobBuildNumber :: !(Maybe Text)
45874637 , _mobManagedAccountIsOnOwnerProFile :: !(Maybe Bool)
45884638 , _mobLastSync :: !(Maybe DateTime')
45894639 , _mobOtherAccountsInfo :: !(Maybe [Text])
45904640 , _mobKind :: !Text
45914641 , _mobAdbStatus :: !(Maybe Bool)
4642+ , _mobReleaseVersion :: !(Maybe Text)
4643+ , _mobBrand :: !(Maybe Text)
4644+ , _mobSecurityPatchLevel :: !(Maybe (Textual Int64))
45924645 , _mobNetworkOperator :: !(Maybe Text)
45934646 , _mobKernelVersion :: !(Maybe Text)
45944647 , _mobOS :: !(Maybe Text)
@@ -4597,16 +4650,20 @@ data MobileDevice = MobileDevice'
45974650 , _mobDeveloperOptionsStatus :: !(Maybe Bool)
45984651 , _mobUnknownSourcesStatus :: !(Maybe Bool)
45994652 , _mobMeid :: !(Maybe Text)
4653+ , _mobBootLoaderVersion :: !(Maybe Text)
46004654 , _mobDeviceId :: !(Maybe Text)
46014655 , _mobFirstSync :: !(Maybe DateTime')
46024656 , _mobUserAgent :: !(Maybe Text)
46034657 , _mobImei :: !(Maybe Text)
46044658 , _mobType :: !(Maybe Text)
46054659 , _mobWifiMACAddress :: !(Maybe Text)
4660+ , _mobEncryptionStatus :: !(Maybe Text)
46064661 , _mobSerialNumber :: !(Maybe Text)
4662+ , _mobDevicePasswordStatus :: !(Maybe Text)
46074663 , _mobHardwareId :: !(Maybe Text)
46084664 , _mobBasebandVersion :: !(Maybe Text)
46094665 , _mobSupportsWorkProFile :: !(Maybe Bool)
4666+ , _mobHardware :: !(Maybe Text)
46104667 , _mobDeviceCompromisedStatus :: !(Maybe Text)
46114668 , _mobApplications :: !(Maybe [MobileDeviceApplicationsItem])
46124669 , _mobDefaultLanguage :: !(Maybe Text)
@@ -4620,10 +4677,14 @@ data MobileDevice = MobileDevice'
46204677--
46214678-- * 'mobStatus'
46224679--
4680+-- * 'mobPrivilege'
4681+--
46234682-- * 'mobEtag'
46244683--
46254684-- * 'mobResourceId'
46264685--
4686+-- * 'mobManufacturer'
4687+--
46274688-- * 'mobBuildNumber'
46284689--
46294690-- * 'mobManagedAccountIsOnOwnerProFile'
@@ -4636,6 +4697,12 @@ data MobileDevice = MobileDevice'
46364697--
46374698-- * 'mobAdbStatus'
46384699--
4700+-- * 'mobReleaseVersion'
4701+--
4702+-- * 'mobBrand'
4703+--
4704+-- * 'mobSecurityPatchLevel'
4705+--
46394706-- * 'mobNetworkOperator'
46404707--
46414708-- * 'mobKernelVersion'
@@ -4652,6 +4719,8 @@ data MobileDevice = MobileDevice'
46524719--
46534720-- * 'mobMeid'
46544721--
4722+-- * 'mobBootLoaderVersion'
4723+--
46554724-- * 'mobDeviceId'
46564725--
46574726-- * 'mobFirstSync'
@@ -4664,14 +4733,20 @@ data MobileDevice = MobileDevice'
46644733--
46654734-- * 'mobWifiMACAddress'
46664735--
4736+-- * 'mobEncryptionStatus'
4737+--
46674738-- * 'mobSerialNumber'
46684739--
4740+-- * 'mobDevicePasswordStatus'
4741+--
46694742-- * 'mobHardwareId'
46704743--
46714744-- * 'mobBasebandVersion'
46724745--
46734746-- * 'mobSupportsWorkProFile'
46744747--
4748+-- * 'mobHardware'
4749+--
46754750-- * 'mobDeviceCompromisedStatus'
46764751--
46774752-- * 'mobApplications'
@@ -4683,14 +4758,19 @@ mobileDevice =
46834758 MobileDevice'
46844759 { _mobEmail = Nothing
46854760 , _mobStatus = Nothing
4761+ , _mobPrivilege = Nothing
46864762 , _mobEtag = Nothing
46874763 , _mobResourceId = Nothing
4764+ , _mobManufacturer = Nothing
46884765 , _mobBuildNumber = Nothing
46894766 , _mobManagedAccountIsOnOwnerProFile = Nothing
46904767 , _mobLastSync = Nothing
46914768 , _mobOtherAccountsInfo = Nothing
46924769 , _mobKind = "admin#directory#mobiledevice"
46934770 , _mobAdbStatus = Nothing
4771+ , _mobReleaseVersion = Nothing
4772+ , _mobBrand = Nothing
4773+ , _mobSecurityPatchLevel = Nothing
46944774 , _mobNetworkOperator = Nothing
46954775 , _mobKernelVersion = Nothing
46964776 , _mobOS = Nothing
@@ -4699,16 +4779,20 @@ mobileDevice =
46994779 , _mobDeveloperOptionsStatus = Nothing
47004780 , _mobUnknownSourcesStatus = Nothing
47014781 , _mobMeid = Nothing
4782+ , _mobBootLoaderVersion = Nothing
47024783 , _mobDeviceId = Nothing
47034784 , _mobFirstSync = Nothing
47044785 , _mobUserAgent = Nothing
47054786 , _mobImei = Nothing
47064787 , _mobType = Nothing
47074788 , _mobWifiMACAddress = Nothing
4789+ , _mobEncryptionStatus = Nothing
47084790 , _mobSerialNumber = Nothing
4791+ , _mobDevicePasswordStatus = Nothing
47094792 , _mobHardwareId = Nothing
47104793 , _mobBasebandVersion = Nothing
47114794 , _mobSupportsWorkProFile = Nothing
4795+ , _mobHardware = Nothing
47124796 , _mobDeviceCompromisedStatus = Nothing
47134797 , _mobApplications = Nothing
47144798 , _mobDefaultLanguage = Nothing
@@ -4726,6 +4810,11 @@ mobStatus :: Lens' MobileDevice (Maybe Text)
47264810mobStatus
47274811 = lens _mobStatus (\ s a -> s{_mobStatus = a})
47284812
4813+-- | DMAgentPermission (Read-only)
4814+mobPrivilege :: Lens' MobileDevice (Maybe Text)
4815+mobPrivilege
4816+ = lens _mobPrivilege (\ s a -> s{_mobPrivilege = a})
4817+
47294818-- | ETag of the resource.
47304819mobEtag :: Lens' MobileDevice (Maybe Text)
47314820mobEtag = lens _mobEtag (\ s a -> s{_mobEtag = a})
@@ -4736,6 +4825,12 @@ mobResourceId
47364825 = lens _mobResourceId
47374826 (\ s a -> s{_mobResourceId = a})
47384827
4828+-- | Mobile Device manufacturer (Read-only)
4829+mobManufacturer :: Lens' MobileDevice (Maybe Text)
4830+mobManufacturer
4831+ = lens _mobManufacturer
4832+ (\ s a -> s{_mobManufacturer = a})
4833+
47394834-- | Mobile Device Build number (Read-only)
47404835mobBuildNumber :: Lens' MobileDevice (Maybe Text)
47414836mobBuildNumber
@@ -4773,6 +4868,23 @@ mobAdbStatus :: Lens' MobileDevice (Maybe Bool)
47734868mobAdbStatus
47744869 = lens _mobAdbStatus (\ s a -> s{_mobAdbStatus = a})
47754870
4871+-- | Mobile Device release version version (Read-only)
4872+mobReleaseVersion :: Lens' MobileDevice (Maybe Text)
4873+mobReleaseVersion
4874+ = lens _mobReleaseVersion
4875+ (\ s a -> s{_mobReleaseVersion = a})
4876+
4877+-- | Mobile Device Brand (Read-only)
4878+mobBrand :: Lens' MobileDevice (Maybe Text)
4879+mobBrand = lens _mobBrand (\ s a -> s{_mobBrand = a})
4880+
4881+-- | Mobile Device Security patch level (Read-only)
4882+mobSecurityPatchLevel :: Lens' MobileDevice (Maybe Int64)
4883+mobSecurityPatchLevel
4884+ = lens _mobSecurityPatchLevel
4885+ (\ s a -> s{_mobSecurityPatchLevel = a})
4886+ . mapping _Coerce
4887+
47764888-- | Mobile Device mobile or network operator (if available) (Read-only)
47774889mobNetworkOperator :: Lens' MobileDevice (Maybe Text)
47784890mobNetworkOperator
@@ -4815,6 +4927,12 @@ mobUnknownSourcesStatus
48154927mobMeid :: Lens' MobileDevice (Maybe Text)
48164928mobMeid = lens _mobMeid (\ s a -> s{_mobMeid = a})
48174929
4930+-- | Mobile Device Bootloader version (Read-only)
4931+mobBootLoaderVersion :: Lens' MobileDevice (Maybe Text)
4932+mobBootLoaderVersion
4933+ = lens _mobBootLoaderVersion
4934+ (\ s a -> s{_mobBootLoaderVersion = a})
4935+
48184936-- | Mobile Device serial number (Read-only)
48194937mobDeviceId :: Lens' MobileDevice (Maybe Text)
48204938mobDeviceId
@@ -4846,12 +4964,24 @@ mobWifiMACAddress
48464964 = lens _mobWifiMACAddress
48474965 (\ s a -> s{_mobWifiMACAddress = a})
48484966
4967+-- | Mobile Device Encryption Status (Read-only)
4968+mobEncryptionStatus :: Lens' MobileDevice (Maybe Text)
4969+mobEncryptionStatus
4970+ = lens _mobEncryptionStatus
4971+ (\ s a -> s{_mobEncryptionStatus = a})
4972+
48494973-- | Mobile Device SSN or Serial Number (Read-only)
48504974mobSerialNumber :: Lens' MobileDevice (Maybe Text)
48514975mobSerialNumber
48524976 = lens _mobSerialNumber
48534977 (\ s a -> s{_mobSerialNumber = a})
48544978
4979+-- | DevicePasswordStatus (Read-only)
4980+mobDevicePasswordStatus :: Lens' MobileDevice (Maybe Text)
4981+mobDevicePasswordStatus
4982+ = lens _mobDevicePasswordStatus
4983+ (\ s a -> s{_mobDevicePasswordStatus = a})
4984+
48554985-- | Mobile Device Hardware Id (Read-only)
48564986mobHardwareId :: Lens' MobileDevice (Maybe Text)
48574987mobHardwareId
@@ -4870,6 +5000,11 @@ mobSupportsWorkProFile
48705000 = lens _mobSupportsWorkProFile
48715001 (\ s a -> s{_mobSupportsWorkProFile = a})
48725002
5003+-- | Mobile Device Hardware (Read-only)
5004+mobHardware :: Lens' MobileDevice (Maybe Text)
5005+mobHardware
5006+ = lens _mobHardware (\ s a -> s{_mobHardware = a})
5007+
48735008-- | Mobile Device compromised status (Read-only)
48745009mobDeviceCompromisedStatus :: Lens' MobileDevice (Maybe Text)
48755010mobDeviceCompromisedStatus
@@ -4896,14 +5031,19 @@ instance FromJSON MobileDevice where
48965031 (\ o ->
48975032 MobileDevice' <$>
48985033 (o .:? "email" .!= mempty) <*> (o .:? "status") <*>
4899− (o .:? "etag")
5034+ (o .:? "privilege")
5035+ <*> (o .:? "etag")
49005036 <*> (o .:? "resourceId")
5037+ <*> (o .:? "manufacturer")
49015038 <*> (o .:? "buildNumber")
49025039 <*> (o .:? "managedAccountIsOnOwnerProfile")
49035040 <*> (o .:? "lastSync")
49045041 <*> (o .:? "otherAccountsInfo" .!= mempty)
49055042 <*> (o .:? "kind" .!= "admin#directory#mobiledevice")
49065043 <*> (o .:? "adbStatus")
5044+ <*> (o .:? "releaseVersion")
5045+ <*> (o .:? "brand")
5046+ <*> (o .:? "securityPatchLevel")
49075047 <*> (o .:? "networkOperator")
49085048 <*> (o .:? "kernelVersion")
49095049 <*> (o .:? "os")
@@ -4912,16 +5052,20 @@ instance FromJSON MobileDevice where
49125052 <*> (o .:? "developerOptionsStatus")
49135053 <*> (o .:? "unknownSourcesStatus")
49145054 <*> (o .:? "meid")
5055+ <*> (o .:? "bootloaderVersion")
49155056 <*> (o .:? "deviceId")
49165057 <*> (o .:? "firstSync")
49175058 <*> (o .:? "userAgent")
49185059 <*> (o .:? "imei")
49195060 <*> (o .:? "type")
49205061 <*> (o .:? "wifiMacAddress")
5062+ <*> (o .:? "encryptionStatus")
49215063 <*> (o .:? "serialNumber")
5064+ <*> (o .:? "devicePasswordStatus")
49225065 <*> (o .:? "hardwareId")
49235066 <*> (o .:? "basebandVersion")
49245067 <*> (o .:? "supportsWorkProfile")
5068+ <*> (o .:? "hardware")
49255069 <*> (o .:? "deviceCompromisedStatus")
49265070 <*> (o .:? "applications" .!= mempty)
49275071 <*> (o .:? "defaultLanguage"))
@@ -4932,8 +5076,10 @@ instance ToJSON MobileDevice where
49325076 (catMaybes
49335077 [("email" .=) <$> _mobEmail,
49345078 ("status" .=) <$> _mobStatus,
5079+ ("privilege" .=) <$> _mobPrivilege,
49355080 ("etag" .=) <$> _mobEtag,
49365081 ("resourceId" .=) <$> _mobResourceId,
5082+ ("manufacturer" .=) <$> _mobManufacturer,
49375083 ("buildNumber" .=) <$> _mobBuildNumber,
49385084 ("managedAccountIsOnOwnerProfile" .=) <$>
49395085 _mobManagedAccountIsOnOwnerProFile,
@@ -4941,6 +5087,9 @@ instance ToJSON MobileDevice where
49415087 ("otherAccountsInfo" .=) <$> _mobOtherAccountsInfo,
49425088 Just ("kind" .= _mobKind),
49435089 ("adbStatus" .=) <$> _mobAdbStatus,
5090+ ("releaseVersion" .=) <$> _mobReleaseVersion,
5091+ ("brand" .=) <$> _mobBrand,
5092+ ("securityPatchLevel" .=) <$> _mobSecurityPatchLevel,
49445093 ("networkOperator" .=) <$> _mobNetworkOperator,
49455094 ("kernelVersion" .=) <$> _mobKernelVersion,
49465095 ("os" .=) <$> _mobOS, ("name" .=) <$> _mobName,
@@ -4950,16 +5099,21 @@ instance ToJSON MobileDevice where
49505099 ("unknownSourcesStatus" .=) <$>
49515100 _mobUnknownSourcesStatus,
49525101 ("meid" .=) <$> _mobMeid,
5102+ ("bootloaderVersion" .=) <$> _mobBootLoaderVersion,
49535103 ("deviceId" .=) <$> _mobDeviceId,
49545104 ("firstSync" .=) <$> _mobFirstSync,
49555105 ("userAgent" .=) <$> _mobUserAgent,
49565106 ("imei" .=) <$> _mobImei, ("type" .=) <$> _mobType,
49575107 ("wifiMacAddress" .=) <$> _mobWifiMACAddress,
5108+ ("encryptionStatus" .=) <$> _mobEncryptionStatus,
49585109 ("serialNumber" .=) <$> _mobSerialNumber,
5110+ ("devicePasswordStatus" .=) <$>
5111+ _mobDevicePasswordStatus,
49595112 ("hardwareId" .=) <$> _mobHardwareId,
49605113 ("basebandVersion" .=) <$> _mobBasebandVersion,
49615114 ("supportsWorkProfile" .=) <$>
49625115 _mobSupportsWorkProFile,
5116+ ("hardware" .=) <$> _mobHardware,
49635117 ("deviceCompromisedStatus" .=) <$>
49645118 _mobDeviceCompromisedStatus,
49655119 ("applications" .=) <$> _mobApplications,
@@ -4969,12 +5123,13 @@ instance ToJSON MobileDevice where
49695123--
49705124-- /See:/ 'member' smart constructor.
49715125data Member = Member'
4972− { _memEmail :: !(Maybe Text)
4973− , _memEtag :: !(Maybe Text)
4974− , _memKind :: !Text
4975− , _memRole :: !(Maybe Text)
4976− , _memId :: !(Maybe Text)
4977− , _memType :: !(Maybe Text)
5126+ { _memEmail :: !(Maybe Text)
5127+ , _memStatus :: !(Maybe Text)
5128+ , _memEtag :: !(Maybe Text)
5129+ , _memKind :: !Text
5130+ , _memRole :: !(Maybe Text)
5131+ , _memId :: !(Maybe Text)
5132+ , _memType :: !(Maybe Text)
49785133 } deriving (Eq,Show,Data,Typeable,Generic)
49795134
49805135-- | Creates a value of 'Member' with the minimum fields required to make a request.
@@ -4983,6 +5138,8 @@ data Member = Member'
49835138--
49845139-- * 'memEmail'
49855140--
5141+-- * 'memStatus'
5142+--
49865143-- * 'memEtag'
49875144--
49885145-- * 'memKind'
@@ -4997,6 +5154,7 @@ member
49975154member =
49985155 Member'
49995156 { _memEmail = Nothing
5157+ , _memStatus = Nothing
50005158 , _memEtag = Nothing
50015159 , _memKind = "admin#directory#member"
50025160 , _memRole = Nothing
@@ -5008,6 +5166,11 @@ member =
50085166memEmail :: Lens' Member (Maybe Text)
50095167memEmail = lens _memEmail (\ s a -> s{_memEmail = a})
50105168
5169+-- | Status of member (Immutable)
5170+memStatus :: Lens' Member (Maybe Text)
5171+memStatus
5172+ = lens _memStatus (\ s a -> s{_memStatus = a})
5173+
50115174-- | ETag of the resource.
50125175memEtag :: Lens' Member (Maybe Text)
50135176memEtag = lens _memEtag (\ s a -> s{_memEtag = a})
@@ -5034,8 +5197,9 @@ instance FromJSON Member where
50345197 = withObject "Member"
50355198 (\ o ->
50365199 Member' <$>
5037− (o .:? "email") <*> (o .:? "etag") <*>
5038− (o .:? "kind" .!= "admin#directory#member")
5200+ (o .:? "email") <*> (o .:? "status") <*>
5201+ (o .:? "etag")
5202+ <*> (o .:? "kind" .!= "admin#directory#member")
50395203 <*> (o .:? "role")
50405204 <*> (o .:? "id")
50415205 <*> (o .:? "type"))
@@ -5045,6 +5209,7 @@ instance ToJSON Member where
50455209 = object
50465210 (catMaybes
50475211 [("email" .=) <$> _memEmail,
5212+ ("status" .=) <$> _memStatus,
50485213 ("etag" .=) <$> _memEtag, Just ("kind" .= _memKind),
50495214 ("role" .=) <$> _memRole, ("id" .=) <$> _memId,
50505215 ("type" .=) <$> _memType])
gogol-admin-directory/gen/Network/Google/Resource/Directory/ChromeosDevices/Action.hsnew file+118
@@ -0,0 +1,118 @@
1+{-# LANGUAGE DataKinds #-}
2+{-# LANGUAGE DeriveDataTypeable #-}
3+{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE FlexibleInstances #-}
5+{-# LANGUAGE NoImplicitPrelude #-}
6+{-# LANGUAGE OverloadedStrings #-}
7+{-# LANGUAGE RecordWildCards #-}
8+{-# LANGUAGE TypeFamilies #-}
9+{-# LANGUAGE TypeOperators #-}
10+
11+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12+{-# OPTIONS_GHC -fno-warn-unused-binds #-}
13+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
14+
15+-- |
16+-- Module : Network.Google.Resource.Directory.ChromeosDevices.Action
17+-- Copyright : (c) 2015-2016 Brendan Hay
18+-- License : Mozilla Public License, v. 2.0.
19+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
20+-- Stability : auto-generated
21+-- Portability : non-portable (GHC extensions)
22+--
23+-- Take action on Chrome OS Device
24+--
25+-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @directory.chromeosdevices.action@.
26+module Network.Google.Resource.Directory.ChromeosDevices.Action
27+ (
28+ -- * REST Resource
29+ ChromeosDevicesActionResource
30+
31+ -- * Creating a Request
32+ , chromeosDevicesAction
33+ , ChromeosDevicesAction
34+
35+ -- * Request Lenses
36+ , cdaResourceId
37+ , cdaPayload
38+ , cdaCustomerId
39+ ) where
40+
41+import Network.Google.Directory.Types
42+import Network.Google.Prelude
43+
44+-- | A resource alias for @directory.chromeosdevices.action@ method which the
45+-- 'ChromeosDevicesAction' request conforms to.
46+type ChromeosDevicesActionResource =
47+ "admin" :>
48+ "directory" :>
49+ "v1" :>
50+ "customer" :>
51+ Capture "customerId" Text :>
52+ "devices" :>
53+ "chromeos" :>
54+ Capture "resourceId" Text :>
55+ "action" :>
56+ QueryParam "alt" AltJSON :>
57+ ReqBody '[JSON] ChromeOSDeviceAction :>
58+ Post '[JSON] ()
59+
60+-- | Take action on Chrome OS Device
61+--
62+-- /See:/ 'chromeosDevicesAction' smart constructor.
63+data ChromeosDevicesAction = ChromeosDevicesAction'
64+ { _cdaResourceId :: !Text
65+ , _cdaPayload :: !ChromeOSDeviceAction
66+ , _cdaCustomerId :: !Text
67+ } deriving (Eq,Show,Data,Typeable,Generic)
68+
69+-- | Creates a value of 'ChromeosDevicesAction' with the minimum fields required to make a request.
70+--
71+-- Use one of the following lenses to modify other fields as desired:
72+--
73+-- * 'cdaResourceId'
74+--
75+-- * 'cdaPayload'
76+--
77+-- * 'cdaCustomerId'
78+chromeosDevicesAction
79+ :: Text -- ^ 'cdaResourceId'
80+ -> ChromeOSDeviceAction -- ^ 'cdaPayload'
81+ -> Text -- ^ 'cdaCustomerId'
82+ -> ChromeosDevicesAction
83+chromeosDevicesAction pCdaResourceId_ pCdaPayload_ pCdaCustomerId_ =
84+ ChromeosDevicesAction'
85+ { _cdaResourceId = pCdaResourceId_
86+ , _cdaPayload = pCdaPayload_
87+ , _cdaCustomerId = pCdaCustomerId_
88+ }
89+
90+-- | Immutable id of Chrome OS Device
91+cdaResourceId :: Lens' ChromeosDevicesAction Text
92+cdaResourceId
93+ = lens _cdaResourceId
94+ (\ s a -> s{_cdaResourceId = a})
95+
96+-- | Multipart request metadata.
97+cdaPayload :: Lens' ChromeosDevicesAction ChromeOSDeviceAction
98+cdaPayload
99+ = lens _cdaPayload (\ s a -> s{_cdaPayload = a})
100+
101+-- | Immutable id of the Google Apps account
102+cdaCustomerId :: Lens' ChromeosDevicesAction Text
103+cdaCustomerId
104+ = lens _cdaCustomerId
105+ (\ s a -> s{_cdaCustomerId = a})
106+
107+instance GoogleRequest ChromeosDevicesAction where
108+ type Rs ChromeosDevicesAction = ()
109+ type Scopes ChromeosDevicesAction =
110+ '["https://www.googleapis.com/auth/admin.directory.device.chromeos"]
111+ requestClient ChromeosDevicesAction'{..}
112+ = go _cdaCustomerId _cdaResourceId (Just AltJSON)
113+ _cdaPayload
114+ directoryService
115+ where go
116+ = buildClient
117+ (Proxy :: Proxy ChromeosDevicesActionResource)
118+ mempty
gogol-admin-directory/gen/Network/Google/Resource/Directory/Customers/Get.hs+2−2
@@ -20,7 +20,7 @@
2020-- Stability : auto-generated
2121-- Portability : non-portable (GHC extensions)
2222--
23−-- Retrives a customer.
23+-- Retrieves a customer.
2424--
2525-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @directory.customers.get@.
2626module Network.Google.Resource.Directory.Customers.Get
@@ -49,7 +49,7 @@ type CustomersGetResource =
4949 Capture "customerKey" Text :>
5050 QueryParam "alt" AltJSON :> Get '[JSON] Customer
5151
52−-- | Retrives a customer.
52+-- | Retrieves a customer.
5353--
5454-- /See:/ 'customersGet' smart constructor.
5555newtype CustomersGet = CustomersGet'
gogol-admin-directory/gen/Network/Google/Resource/Directory/Domains/Get.hs+2−2
@@ -20,7 +20,7 @@
2020-- Stability : auto-generated
2121-- Portability : non-portable (GHC extensions)
2222--
23−-- Retrives a domain of the customer.
23+-- Retrieves a domain of the customer.
2424--
2525-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @directory.domains.get@.
2626module Network.Google.Resource.Directory.Domains.Get
@@ -52,7 +52,7 @@ type DomainsGetResource =
5252 Capture "domainName" Text :>
5353 QueryParam "alt" AltJSON :> Get '[JSON] Domains
5454
55−-- | Retrives a domain of the customer.
55+-- | Retrieves a domain of the customer.
5656--
5757-- /See:/ 'domainsGet' smart constructor.
5858data DomainsGet = DomainsGet'
gogol-admin-directory/gogol-admin-directory.cabal+1
@@ -41,6 +41,7 @@ library
4141 , Network.Google.Resource.Directory.Asps.Delete
4242 , Network.Google.Resource.Directory.Asps.Get
4343 , Network.Google.Resource.Directory.Asps.List
44+ , Network.Google.Resource.Directory.ChromeosDevices.Action
4445 , Network.Google.Resource.Directory.ChromeosDevices.Get
4546 , Network.Google.Resource.Directory.ChromeosDevices.List
4647 , Network.Google.Resource.Directory.ChromeosDevices.Patch