VAIOリカバリディスクからのファイル取り出し　簡単版：モロのメモ帳：SSブログ

	ブログをはじめるログイン

ALIXのインストール手順予告｜VAIO TZのXP化 VAIOモバイル.. ブログトップ

VAIOリカバリディスクからのファイル取り出し　簡単版 [編集]

VAIO TZのXP化完全版その１リカバリディスク(Recovery Disc)からファイル取り出しで、取り出し方法（拡張子MODというファイルの解凍方法）を記述してみたけど、詳細すぎてわらりずらいので、手っ取り早く取り出す方法を記載する。

以下、作業ディレクトリをD:\tmp、光学ドライブをE:として説明。また、OSはXPとする。

Windows AIKをダウンロードしてインストール
下記のテキストボックスの内容をコピーして、それぞれ、unmod.bat、unmodall.bat、ch.vbsというファイル名で、 D:\tmpに保存
E:ドライブにリカバリディスク(Recovery Disc)をセット
「スタート」⇒「プログラム」⇒「Microsoft Windows AIK」⇒「Windows PE Tools コマンドプロンプト」でコマンドプロンプトを開く
D:\tmpに移動
「unmodall.bat E:」と入力
D:\tmp\extract以下に解凍される

ファイル名：unmod.bat

@echo off

set MOUNT_DIR=%CD%\mnt
set EXTRACT_DIR=%CD%\extract
set WIM_NAME=tmp.wim

set FN=%~n1
set FH=%FN:~0,4%
if "%FH%" == "MOD-" set FN=%FN:~4%

echo Processing %~1 ....

mkdir "%EXTRACT_DIR%\%FN%"

wscript ch.vbs "%~1" "%EXTRACT_DIR%\%WIM_NAME%"
imagex /mount "%EXTRACT_DIR%\%WIM_NAME%" 1 "%MOUNT_DIR%"
xcopy /E /H "%MOUNT_DIR%" "%EXTRACT_DIR%\%FN%"
imagex /unmount "%MOUNT_DIR%"

del "%EXTRACT_DIR%\%WIM_NAME%"

ファイル名：unmodall.bat

@echo off

IF "%1" == "" goto error

set MOUNT_DIR=mnt
set EXTRACT_DIR=extract

if not exist %EXTRACT_DIR% mkdir %EXTRACT_DIR%
if not exist %MOUNT_DIR% mkdir %MOUNT_DIR%

for /r %~d1\ %%f in (*.mod) do call unmod.bat "%%f"

goto end

:error
echo Usage: %0 DRIVE
echo   DRIVE：リカバリディスクのドライブを指定する
echo.
echo   実行例：Eドライブにリカバリディスクがある場合
echo     C:\ %0 E:
echo.

:end

ファイル名：ch.vbs

Option Explicit

Const ENCODE_UNICODE = "unicode"

' StreamTypeEnum
Const adTypeBinary = 1
Const adTypeText = 2

'*********************************************************************
' ByteStreamクラス
' version 1.1
'*********************************************************************
Class ByteStream
  Private innerArray(255)
  '=================================================================
  ' クラスの初期化処理
  '=================================================================
  Private Sub Class_Initialize()

    Dim wkStream
    Set wkStream = WScript.CreateObject("ADODB.Stream")
    wkStream.Type = adTypeText
    wkStream.Charset = ENCODE_UNICODE
    wkStream.Open

    Dim i
    For i=0 To &hff
      wkStream.WriteText ChrW(i)
    Next
    wkStream.Position = 0
    wkStream.Type = adTypeBinary

    If ("fe" = LCase(Hex(AscB(wkStream.Read(1))))) Then
      wkStream.Position = 2
    End If

    For i=0 To &hff
      wkStream.Position = wkStream.Position + 1
      innerArray(i) = wkStream.Read(1)
    Next

    wkStream.Close
    Set wkStream = Nothing
  End Sub
  '=================================================================
  ' 指定した数値のByte()を返す
  '=================================================================
  Public Function getByte(num)
    If (num < 0) Or (UBound(innerArray) < num) Then
      getByte = innerArray(0) '0x00を返す
    Else
      getByte = innerArray(num)
    End If
  End Function
End Class

Dim sIn, sOut
Dim inputfile, outputfile, file, appname
Dim bstream
Dim line

Set bstream = New ByteStream

inputfile = WScript.Arguments(0)
outputfile = WScript.Arguments(1)

