Private Sub B4XPage_Created (Root1 As B4XView)
Root = Root1
Root.LoadLayout("MainPage")
Dim p As Phone
p.KeyChainPut("aaa", "bbb")
Log(p.KeyChainGet("aaa"))
Me.As(NativeObject).RunMethod("deleteAllKeychainItems", Null)
Log(p.KeyChainGet("aaa"))
End Sub
#if objc
- (void)deleteAllKeychainItems {
NSArray *secItemClasses = @[(__bridge id)kSecClassGenericPassword,
(__bridge id)kSecClassInternetPassword,
(__bridge id)kSecClassCertificate,
(__bridge id)kSecClassKey,
(__bridge id)kSecClassIdentity];
for (id secItemClass in secItemClasses) {
NSDictionary *spec = @{(__bridge id)kSecClass: secItemClass};
SecItemDelete((__bridge CFDictionaryRef)spec);
}
}
#End If