/usr/share/common-lisp/ros/pcl_msgs/msg/PolygonMesh.lisp is in cl-pcl-msgs 0.2.0-6.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 | ; Auto-generated. Do not edit!
(cl:in-package pcl_msgs-msg)
;//! \htmlinclude PolygonMesh.msg.html
(cl:defclass <PolygonMesh> (roslisp-msg-protocol:ros-message)
((header
:reader header
:initarg :header
:type std_msgs-msg:Header
:initform (cl:make-instance 'std_msgs-msg:Header))
(cloud
:reader cloud
:initarg :cloud
:type sensor_msgs-msg:PointCloud2
:initform (cl:make-instance 'sensor_msgs-msg:PointCloud2))
(polygons
:reader polygons
:initarg :polygons
:type (cl:vector pcl_msgs-msg:Vertices)
:initform (cl:make-array 0 :element-type 'pcl_msgs-msg:Vertices :initial-element (cl:make-instance 'pcl_msgs-msg:Vertices))))
)
(cl:defclass PolygonMesh (<PolygonMesh>)
())
(cl:defmethod cl:initialize-instance :after ((m <PolygonMesh>) cl:&rest args)
(cl:declare (cl:ignorable args))
(cl:unless (cl:typep m 'PolygonMesh)
(roslisp-msg-protocol:msg-deprecation-warning "using old message class name pcl_msgs-msg:<PolygonMesh> is deprecated: use pcl_msgs-msg:PolygonMesh instead.")))
(cl:ensure-generic-function 'header-val :lambda-list '(m))
(cl:defmethod header-val ((m <PolygonMesh>))
(roslisp-msg-protocol:msg-deprecation-warning "Using old-style slot reader pcl_msgs-msg:header-val is deprecated. Use pcl_msgs-msg:header instead.")
(header m))
(cl:ensure-generic-function 'cloud-val :lambda-list '(m))
(cl:defmethod cloud-val ((m <PolygonMesh>))
(roslisp-msg-protocol:msg-deprecation-warning "Using old-style slot reader pcl_msgs-msg:cloud-val is deprecated. Use pcl_msgs-msg:cloud instead.")
(cloud m))
(cl:ensure-generic-function 'polygons-val :lambda-list '(m))
(cl:defmethod polygons-val ((m <PolygonMesh>))
(roslisp-msg-protocol:msg-deprecation-warning "Using old-style slot reader pcl_msgs-msg:polygons-val is deprecated. Use pcl_msgs-msg:polygons instead.")
(polygons m))
(cl:defmethod roslisp-msg-protocol:serialize ((msg <PolygonMesh>) ostream)
"Serializes a message object of type '<PolygonMesh>"
(roslisp-msg-protocol:serialize (cl:slot-value msg 'header) ostream)
(roslisp-msg-protocol:serialize (cl:slot-value msg 'cloud) ostream)
(cl:let ((__ros_arr_len (cl:length (cl:slot-value msg 'polygons))))
(cl:write-byte (cl:ldb (cl:byte 8 0) __ros_arr_len) ostream)
(cl:write-byte (cl:ldb (cl:byte 8 8) __ros_arr_len) ostream)
(cl:write-byte (cl:ldb (cl:byte 8 16) __ros_arr_len) ostream)
(cl:write-byte (cl:ldb (cl:byte 8 24) __ros_arr_len) ostream))
(cl:map cl:nil #'(cl:lambda (ele) (roslisp-msg-protocol:serialize ele ostream))
(cl:slot-value msg 'polygons))
)
(cl:defmethod roslisp-msg-protocol:deserialize ((msg <PolygonMesh>) istream)
"Deserializes a message object of type '<PolygonMesh>"
(roslisp-msg-protocol:deserialize (cl:slot-value msg 'header) istream)
(roslisp-msg-protocol:deserialize (cl:slot-value msg 'cloud) istream)
(cl:let ((__ros_arr_len 0))
(cl:setf (cl:ldb (cl:byte 8 0) __ros_arr_len) (cl:read-byte istream))
(cl:setf (cl:ldb (cl:byte 8 8) __ros_arr_len) (cl:read-byte istream))
(cl:setf (cl:ldb (cl:byte 8 16) __ros_arr_len) (cl:read-byte istream))
(cl:setf (cl:ldb (cl:byte 8 24) __ros_arr_len) (cl:read-byte istream))
(cl:setf (cl:slot-value msg 'polygons) (cl:make-array __ros_arr_len))
(cl:let ((vals (cl:slot-value msg 'polygons)))
(cl:dotimes (i __ros_arr_len)
(cl:setf (cl:aref vals i) (cl:make-instance 'pcl_msgs-msg:Vertices))
(roslisp-msg-protocol:deserialize (cl:aref vals i) istream))))
msg
)
(cl:defmethod roslisp-msg-protocol:ros-datatype ((msg (cl:eql '<PolygonMesh>)))
"Returns string type for a message object of type '<PolygonMesh>"
"pcl_msgs/PolygonMesh")
(cl:defmethod roslisp-msg-protocol:ros-datatype ((msg (cl:eql 'PolygonMesh)))
"Returns string type for a message object of type 'PolygonMesh"
"pcl_msgs/PolygonMesh")
(cl:defmethod roslisp-msg-protocol:md5sum ((type (cl:eql '<PolygonMesh>)))
"Returns md5sum for a message object of type '<PolygonMesh>"
"45a5fc6ad2cde8489600a790acc9a38a")
(cl:defmethod roslisp-msg-protocol:md5sum ((type (cl:eql 'PolygonMesh)))
"Returns md5sum for a message object of type 'PolygonMesh"
"45a5fc6ad2cde8489600a790acc9a38a")
(cl:defmethod roslisp-msg-protocol:message-definition ((type (cl:eql '<PolygonMesh>)))
"Returns full string definition for message of type '<PolygonMesh>"
(cl:format cl:nil "# Separate header for the polygonal surface~%Header header~%# Vertices of the mesh as a point cloud~%sensor_msgs/PointCloud2 cloud~%# List of polygons~%Vertices[] polygons~%~%================================================================================~%MSG: std_msgs/Header~%# Standard metadata for higher-level stamped data types.~%# This is generally used to communicate timestamped data ~%# in a particular coordinate frame.~%# ~%# sequence ID: consecutively increasing ID ~%uint32 seq~%#Two-integer timestamp that is expressed as:~%# * stamp.sec: seconds (stamp_secs) since epoch (in Python the variable is called 'secs')~%# * stamp.nsec: nanoseconds since stamp_secs (in Python the variable is called 'nsecs')~%# time-handling sugar is provided by the client library~%time stamp~%#Frame this data is associated with~%# 0: no frame~%# 1: global frame~%string frame_id~%~%================================================================================~%MSG: sensor_msgs/PointCloud2~%# This message holds a collection of N-dimensional points, which may~%# contain additional information such as normals, intensity, etc. The~%# point data is stored as a binary blob, its layout described by the~%# contents of the \"fields\" array.~%~%# The point cloud data may be organized 2d (image-like) or 1d~%# (unordered). Point clouds organized as 2d images may be produced by~%# camera depth sensors such as stereo or time-of-flight.~%~%# Time of sensor data acquisition, and the coordinate frame ID (for 3d~%# points).~%Header header~%~%# 2D structure of the point cloud. If the cloud is unordered, height is~%# 1 and width is the length of the point cloud.~%uint32 height~%uint32 width~%~%# Describes the channels and their layout in the binary data blob.~%PointField[] fields~%~%bool is_bigendian # Is this data bigendian?~%uint32 point_step # Length of a point in bytes~%uint32 row_step # Length of a row in bytes~%uint8[] data # Actual point data, size is (row_step*height)~%~%bool is_dense # True if there are no invalid points~%~%================================================================================~%MSG: sensor_msgs/PointField~%# This message holds the description of one point entry in the~%# PointCloud2 message format.~%uint8 INT8 = 1~%uint8 UINT8 = 2~%uint8 INT16 = 3~%uint8 UINT16 = 4~%uint8 INT32 = 5~%uint8 UINT32 = 6~%uint8 FLOAT32 = 7~%uint8 FLOAT64 = 8~%~%string name # Name of field~%uint32 offset # Offset from start of point struct~%uint8 datatype # Datatype enumeration, see above~%uint32 count # How many elements in the field~%~%================================================================================~%MSG: pcl_msgs/Vertices~%# List of point indices~%uint32[] vertices~%~%~%"))
(cl:defmethod roslisp-msg-protocol:message-definition ((type (cl:eql 'PolygonMesh)))
"Returns full string definition for message of type 'PolygonMesh"
(cl:format cl:nil "# Separate header for the polygonal surface~%Header header~%# Vertices of the mesh as a point cloud~%sensor_msgs/PointCloud2 cloud~%# List of polygons~%Vertices[] polygons~%~%================================================================================~%MSG: std_msgs/Header~%# Standard metadata for higher-level stamped data types.~%# This is generally used to communicate timestamped data ~%# in a particular coordinate frame.~%# ~%# sequence ID: consecutively increasing ID ~%uint32 seq~%#Two-integer timestamp that is expressed as:~%# * stamp.sec: seconds (stamp_secs) since epoch (in Python the variable is called 'secs')~%# * stamp.nsec: nanoseconds since stamp_secs (in Python the variable is called 'nsecs')~%# time-handling sugar is provided by the client library~%time stamp~%#Frame this data is associated with~%# 0: no frame~%# 1: global frame~%string frame_id~%~%================================================================================~%MSG: sensor_msgs/PointCloud2~%# This message holds a collection of N-dimensional points, which may~%# contain additional information such as normals, intensity, etc. The~%# point data is stored as a binary blob, its layout described by the~%# contents of the \"fields\" array.~%~%# The point cloud data may be organized 2d (image-like) or 1d~%# (unordered). Point clouds organized as 2d images may be produced by~%# camera depth sensors such as stereo or time-of-flight.~%~%# Time of sensor data acquisition, and the coordinate frame ID (for 3d~%# points).~%Header header~%~%# 2D structure of the point cloud. If the cloud is unordered, height is~%# 1 and width is the length of the point cloud.~%uint32 height~%uint32 width~%~%# Describes the channels and their layout in the binary data blob.~%PointField[] fields~%~%bool is_bigendian # Is this data bigendian?~%uint32 point_step # Length of a point in bytes~%uint32 row_step # Length of a row in bytes~%uint8[] data # Actual point data, size is (row_step*height)~%~%bool is_dense # True if there are no invalid points~%~%================================================================================~%MSG: sensor_msgs/PointField~%# This message holds the description of one point entry in the~%# PointCloud2 message format.~%uint8 INT8 = 1~%uint8 UINT8 = 2~%uint8 INT16 = 3~%uint8 UINT16 = 4~%uint8 INT32 = 5~%uint8 UINT32 = 6~%uint8 FLOAT32 = 7~%uint8 FLOAT64 = 8~%~%string name # Name of field~%uint32 offset # Offset from start of point struct~%uint8 datatype # Datatype enumeration, see above~%uint32 count # How many elements in the field~%~%================================================================================~%MSG: pcl_msgs/Vertices~%# List of point indices~%uint32[] vertices~%~%~%"))
(cl:defmethod roslisp-msg-protocol:serialization-length ((msg <PolygonMesh>))
(cl:+ 0
(roslisp-msg-protocol:serialization-length (cl:slot-value msg 'header))
(roslisp-msg-protocol:serialization-length (cl:slot-value msg 'cloud))
4 (cl:reduce #'cl:+ (cl:slot-value msg 'polygons) :key #'(cl:lambda (ele) (cl:declare (cl:ignorable ele)) (cl:+ (roslisp-msg-protocol:serialization-length ele))))
))
(cl:defmethod roslisp-msg-protocol:ros-message-to-list ((msg <PolygonMesh>))
"Converts a ROS message object to a list"
(cl:list 'PolygonMesh
(cl:cons ':header (header msg))
(cl:cons ':cloud (cloud msg))
(cl:cons ':polygons (polygons msg))
))
|