передача файла по TCP Опции

[Rastorev]

Добрый день!
Программа клиент TCP должна передавать информацию о файле и сам файл на сервер TCP и отображать ответ и текущее состояние сервера
Сделано стандартно по примеру QT - обмен строковой информации между клиентом и сервером по TCP/IP происходит через открытый сокет,
теперь я пытаюсь разбить файл на блоки и передаю в сокетный поток, а на сервере принимая каждый блок сохраняю в файл, но в файл выводятся иероглифы вместо нужной информации.
Клиента код.

QFile fileopen(sourceFile);
    targetFile = QFileInfo(sourceFile).fileName();
    char block[1024];

    if (fileopen.open(QFile::ReadWrite)) {
        QByteArray arrayBlock;
        QDataStream vivod(&arrayBlock, QIODevice::WriteOnly);
        vivod.setVersion(10);
        vivod << quint16(0) << quint8('S') << targetFile;

        fileopen.seek(0);
        while(!fileopen.atEnd()) {
             quint64 in;
             in = fileopen.read(block, sizeof(block));
            vivod << in;
            }
        vivod.device()->seek(0);
        vivod << quint16(arrayBlock.size() - sizeof(quint16));
        //записываем данные в сокет
        tcpSocket.write(arrayBlock);
        }
    statusLabel->setText("Sending File...");
}

Код сервера

    QDataStream in(this);
    in.setVersion(10);
    if (nextBlockSize == 0) {
        if (bytesAvailable() < sizeof(quint16))
            return;
        in >> nextBlockSize;
    }
    if (bytesAvailable() < nextBlockSize)
        return;

    quint8 requestType;
    QString targetFile;

    in >> requestType;
    if (requestType == 'S') {
        in >> targetFile;
        generateRandomTrip(targetFile);
        QFile target(targetFile);
        if(target.open(QIODevice::WriteOnly)){
            char block[1024];

//может быть ошибка где-то сдесь

            while(!in.atEnd()) {
                quint64 tofile;
                in >> tofile; 
                target.write(block,tofile);
            }
        }
        target.close();
        QDataStream out(this);
        out << quint16(0xFFFF);
        }
    nextBlockSize = 0;
    close();

Нужно сделать так чтобы сервер создавал файл и содержимое полученное от клиента получалось нормальным.
Подскажите пожалуйста, в чем ошибка? может решить эту проблему по другому? Может быть есть какие-нибудь нюансы которые я не учел?
Заранее спасибо!!!

Причина редактирования: используйте тэг code

[LE0N]

Я понимаю что это целый протокол, но это не велосипед изобретать!!!в Delphi это всего лишь одна процедура...

о_О. Чего ж вы на делфи эту прогу не пишете? ))))
Попривыкали, блин, "программировать" компонентами....

sFileData fd;
fd.nFileSize = 1024;
memset( fd.pFileName, 0, sizeof(fd.pFileName));
strcpy( fd.pFileName, "testfile.txt");
socket.write( (const char*)&fd, sizeof( fd));

Уххх, как же душа возрадовалась, когда чистый СИ увидел )

Я уже целые две недели мудохаюсь, не могу передать нормального размера файл, честное слово

Так, может быть, вы расскажете что происходит, когда вы пытаетесь передать файл больше 60кб ?
И это...Мне вот просто интересно...А когда вы долбались 2 недели, проверить во время получения данных на ошибки, которые возратит QDataStream тоже ни как?
И, последний вопрос,

quint64 tofile = in.readRawData(block,sizeof(block));

Вы знаете, что произойдёт, если в tofile попадёт -1 ? Указывающая на то, что при получении произошла ошибка.

[Rastorev]

Вы знаете, что произойдёт, если в tofile попадёт -1 ? Указывающая на то, что при получении произошла ошибка.

Вы все правильно описали что должно произойти.
Вся загвостка оказалась куда более простая чем я думал!!С принимающей стороны надо было ожидать пока все пришедшие bytesavalible() данные будут готовы для чтения