pub fn parse_ole_site_concrete_header<'a, E>(
    input: &'a [u8]
) -> IResult<&'a [u8], u16, E>where
    E: ParseError<&'a [u8]>,