<#
.SYNOPSIS
AD Kullanıcı Oluşturma + O365 Lisans + Exchange Mailbox + OneDrive Provisioning + Teams Otomasyonu + Mail Bildirimi
.DESCRIPTION
CSV’den bilgileri okuyarak kurumsal onboarding sürecini tamamen otomatik hale getirir.
#># ----------------------------
# AYARLAR
# ----------------------------

$CsvPath = "C:\Scripts\NewUsers.csv"
$LogFile = "C:\Scripts\Logs\UserCreation_$(Get-Date -Format yyyyMMdd).log"

$Domain = "tolgaceyhan.com"

# Bildirim mail adresleri
$NotifyEmails = @(
"[email protected]",
"[email protected]"
)

# SMTP Ayarları (dilersen O365'e göre değiştirebilirim)
$SMTPServer = "smtp.tolgaceyhan.com"
$SMTPPort = 587
$SMTPUser = "[email protected]"
$SMTPPass = "BurayaSifreGirin!"

# Lisans eşleşmeleri
$LicenseMap = @{
"E3" = "tolgaceyhan:ENTERPRISEPACK"
"E1" = "tolgaceyhan:STANDARDPACK"
}

# ----------------------------
# LOG FONKSİYONU
# ----------------------------
function Write-Log {
param([string]$Message)
$Time = Get-Date -Format "yyyy-MM-dd HH:mm:ss"
"$Time - $Message" | Out-File -FilePath $LogFile -Append
}

# ----------------------------
# BAĞLANTILAR
# ----------------------------
Write-Log "Azure AD bağlantısı kuruluyor..."
Connect-AzureAD

Write-Log "Exchange Online bağlantısı kuruluyor..."
Connect-ExchangeOnline

Write-Log "Microsoft Graph bağlantısı kuruluyor..."
Connect-MgGraph -Scopes "User.ReadWrite.All","Group.ReadWrite.All","Team.ReadWrite.All","Files.ReadWrite.All"
Select-MgProfile -Name "beta"

# ----------------------------
# KULLANICI OLUŞTURMA
# ----------------------------
$Users = Import-Csv $CsvPath

foreach ($u in $Users) {

try {
Write-Log "Kullanıcı oluşturma başlatıldı: $($u.FirstName) $($u.LastName)"

# Parola oluştur
$Password = [System.Web.Security.Membership]::GeneratePassword(12,2)
$SecurePassword = ConvertTo-SecureString $Password -AsPlainText -Force

# AD kullanıcı oluştur
New-ADUser `
-Name "$($u.FirstName) $($u.LastName)" `
-SamAccountName $u.Username `
-UserPrincipalName "$($u.Username)@$Domain" `
-GivenName $u.FirstName `
-Surname $u.LastName `
-Title $u.Title `
-Department $u.Department `
-Path $u.OU `
-AccountPassword $SecurePassword `
-Enabled $true

Write-Log "AD hesabı oluşturuldu: $($u.Username)"

Start-Sleep -Seconds 10 # Replikasyon bekleme

# Azure AD User
$AzureUser = Get-AzureADUser -ObjectId "$($u.Username)@$Domain"

# Lisans atama
if ($LicenseMap.ContainsKey($u.License)) {
$Sku = $LicenseMap[$u.License]
Set-AzureADUserLicense -ObjectId $AzureUser.ObjectId `
-AssignedLicenses @{AddLicenses=@($Sku);RemoveLicenses=@()}

Write-Log "Lisans atandı: $($u.License)"
}

# Exchange mailbox oluştur
Enable-Mailbox -Identity "$($u.Username)@$Domain"
Write-Log "Mailbox oluşturuldu."

# ----------------------------
# OneDrive Provisioning
# ----------------------------
Write-Log "OneDrive provisioning yapılıyor..."
Request-SPOPersonalSite -UserEmails "$($u.Username)@$Domain"
Write-Log "OneDrive oluşturma isteği gönderildi."

# ----------------------------
# Teams grup yönetimi
# ----------------------------

if ($u.TeamsGroup -ne "") {

Write-Log "Teams grubu işleniyor: $($u.TeamsGroup)"

# Grup var mı kontrol et
$Group = Get-MgGroup -Filter "displayName eq '$($u.TeamsGroup)'"

if (!$Group) {
Write-Log "Teams grubu bulunamadı. Yeni grup oluşturuluyor..."

$Group = New-MgGroup `
-DisplayName $u.TeamsGroup `
-MailEnabled $false `
-MailNickname $u.TeamsGroup.Replace(" ","") `
-SecurityEnabled $true
}

# Kullanıcıyı gruba ekle
New-MgGroupMember -GroupId $Group.Id -DirectoryObjectId $AzureUser.ObjectId
Write-Log "Kullanıcı Teams grubuna eklendi."
}

# ----------------------------
# BİLDİRİM MAILİ
# ----------------------------
$Subject = "Yeni Kullanıcı Oluşturuldu: $($u.FirstName) $($u.LastName)"
$Body = @"
Yeni kullanıcı başarıyla oluşturuldu:

Ad Soyad :

$($u.FirstName) $($u.LastName)
Kullanıcı : $($u.Username)
UPN : $($u.Username)@$Domain
Departman : $($u.Department)
Title : $($u.Title)
Lisans : $($u.License)
Teams : $($u.TeamsGroup)
OneDrive : Provision edildi
Parola : $Passwordtolgaceyhan.com – Otomasyon Yönetim Sistemi
"@

foreach ($Email in $NotifyEmails) {
Send-MailMessage `
-From $SMTPUser `
-To $Email `
-Subject $Subject `
-Body $Body `
-SmtpServer $SMTPServer `
-UseSsl `
-Credential (New-Object pscredential($SMTPUser,(ConvertTo-SecureString $SMTPPass -AsPlainText -Force))) `
-Port $SMTPPort

Write-Log "Bildirim gönderildi: $Email"
}

Write-Log "Kullanıcı tamamlandı: $($u.Username)"
Write-Log "------------------------------"

} catch {
Write-Log "HATA: $($_.Exception.Message)"
}
}

Write-Log "Tüm işlemler başarıyla tamamlandı."