- 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
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
- 66
- 67
- 68
- 69
- 70
- 71
- 72
- 73
- 74
- 75
- 76
- 77
- 78
- 79
- 80
- 81
- 82
- 83
- 84
- 85
- 86
- 87
- 88
- 89
- 90
- 91
- 92
- 93
- 94
- 95
- 96
- 97
- 98
- 99
- 100
format ELF
include 'macros.inc'
public main
extrn printf
extrn puts
extrn exit
extrn strtok
extrn getenv
extrn strcmp
extrn strtol
extrn strcpy
; Функции для общения с БД
extrn get_version ; ремейк на mysql_get_client_info()
extrn get_product_by_single_name_ex
CGI_HEADER db "Content-Type: text/html", 13,10, "X-Powered-by: FASM (Flat Assembler 1.68)",13,10,0
QUERY_STRING db ?
REQUEST_METHOD db ?
query_str_env_req db "QUERY_STRING", 0
request_method_env_req db "REQUEST_METHOD", 0
RM_GET db "GET", 0
RM_POST db "POST",0
NO_ACTION_ERROR_MSG db "No action", 0
q_token db "="
r_token db "&"
; Константы ACTION
AC_VERSION equ 0; Инфа о версии и копирайте
AC_PRODUCT_ID_BY_SINGLE_NAME equ 1; ID продукта по полному совпадению имени
section '.text' executable
_start:
main:
ccall puts, CGI_HEADER
ccall getenv, request_method_env_req
push eax
;c
xor eax, eax
pop eax
ccall strcmp, eax, RM_GET ; TODO: ЗМЕНИТЬ НА POST!!!1111
cmp eax, 0
jne quit
;Что прислали в Action. ( ТОЛЬКО GET )
ccall getenv, query_str_env_req
ccall strcpy, QUERY_STRING, eax
ccall strtok, QUERY_STRING, q_token
push eax
ccall strcmp, eax, "act"
cmp eax, 0
jne no_act
je act
no_act:
ccall puts, NO_ACTION_ERROR_MSG
jmp quit
act:
; Узнаём, что за опция в act
pop eax;
ccall strtok, 0, q_token
ccall strtol, eax, 0, 10
cmp eax, AC_VERSION
je version_put
cmp eax, AC_PRODUCT_ID_BY_SINGLE_NAME
je product_id_by_single_name
jne quit
version_put:
; версия - из mysql
ccall puts, "Web kernel v0.1. (c) 2009 by Sergei V. Adoniew ( <a href="/cdn-cgi/l/email-protection" class="__cf_email__" data-cfemail="5e3f323a343f3c3f3a1e273f702c2b">[email protected]</a> ) with MySQL: "
ccall get_version
ccall puts, eax
jmp quit
product_id_by_single_name:
;НА Входе: name=%docname%
;НА Выходе id
; дробим строку на a=b разделителем &
ccall getenv, "QUERY_STRING"
;у нас в eax вся строка
Собственный пьяный высер на фасме ( FASM ).
Обратить внимание на ветвление:)