Форум программистов, компьютерный форум, киберфорум
Наши страницы
Комментарии
Войти
Регистрация
Восстановить пароль
  1. Старый комментарий
    Аватар для mozgotron
    Набросок к новому десятичному хеш-алгоритму
    Avazart, знаете почему я пощу новые версии кода, оставляя старые. Чтобы эта страница в моём блоге наглядно показывала, что именно я являюсь разработчиком этого кода. То есть, чтобы в случае чего не было проблем с доказыванием моих авторских прав на этот алгоритм.
    Запись от mozgotron размещена 22.05.2018 в 23:29 mozgotron вне форума
  2. Старый комментарий
    Аватар для mozgotron
    Набросок к новому десятичному хеш-алгоритму
    Orlangur1991, исправил
    Dim B() As Char = strT.

    Avazart, учту на следующий раз.
    Запись от mozgotron размещена 22.05.2018 в 23:25 mozgotron вне форума
  3. Старый комментарий
    Аватар для Orlangur1991
    Набросок к новому десятичному хеш-алгоритму
    Разве не должен массив строится из передаваемой строки?
    vb.net
    1
    
    Dim B() As Char = strT
    И можно сократить вызов функции
    vb.net
    1
    
    TextBox1.Text &= hashgen(RichTextBox1.Text) & NewLine
    Запись от Orlangur1991 размещена 22.05.2018 в 13:30 Orlangur1991 вне форума
    Обновил(-а) Orlangur1991 22.05.2018 в 18:53
  4. Старый комментарий
    Аватар для Avazart
    Набросок к новому десятичному хеш-алгоритму
    Почему сразу не редактировать запись блога? Зачем постить в комменты?
    Запись от Avazart размещена 22.05.2018 в 11:54 Avazart на форуме
  5. Старый комментарий
    Аватар для mozgotron
    Набросок к новому десятичному хеш-алгоритму
    Новая версия функции десятичного хеширования (CODES10-hash)

    vb.net
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    
    Imports System.Text.Encoding
    Imports System.Text.StringBuilder
    Imports System.Environment
     
    Public Class Form1
        Dim c As Long
        Dim i As Long
        Dim s As String
        Dim t As String
     
        Private Sub RichTextBox1_TextChanged1(ByVal sender As Object, ByVal e As System.EventArgs) Handles RichTextBox1.TextChanged
            t = RichTextBox1.Text
            hashgen(t)
            TextBox1.AppendText(s & NewLine)
        End Sub
     
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            t = RichTextBox1.Text
            hashgen(t)
            TextBox1.AppendText(s & NewLine)
        End Sub
     
        Function hashgen(ByVal t As String) As String
           i = 1
            c = 123456789
            Dim B() As Char = t
            For Each bs As Char In B
                c = (c * AscW(bs) + i) Mod 10000000000
                i += 1
            Next
            s = Strings.Right(c.ToString.PadLeft(10, "0"c), 10)
            Return s
        End Function
     
    End Class
    Запись от mozgotron размещена 22.05.2018 в 11:39 mozgotron вне форума
  6. Старый комментарий
    Аватар для mozgotron
    Набросок к новому десятичному хеш-алгоритму

    Исправленная функция десятичного хеширования

    vb.net
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    
    Imports System.Text.Encoding
    Imports System.Text.StringBuilder
    Imports System.Environment
     
    Public Class Form1
        Dim codes As UInt64
        Dim index1 As UInt64
        Dim index2 As UInt64
        Dim strind As String
        Dim strT As String
     
        Private Sub RichTextBox1_TextChanged1(ByVal sender As Object, ByVal e As System.EventArgs) Handles RichTextBox1.TextChanged
            strT = RichTextBox1.Text
            hashgen(strT)
            TextBox2.AppendText(strind & NewLine)
        End Sub
     
        Function hashgen(ByVal strT As String) As String
            codes = 0
            index1 = 0
            index2 = 1234567899876543210
            Dim B() As Char = strT
            For Each bs As Char In B
                index1 = AscW(bs) * 1000000000000000 + index2 \ 10
                index2 = index2 Xor index1
            Next
            codes = ((index2 \ 10000000000) + 10000000000) - (index2 Mod 10000000000)
            strind = Strings.Right(codes.ToString.PadLeft(10, "0"c), 10)
            Return strind
        End Function
     
    End Class
    Запись от mozgotron размещена 09.04.2018 в 11:31 mozgotron вне форума
  7. Старый комментарий
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Написал такую прогу на c++(консольное приложение).
    Да, нету красивого интерфейса, зато спокойно сплю по ночам.
    Запись от Levon1999 размещена 24.01.2018 в 20:43 Levon1999 вне форума
  8. Старый комментарий
    Аватар для bedvit
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Цитата:
    Сообщение от Rius Просмотреть комментарий
    почитал... Сложилось впечатление, что цель некоторых тем - просто собрать положительные отзывы о выкладываемом продукте, без дальнейшего его "допиливания", по причине "мне и так нравится". С указанием сколько времени, сил, валерьянки потрачено. Хотите - доделывайте сами, мне уже надоело пилить этот проект, по причине...(здесь следует важная причина). Ради объективности скажу, что иногда действительно бывают такие причины (но это видно в процессе переписки, чел.готов доработать... в некоторой видно... не готов )
    Запись от bedvit размещена 24.01.2018 в 10:06 bedvit вне форума
  9. Старый комментарий
    Аватар для Rius
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Главное не уподобляться ToDo для разработчика ~ "сделал как умею (как получилось), и исправлять ничего не хочу - жрите так".
    Запись от Rius размещена 23.01.2018 в 21:22 Rius вне форума
  10. Старый комментарий
    Аватар для bedvit
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Цитата:
    Сообщение от mozgotron Просмотреть комментарий
    Rius, в общем я понял: никому моя программа не нужна. Тогда я её нигде больше рекламировать не буду, ни в Гугл+, ни на Ютубе. Сам один буду юзать.
    быстро вы сдались выложите в тестирование, возможно родится хороший продукт.
    Запись от bedvit размещена 23.01.2018 в 21:19 bedvit вне форума
  11. Старый комментарий
    Аватар для bedvit
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Цитата:
    Сообщение от Rius Просмотреть комментарий
    Security through obscurity.
    - интересная статья.
    Запись от bedvit размещена 23.01.2018 в 21:11 bedvit вне форума
  12. Старый комментарий
    Аватар для bedvit
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Зачем её декоммпилировать, должен быть где-то код. Это же опен) а про алгоритмы шифрования нужно немного почитать, и поймете.
    Запись от bedvit размещена 23.01.2018 в 21:00 bedvit вне форума
  13. Старый комментарий
    Аватар для Rius
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Цитата:
    Одно не пойму, как автор мог выложить алгоритм шифрования своей проги на всеобщее обозрение?
    Давно уже общеизвестно, что закрытие алгоритма шифрования является его не защитой, а уязвимостью. Почитайте про Security through obscurity.
    Запись от Rius размещена 23.01.2018 в 20:59 Rius вне форума
  14. Старый комментарий
    Аватар для mozgotron
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Avazart, а можно декомпилировать программу KeePass 2 и узнать её алгоритм шифрования? Теоретически имею в виду. Или её автор как-то защитил от декомпиляции?
    Хотя какой смысл, если KeePass 2 - open source. Одно не пойму, как автор мог выложить алгоритм шифрования своей проги на всеобщее обозрение?
    Запись от mozgotron размещена 23.01.2018 в 20:51 mozgotron вне форума
  15. Старый комментарий
    Аватар для Rius
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Надо тестировать на всех виндах, начиная с Windows XP x86, или на худой конец Windows 7 x86/x64. Без установленных .Net Framework и MS VC++ Runtime Libraries. И требования должны быть прописаны и известны до попытки установки.

    Пользователей мало волнует, что там требуется для установки. А если прога неизвестная, разбираться никто не будет, просто удалят нафиг и забудут.
    Запись от Rius размещена 23.01.2018 в 20:48 Rius вне форума
  16. Старый комментарий
    Аватар для mozgotron
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Rius, я в шоке. Она ещё и ошибки выдаёт? С ума сойти! На ТРЁХ компах с тремя разными ОСями тестировал — на каждом работает.
    Сейчас установил КиПасс 2. Блин, у этой программы такой сложный интерфейс
    Rius, спасибо за поддержку и полезную ссылку на бета-тестирование.
    Запись от mozgotron размещена 23.01.2018 в 20:45 mozgotron вне форума
  17. Старый комментарий
    Аватар для Rius
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Вот я скачал-таки ваш установщик. Запустил его. И что я вижу?
    Скриншоты в комменты к блогам добавлять почему-то нельзя, так что привожу текст с окна:

    Цитата:
    Распаковщик файлов от Архива Мозготрона
    Распаковщик файлов от Архива Мозготрона has stopped working.

    Windows can check online for a solution to the problem the next time you go online.
    Кнопка "Check online for a solution later and close the program."
    Кнопка "Close the program."
    Ну правда, вам в бета-тест надо было заявиться сначала, а потом уже, после исправления всех замечаний, мечтать о всяких регистрациях.
    Запись от Rius размещена 23.01.2018 в 20:15 Rius вне форума
  18. Старый комментарий
    Аватар для Rius
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    mozgotron, какие мы обидчивые...
    На форуме есть раздел Бета-тестирование, где можно было выложить, попросить затестить и высказать замечания и предложения. Которые затем использовать для усовершенствования своей программы и своих скиллов.
    А вот варение в собственном котле бессмысленно, т.к. опыта вы не получаете.
    Запись от Rius размещена 23.01.2018 в 20:07 Rius вне форума
  19. Старый комментарий
    Аватар для mozgotron
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    Rius, в общем я понял: никому моя программа не нужна. Тогда я её нигде больше рекламировать не буду, ни в Гугл+, ни на Ютубе. Сам один буду юзать.
    Запись от mozgotron размещена 23.01.2018 в 20:04 mozgotron вне форума
  20. Старый комментарий
    Аватар для mozgotron
    Представляю свою компьютерную программу Код доступа (для самых смелых))
    bedvit, я тоже попробую КиПасс. Заодно поучусь у профессионалов.
    Запись от mozgotron размещена 23.01.2018 в 20:00 mozgotron вне форума
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru