Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(PHP ActiveX) POP3 Auto-Refresh Office365 Access TokenSee more Office365 ExamplesDemonstrates how to automatically recover from an expired OAuth2 access token when OAuth2 authentication fails in the POP3 protocol. If the server responds with "-ERR Authentication failure: unknown user name or bad password.", then we refresh the access token and retry.
<?php // This example requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. // For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.MailMan') $mailman = new COM("Chilkat.MailMan"); $mailman->MailHost = 'outlook.office365.com'; $mailman->MailPort = 995; $mailman->PopSsl = 1; // Use your O365 email address here. $mailman->PopUsername = 'OFFICE365_EMAIL_ADDRESS'; // When using OAuth2 authentication, leave the password empty. $mailman->PopPassword = ''; // Load our previously obtained OAuth2 access token. // For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.JsonObject') $jsonToken = new COM("Chilkat.JsonObject"); $success = $jsonToken->LoadFile('qa_data/tokens/office365.json'); if ($success == 0) { print $jsonToken->LastErrorText . "\n"; exit; } $mailman->OAuth2AccessToken = $jsonToken->stringOf('access_token'); // Make the TLS connection to the outlook.office365.com POP3 server. $success = $mailman->Pop3Connect(); if ($success != 1) { print $mailman->LastErrorText . "\n"; exit; } // Authenticate using XOAUTH2 $success = $mailman->Pop3Authenticate(); if ($success != 1) { // If we're still connected to the mail server, then it means the server sent a non-success response, // Such as: -ERR Authentication failure: unknown user name or bad password. if ($mailman->IsPop3Connected == 1) { // Refresh the OAuth2 access token, and if successful, save the new (refreshed) access token and try authenticating again. // For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.OAuth2') $oauth2 = new COM("Chilkat.OAuth2"); // Use your actual Directory (tenant) ID instead of "112d7ed6-71bf-4eba-a866-738364321bfc" $oauth2->TokenEndpoint = 'https://login.microsoftonline.com/112d7ed6-71bf-4eba-a866-738364321bfc/oauth2/v2.0/token'; // Replace these with your Azure App Registration's actual values. $oauth2->ClientId = 'CLIENT_ID'; $oauth2->ClientSecret = 'CLIENT_SECRET'; // Get the "refresh_token" $oauth2->RefreshToken = $jsonToken->stringOf('refresh_token'); // Send the HTTP POST to refresh the access token.. $success = $oauth2->RefreshAccessToken(); if ($success != 1) { print $oauth2->LastErrorText . "\n"; exit; } print 'New access token: ' . $oauth2->AccessToken . "\n"; print 'New refresh token: ' . $oauth2->RefreshToken . "\n"; // Update the JSON with the new tokens. $jsonToken->UpdateString('access_token',$oauth2->AccessToken); $jsonToken->UpdateString('refresh_token',$oauth2->RefreshToken); // Save the new JSON access token response to a file. // For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.StringBuilder') $sbJson = new COM("Chilkat.StringBuilder"); $jsonToken->EmitCompact = 0; $jsonToken->EmitSb($sbJson); $sbJson->WriteFile('qa_data/tokens/office365.json','utf-8',0); print 'New Access Token = ' . $oauth2->AccessToken . "\n"; // Update the mailman with the new access token. $mailman->OAuth2AccessToken = $oauth2->AccessToken; // Retry the authentication. $success = $mailman->Pop3Authenticate(); if ($success == 0) { print $mailman->LastErrorText . "\n"; exit; } } else { print $mailman->LastErrorText . "\n"; exit; } } // Find out how many emails are on the server.. $numEmails = $mailman->CheckMail(); if ($numEmails < 0) { print $mailman->LastErrorText . "\n"; exit; } // Examine the POP3 session log: print $mailman->Pop3SessionLog . "\n"; // The POP3 session log will look something like this: // **** Connected to outlook.office365.com:995 // < +OK The Microsoft Exchange POP3 service is ready. [QwBIADIAUABSADEANgBDAEEAMAAwADEAMgAuAG4AYQBtAHAAcgBkADEANgAuAHAAcgBvAGQALgBvAHUAdABsAG8AbwBrAC4AYwBvAG0A] // > AUTH XOAUTH2 // < + // > <base64 string in XOAUTH2 format> // < -ERR Authentication failure: unknown user name or bad password. // > AUTH XOAUTH2 // < + // > <base64 string in XOAUTH2 format> // < +OK User successfully authenticated. // > STAT // < +OK 248 46637086 // End the POP3 session and close the connection to the GMail server. $success = $mailman->Pop3EndSession(); if ($success != 1) { print $mailman->LastErrorText . "\n"; exit; } print 'Finished.' . "\n"; ?> |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.