Сколько весит файл

[ndemidov]

Файл на всех компьютерах с OS Windows будет занимать одинаковое кол-во байт?

[Хакер]

[ndemidov]

Да, щас начнутся приколы...

И забыл ещё спросить. Я хочу это узнать, для обновления. Чтобы сравнивать при окончании загрузки файла, правильно ли он скачался - сравнивать его количество байт. Так вот, второй вопрос: какой параметр для этого брать:
Размер или Размер на диске ?

---
P.S. Я думаю, что файл занимает одинаковое кол-во бит на всех 8-битовых компьютерах и нужно брать параметр "Размер на диске", а "Размер", помойму, показывает размер с учётом кластеров.

[Хакер]

какой параметр для этого брать

Размер

Но это ничего не гарантирует. Надо считать CRC, а лучше CRC32, а ещё лучше MD5.
Главное знать эталонное значение.

[Хакер]

8-битовых компьютерах

Вот 8-битоый компьютер:

[ndemidov]

8-битовых компьютерах

Я имел ввиду ЭВМ, где байт = 8 бит.

Как мне тогда лучше быть. Непонимаю, что такое CRC и как им делать. Как мне лучше сравнивать файл, сравнивать с +- 100 Кб, так пойдёт?

прикольный комп

[Хакер]

Как мне тогда лучше быть.

Понять тысячу вещей, непонимать которые — адский стыд.

[ndemidov]

Не, не стыдно

Так всё-таки прибавлять +- 200 Кб. норм будет? С CRC нехочу возиться, так как я сам менеджер этого проекта и считаю неоправданной вклад усилий на изучение этого, в связи с чем хочу найти более дешёвый и приемлемый, хоть и менее надёжный способ ))

[Хакер]

Мне противно вести обсуждение в таком ключе.

[iGrok]

О господи.. Вот из-за таких "менеджеров", которые считают, что изучать вопрос совершенно необязательно, у нас и существует на рынке туева хуча говнософта...

1) "Размер" - размер файла.
2) "Размер на диске" - реально занимаемый объём с учётом размера кластера. Он больше. Можно было бы и догадаться, если ну хоть на секунду включить мозг.
3) Само по себе совпадение размера не гарантирует ВООБЩЕ НИЧЕГО. Надёжность метода - нулевая. Проверять надо контрольную сумму. Какие алгоритмы расчёта контрольной суммы лучше использовать выше написал Хакер. Готовых реализаций каждого из этих алгоритмов в сети есть безумное количество.

[ndemidov]

О господи.. Вот из-за таких "менеджеров", которые считают, что изучать вопрос совершенно необязательно, у нас и существует на рынке туева хуча говнософта...

Ага, но я имел ввиду свой бесплатный проект Wiki Wiki Earth, так что никто не пострадает, а если и пострадают, то там написано No any warranties

Пасибо обоим

[iGrok]

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

[ndemidov]

Нашёл другой способ. Повторю задачу: нужно, чтобы программа определяла, не повреждённый ли скачался файл из инета.

Способ: После скачки получаю номер его версии. Если битый файл - его свойства видимо не получается прочитать. Очевидно, что может возникнуть ситуация, когда файл будет битым, но где-то как-то его номер версии удастся прочитать. Но способ лёгкий.

Код: Выделить всё

Номер версии получаю классом
Dim ## As FileVersionInfo = FileVersionInfo.GetVersionInfo()

[Хакер]

Повторю задачу: нужно, чтобы программа определяла, не повреждённый ли скачался файл из инета.

Повторю единственное верное решение: считать контрольную сумму или хеш.

[ndemidov]

окей, для меня слишком сложно, поэтому остановлю свой выбор на предыдущем варианте.

[Хакер]

Тогда предлагаю другое решение:

Код: Выделить всё

If Rnd() > 0.777 Then
    MsgBox "Файл загрузился неправильно!"
Else
    MsgBox "Файл загрузился правильно."
End If

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

[ndemidov]

Неужели, все кто делают апдейты проверяют контр. суммой\хэшем?

Тут нужно знать как часто совпадут два условия: версия файла прочтётся до правильной и файл где-то будет битым.

Я этого не знаю, но ты для меня авторитетен и говоришь, что похоже это будет часто. Что меня не обнадёжило.

