#!/bin/sh

geom disk list | awk '/Geom name:/ {name=$3}; /Mediasize/ {size=$3}; /descr:/ {$1=""; model=$0;}; /ident/ {serial=$2; print name,size,model,serial;};'