while true
  n,r = gets.split(" ").map{|i| i.to_i}
  break if (n==0 && r==0)
    
  s = 0
  xi = [] ; yi = [] ; xf = [] ; yf = []
  for i in 0..n-1
    xi[i],yi[i],xf[i],yf[i] = gets.split(" ").map{|j| j.to_i}
  end
  xmax,ymax = xf.max,yf.max

  field = Array.new(ymax){Array.new(xmax){0}}
  
  for i in 0..n-1
    for y in yi[1]..yf[i]-1
      for x in xi[i]..xf[i]-1
        (field[y][x] = 1 ; s+=1) if field[y][x]==0
      end
    end
  end
  puts s
  
  if r == 2
    l = 0
    for y in 0..ymax-1
      for x in 0..xmax-1
        if field[y][x] == 1
          x==0 ? l+=1 : (l+=1 if field[y][x-1]==0)
          x==xmax-1 ? l+=1 : (l+=1 if field[y][x+1]==0) 
          y==0 ? l+=1 : (l+=1 if field[y-1][x]==0)
          y==ymax-1 ? l+=1 : (l+=1 if field[y+1][x]==0)
        end
      end
    end
    puts l
  end
end