Set sIn = CreateObject("ADODB.Stream")
Set sOut = CreateObject("ADODB.Stream")

sIn.Type = 1 ' バイナリーモード
sOut.Type = 1
sIn.Open
sOut.Open

sIn.LoadFromFile(inputfile)

line = sIn.Read(16)
sOut.Write bstream.getByte(&H4D)
sOut.Write bstream.getByte(&H53)
sOut.Write bstream.getByte(&H57)
sOut.Write bstream.getByte(&H49)
sOut.Write bstream.getByte(&H4D)
sOut.Write bstream.getByte(&H00)
sOut.Write bstream.getByte(&H00)
sOut.Write bstream.getByte(&H00)
sOut.Write bstream.getByte(&HD0)
sOut.Write bstream.getByte(&H00)
sOut.Write bstream.getByte(&H00)
sOut.Write bstream.getByte(&H00)
sOut.Write bstream.getByte(&H00)
sOut.Write bstream.getByte(&H0D)
sOut.Write bstream.getByte(&H01)
sOut.Write bstream.getByte(&H00)

Do Until sIn.EOS
  line = sIn.Read(256)
  sOut.Write line
Loop

sOut.SaveToFile outputfile, 2 '上書きモード

sOut.Flush

sIn.Close
sOut.Close

Set sIn = Nothing
Set sOut = Nothing
Set bstream = Nothing

参照サイト：SEI STREET

VAIO TZのXP化シリーズ

2008-03-11 11:26 nice!(0) コメント(31) トラックバック(0)
共通テーマ：パソコン・インターネット

nice! 0

御記事を参考に明日にでもTZ2をXP化の予定です。
以前にあった「head.datという名の16バイトのファイル」
もch.vbsで…有難いしだいです。

by muili (2008-03-11 16:45)

上記バッチファイル等で、たぶん簡単にファイルが取り出せると思いますが、あんまりテストしていないので、うまく動作しなかったら教えてください。

by moro (2008-03-11 19:35)

ありがとうございます。これで、問題なくXP化をできそうです。
ところで、ワンセグはどのソフトを使用するのでしょうか？
by Taka (2008-03-13 22:46)

こんにちは、サイトを参考にXP化しました。
しかしどういうわけか、充電中にスタンバイとか休止を選ぶと青画面再起動してしまいます。
バッテリーモードでもそういう事態にならないのですが・・・なんでですかね？
by ジュン (2008-03-14 01:41)

Takaさん
ワンセグを見るにはVAIO モバイルTVというアプリをインストールする必要があるのですが、リカバリディスクから取り出したVAIO モバイルTVのセットアップディスクでは、インストールできないので結構複雑な手順が必要です。別途まとめようと思っているのですが、時間がなくて・・・。
by moro (2008-03-14 10:18)

ジュンさん
私はその状況になったことがないので何とも言えないのですが、実は、電源管理は結構怪しいと思ってます。私の場合、休止状態にできなくなってシャットダウンしなければならなくなることが多々あります。また、バッテリーの持続時間もVistaのときより短いようです。
ちなみに、スタンバイや休止にするとき、ファンクションキーと、スタートメニューからとどちらでやっても、青画面になりますか？
by moro (2008-03-14 10:24)

先日は、ご回答下さり本当にありがとうございます。

実は、あの後ＸＰの再セットを実施しておりまして、課題だった輝度調整、音量調整がキー操作できるようになりました！

で、こちらを見て早速リカバリーディスクからのファイル取り出しにチャレンジさせていただいたのですが、下記のエラーが発生してしまいました。。。

＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
スクリプト：c:\Documents and settings\***\デスクトップ\tmp\ch.vbs
行:　 68
エラー:　プロシージャの呼び出し、または引数が不正です。:'Mid'
コード:　 800A0005
ソース:　Microsoft VBScript 実行時エラー
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿

どのように訂正したら、実行できるのでしょう？
本当に毎回質問ばかりですみません。

by つちー (2008-03-14 11:10)

つちーさん
スクリプトを修正しました。再度、上記３つともコピー＆保存して、実行してみてください。

by moro (2008-03-15 11:32)

新しいスクリプトで、全てのデータを吸出しできました。
XP化も無事できました。ありがとうございました。
ほぼ全ての機能が使用でき快適です。

