;;; Copyright (c) 2024 Apple Inc.  All Rights reserved.
;;;
;;; WARNING: The sandbox rules in this file currently constitute
;;; Apple System Private Interface and are subject to change at any time and
;;; without notice.
;;;
(version 1)

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

(deny mach-priv-host-port)

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

;;; Homedir-relative path filters
(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 resolving symlinks, realpath(3), and equivalents.
(allow file-read-metadata)

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

(allow network-outbound)
(allow system-socket)
(allow distributed-notification-post)

(allow sysctl-write
       (sysctl-name "kern.tcsm_enable"))

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

;; Read/write cache access
(let ((cache-path-filter
        (require-any (home-subpath "/Library/Caches/com.apple.amsondevicestoraged")
                     (home-subpath "/Library/Caches/com.apple.OnDeviceStorage")
                     (home-subpath "/Library/com.apple.AppleMediaServices/PersistedBags/com.apple.amsondevicestoraged")
        )))
  (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)))

;; Application group
(allow file-read* file-write*
    (extension "com.apple.sandbox.application-group")
)

;;; Start amsondevicestoraged rules

;; Mach service

(allow mach-register
    (global-name "com.apple.amsondevicestoraged.xpc"))

(allow mach-lookup
    (global-name "com.apple.accountsd.accountmanager")
    (global-name "com.apple.ak.anisette.xpc")
    (global-name "com.apple.containermanagerd")
    (global-name "com.apple.coreservices.launchservicesd")
    (global-name "com.apple.coreservices.quarantine-resolver")
    (global-name "com.apple.ctkd.token-client")
    (global-name "com.apple.duetactivityscheduler")
    (global-name "com.apple.fairplayd.versioned")
    (global-name "com.apple.fairplayd.xpc")
    (global-name "com.apple.fairplayd")
    (global-name "com.apple.fpsd")
    (global-name "com.apple.lsd.mapdb")
    (global-name "com.apple.lsd.modifydb")
    (global-name "com.apple.nsurlsessiond")
    (global-name "com.apple.securityd.xpc")
    (global-name "com.apple.symptom_analytics")
    (global-name "com.apple.syncdefaultsd")
)

(with-filter (%entitlement-is-present "com.apple.private.applemediaservices")
    (allow mach-lookup (global-name "com.apple.xpc.amsaccountsd"
                                    "com.apple.xpc.amsengagementd"
                                    "com.apple.xpc.amstoold")))


;; Preference domains

(allow user-preference-read user-preference-write
    (preference-domain "com.apple.amsondevicestoraged")
    (preference-domain "com.apple.AppleMediaServices")
    (preference-domain "com.apple.AppleMediaServices.notbackedup")
    (preference-domain "com.apple.da")
    (preference-domain "com.apple.itunesstored")
    (preference-domain "com.apple.OnDeviceStorage")
)

(allow user-preference-read
    (preference-domain "kCFPreferencesAnyApplication")
)

(allow file-read*
    (literal "/Library/Application Support/CrashReporter/DiagnosticMessagesHistory.plist")
    (regex #"^/private/var/db/mds/messages/[^/]+/se_SecurityMessages(/|$)")
    (regex #"/Library/Preferences/com\.apple\.LaunchServices/com\.apple\.launchservices\.secure\.plist$")
)

(allow file-read* file-write*
    (regex #"/Library/Caches/com\.apple\.AppleMediaServices")
    (home-subpath "/Library/Caches/OnDeviceStorage")
    (home-subpath "/Library/Caches/com.apple.amsondevicestoraged")
    (home-subpath "/Library/HTTPStorages/amsondevicestoraged")
    (home-subpath "/Library/HTTPStorages/com.apple.amsondevicestoraged")
)

(allow file-issue-extension
    (regex #"/Library/Caches/com\.apple\.AppleMediaServices"))

;; IOKit Properties

(allow iokit-get-properties
    (iokit-property "IOBuiltin")
    (iokit-property "IOMACAddress"))

;; Internal builds only

(with-filter (system-attribute apple-internal)
  (allow file-read*
         (subpath "/Library/Preferences/FeatureFlags"))     ; Feature Flags support
    (allow sysctl-write
         (sysctl-name "vm.task_no_footprint_for_debug")))   ; MallocStackLogging