Protected ID в DELPHI

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by Delphi-X, 11 Jun 2007.

  1. Delphi-X

    Delphi-X Banned

    Joined:
    20 May 2007
    Messages:
    24
    Likes Received:
    3
    Reputations:
    0
    Нужно сделать прогу с серийным номеров. чтоб серийник генерился по ид кампа. Как так сделать?
     
  2. Jes

    Jes Elder - Старейшина

    Joined:
    16 Apr 2007
    Messages:
    370
    Likes Received:
    391
    Reputations:
    34
    аээ, руками? :)
    и ,кстати, что ты имеешь ввиду под Id?
    я б програмно определил MaC адрес или еще что-нить и "зашифровал" в серийник , сравнивая с вводимым значением,
    а на сайте с регистрацией такой же скрипт(тока для выдачи пользователю) в режиме он лайн...
     
    #2 Jes, 11 Jun 2007
    Last edited: 11 Jun 2007
  3. Delphi-X

    Delphi-X Banned

    Joined:
    20 May 2007
    Messages:
    24
    Likes Received:
    3
    Reputations:
    0
    ну есть программы которые защщищены так.
    в окне поле
    Id Компьютера (уже сгенерированный или взяттый откуда либо(
    и поле
    Ведите серийный номер.
    И етот человек должен обратиться ко мне (например) чтоб по id я ему сгенерировал серийник, но уже на другой проге. Которую тоже надо делать
     
  4. Joker-jar

    Joker-jar Elder - Старейшина

    Joined:
    11 Mar 2007
    Messages:
    581
    Likes Received:
    205
    Reputations:
    37
    Серийник винта например
     
    1 person likes this.
  5. Jes

    Jes Elder - Старейшина

    Joined:
    16 Apr 2007
    Messages:
    370
    Likes Received:
    391
    Reputations:
    34
    пример:

    procedure TForm1.Button1Click(Sender: TObject);
    var
    VolumeName,
    FileSystemName : array [0..MAX_PATH-1] of Char;
    VolumeSerialNo : DWord;
    MaxComponentLength,
    FileSystemFlags : Integer;
    begin
    GetVolumeInformation('C:\',VolumeName,MAX_PATH,@VolumeSerialNo, MaxComponentLength,FileSystemFlags,
    FileSystemName,MAX_PATH);
    end;

    и колдуешь с @VolumeSerialNo
    тут по номеру тома...

    а про серийник самого винта:
    Вот тебе полезная ссылочка
    Http://www.delphiworld.narod.ru/base\get_hdd_serial.html
     
    #5 Jes, 11 Jun 2007
    Last edited: 11 Jun 2007
  6. Brun

    Brun Elder - Старейшина

    Joined:
    21 Mar 2006
    Messages:
    95
    Likes Received:
    57
    Reputations:
    16
    Если делать какой то уникальный серийник, то надо привязыватся к нескольким параметрам : биос + мать ... etc =)
     
  7. slesh

    slesh Elder - Старейшина

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    Стандартный способ.
    Читаешь серийники всех найденых винтов. (при форматировании диска они меняются)
    далее берешь харки проца (типа средняя частота, название, коддерживаемые технологии). (CPU серийник - лучше не юзать. т.к. его нет у многих процов).
    Также можно заюзать инфу из биоса (в икспихах она хранится в реестре)
    типа SystemBiosVersion и SystemBiosDate и еще кучу всего.
    Потом из этих данных формируешь код. Этот код передается тебе. Ты его шифруешь в MD5 хотябы 10 раз. и потом опять отсылаешь его юзверю. и он вводит его в прогу.
    прога шифрует код и сравнивает с присланым ключом. Если ключ валидный, то сохраняет его гденить, и потом при каждом запуске заного собирает инфу о системе. и сверяет с ключом.

    Все данные для этого можно запросто получить. без всяких ухищрений.
     
    #7 slesh, 11 Jun 2007
    Last edited: 11 Jun 2007
  8. Jes

    Jes Elder - Старейшина

    Joined:
    16 Apr 2007
    Messages:
    370
    Likes Received:
    391
    Reputations:
    34
    а лучше , чтоб она сразу тепловые отпечатки пальщев , при помощи термометра процессора считывала , потом сверяла их через секретную подводную он-лайн базу , и присылала обратно в виде зашифрованного звукового сигнала азбуки морзе ,который пользователь должен повторить :)
     
  9. slesh

    slesh Elder - Старейшина

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    2 Jes я когдато хотел делал подобное. Типа со сканера сканить какуюнить вешь и потом прога генерила бы спец код который потом отсылала бы мне. Его шифруешь какнить и передаешь обратно. и тогда при каждом запуске необходимо былобы ложить этот предмет в сканер.
     
  10. Delphi-X

    Delphi-X Banned

    Joined:
    20 May 2007
    Messages:
    24
    Likes Received:
    3
    Reputations:
    0
    ДА ето очень трудна. Но есть спец проги типа ExeCryptor, она платная и для с++.
     
  11. GlobaL

    GlobaL Banned

    Joined:
    21 Feb 2007
    Messages:
    57
    Likes Received:
    66
    Reputations:
    -18
    Вот тут полно всякого барохла для зашиты проги.
     
    1 person likes this.
  12. Delphi-X

    Delphi-X Banned

    Joined:
    20 May 2007
    Messages:
    24
    Likes Received:
    3
    Reputations:
    0
    Спасиба нашел что искал

    +1
     
  13. Ni0x

    Ni0x Elder - Старейшина

    Joined:
    27 Aug 2006
    Messages:
    338
    Likes Received:
    157
    Reputations:
    37
    не надо приучать человека пользоваться чужим софтом для защиты программы, пускай свою защиту написать сложнее, чем воспользоваться новомодным протектором, но пользы от этого гораздо больше.
     
  14. da_ff

    da_ff Elder - Старейшина

    Joined:
    11 Jul 2006
    Messages:
    118
    Likes Received:
    22
    Reputations:
    26
    хм сомнительная затея этот самый предмет при аутентификации необходимо размещать с высокой точностью иначе не прокатит или выщитывать погрешность расположения
     
  15. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    Не стоит делать проги с такой защитой
    почему???!?!!
    пользователь сменил железяку... и что??!?!?!
    как он тебе потом докажет что честно купил у тебя прогу?!?!?!?
    вот, вот!!! не стоит... если только для себя... мой совет и ИМХО
     
  16. KEZ

    KEZ Ненасытный школьник

    Joined:
    18 May 2005
    Messages:
    1,604
    Likes Received:
    754
    Reputations:
    397
    ну конечно, напиши жалобу в компанию Adobe, и т.п.
    ЗАБИТЬ если сменил железку.
    делай защиту на такие железки которые редко меняются (хард например)
     
  17. Delphi-X

    Delphi-X Banned

    Joined:
    20 May 2007
    Messages:
    24
    Likes Received:
    3
    Reputations:
    0

    написать свою ето хорошо. Но понимаешь не тот уровень знаний. Новичок я в делфи еще...
     
  18. Ni0x

    Ni0x Elder - Старейшина

    Joined:
    27 Aug 2006
    Messages:
    338
    Likes Received:
    157
    Reputations:
    37
    новичок, а уже лезешь защиты писать, для начала с основами бы разобрался.