Доброго дня. Просьба сильно не пинать, не знаю куда обратиться. Есть старая программа по зарплате под dos написана на clipper работает на 386. Компьютер выжил свое решили перекинуть на Р4, столкнулись с проблемой зависает при запуске, отчеты работают (запускается). Есть подозрения что программа привязана к компьютеру или проверяет id компа при входе. Делал копию всего жесткого диска 100% рабочей программы на другой жесткий, результат тот же. Так же было опробована на Р3 и на другом 386. Как быть? Спасибо.

(51) Ну, я не видел железки, я видел только бумажки...

(50) Ага. На любой картинкохостинг заливай и ссылку сюда

программа дос через оболочку нортон, как по старинке autoexec.bat и config.sys

Мы, клипперасты, еще живы.
P.S.
Я тоже куски зарплатной программы писал. И лепил простенькую защиту, проверяющую параметры BIOS.

(55) да, были веселые времена...

А что, я ещё в середине 2000-х вовсю прогал на Фортране, без всяких гуев, бо они нафиг не нужны были.
А в отделе, когда уже хрюня не новичком была, стоял 486 DX75 c win 3.11 на 1мб оперативы с Нортон десктоп, Ворд, рисовалка PSP  и построитель дииаграмм-схем. Так эта машинка вообще неубиваемая была, в итоге её просто в шкаф поставили поиомучто было достаточно более мощных компов, почти у каждого в отделе был

Мой путь в подвалы одинэсии начался как раз с того, что позвали что нить сделать как программиста - в конторе стояла фокспрошная прога, которая по материалам учёт вела и косячила все время...

(57) ээээ? а где и нафига?

+(59) не, я знаю, что фортран вполне жив, и умирать не собирается - туда в последнем стандарте (2010) распараллеливание добавили, да и ранее тоже добавляли вкусняшек. но он как бы специализированным инструментом стал, всякие физики-математики и близкие к ним инженеры...

Ищи декомпилер для клипера, потом колдуй код где проверка на ID

https://hkar.ru/Xo9Q
https://hkar.ru/Xo9R
https://hkar.ru/Xo9S

(62) выкладывай лучше образ диска. мож кто отремонтирует твою зарплату

(62) декомпилировать sal.exe надо

+ (64) а интересное в установке sal_inst.exe

(0) а что за ошибка выходит? может таблица (dbf файл) сломалась или индекс...

(0) Выкинуть и забыть, как страшный сон.

(67) Зачем, это можно (нужно) капитализировать. Пациент, с большей долей вероятностью, готов платить.

Кризис. Денег нет. Только на мелкие ремонты. При запуске программы sal.exe висит. Выход через ctrl+break или резет

Буду пробовать через DOSBox 0.74 запустить

(69) переиндексацию провел?

Сначала Вам с кину. Скажите какой файлообменник по проще.

Переиндексация непомогла

(73) сам определись.

https://hkar.ru/Xoc6 до запуска

https://hkar.ru/Xoc7 после запуска файла с ключом sal/S (sal.exe)

(72) да выкладывай уже свою программу. Заархивируй да выложи.
файлобменник - ну.. яндекс диск, гугл диск, майл диск и т.п. - не устраивают?

(75) а покажь ка ты файлики autoexec.bat и config.sys с компа, на котором эта програ работала, и с компа, на котором теперь запускаешь. Если можешь.
Есть у меня смутное подозрение... на ключики типа files=40, на настройки EMM386.exe, himem.sys  и т.п.

(77)+

Поставьте ЗИК 7.7. И проще, и быстрее. И нет проблем, как в сабже.

(0) Насколько сложный расчет ЗП? Просто оклад + премия? Или KPI еще какой-то сверху?

может там просто ограничение на количество одновременно открытых файлов системное срабатывает?

(81) может.
Я ведь про ключ типа "files=40" не просто так спрашивал. Но автор пока молчит.

(0) Правда удивил, хотя моя "зарплата и кадры" на турбопаскале + турбопрофешинал отфигачила лет 10 а то и больше и потом только перевели ее на 1С (я кроме 5-го фортрана можно сказать и не знал ничего поначалу). Ну да Нортон Коммандер, использование прерываний DOS чтоб было вся как в Нортон Диск Докторе ).
В конторе было около 3000 (трамвайно-троллейбусное управление). Все сам делал - и индексы придумывал и матричные принтеры заставлял печать в ширину больше 240 символов. Мало того для экономии хранил кого последним напечатали, печатали по подразделениям, использовал помнится указатели и "кучу" для произвольных надбавок и удержаний (и где-то э формулы для них вводили и хранились они). Их начальник АСУ была очень умной - все-таки раньше на физматах сильные студенты учились. Без нее бы не взлетела. Это я потом уже с фоксом познакомился и программировал на нем (даже в связке с СИ). Хотя суперотчет который вся область использовала был красив по тем временам, печатался из фокса, а данные формировались на паскале (как-то так)

(83)+ Поначалу она ж на "Искре" работала, уже потом PC появились в конторе

(0) Дисковой памяти не хватало и использовали стекер для сжатия. Может у вас что-то с этим связанное?

(82) У клиппера еще свои переменные были в config.sys - типа set clipper=f50 (это позволяло открыть 50 файлов, из которых 4 служебных - сам экзешник, оверлей, стандартный ввод и вывод), там же ключ для памяти переменных и т.п.
но будем надеяться, что ТС скопировал автоэкзек и конфиг

(86) надеяться? да вы, батенька, оптимист...

Ребята Вы уж извините, сильно не пинайте первый раз с этим сам помогаю добрым людям, у самого спортивный интерес.

Стараюсь как могу

Еще кто бы аналогичный рецепт готовый дал для запуска Карат-М, у меня где-то базенка древнющая своя валяется в ней почти вся моя библиотека была

Чисто поржать - пятница всё-таки:
Я для Clipperа писал драйвер мыши на макроассемблере... но вы ищите, ищите декомпилятор для Clipper-а - в языке меньше двух десятков версий всего. Я верю: вы можете декомпилировать программу до уровня Assembler-а
:)

Кстати пятница, всем выходных желаю плюс с праздником наступающим, у нас суббота то же рабочий день.

Обязательно выложу прогу со всеми вытекающим...

(90) так Карат-М - это ж FoxBase+

(91) там байт-код, и интерпроетатор.
единственный минус - многие типовые dBase команды (@SAY...GET...) были сделаны макросами, и поэтому при декомпиляции их не узнать глазами без соотвествующего опыта работы с клиппером

Хотел еще одно заметить отчеты работают, но запускаются другим exe-шником
https://hkar.ru/Xogv до запуска
https://hkar.ru/Xogw после запуска файл repsal/O

(91) насколько я знаю, полноценного декомпилятора Clipper так и не появилось. Это оказалось не такой простой задачей. У Clipper в отличие от, к примеру, foxpro есть куча режимов компиляции и внешних библиотек.

(97) проблемы были только с оверлеями, и с качеством самого декомпилера.

Может проще кому то на почту выложить или админу

Я про программу

(98) и не только. Можно было встраивать свои исходные библиотеки и модифицировать штатные (речь не о внешних подключаемых библиотеках) - сам язык, грубо говоря, лежал "во вне" в файлах и был достаточно "гибкий" для модифицирования. А если можно было модифицировать - то грех этим не пользоваться. Я писал свои собственные языковые конструкции - их корректно не декомпилируешь в исходный текст.

(31) "Миста - это чат" (с)
Я первый раз в таком же шоке был, когда задал вопрос и не заглядывал полдня.

(101) библиотеки - ну они и оставались как бинарник
а собственные языковые конструкции - так они макропроцессором обрабатывались... как и пример в (95).
и до собственного языка декомпилер разбирал вполне нормально, если не падал :-) А вот чтоб сообразить, что "вот эта цепочка - на самом деле дибейсиковская сэй-гет" - нужен был некоторый опыт или знания...

(99) блин, ну выложи на яндекс-диск/гуглодиск/мэйл-облако, расшарь и ссырку сюда...

(90) Фигасе.. "Карат-М" вспомнили. Могу лишь похвастаться, что я его видел и пытался запускать.

(90) Если просто посмотреть, может, подойдёт такое решение?
DBF Viewer for Clipper, dBase, FoxPro dbf files
dbfviewer.com

(105) Я в нём писал нетленки ))

(86) епть.. я даже это вспомнил как и фмайлес=40  ...

(105) а мы dBase-II переводили на русский :-) под cp/m на Корветах...
кстати, одна из первых коммерческих прог с использованием БД мной была в 1990- именно на этом написана. Что-то там для ветеранской службы ЧЭМК - учет ветеранов, стажа, льгот и всего такого... печать на конвертах адресов, каких-то текстов...

+(109) за корветом в Москву летал, точнее в Зеленоград, на завод. а вот завод уже не помню (впрочем, его уже там и не существует)

(109) А я на фоксе влегкую ) фигачил печать билетов для кинотеатров по рядам и местам  - дешево продавал но и делать было легко.

Кстати, насчет Карата-М - там же просто формат индексов другой был, еще не "быстрый". А тексты в файлах *.kar хранятся. так что можно попытаться просто в факспро запусить всё это

Ребят да я сам как могу хочу выложить  у нас тут что хотят то банят сайты

(105) я на нем прилично всякого понаписал в свое время. загонял туда базы по данным NGDC по геофизике, солнечной активности, потоки и прочее и крутили считали всякое что вам лучше не знать ;-)

(90) Карат работает под DOSBox... Сам настроил. Ярлык для запуска на рабочий стол и расчетчикам удовлетворяло, а потом я на 1С перевел и забыли... в прошлом году на рабочем столе 7ки ярлык видел, получается ИТшники все перенесли с XP. ^))) Могу поделиться, но после праздника или на личку пиши

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

(116) ну мой ник на мэйл.ру

Отправил

Получил. Домой приеду - перевыложу для всех.

Спасибо

(0) У нас тоже зарплатная программа используется до сих пор старая, под DOS, написана на Clipper. Она действительно привязывается к железу, а именно к жесткому диску. Защита организована через прямое обращение к жесткому диску. Недавно выгорел преобразователь питания процессора на материнской плате - пришлось ее ремонтировать.

(115) ОК!

Запускал через DOSBox вот:

Если запустить программу с указанием расположения всех папок, то то же самое как на 386 висит.
Если запустить только исполняемый файл sal.exe то выдает ошибку об отсутствие color.dat  https://hkar.ru/XoZL

https://cloud.mail.ru/public/CTkQ/t1QBt8mwU

Спасибо. Но изменения не наблюдается. Есть какие то особые инструкции? С копировал на хдд в Р4 и запускал из доса как и прежде.

(125) руки не дошли - праздник с сослуживцами, 2 дня рожденья...

Хехе. Моя первая зарплата была написана на клиппере, по тем временам весьма передовая система была, сеть умела, можно было делать вставки на C. на 286 компе считали. Реально быстро работает, только там удаление записей надо было заменить на пометку активна-неактивна, а то как все фоксоподобные долго удаляла из больших объемов.

(127) ну, не "фоксоподобные", а диБэйсики... ну и у всех так - удаление помеченых - только при упаковке. а упаковка - по сути перезапись таблицы.

(128) все фоксы делали то же самое. именно так- перепаковка. и кларион и чистый фокс.

(129) ну так фоксы - это последыши дибейса и сами по классификации - дибейсики...
хотя записывать кла в фоксы - это, имхо, зря...

В Досбоксе вы обломитесь с принтером, потому что клипперовские проги хотят напрямую в аппаратный порт LPT. У Досбокса нет эмуляции LPT на таком уровне.

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