ところで、Vaio Launcherについてはインストーラはどこに
あるのでしょう？TZ2-RDには、レジストリ修正用のファイルは
ありますが・・・・。
（ほとんど使わないので、問題ないですが）

ワンセグについても、時間があるときにUpお願いします。
TX3のXP用のプログラムを使用するのでしょうか？

最後に、繰り返しになりますが、本当にありがとうございました。

by Taka (2008-03-15 23:11)

moroさん、ありがとうございます。
僕もリカバリーディスクからのアプリケーション取り出しに成功しました。
まだ設定・インストールは実施しておりませんが、時間のある際に最初から
セットアップしてみようかと思っています。
やはり、なれた環境が一番ですね。

今後の更新を楽しみにしています。

by つちー (2008-03-16 10:57)

お返事ありがとうございます。

って、ＸＰ化するとバッテリーの時間短くなるんですか？
ＸＰ化にすると性能が上がって更にバッテリー時間
が延びると期待してＸＰ化したんですがねｗ
うーん今のVistaって結構安定なんですかね。
最初からＸＰ入れるからBASICでいいやとオーダーしたので泣けていました。
by ジュン (2008-03-16 11:51)

ジュンさん
XPの方がバッテリーの駆動時間が延びるということは特にないのではないかと思います。本来なら、XPでもVistaと同等の駆動時間が実現できるはずだと思われるのですが、電源管理系のアプリが正しく動作してないのかもしれません。駆動時間が延びる方法などもしわかったら、教えてもらえると助かります。

by moro (2008-03-16 13:01)

こちらを参考にしてリカバリディスクからファイルの取り出しを行いました。以前他のサイトを参考にＸＰ化しておりましたが、再度ＸＰをインストールし直す予定です。ここで質問ですが、chipsetドライバのsetup.exeはどのフォルダになるのでしょうか？
by snb (2008-03-23 00:11)

snbさん
ドライバ類は、TZ2のプレインストール状態のC\Windows\Driversディレクトリに存在します。リカバリディスクからは取り出せません。また、Chipsetであれば、Intelのサイトから最新版をDLしても大丈夫かと思います。
by moro (2008-03-24 08:35)

moroさんコメントありがとうございます。試してみます。今後もこのサイトを参考にさせていただきます。m(_ _)m
by snb (2008-03-25 20:51)

初めまして。
ここを参考にXP化順調に進んでおります。
ありがとうございます。

しかしながら、リカバリディスク１のファイルが取り出せませんでした。
スクリプト：D￥tmp￥ch.vbs
行：７５
文字：１
エラー：ファイルを読み取れませんでした。
コード：800A0BBB
ソース：AD0DB.Stream

以上のエラーがでてしまいます。
ディスク２は問題なかったんですが…
何か対策はありませんでしょうか？

by いすむす (2008-04-08 23:36)

いすむすさん
unmodall.batの最初の行の@echo offを削除すれば、DOS窓にいろいろ表示されますが、どのファイルで止まっているかわかりますか？
by moro (2008-04-09 00:13)

moroさん
素早いレスありがとうございました。
確認いたしましたところ、６行進みました。
CDROMはＧドライブになっています。

D:\tmp>IF ":G" == "" goto error
............
D:\tmp>for /R D:\ %f in (*.mod) do call unmod.bat "%f"
D:\tmp>goto end
で終了しています。
なにかお気づきの点ありますでしょうか？

by いすむす (2008-04-09 21:51)

おはずかしいです。
コマンド間違えて：Ｇと打ち込んでました

Unmount Error: Did not find an image mounted to [D:\tmp\mnt].
D:\tmp\extract\tmp.winが見つかりませんでした。
でエラーとなっていまいます。

by いすむす (2008-04-09 22:00)

moroさん
おはずかしいです。
コマンド打ち間違えでしたね。

tmp.wimが見つかりません。
で止まってしまいます。

リカバリディスク２は抽出できたのでextractフォルダを観察していたのですが、ディスク１ではたしかにtmp.wimが作成されないようです。

by いすむす (2008-04-09 23:50)

いすむすさん
もう少し手前のメッセージはわかりますか？
「Processing」で始まるメッセージが表示されているかと思います。

by moro (2008-04-09 23:54)

いすむすさん
あと、Ｄドライブに展開しているようですが、Ｄドライブの空きは十分ありますか？
by moro (2008-04-09 23:57)

moroさん、何度も申し訳ないです。

G:\DATA\2007\03\JP_2007315000000000000000000009\MOD-MUSIC_SERVER_CONTROLLER 1.1.MOD ....

DOS窓はここで止まっています。
前述のスクリプトエラーがでてしまうのです。
ＯＫで次に進むと

0個のファイルをコピーしました
Unmounting: [D:\tmp\mnt]...
Unmount Error: Did not find an image mounted to [D:\tmp\mnt].
D:\tmp\extract\tmp.wimが見つかりませんでした。

となり空のフォルダだけが出来ています。
そして次のプロセスでも同じ事の繰り返しです。
最終的にはすべてのプロセスで同じエラーが繰り返され、空フォルダがたくさんできます。ひょっとしてリカバリディスクが悪いのでしょうか。

by いすむす (2008-04-10 00:23)

いすむすさん
本来は、MOD-MUSIC_SERVER_CONTROLLER 1.1.MODというファイルをD:\tmp\extract\tmp.wimというファイルに変換して、それから解凍するという処理になるのですが、tmp.wimへの変換できていないようです。
一番考えられるのは、やはりＤドライブの容量不足です。空き容量が十分にあるのなら、リカバリディスクからの読み出しに失敗しているかもしれません、もし、空き容量が十分にあるのなら、リカバリディスクの内容をD:\disc等に全部コピーして、「unmodall d:\disc」等としてみてください。
by moro (2008-04-10 08:25)

moroさん
いろいろ教えていただきありがとうございます。
Ｄドライブの空き容量は１０ＧＢほどなので、十分だと思います。
今日は私用により検証できないため、明日以降ディスク１の内容を
コピーして検証してみます。

ありがとうございました。

by いすむす (2008-04-10 12:19)

moroさん
お騒がせしました。無事すべて抽出出来ました。
リカバリディスク１のＨＤコピーはエラーがでて出来なかったので
True Imageでバックアップしてあったリカバリ領域を
外付けＨＤに展開してアプリの抽出を行いました。
やっぱりディスク不良だったのかもしれませんね。

ありがとうございました。

by いすむす (2008-04-11 22:43)

いすむすさん
よかったですね。
by moro (2008-04-12 00:33)

はじめてメールさせていただきます。
今、ダウングレードを行っており、色々と参考にさせていただきありがとうございます。その中で、ファイルからの取り出し　追加版にあります、SNYファイルのイメージファイルの変換で
　ｽｸﾘﾌﾟﾄ:　　E:\tmp\ch.vbs
行　　　　　75
　文字　　　　1
　エラー　　　File could not be opened.
コード　　　800A0BBA
ソース　　　ADODB.Stream
のエラーが出ます。
ほとんど、知識がありません。
対処方法についてご教示をお願いいたします。
アプリケーションについては既にディスクから取り出せてます。
宜しくお願いいたします。
by hidemiwa (2008-05-17 11:31)

hidemiwaさん
E:\tmpディレクトリに、P2.SNYというファイルをコピーしているかと思いますが、P2.SNY.orgという名前にリネームして実行してみてください。
by moro (2008-05-22 19:11)

moroさん　本当にありがとうございました。無事インストール完了です。
但し、camera（motion　eye）が使えません。
ドライバも見つからず、困っております。
USB　VIDEO　DEVISEとUSB　DEVISEのみが未完了のマークになっております。DRIVERの入手先など設定方法を教えていただけないでしょうか？
何卒、宜しくお願いいたします。

by hidemiwa (2008-05-27 19:44)

XP化、参考にさせて頂き、何とか成功。

最後、TZ90Sで、スタンバイ／休止にすると青画面になってしまう問題がありましたが、Vaio Power manegment （バイオ省電力設定）から、モデムの電源をオフにして解決。

モバイルTVは、2.1でインストール、ドライバを5.1を使って起動、起動しても「選局中」が表示されたまま動画が出ないので、退避してあった5.1(5.0?)のディレクトリを丸ごとコピーして（Windowsを再起動しないで)起動（※）。さらにWindowsを再起動して起動したら表示される様に。何がなにやら…
※最初入れ替えたときは、起動に失敗するので2.1しか使えないと思っていたのだけど、なぜか使える様に。2.1で色々使った後で上書きするのはアリなのかも？

…ということで、快適な環境を入手できました。ありがとうございます。
Vista⇔XPの体感比は3倍～４倍位ある様な気がします (^^)
by ping (2008-07-21 16:35)