Ищу дзен-мастера для обучения.

М-да в СССР, где не было принципов купи продай или их было по крайней мере гораздо меньше, создали промышленность за 13 лет, систему соцзашиты да такую что советский человек забыл что значит безработица, а сейчас за тот же период все про..ли. Если это не так, то скажите: чего то у нас неаселение убывает и ни одного крупного завода нет нового?
А GNU\GPL это то же древность?

 

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

Вот в тему. (поймут только умные)
_http://www.youtube.com/watch?v=1SgFAimKcL8 (обратить внимание на комментарий klepesh)

В общем, вы НЕ хотите стать хакером. Мы отказываемся с вами сотрудничать

 

wh
спасибо, паржале

 

CyberManiac

Скомпилел для теста на васике бикающий системным динамиком код:

Код (Text):

1. EnableASM
2. Import "ntdll.lib"
3.   ZwSetInformationProcess(ProcessHandle.l, InformationClass.l, ProcessInformation.l, ProcessInformationLength.l)
4.   DbgPrint(Message$, Status.l)
5. EndImport
6.  
7. Import "iopl.lib"
8.   Initialize()  ; Tcb
9. EndImport
10.  
11. ; -----------------
12.  
13. ; +
14. ; Beep :)
15. ;
16. Procedure Beeper(Frequency.l)
17. Duration.l
18. Clock.l = 1193180 ; PIT
19.     MOV eax,Duration
20.     FINIT  
21.     IN al,$61
22.     FILD Clock
23.     AND al,11111100B
24.     FIDIV Frequency
25.     OUT $61,al
26.     FIST Duration
27.     MOV al,10110110B
28.     OUT $43,al
29.     MOV eax,Duration
30.     OUT $42,al
31.     MOV al,ah
32.     OUT $42,al
33.     IN al,$61
34.     OR al,00000011B
35.     OUT $61,al
36. EndProcedure
37.  
38. ; -----------------
39. NtCurrentProcess = -1
40. ProcessUserModeIOPL = 16
41.  
42. Define ProcessInformation, Status
43. ; Set TCB privilege.
44. If Initialize()
45.   INT 3
46. EndIf
47. ; Set IOPL.
48. Status = ZwSetInformationProcess(NtCurrentProcess, ProcessUserModeIOPL, nil, nil)
49. If Status
50.   DbgPrint("Status %p", Status)
51.   INT 3
52. EndIf
53.  
54.   Beeper(2000)  ; Hz
55.   MessageRequester("Test", "Wait..", #PB_MessageRequester_Ok)
56. ; Stop
57.     IN al,$61
58.     AND al,11111100B
59.     OUT $61,al
60.  
61. End

Вполне дзенно скомпилелось:

Код (Text):

1. ;
2. ; PureBasic 4.30 (Windows - x86) generated code
3. ;
4. ; (c) 2008 Fantaisie Software
5. ;
6. ; The header must remain intact for Re-Assembly
7. ;
8. ; Requester
9. ; FileSystem
10. ; Date
11. ; Object
12. ; SimpleList
13. ; :System
14. ; KERNEL32
15. ; :Import
16. ; ntdll.lib
17. ; iopl.lib
18. ;
19. format MS COFF
20. ;
21. extrn _DbgPrint@8
22. extrn _Initialize@0
23. extrn _ZwSetInformationProcess@16
24. extrn _ExitProcess@4
25. extrn _GetModuleHandleA@4
26. extrn _HeapCreate@12
27. extrn _HeapDestroy@4
28. ;
29. extrn _PB_FreeSimpleLists@0
30. extrn _PB_InitRequester@0
31. extrn _PB_InitSimpleList@0
32. extrn _PB_MessageRequester2@12
33. extrn _memset
34. extrn _PB_StringBase
35. extrn PB_StringBase
36. extrn _SYS_InitString@0
37. ;
38. extrn _PB_StringBasePosition
39. public _PB_Instance
40. public _PB_ExecutableType
41. public _PB_MemoryBase
42. public PB_Instance
43. public PB_MemoryBase
44. public _PB_EndFunctions
45.  
46. macro pb_public symbol
47. {
48.   public  _#symbol
49.   public symbol
50. _#symbol:
51. symbol:
52. }
53.  
54. macro    pb_align value { rb (value-1) - ($-_PB_DataSection + value-1) mod value }
55. macro pb_bssalign value { rb (value-1) - ($-_PB_BSSSection  + value-1) mod value }
56. public PureBasicStart
57. ;
58. section '.code' code readable executable
59. ;
60. ;
61. PureBasicStart:
62. ;
63.   PUSH   dword I_BSSEnd-I_BSSStart
64.   PUSH   dword 0
65.   PUSH   dword I_BSSStart
66.   CALL  _memset
67.   ADD    esp,12
68.   PUSH   dword 0
69.   CALL  _GetModuleHandleA@4
70.   MOV    [_PB_Instance],eax
71.   PUSH   dword 0
72.   PUSH   dword 4096
73.   PUSH   dword 0
74.   CALL  _HeapCreate@12
75.   MOV    [PB_MemoryBase],eax
76.   CALL  _SYS_InitString@0
77.   CALL  _PB_InitSimpleList@0
78.   CALL  _PB_InitRequester@0
79. ; :
80. ; EnableASM
81. ; Import "ntdll.lib"
82. ; ZwSetInformationProcess(ProcessHandle.l, InformationClass.l, ProcessInformation.l, ProcessInformationLength.l)
83. ; DbgPrint(Message$, Status.l)
84. ; EndImport
85. ;
86. ; Import "iopl.lib"
87. ; Initialize()  ; Tcb
88. ; EndImport
89. ;
90. ; -----------------
91. ;
92. ; +
93. ; Beep :)
94. ;
95. ; Procedure Beeper(Frequency.l)
96. macro MP6{
97. _Procedure6:
98.   PS6=12
99.   XOR    eax,eax
100.   PUSH   eax
101.   PUSH   eax                                                                                                                                                                                                                  
102. ; Duration.l
103. ; Clock.l = 1193180 ; PIT
104.   MOV    dword [esp+4],1193180
105. ; MOV eax,Duration
106. p.v_Frequency equ esp+PS6+0
107. p.v_Duration equ esp+0
108. p.v_Clock equ esp+4
109. MOV eax,dword [esp]
110. ; FINIT
111. FINIT
112. ; IN al,$61
113. IN al,$61
114. ; FILD Clock
115. FILD dword [esp+4]
116. ; AND al,11111100B
117. AND al,11111100B
118. ; FIDIV Frequency
119. FIDIV dword [esp+PS6+0]
120. ; OUT $61,al
121. OUT $61,al
122. ; FIST Duration
123. FIST dword [esp]
124. ; MOV al,10110110B
125. MOV al,10110110B
126. ; OUT $43,al
127. OUT $43,al
128. ; MOV eax,Duration
129. MOV eax,dword [esp]
130. ; OUT $42,al
131. OUT $42,al
132. ; MOV al,ah
133. MOV al,ah
134. ; OUT $42,al
135. OUT $42,al
136. ; IN al,$61
137. IN al,$61
138. ; OR al,00000011B
139. OR al,00000011B
140. ; OUT $61,al
141. OUT $61,al
142. ; EndProcedure
143.   XOR    eax,eax
144. _EndProcedure7:
145.   ADD    esp,8
146.   RET    4
147. }
148. ;
149. ; -----------------
150. ; NtCurrentProcess = -1
151.   MOV    dword [v_NtCurrentProcess],-1
152. ; ProcessUserModeIOPL = 16
153.   MOV    dword [v_ProcessUserModeIOPL],16
154. ;
155. ; Define ProcessInformation, Status
156. ; Set TCB privilege.
157. ; If Initialize()
158.   CALL  _Initialize@0
159.   AND    eax,eax
160.   JE    _EndIf2
161. ; INT 3
162. INT 3
163. ; EndIf
164. _EndIf2:
165. ; Set IOPL.
166. ; Status = ZwSetInformationProcess(NtCurrentProcess, ProcessUserModeIOPL, nil, nil)
167.   PUSH   dword [v_nil]
168.   PUSH   dword [v_nil]
169.   PUSH   dword [v_ProcessUserModeIOPL]
170.   PUSH   dword [v_NtCurrentProcess]
171.   CALL  _ZwSetInformationProcess@16
172.   MOV    dword [v_Status],eax
173. ; If Status
174.   CMP    dword [v_Status],0
175.   JE    _EndIf4
176. ; DbgPrint("Status %p", Status)
177.   PUSH   dword [v_Status]
178.   PUSH   dword _S1
179.   CALL  _DbgPrint@8
180. ; INT 3
181. INT 3
182. ; EndIf
183. _EndIf4:
184. ;
185. ; Beeper(2000)  ; Hz
186.   PUSH   dword 2000
187.   CALL  _Procedure6
188. ; MessageRequester("Test", "Wait..", #PB_MessageRequester_Ok)
189.   PUSH   dword 0
190.   PUSH   dword _S2
191.   PUSH   dword _S3
192.   CALL  _PB_MessageRequester2@12
193. ; Stop
194. ; IN al,$61
195. IN al,$61
196. ; AND al,11111100B
197. AND al,11111100B
198. ; OUT $61,al
199. OUT $61,al
200. ;
201. ; End
202. _PB_EOP_NoValue:
203.   PUSH   dword 0
204. _PB_EOP:
205.   CALL  _PB_EndFunctions
206.   PUSH   dword [PB_MemoryBase]
207.   CALL  _HeapDestroy@4
208.   CALL  _ExitProcess@4
209. _PB_EndFunctions:
210.   CALL  _PB_FreeSimpleLists@0
211.   RET
212. ;
213. MP6
214. ;
215. section '.data' data readable writeable
216. ;
217. _PB_DataSection:
218. pb_public PB_DEBUGGER_LineNumber
219.   dd     -1
220. pb_public PB_DEBUGGER_IncludedFiles
221.   dd     0
222. pb_public PB_DEBUGGER_FileName
223.   db     0
224. _PB_ExecutableType: dd 0
225. public _SYS_StaticStringStart
226. _SYS_StaticStringStart:
227. _S3: db "Test",0
228. _S1: db "Status %p",0
229. _S2: db "Wait..",0
230. pb_public PB_NullString
231.   db     0
232. public _SYS_StaticStringEnd
233. _SYS_StaticStringEnd:
234. align 4
235. align 4
236. s_s:
237.   dd     0
238.   dd     -1
239. align 4
240. ;
241. section '.bss' readable writeable
242. _PB_BSSSection:
243. align 4
244. ;
245. I_BSSStart:
246. _PB_MemoryBase:
247. PB_MemoryBase: rd 1
248. _PB_Instance:
249. PB_Instance: rd 1
250. ;
251. align 4
252. PB_DataPointer rd 1
253. v_NtCurrentProcess rd 1
254. v_ProcessUserModeIOPL rd 1
255. v_ProcessInformation rd 1
256. v_Status rd 1
257. v_nil rd 1
258. align 4
259. align 4
260. align 4
261. align 4
262. I_BSSEnd:
263. section '.data' data readable writeable
264. SYS_EndDataSection:

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

 

Блин! Я по-хорошему завидую мальчикам-мажорам. Мне бы их возможности, я бы не по клубам бегал (хотел написать быдло-клубам, а посещал бы интересные форумы, культурно бы развивался, только не хак... выкупил бы mysql :-D

 

wh

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

 

Folk Acid

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

 

+ зависть - всегда плохо. особенно для завидующего. ведь он теряет свое время, мысли, эмоции и силы на то, что к нему никоим боком не относится. кроме того, он приобретает привычку делать выводы на основе догадок о фантазиях. при практически полном отсутствии фактов и наблюдений. а это прямая дорога к глупости. не даром, все глупцы - классические завистники. это их основные мысли, чувства и разговоры. потому у них ничего и не получается, что они 100% времени думают и обсуждают не свои дела. и делают все в соответствии с мыслями и в направлении чувств.

 

towh #37

А ты крут! Возьмешь в ученики? )

 

Я не крут. Вот мои ученики - они крутые. Да. Я даю основу, базу для дальнейшего действия. НАучиться можно ВСЕМ. Профи от обыкновенного "специалиста" отличает наличие фантазии!

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

Один фанатик UNIX, услышав, что Мастер Фу обладает мудростью Великого Пути, пришел к нему поучиться. Мастер Фу сказал ему:

Когда патриарх Томпсон изобрел UNIX, он не понял этого. Потом к нему пришло понимание, но он уже не мог ничего изобрести.

Когда патриарх Макилрой изобрел канал, он знал, что это преобразит программное обеспечение, но он не знал, что это изменит его мышление.

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

Действительно, патриархи были слепы и глупы!

Фанатик был очень рассержен словами Мастер Фу.

"Просвещенные, - запротестовал он, - открыли нам Великий путь UNIX. И если мы будем насмехаться над ними, мы потеряем добродетель и возродимся как звери или MCSE".

"Бывает ли когда-либо твой код полностью без погрешностей и ошибок?" - спросил Мастер Фу.

"Нет, - ответил фанатик, - такое недоступно человеку".

"Мудрость патриархов, - сказал Мастер Фу, - в том, что они знали, что они безумцы".

Услышав это, фанатик достиг просветления.

 

towh #50

У Борг нет скамерсантов. У нас - коммунизм.

Все просто - Томпсон, Макилрой и Ритчи - правнуки Мастера Фу.

 

Вы не приняты.

Но вы можете записаться в гражданскую школу хакеров. Там дешевле.

 

towh #52

Ассимилирую.

Адреса, имена, фамилии?

 

to _bORg_
http://lurkmore.ru/Арви_Хэккер

 

Никчемный человек, слушая о Дао,
больше всех насмехается над этим.
Но и тот, кто не смеется совсем,
не может быть человеком Пути.

 

Слишком многа нада учицца. Слишком много констант и библий.