VC

偶然发现了一个 VC2003 的BUG

杨老师的茅屋 — Sat, 06 Oct 2007 19:06:00 GMT

VC 2003 版本，UNICODE 编译，居然不支持 wsprintf( buf，_T(“%2.1f”)，fValue ) 浮点数格式化？！
由于是 API 函数，估计其它版本的编译器可能也会有问题。

BT 干的好事！

杨老师的茅屋 — Sat, 21 Apr 2007 14:47:00 GMT

        一个C/S程序，我自己写的SERVER，我自己写的CLIENT，他们之间使用TCP通讯。某用户使用CLIENT的时候，服务器经常莫名其妙地崩溃，我自己和同事测试，又总找不到问题。今天终于被我逮到了BUG，在我自己的通讯数据中，居然被BT插入了他的数据:“......我的数据......\rBitTorrent Protocol.......我的数据......”导致我服务程序的崩溃。我的天呀！！！！！TNND，BT真变态！！！和某用户联系询问他是否安装了BT下载软件，回答是“yes”。建议他删除BT后，一切正常了。

        代码改进后，程序终于健壮了。

        友情提示：不要想当然地认为TCP数据就能100%地正确地传递到了对方。

                                                            2007-04-21

CDMA发送短信

杨老师的茅屋 — Fri, 10 Nov 2006 19:13:00 GMT

就这个破程序居然浪费了我4个小时来调试！奉献出来免得大家再走弯路。

SendMMS()
{
    HANDLE hCom = CreateFile( _T("COM1"),
        GENERIC_READ | GENERIC_WRITE,
        0, NULL, OPEN_EXISTING, 0, NULL );
    if( NULL == hCom )    return false;

    DCB dcb;
    ::GetCommState( hCom, &dcb );
    dcb.BaudRate = 9600;
    dcb.ByteSize = 8;
    dcb.Parity = NOPARITY;
    dcb.StopBits = ONESTOPBIT;

    if( !::SetCommState( hCom, &dcb ) )        return false;
    if( !::PurgeComm( hCom, PURGE_RXCLEAR ) )    return false;

    DWORD dw;
    ::WriteFile( hCom, "AT\r", 3, &dw, NULL );
    // 读串口,判断是否正常
                    // 切换到中文短信方式
    ::WriteFile( hCom, "AT+WSCL=6,4\r", 12, &dw, NULL );
    // 读串口,判断是否正常

    ::WriteFile( hCom, "AT+CMGF=1\r", 10, &dw, NULL );
    // 读串口,判断是否正常

    WCHAR wszTxt[500];
    ::wcscpy( wszTxt, L"hello 你好" );

    int len = (int)::wcslen(wszTxt);// 字符长度
    for( int i=0; i<len; i++ )    // 交换高低字节
        wszTxt[i] = MAKEWORD( HIBYTE(wszTxt[i]), LOBYTE(wszTxt[i]) );

    char szNumber[50];        // 手机号码,内容长度
    ::sprintf( szNumber, "AT+CMGS=\"13901112233\",%d\r", len*2 );
    ::WriteFile( hCom, szNumber, (DWORD)::strlen( szNumber ), &dw, NULL );
    ::Sleep(500);

    ::WriteFile( hCom, wszTxt, len*2, &dw, NULL );
    ::WriteFile( hCom, "\x00\x1a\r", 3, &dw, NULL ); // 结束符
        // 读串口,判断是否正常

::CloseHandle( hCom );
return true;
}