;; eid-decor -- Eid decoration sharing and rental
(define-constant CONTRACT-OWNER tx-sender)
(define-constant ERR-AUTH (err u401))
(define-constant ERR-NONE (err u404))
(define-data-var item-count uint u0)
(define-map decor-items uint { owner: principal, name: (string-utf8 100), category: (string-ascii 20), rental-price: uint, available: bool })
(define-map rentals uint { item-id: uint, renter: principal, block: uint, returned: bool })
(define-data-var rental-count uint u0)
(define-public (list-decor (name (string-utf8 100)) (category (string-ascii 20)) (rental-price uint))
(let ((id (+ (var-get item-count) u1)))
(var-set item-count id)
(map-set decor-items id { owner: tx-sender, name: name, category: category, rental-price: rental-price, available: true })
(ok id)))
(define-public (rent-item (item-id uint))
(let ((d (unwrap! (map-get? decor-items item-id) ERR-NONE))
(id (+ (var-get rental-count) u1)))
(asserts! (get available d) ERR-AUTH)
(var-set rental-count id)
(map-set decor-items item-id (merge d { available: false }))
(map-set rentals id { item-id: item-id, renter: tx-sender, block: stacks-block-height, returned: false })
(ok id)))
(define-public (return-item (rental-id uint))
(let ((r (unwrap! (map-get? rentals rental-id) ERR-NONE))
(d (unwrap! (map-get? decor-items (get item-id r)) ERR-NONE)))
(map-set rentals rental-id (merge r { returned: true }))
(map-set decor-items (get item-id r) (merge d { available: true }))
(ok true)))
(define-read-only (get-decor (id uint)) (map-get? decor-items id))
(define-read-only (get-rental (id uint)) (map-get? rentals id))