restore from color.dat
   if (!(clr9 = checkrom() .AND. 1911 = dsklckrd()))
      set escape off
      do while (.T.)
      enddo
   endif


Вот, собственно, и защита: не совпал биос и чего-то там из параметров диска, и привет - ушло в бесконечный цикл :)

(131) кстати, да, помню, что декомпилятор для клиппера существовал и работал.

(133) Valkyrie называется. Работает, куда ж он денется.

Где топикстартер-то? Сроки какие у него? Можно попытаться пересобрать современным компилятором (Harbour называется), будет ему консольное родное Win32-приложение. Но это не за один день, там еще несколько самопальных функций, которые надо на аналоги заменять.

Доброго дня. Как и писал выше в основном я по железу, вот и время пролетает быстро не успеваю во время следить. Спасибо за старание. Не останусь в долгу. Сроков пока таковых нету, им пришлось с другого отдела взять, базы я им скинул, щас работают, но резервов больше нету. Переход на Win32-приложение хорошая идея, но на сколько затратная?
P.S. Праздник святое дело.

(132) Так наверняка же dsklckrd() нечто с диска или из базы читает

(135) Думается там зарплатная программа по сути простейшая и легко реализуется на типовой 1С типа ЗиК или ЗУП

(132) Кстати если программист вменяемый писал то там должен быть некий "генератор ключа" отдельно или в виде запуска с какими то параметрами и возможно паролем

Нужно искать декомпилятор, потом разбирать  что за защита, как давно это было, 28 лет прошло   ;)

может тут
https://softclipper.net/

(139) Да декомпилировал я уже эту софтину.

Быстрее будет выкинуть защиту вообще и пересобрать, чем еще и асмовскую функцию потрошить.

(136) DiskLockRead кагбэ намэкаэт...

(135) Сделаем так: чтобы опрометчивых обещаний не давать, в выходные смогу заняться плотнее, попробую пересобрать, тогда в понедельник отпишусь, вышло что или нет.

Аналогичную систему пару лет назад портировал на Win32, завелось нормально.

Ткнитесь в почту, в профайле открыл, если какие вопросы есть.

(142) так и предполагал что color.dat запихана кусок Виоса и количество дисков, где даже подключение сетевых томов приводит к остановке программы ЗП.
Выше сообщал на ошибку отсутствия этого файла color.dat...

+(143) "сообщал" читать "сообщалась автором".

(143) Нет там никакого "куска Биоса".
Вот все, что там лежит:
D:\MemEdit>ClipMemReader.EXE /l COLOR.DAT

CLR1      : w+/n
CLR2      : w+/b
CLR3      : gr+/n
CLR4      : gr+/rb
CLR5      : w+/r
CLR9      :     -29029

А потом переменная CLR9 сравнивается с результатом функции checkrom(), как видно по куску кода выше.

(140) Поосторожней с декомпилированной прогой. Там может внезапно вылезти несколько забавных глюков декомпилятора.

(146) Бывали грабли, да :)

(132) а есть вариант найти этот код в бинарнике и тупо забить его NOP'ами?

Там же в клипперовских потрохах хитро устроено - трансляция в т.н. "P-Code" (псевдокод, грубо говоря), а потом его интерпретация рантаймом, линкуемым в экзешник при компиляции и сборке.

(149) так Идой найди вызов checkrom()и  dsklckrd(), и пусть они возвращают требуемое всегда...

https://hkar.ru/XsYL

Оно?

(Старею, блин, хотел пойти по долгому пути. Вот в (132) верное решение было предложено. Причем NOP-ами надо было забить именно в псевдокоде, тем более, что описание P-code с кодом операции есть, а нужное смещение декомпилер показывает :)

{Хотя по-хорошему пересобрать бы все равно надо, чтоб пока люди работали, а потом уже пусть ищут способы миграции на более современные платформы)