;;;
;;; FTConversationService
;;; /System/Library/PrivateFrameworks/TelephonyUtilities.framework/XPCServices/com.apple.FaceTime.FTConversationService.xpc
;;; FaceTime Core - TelephonyUtilities | all
;;;

(version 1)

(deny default)
(deny file-map-executable process-info* nvram*)
(deny dynamic-code-generation)

(deny mach-priv-host-port)

(import "system.sb")
(import "com.apple.corefoundation.sb")
(corefoundation)

; Create some custom filters that allow us to include paths relative to the home directory
(define (home-regex home-relative-regex)
    (regex (string-append "^" (regex-quote (param "HOME")) home-relative-regex))
)
(define (home-subpath home-relative-subpath)
    (subpath (string-append (param "HOME") home-relative-subpath))
)
(define (home-prefix home-relative-prefix)
    (prefix (string-append (param "HOME") home-relative-prefix))
)
(define (home-literal home-relative-literal)
    (literal (string-append (param "HOME") home-relative-literal))
)

(allow process-info* (target self))

;; For validating the entitlements of clients.
(allow process-info-codesignature)

;; For resolving symlinks, realpath(3), and equivalents.
(allow file-read-metadata)

(allow file-read* file-write*
    (home-subpath "/Library/Application Support/FaceTime")
)

;; Preferences read access
(allow user-preference-read
    (preference-domain "kCFPreferencesAnyApplication")
)

;; Preferences read/write access
(allow user-preference-read user-preference-write
    (preference-domain "com.apple.TelephonyUtilities")
)

;; Read/write access to our temporary directories.
(allow file-read* file-write*
    (subpath (param "TMPDIR"))
    (subpath (param "DARWIN_CACHE_DIR"))
)

;; Support for issuing extensions in our temporary directories.
(allow file-issue-extension
    (require-all
        (extension-class "com.apple.app-sandbox.read" "com.apple.app-sandbox.read-write")
        (require-any
            (subpath (param "TMPDIR"))
            (subpath (param "DARWIN_CACHE_DIR"))
        )
    )
)

;; Read/write cache access
(let ((cache-path-filter (home-subpath "/Library/Caches/com.apple.FaceTime.FTConversationService")))
    (allow file-read* file-write* cache-path-filter)
    (allow file-issue-extension
        (require-all (extension-class "com.apple.app-sandbox.read" "com.apple.app-sandbox.read-write") cache-path-filter)
    )
)