И как часто такое случится?

[Хакер]

Неужели, все кто делают апдейты проверяют контр. суммой\хэшем?

Ты не поверишь, но это так. Тысячи строк кода, ради того, чтобы даже при самых невероятных обстоятельствах, обновление либо завершилось успешно, либо не завершилось вообще. Чтобы никакой вероятности, что обновление всё испортит — не было.

[iGrok]

И как часто такое случится?

Можно хоть обрезать полфайла, а версия будет нормально читаться. Главное, знать какие полфайла обрезать.
Это ж обычный ресурс. Он физически находится недалеко от начала файла.

Блин, тебе что, трудно найти класс для подсчёта md5 файла?

[ndemidov]

Ясно.

Кстати, вариант с проверкой файла по версии успешно реализовал, работает при сильной потере как у меня сейчас (200кб из 1,4Мб).

Да трудно. А теперь знаю что искать. Может поищу на неделе или после. С завтрашнего дня решил заняться лимитным Холдэмом. Да, галопом по европам.

[Хакер]

Блин, тебе что, трудно найти класс для подсчёта md5 файла?

Скорее даже не нужно искать класс (он будет уродлив): начиная с Windows 2000 доступно это.

[ndemidov]

Нашёл алгоритм MD5 in VB.NET, пробежал MD5 описание, какой параметр вводить в функцию по которому будем проверять идентичность программы?

[Хакер]

Пробегись ещё раз тогда.

[ndemidov]

Байтовый массив. И на выходе получить короткую строку надо. С MD5 кажется получаем 128-чего то там строку

Хеш содержит 128 бит (16 байт) и обычно представляется как последовательность из 32 шестнадцатеричных цифр.

На одном сайте нашёл готовый код. Сижу щас разбираюсь что что означает.

Код: Выделить всё

Imports System.IO
Imports System.Security.Cryptography
Module Module1
    Sub Main()
        Dim hashCode As Byte()
        Using stream As Stream = File.OpenRead("d:\Video\South.Park_S12_E01_Tonsil.Trouble.avi")
            hashCode = System.Security.Cryptography.MD5.Create.ComputeHash(stream)
        End Using
        Console.WriteLine(Convert.ToBase64String(hashCode))
    End Sub
End Module

Похоже хэш потом ещё раз загоняют в кодирование по какому-то ещё одному одному алг. шифр. Base64. Так как цель - проверить хэш, а не пароль, то это не нужно.

[FireFenix]

Как всё пИчально...

После функции хеширования ты получаешь массив hashCode As Byte()
Так почему бы его не сравнивать с эталонным, который получается после хеширования исходного файла?

[ndemidov]

Ну, я пример привёл.

А в строку Byte() придётся перевести. Ищу щас соответствующую функцию. А эталонная строка-хэш будет скачиваться с интернета.

---Added:
Понял, что Base64 не шифровка

---
Ну так как, Хакер, теперь нормально? Спасибо тебе и Игроку.

[Банкир]

Вот 8-битоый компьютер:

я помню на таком в школе играл ) в какие то гонки

[arthur2]

А в строку Byte() придётся перевести. Ищу щас соответствующую функцию

Код: Выделить всё

dim b() as byte, s as string,t as string
s="lalala"
b=s
debug.print b(0);b(1);b(2);b(3)'и т. д.
t=b
debug.print t


[ndemidov]

Вообще я просто написал, сказать что делаю

Я уже сделал по старинке - прогонкой массива в цикле. И в примере так же делают.

Хотел уж было ознакомиться с новым знанием синтаксиса ЯП, что любопытно. Заметил странные точки с запятыми...

При:

Код: Выделить всё

Dim b() As Byte, s As String, t As String
        s = "lalala"
        b = s

b=s -- VB.NET (VS2008) выдаёт ошибку "Value of type 'String' cannot be converted to '1-dimensional Array of byte'."
Видимо ты на C# писал и поэтому код не работает или из-за версии студии.

Правда я так и не разобрался в этом базовом синтаксисе Представляю, конечно, что-то но... может завтра ознакомлюсь.

---
Кстати, хотел спросить: в функцию-то MD5 для хэширования что вставлять? Я вставляю байты файла. Правильно?

[Хакер]

Вот ведь как дотнет разжижжает мозг.