ab3b073ef6 2015-04-30 kinaba: import win32.windows; ab3b073ef6 2015-04-30 kinaba: import std.string; ab3b073ef6 2015-04-30 kinaba: import std.file; c2b7a98c21 2011-02-23 kinaba: 4e2933c620 2015-04-21 kinaba: char lastChar( string s ) 4e2933c620 2015-04-21 kinaba: { return *CharPrevA(cast(char*)s.ptr, cast(char*)s.ptr+s.length); } c2b7a98c21 2011-02-23 kinaba: c2b7a98c21 2011-02-23 kinaba: //---------------------------------------------------------------- 4e2933c620 2015-04-21 kinaba: // コマンドライン解析 c2b7a98c21 2011-02-23 kinaba: //---------------------------------------------------------------- c2b7a98c21 2011-02-23 kinaba: 4e2933c620 2015-04-21 kinaba: string[] cmd_parse( string str, bool in_resp=false ) c2b7a98c21 2011-02-23 kinaba: { 4e2933c620 2015-04-21 kinaba: string[] ans; c2b7a98c21 2011-02-23 kinaba: char resp_char = '@'; c2b7a98c21 2011-02-23 kinaba: c2b7a98c21 2011-02-23 kinaba: for(int i=0; i!=str.length; ) c2b7a98c21 2011-02-23 kinaba: { c2b7a98c21 2011-02-23 kinaba: // 空白スキップ c2b7a98c21 2011-02-23 kinaba: while( i!=str.length && 0<=str[i] && str[i]<=' ' ) c2b7a98c21 2011-02-23 kinaba: ++i; c2b7a98c21 2011-02-23 kinaba: if( i == str.length ) c2b7a98c21 2011-02-23 kinaba: break; c2b7a98c21 2011-02-23 kinaba: c2b7a98c21 2011-02-23 kinaba: // ""を考慮して一個パラメタ切り出し 4e2933c620 2015-04-21 kinaba: string param; c2b7a98c21 2011-02-23 kinaba: if( str[i] == '"' ) c2b7a98c21 2011-02-23 kinaba: { c2b7a98c21 2011-02-23 kinaba: int j = ++i; c2b7a98c21 2011-02-23 kinaba: while( j!=str.length ) c2b7a98c21 2011-02-23 kinaba: { c2b7a98c21 2011-02-23 kinaba: if( str[j]=='"' && c2b7a98c21 2011-02-23 kinaba: (j+1==str.length || 0<=str[j+1] && str[j+1]<=' ') ) c2b7a98c21 2011-02-23 kinaba: break; c2b7a98c21 2011-02-23 kinaba: ++j; c2b7a98c21 2011-02-23 kinaba: } c2b7a98c21 2011-02-23 kinaba: param = str[i .. j]; c2b7a98c21 2011-02-23 kinaba: i = (j==str.length ? j : j+1); c2b7a98c21 2011-02-23 kinaba: } c2b7a98c21 2011-02-23 kinaba: else c2b7a98c21 2011-02-23 kinaba: { c2b7a98c21 2011-02-23 kinaba: int j=i; c2b7a98c21 2011-02-23 kinaba: while( j!=str.length && (str[j]<0 || ' '<str[j]) ) c2b7a98c21 2011-02-23 kinaba: ++j; c2b7a98c21 2011-02-23 kinaba: param = str[i .. j]; c2b7a98c21 2011-02-23 kinaba: i = j; c2b7a98c21 2011-02-23 kinaba: } c2b7a98c21 2011-02-23 kinaba: c2b7a98c21 2011-02-23 kinaba: // レスポンスファイル関連の処理 c2b7a98c21 2011-02-23 kinaba: if( !in_resp && param[0]==resp_char ) c2b7a98c21 2011-02-23 kinaba: { c2b7a98c21 2011-02-23 kinaba: try { 9b639cf2d6 2015-05-05 kinaba: string rsp = cast(string) std.file.read( param[1..$] ); c2b7a98c21 2011-02-23 kinaba: ans ~= cmd_parse(rsp,true); c2b7a98c21 2011-02-23 kinaba: } catch( FileException e ) {} c2b7a98c21 2011-02-23 kinaba: } c2b7a98c21 2011-02-23 kinaba: else if( param.length>=2 && param[0..2]=="--" ) c2b7a98c21 2011-02-23 kinaba: { c2b7a98c21 2011-02-23 kinaba: resp_char = (param.length==2 ? '\0' : param[2]); c2b7a98c21 2011-02-23 kinaba: } c2b7a98c21 2011-02-23 kinaba: else c2b7a98c21 2011-02-23 kinaba: { c2b7a98c21 2011-02-23 kinaba: ans ~= param; // 普通にパラメタ追加 c2b7a98c21 2011-02-23 kinaba: } c2b7a98c21 2011-02-23 kinaba: } c2b7a98c21 2011-02-23 kinaba: return ans; c2b7a98c21 2011-02-23 kinaba: } c2b7a98c21 2011-02-23 kinaba: c2b7a98c21 2011-02-23 kinaba: //---------------------------------------------------------------- c2b7a98c21 2011-02-23 kinaba: // DOS形式でファイル音更新時刻を書き換え c2b7a98c21 2011-02-23 kinaba: //---------------------------------------------------------------- c2b7a98c21 2011-02-23 kinaba: 4e2933c620 2015-04-21 kinaba: void dosSetFTime( string fname, ushort date, ushort time ) c2b7a98c21 2011-02-23 kinaba: { c2b7a98c21 2011-02-23 kinaba: FILETIME ft,lc; c2b7a98c21 2011-02-23 kinaba: if( DosDateTimeToFileTime( date, time, &lc ) ) c2b7a98c21 2011-02-23 kinaba: if( LocalFileTimeToFileTime( &lc, &ft ) ) c2b7a98c21 2011-02-23 kinaba: { 4e2933c620 2015-04-21 kinaba: HANDLE han = CreateFileA( toStringz(fname), 4e2933c620 2015-04-21 kinaba: GENERIC_READ | GENERIC_WRITE, 4e2933c620 2015-04-21 kinaba: FILE_SHARE_READ,null, 4e2933c620 2015-04-21 kinaba: OPEN_EXISTING, 4e2933c620 2015-04-21 kinaba: FILE_ATTRIBUTE_NORMAL, 4e2933c620 2015-04-21 kinaba: null ); c2b7a98c21 2011-02-23 kinaba: if( han==INVALID_HANDLE_VALUE ) c2b7a98c21 2011-02-23 kinaba: return; c2b7a98c21 2011-02-23 kinaba: 4e2933c620 2015-04-21 kinaba: SetFileTime( han,&ft,null,&ft ); c2b7a98c21 2011-02-23 kinaba: CloseHandle( han ); c2b7a98c21 2011-02-23 kinaba: } c2b7a98c21 2011-02-23 kinaba: } c2b7a98c21 2011-02-23 kinaba: c2b7a98c21 2011-02-23 kinaba: //---------------------------------------------------------------- c2b7a98c21 2011-02-23 kinaba: // 指定時刻(DOS形式)より新しいファイルか？ c2b7a98c21 2011-02-23 kinaba: //---------------------------------------------------------------- c2b7a98c21 2011-02-23 kinaba: 4e2933c620 2015-04-21 kinaba: bool newer_than( ushort d1, ushort t1, string fname ) c2b7a98c21 2011-02-23 kinaba: { 4e2933c620 2015-04-21 kinaba: HANDLE han = CreateFileA( toStringz(fname), 4e2933c620 2015-04-21 kinaba: GENERIC_READ | GENERIC_WRITE, 4e2933c620 2015-04-21 kinaba: FILE_SHARE_READ,null, 4e2933c620 2015-04-21 kinaba: OPEN_EXISTING, 4e2933c620 2015-04-21 kinaba: FILE_ATTRIBUTE_NORMAL, 4e2933c620 2015-04-21 kinaba: null ); c2b7a98c21 2011-02-23 kinaba: if( han==INVALID_HANDLE_VALUE ) c2b7a98c21 2011-02-23 kinaba: return false; c2b7a98c21 2011-02-23 kinaba: FILETIME ft; c2b7a98c21 2011-02-23 kinaba: GetFileTime( han, null, null, &ft ); c2b7a98c21 2011-02-23 kinaba: CloseHandle( han ); c2b7a98c21 2011-02-23 kinaba: c2b7a98c21 2011-02-23 kinaba: FILETIME lc; c2b7a98c21 2011-02-23 kinaba: FileTimeToLocalFileTime( &ft, &lc ); c2b7a98c21 2011-02-23 kinaba: ushort d2, t2; c2b7a98c21 2011-02-23 kinaba: FileTimeToDosDateTime( &lc, &d2, &t2 ); c2b7a98c21 2011-02-23 kinaba: c2b7a98c21 2011-02-23 kinaba: if( d1 < d2 ) c2b7a98c21 2011-02-23 kinaba: return true; c2b7a98c21 2011-02-23 kinaba: if( d1 == d2 ) c2b7a98c21 2011-02-23 kinaba: return (t1 < t2); c2b7a98c21 2011-02-23 kinaba: return false; c2b7a98c21 2011-02-23 kinaba: } c2b7a98c21 2011-02-23 kinaba: