根据年月日计算星期几的函数

大部分日期计算正常， 2014-04-01 （星期2）计算出来的星期不正确。

原因：计算出来的 w可能出现负值， 求负数的余数需要特殊处理，需要按数论的计算方式求余数。网上很多代码存在此问题，少数日期计算不正确。

解决：负数先转为正数求余，然后求补

/*
*********************************************************************************************************
*    函 数 名: bsp_CalcWeek
*    功能说明: 根据日期计算星期几
*    形    参: _year _mon _day  年月日  (年是2字节整数，月和日是字节整数）
*    返 回 值: 周几 （1-7） 7表示周日
*********************************************************************************************************
*/
uint8_t bsp_CalcWeek(uint16_t _year, uint8_t _mon, uint8_t _day)
{
    /* 
    蔡勒（Zeller）公式 
        历史上的某一天是星期几？未来的某一天是星期几？关于这个问题，有很多计算公式（两个通用计算公式和
    一些分段计算公式），其中最著名的是蔡勒（Zeller）公式。
        即w=y+[y/4]+[c/4]-2c+[26(m+1)/10]+d-1 
        
        公式中的符号含义如下，
         w：星期；
         c：年的高2位，即世纪-1
         y：年（两位数）；
         m：月（m大于等于3，小于等于14，即在蔡勒公式中，某年的1、2月要看作上一年的13、14月来计算，
              比如2003年1月1日要看作2002年的13月1日来计算）；
         d：日；
         [ ]代表取整，即只要整数部分。
        
        算出来的W除以7，余数是几就是星期几。如果余数是0，则为星期日。 
        如果结果是负数，负数求余数则需要特殊处理：
            负数不能按习惯的余数的概念求余数，只能按数论中的余数的定义求余。为了方便 
        计算，我们可以给它加上一个7的整数倍，使它变为一个正数，然后再求余数    
        
        以2049年10月1日（100周年国庆）为例，用蔡勒（Zeller）公式进行计算，过程如下： 
        蔡勒（Zeller）公式：w=y+[y/4]+[c/4]-2c+[26(m+1)/10]+d-1 
        =49+[49/4]+[20/4]-2×20+[26× (10+1)/10]+1-1 
        =49+[12.25]+5-40+[28.6] 
        =49+12+5-40+28 
        =54 (除以7余5) 
        即2049年10月1日（100周年国庆）是星期5。
    */
    uint8_t y, c, m, d;
    int16_t w;

    if (_mon >= 3)
    {
        m = _mon;        
        y = _year % 100;
        c = _year / 100;
        d = _day;
    }
    else    /* 某年的1、2月要看作上一年的13、14月来计算 */
    {
        m = _mon + 12;
        y = (_year - 1) % 100;
        c = (_year - 1) / 100;
        d = _day;
    }

    w = y + y / 4 +  c / 4 - 2 * c + ((uint16_t)26*(m+1))/10 + d - 1;    
    if (w == 0)
    {
        w = 7;    /* 表示周日 */
    }
    else if (w < 0)    /* 如果w是负数，则计算余数方式不同 */
    {
        w = 7 - (-w) % 7;
    }
    else
    {
        w = w % 7;
    }
    return w;
}