Какао-эквивалент метода углерода getPtrSize

Question

Мне нужно перевести углеродный метод в какао, и у меня возникли проблемы с поиском любой документации о том, что действительно делает метод getPtrSize. Из кода, который я переводил, кажется, что он возвращает представление изображения в виде байта, но это действительно не совпадает с именем. Может ли кто-нибудь дать мне хорошее объяснение этому методу или связать меня с документацией, которая его описывает. Код, который я перевожу, находится в общей реализации lisp под названием MCL, которая имеет мост к углероду (я переводил в CCL, который является общей реализацией lisp с мостом Cocoa). Вот код MCL (#_before вызова метода означает, что способ углерода):

(defmethod COPY-CONTENT-INTO ((Source inflatable-icon) 
           (Destination inflatable-icon)) 
    ;; check for size compatibility to avoid disaster 
    (unless (and (= (rows Source) (rows Destination)) 
       (= (columns Source) (columns Destination)) 
       (= (#_getPtrSize (image Source)) 
        (#_getPtrSize (image Destination)))) 
    (error "cannot copy content of source into destination 
inflatable icon: incompatible sizes")) 
    ;; given that they are the same size only copy content 
    (setf (is-upright Destination) (is-upright Source)) 
    (setf (height Destination) (height Source)) 
    (setf (dz Destination) (dz Source)) 
    (setf (surfaces Destination) (surfaces Source)) 
    (setf (distance Destination) (distance Source)) 
    ;; arrays 
    (noise-map Source) ;; accessor makes array if needed 
    (noise-map Destination) ;; ;; accessor makes array if needed 
    (dotimes (Row (rows Source)) 
    (dotimes (Column (columns Source)) 
     (setf (aref (noise-map Destination) Row Column) 
      (aref (noise-map Source) Row Column)) 
     (setf (aref (altitudes Destination) Row Column) 
      (aref (altitudes Source) Row Column)))) 
    (setf (connectors Destination) 
     (mapcar #'copy-instance (connectors Source))) 
    (setf (visible-alpha-threshold Destination) 
     (visible-alpha-threshold Source)) 
    ;; copy Image: slow byte copy 
    (dotimes (I (#_getPtrSize (image Source))) 
    (%put-byte (image Destination) (%get-byte (image Source) i) i)) 
    ;; flat texture optimization: 
    ;; do not copy texture-id 
    ;; -> destination should get its own texture id from OpenGL 
    (setf (is-flat Destination) (is-flat Source)) 
    ;; do not compile flat textures: the display list overhead 
    ;; slows things down by about 2x 
    (setf (auto-compile Destination) (not (is-flat Source))) 
    ;; to make change visible we have to reset the compiled flag 
    (setf (is-compiled Destination) nil)) 

Answer 1

GetPtrSize является функцией от Memory Manager. Когда вы выделили память NewPtr (еще одна функция Memory Manager), диспетчер памяти будет отслеживать, сколько памяти вы запросили, чтобы вы могли получить это число с помощью GetPtrSize.

Современная замена для NewPtr - malloc, которая не обеспечивает такую ​​функциональность. Существует функция malloc_size, но число, которое она возвращает, может быть округлено до некоторого приращения, поэтому оно может быть больше, чем номер, который вы запрашивали первоначально. Вы можете видеть, как это было бы (по крайней мере, концептуально) плохо.

Единственная точная замена для GetPtrSize - это просто отслеживать размеры буферов самостоятельно.

В качестве альтернативы вы можете заменить эти буферы объектами NSMutableData. NSMutableData инкапсулирует буфер и его размер, что упрощает их объединение.