;--------------------------------------------------------------------------------
说明：把uinx文本转换为Windows文本
;--------------------------------------------------------------------------------

changefile proc hfile;传入要转换的文件句柄
    LOCAL hnewfile,readnum
    LOCAL buff[256]:byte
    LOCAL newbuff[256]:byte
;--------------------------------------------------------------------------------
建立新文件
;--------------------------------------------------------------------------------   
    invoke CreateFile,addr sznewfile,GENERIC_WRITE OR GENERIC_READ,FILE_SHARE_READ,
                      0,CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,0
    .if eax != INVALID_HANDLE_VALUE
        mov hnewfile,eax
    .else   
        invoke CloseHandle,hfile
        ret
    .endif
;--------------------------------------------------------------------------------

;--------------------------------------------------------------------------------   
    .while TRUE
        invoke RtlZeroMemory,addr newbuff,256
        invoke ReadFile,hfile,addr buff,256,addr readnum,0
    .break .if !readnum ||!eax;实际读入字节数=0或调用失败，则跳出循环   
        lea esi,buff
        lea edi,newbuff

        .while readnum           
            lodsb            
            .if al==0ah
                mov ax,0a0dh                   
                dec dword ptr readnum
                stosw

            .else                   
                dec dword ptr readnum
                stosb
            .endif           
        .endw

        invoke WriteFile,hnewfile,addr newbuff,sizeof newbuff,addr readnum,0   
    .endw
   
    invoke CloseHandle,hfile
    invoke CloseHandle,hnewfile   
    ret
changefile endp

仿照老罗第十章，第一个小程序写的。
实际输出结果的字节数，为256的倍数。。。


这片段的步骤是：
1.新建一个文件
2.每次读取源文件256个字节
3.筛选后，写入新文件
4.源文件读取完毕或失败，则关闭文件




[ 本帖最后由 okayyyy 于 2010-7-30 23:27 编辑 ]

.while readnum           
            lodsb                    //单字节处理
            .if al==0ah
                mov ax,0a0dh                  
                stosw               //这里需要考虑适当放大newbuf  
            .else               
                stosb
            .endif
                dec readnum          //处理字节数减一即可。           
.endw


[ 本帖最后由 东海一鱼 于 2010-7-30 22:43 编辑 ]

我看看
还是不行，我把newbuff改成512b
他就输出512b的倍数

我怀疑是没有剔除0dh造成的。我再试试

改成这样也不行

xunhuan:
        .while readnum
            lodsb
               .if al==0ah
                    mov ax,0a0dh                   
                    stosw                   
                .elseif al==0dh
                    inc esi
                    dec readnum
                    jmp xunhuan
                .else                   
                    stosb
                .endif   
            dec readnum           
        .endw

我怀疑 writefile 有错
这个函数确实是有错误，你指定多少他就输出多少，
老罗的那段代码用edx保存每次筛选过后的字节数
invoke    WriteFile,_hFile,addr @szBuffer,edx,addr @dwBytesWrite,NULL
 我靠，浪费了我5个小时 我。。。               
         

[ 本帖最后由 okayyyy 于 2010-7-30 23:15 编辑 ]

invoke CreateFile,addr sznewfile,GENERIC_READ,FILE_SHARE_READ,
                      0,CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,0

你居然还能写的进去？？！！

这TM谁写的api介绍

BOOL WriteFile( 　　
HANDLE hFile,                 // 文件句柄 　
LPCVOID lpBuffer,             // 数据缓存区指针 　　
DWORD nNumberOfBytesToWrite,  // 你要写的字节数 　　
LPWORD lpNumberOfBytesWritten,// 用于保存实际写入字节数的存储区域的指针 　　LPOVERLAPPED lpOverlapped     // OVERLAPPED结构体指针 　　);

不能 我IDE的是这样写的  invoke CreateFile,addr sznewfile,GENERIC_WRITE OR GENERIC_READ,FILE_SHARE_READ,0,CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,0



[ 本帖最后由 okayyyy 于 2010-7-30 23:24 编辑 ]

这介绍怎么了?

仔细看看,确实是我错鸟

我开始以为 这个 函数会截断 你指定的内容
比方: newbuff里面只有 'abcd',0

那writefile，就只写到 ‘abcd',0


[ 本帖最后由 okayyyy 于 2010-7-30 23:32 编辑 ]

 .while TRUE
        invoke RtlZeroMemory,addr newbuff,512
        invoke ReadFile,hfile,addr buff,256,addr readnum,0
    .break .if !readnum ||!eax;实际读入字节数=0或调用失败，则跳出循环  
        lea esi,buff
        lea edi,newbuff

        mov ecx,0ffffffffh            //用ECX计数
        .while readnum          
            lodsb           
            .if al==0ah
                mov ax,0a0dh
                sub ecx,2                      
                stosw
            .else              
                stosb
                dec ecx
            .endif
            dec dword ptr readnum          
        .endw
        not ecx //求反，得实际长度      

        invoke WriteFile,hnewfile,addr newbuff,ecx,addr readnum,0 //带入 
    .endw
  
    invoke CloseHandle,hfile
    invoke CloseHandle,hnewfile  
    ret

OK了，你的写入计数器有问题。


[ 本帖最后由 东海一鱼 于 2010-7-30 23:37 编辑 ]

谢谢  非常感谢各位大牛的帮助。。。

看来学完老罗的书也不差多久了