5分くらいの事路(SJISでエンコードされていると仮定すると)$Nameを"山田 太郎"に変換するとしたら5バイトが12バイトになる為、結果の最大長は元の2.4倍になります。
そこで以下のような手順が考えられます。
1. (ファイルサイズが100MBだとして)100MB確保し、ファイルを読み込む。
2. ファイルサイズの2.4倍にあたる240MBを確保する。
3. 以下のような奴を回す。
コード:
'方法を説明するためのもの。実際に動かしてみたわけじゃないので正確に動くとは限らない。
'inbuf (As *Byte)は入力、outbuf(As *Byte)は出力。
i=0
j=0
Do
k=InStr(i+1,MakeStr(inbuf),"$Name")-1
if k=0 then
lstrcat(outbuf+j,inbuf+i)
else
memcpy(outbuf+j,inbuf+i,k-i)
lstrcat(outbuf+j,Ex"\q山田 太郎\q")
j=j+(k-i)+12'12=lstrlen(Ex"\q山田 太郎\q")
i=k+5'5=lstrlen("$Name")
end if
Loop
4. 必要ならファイルに書き込む。
_________________
Website→
http://web1.nazca.co.jp/himajinn13sei/top.html
ここ以外の場所では「暇人13世」というHNを主として使用。
に署名を書き換えて欲しいと言われたので暇だしやってみるテスト。