Ошибка WinAPI::setFileTimeServer2Client(...) ?

[SnowMan]

Добрый день!

Создайте на сервере AOS файл, например d:\Test.txt
Скопируйте его на клиента в c:\Test.txt

PHP код:

static void Job2(Args _args)
{
    print WinAPI::setFileTimeServer2Client('d:\\Test.txt','c:\\Test.txt');
    pause;
} 


После успешного выполнения, время модификации файла на клиенте отличается на одну две секунды от времени модификации файла на сервере...

В чем может быть ошибка?

PS
Axapta 3.0 SP1
(AOS Thin client)

[SnowMan]

Данное поведение стабильно проявляется только на одном клиенте. (см. рисунок ниже)
Опробовал подключение к разным AOS серверам.

static void Job2(Args _args)
{
    #define.modified(2)
    ;
    print 'Файл на сервере: ', time2str(DVG_Common::getServerFileTime('d:\\Test.txt',#modified),1,1);
    print 'Файл на клиенте: ', time2str(WinAPI::getFileTimeEx('c:\\Test.txt',#modified),1,1);

    print 'Установим время с сервера: ', WinAPI::setFileTimeServer2Client('d:\\Test.txt','c:\\Test.txt');
    
    print 'Файл на сервере: ', time2str(DVG_Common::getServerFileTime('d:\\Test.txt',#modified),1,1);
    print 'Файл на клиенте: ', time2str(WinAPI::getFileTimeEx('c:\\Test.txt',#modified),1,1);

    pause;
}

Пробовал на другом клиенте - там работает нормально.

Не могу найти объяснение...

Есть у кого-нибудь мысли на эту тему?

[mazzy]

может я не совсем в тему.
Похоже вам нужно перетащить файл с сервера на клиента.
Причем скорее всего, это какой-то нужный для работы клиента файл.

Рекомендую посмотреть на класс SysFileDeployer
и на семейство SysFileDeployment

Они как раз занимаются этой задачей.
Вызов этих классов выполняется из Info::Startup
Немного о последовательности вызова при начале работы написано здесь http://axapta.mazzy.ru/hints/startupcmd/

[mazzy]

да, самое главное забыл.

Обратите внимание как копируется файл в SysFileDeployment.copy()

[SnowMan]

Цитата:

Изначально опубликовано mazzy
Похоже вам нужно перетащить файл с сервера на клиента.

Да, это действительно так...
Файл перетаскивается без видимым проблем, а вот установить дату и время исходного файла в файл назначения не получается... или получается, но не на данном клиенте...

Цитата:

Изначально опубликовано mazzy
Обратите внимание как копируется файл в SysFileDeployment.copy()

Да, я смотрел этот класс, и немного подкорректировал свой код, но факт остается фактом, что функция WinAPI::setFileTimeServer2Client(...) на данном клиенте работает не корректно... Смотрел ее код, предраться не к чему - все верно...

Остается подозрение, что виновата машина клиента, но где и что подкрутить даже на ум не приходит...
Возможно завтра придется снести клиента аксапты на этой машине и поставить заново...

Второй день пытаюсь найти ответ, но безуспешно...

[mazzy]

тогда не знаю

[SnowMan]

Переставил клиента Аксапты да данной машине - не помогло...

а ведь не факт что это ограничится только одной машиной...

[Lazy_Tiger]

а может какой нить антивирусный или еще какой монитор файлик цепляет? Index service например.

ну чудеса ж... а их не бывает

[SnowMan]

Цитата:

Изначально опубликовано Lazy_Tiger
а может какой нить антивирусный или еще какой монитор файлик цепляет? Index service например.

ну чудеса ж... а их не бывает

Да нет... файл копируется как бинарный объект. И только после того как он скопирован необходимо установить времена файла оригинала... а вот здесь и начинаются чудеса... а вы говорите их не бывает

[SnowMan]

Попробовал присвоить времена одного локльного файла на машине клиента другому. Переписал WinAPI::setFileTimeServer2Client функцию в локальный job... С локальными файлами все работает нормально (см код и рисунок ниже)

static void Job11(Args _args)
{
    #winAPI
    #define.firstFile('c:\\test1.txt')
    #define.secondFile('c:\\test2.txt')
    #define.offset0(0)
    #define.offset4(4)
    #define.offset8(8)

    int hFile1, hFile2;
    Binary created_1, accessed_1, modified_1;
    Binary created_2  = new Binary(#Offset8);
    Binary accessed_2 = new Binary(#Offset8);
    Binary modified_2 = new Binary(#Offset8);

    ;
    print 'Время первого файла: ', time2str(WinAPI::getFileTimeEx(#firstFile,2),1,1);
    print 'Время второго файла: ', time2str(WinAPI::getFileTimeEx(#secondFile,2),1,1);

    hFile1 = WinAPI::createFile(#firstFile,#OPEN_EXISTING);
    if(hFile1)
    {
        created_1  = WinAPI::getFileTime(hFile1, 0); // createdServer  = WinAPI::getFileTimeServer(serverhFile, 0);
        accessed_1 = WinAPI::getFileTime(hFile1, 1); // accessedServer = WinAPI::getFileTimeServer(serverhFile, 1);
        modified_1 = WinAPI::getFileTime(hFile1, 2); // modifiedServer = WinAPI::getFileTimeServer(serverhFile, 2);

        WinAPI::closeHandle(hFile1);

        if (created_1 && accessed_1 && modified_1)
        {
            created_2.dWord(#offset0, created_1.dWord(#offset0));
            created_2.dWord(#offset4, created_1.dWord(#offset4));
            accessed_2.dWord(#offset0, accessed_1.dWord(#offset0));
            accessed_2.dWord(#offset4, accessed_1.dWord(#offset4));
            modified_2.dWord(#offset0, modified_1.dWord(#offset0));
            modified_2.dWord(#offset4, modified_1.dWord(#offset4));

            hFile2 = WinAPI::createFile(#secondFile, #OPEN_EXISTING, #GENERIC_WRITE);
            if (hFile2)
            {
                print WinAPI::setFileTime(hFile2, created_2, accessed_2, modified_2);
                WinAPI::closeHandle(hFile2);
            }
        }
    }

    print 'Время первого файла: ', time2str(WinAPI::getFileTimeEx(#firstFile,2),1,1);
    print 'Время второго файла: ', time2str(WinAPI::getFileTimeEx(#secondFile,2),1,1);

    pause;
}

Выходит, что функция modifiedServer = WinAPI::getFileTimeServer(serverhFile, 2); возвращает неверное значение

Есть мысли?

[Джон]

Так это проверить можно. Можно прям в setFileTimeServer2Client добавить:

PHP код:

        modifiedServer = WinAPI::getFileTimeServer(serverhFile, 2);
        info(
            time2str(
                WinAPI::SystemTimeToTimeOfDay(
                    WinAPI::fileTimeToSystemTime(modifiedServer)
                )
            ,1,1)
        ); 


и посмотреть какие там секунды будут, правильные или нет. А какой код у DVG_Common::getServerFileTime, если не секрет?

[SnowMan]

Цитата:

Изначально опубликовано Джон
Так это проверить можно. Можно прям в setFileTimeServer2Client добавить:

PHP код:

        modifiedServer = WinAPI::getFileTimeServer(serverhFile, 2);
        info(
            time2str(
                WinAPI::SystemTimeToTimeOfDay(
                    WinAPI::fileTimeToSystemTime(modifiedServer)
                )
            ,1,1)
        ); 


Да я пробовал так, но у меня на этом коде аксапта рушится... :(

Цитата:

Изначально опубликовано Джон

А какой код у DVG_Common::getServerFileTime, если не секрет?

Поэтому пришлось написать эту функцию:

PHP код:

// AOSRunMode::Server
server static int getServerFileTime(str _file, int _type = 2)
{
    return WinAPI::getFileTimeEx(_file,_type);
} 


Но видно они разные значения возвращают...

PS
В функции setFileTimeServer2Client есть такой код как:

WinAPI::closeHandle(serverhfile);

Так этот код не закрывает открытый файл на сервере... вот это точно ошибка...
пришлось написать свой код и использовать его:

PHP код:

server static boolean closeFileServer(int hFile)
{
    DLL         _winApiDLL      = new DLL('KERNEL32');
    DLLFunction _closeHandle    = new DLLFunction(_winApiDLL, 'CloseHandle');

    _closeHandle.returns(ExtTypes::DWord);
    _closeHandle.arg(ExtTypes::DWord);
    return _closeHandle.call(hFile);
} 


[Джон]

Действительно, в трех-звенке почему то падает

А если по аналогии с DVG_Common::getServerFileTime вместо "глючной" WinAPI::getFileTimeServer написать свою функцию class1::getFileTimeServer

PHP код:

// AOSRunMode::Server
server static Binary getFileTimeServer(fileName serverFile, int type = 0)
{
    #WinAPI
    int serverhFile = WinAPI::createFileServer(serverFile, #OPEN_EXISTING);
    binary resfiletime;
    ;
    resfiletime = WinAPI::getFileTime(serverhFile, type);
    WinAPI::closeHandle(serverhFile);
    return resfiletime;
} 


и использовать ее в WinAPI::setFileTimeServer2Client

PHP код:

...
//        createdServer  = WinAPI::getFileTimeServer(serverhFile, 0);
        createdServer  = class1::getFileTimeServer(serverFile, 0);
//        accessedServer = WinAPI::getFileTimeServer(serverhFile, 1);
        accessedServer = class1::getFileTimeServer(serverFile, 1);
//        modifiedServer = WinAPI::getFileTimeServer(serverhFile, 2);
        modifiedServer = class1::getFileTimeServer(serverFile, 2);
.. 


, время одинаковым будет?

[SnowMan]

Цитата:

Изначально опубликовано Джон
время одинаковым будет?

Попробовал - не помогает, на клиенте отличается на 2 секунды в большую сторону

Самое противное, что время создания файла проставляется правильно, а ведь это одна и та же функция работает...

не понимаю...

[Джон]

Попробуй такой job запустить для файла с одинаковым временем created и modified:

PHP код:

static void Job3(Args _args)
{
    #WinAPI
    int serverhFile = WinAPI::createFileServer('D:\\ERP\\TEMP\\test.txt', #OPEN_EXISTING);
    Binary createdServer, modifiedServer;

    createdServer = WinAPI::getFileTimeServer(serverhFile, 0);
    modifiedServer = WinAPI::getFileTimeServer(serverhFile, 2);
    WinAPI::closeHandle(serverhfile);
    print int2str(modifiedServer.dWord(0) - createdServer.dWord(0));
    print int2str(modifiedServer.dWord(4) - createdServer.dWord(4));
    pause;
} 


Если он не 0 0 выдаст, значит действительно WinAPI::getFileTimeServer глючит.

[SnowMan]

Джон, пробовал, но безрезультатно...
Спасибо за участие...

Я пошел другим путем...

Ветка переросла в тему: "Установить время файла"