Canadian hospital handing out crackpipes in vending machines