соглашения,подпрограммы

@Artishok · Регистрация: 27.12.2009

Студворк — интернет-сервис помощи студентам

используя соглашения Sdtcall я вызываю функция сложения с двумя аргументами---
1--функция сложения которая внутри себя вызывает синус(stdcall)
2--функция умножения которая внутри себя вызывает косинус и функцию сложения без синуса(stdcall)
вопросы по ассемблерскому коду который я пытаюсь сделать закомментил

Assembler
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
.686
.model flat
Public
    _AddProc@16
    _AddProcSin@16
    _ImulProc@32
    extern Cosec@8
    extern Sec@8
.code
 
_AddProcSin@16 proc
     push EBP ;непонятно.Функция сразу все аргументы принимает? или надо выполнять команду mov ;отталкиваясь от числа переменных?
    mov EBP,ESP
    mov EAX,[EBP+8]
    add EAX,[EBP+16];два значения типа Double
    call Sec;возьмет значение из EAX?
    pop EBP
    ret 16;Что вернет функция?и как значение косинуса вернуть?
_AddProcSin@16 endp
 
_AddProc@8 proc ;сложение без вызова синуса
     push EBP
    mov EBP,ESP
    mov ECX,[EBP+8]
    add ECX,[EBP+12];
    pop EBP
    ret 12
_AddProc@8 endp
 
;будут ли проблемы из-за того что стек использовался и там и там?
_ImulProc@32 proc
     push EBP
    mov EBP,ESP
     ;как вызвать здесь функцию умножения для чисел b и c если передавались параметры a b c d
    ;mov EBX,[EBP+16] так?
    ;imul EBX,[EBP+24]
    ;как вызвать здесь функцию для сложения чисел a и d, а затем сложение их суммы со значением в регистре EBX 
    ;call Addproc -- если так то она сложит значения d и c?
    ;...
    call Cosec;для получение значения косинуса
    pop EBP
    ret 24
_ImulProc@32 endp
     
         
end.

главная программа

C++
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
// лаба_ОС.cpp : Defines the entry point for the console application.
//
 
#include "stdafx.h"
#include <iostream>
 
using namespace std;
 
extern "C" double _stdcall AddProc(double el1,double el2);
extern "C" double _stdcall AddProcSin(double a,double b);
extern "C" double _stdcall ImulProc(double x,double y,double z,double c);
 
extern "C" double _fastcall Cosec(double x)
{
    return cos(x);
}
 
extern "C" double _cdecl Sec(double x)
{
    return sin(x);
}
 
 
int _tmain(int argc, _TCHAR* argv[])
{
    double a,b,c,d;
     cout<<"Введите числа"<<endl;
    cin>>a;
    cin>>b;
    cin>>c;
    cin>>d;
    cout<<"Результат----  "<<AddProc(AddProcSin(a,b),ImulProc(a,b,c,d))<<endl;
    return 0;
}

Добавлено через 8 минут
надо учитывать адрес вовзрата?т.е надо вести отсчет от 0 или от 8 в стеке?

Не по теме:

асм мне не так легко дается как языки высокого уровня(((

murderer · 21.03.2011, 12:40

Что ещё за sec/cosec? Может лучше использовать fsincos?

@Artishok · 21.03.2011, 17:47 **[ТС]**

Сообщение от murderer

Что ещё за sec/cosec? Может лучше использовать fsincos?

это функции синуса и косинуса вызваемые из программы на си.просто на си sin и cos зарезервированы а sec и cosес - нет

@vital792 · 21.03.2011, 22:03

Artishok, у тебя тип double, соответственно сложения, умножения и проч выполняются с fpu. И результат возвращается на вершине стека сопроцессора

@Artishok · 21.03.2011, 23:32 **[ТС]**

Сообщение от vital792

Artishok, у тебя тип double, соответственно сложения, умножения и проч выполняются с fpu. И результат возвращается на вершине стека сопроцессора

то есть мне надо постоянно значения в стек записывать?
ладно.но что возвращать в ret и надо ли учитывать адрес возврата при работе со стеком.и какой он будет?(т.е. смещение +8 или +4)?

Добавлено через 1 час 3 минуты
ret возвращается адрес вовзрата?

@vital792 · 22.03.2011, 09:21

ответы в комментариях

Assembler
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
.686
.model flat
 
.code
public _AddProc@16
public _AddProcSin@16
public _ImulProc@32
 
;   double _stdcall AddProcSin(double a, double b);
_AddProcSin@16 proc
    push    EBP         ; esp -= 4
    mov EBP, ESP
    fld qword ptr [ebp+8];  ; a (4 байта адрес возврата, 4 байта старое значение ebp)
    fadd    qword ptr [ebp+16]  ; +b
    fsin                ; sin(a+b)
    pop EBP
    ret 16              ; результат в st(0)
_AddProcSin@16 endp
 
;   double _stdcall AddProc(double el1, double el2);
_AddProc@16 proc ;сложение без вызова синуса
    push    EBP
    mov EBP,ESP
    fld qword ptr [ebp+8]
    fadd    qword ptr [ebp+16]
    pop EBP
    ret 16
_AddProc@16 endp
 
;   double _stdcall ImulProc(double a, double b, double c, double d);
_ImulProc@32 proc
    push    EBP
    mov EBP, ESP
;как вызвать здесь функцию умножения для чисел b и c если передавались параметры a b c d
    fld qword ptr [ebp+16]  ; b
    fmul    qword ptr [ebp+24]  ; c st(0) = b*c
 ;как вызвать здесь функцию для сложения чисел a и d, а затем сложение их суммы со значением в регистре EBX 
    push    dword ptr [ebp+12]
    push    dword ptr [ebp+8]   ; a
    push    dword ptr [ebp+36]
    push    dword ptr [ebp+32]  ; d
    call    _AddProc@16     ; st(0) = a+d st(1) = b*c
    faddp               ; st(0) = (a+d)+(b*c)
    fcos
    pop EBP
    ret 32
_ImulProc@32 endp
 
end

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#include "stdafx.h"
#include "math.h"
#include <iostream>
 
using namespace std;
 
extern "C" double _stdcall AddProc(double el1, double el2);
extern "C" double _stdcall AddProcSin(double a, double b);
extern "C" double _stdcall ImulProc(double x, double y, double z, double c);
 
int _tmain(int argc, _TCHAR* argv[])
{
    double x, y;
    x = AddProc(1.0, 2.0);
    x = AddProcSin(1.0, 2.0);
    y = sin(3.0);           // для проверки
    x = ImulProc(1.0, 2.0, 3.0, 4.0);
    y = cos(2.0*3.0+(1.0+4.0));// для проверки
    return 0;
}

@Artishok · 22.03.2011, 13:31 **[ТС]**

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

@vital792 · 22.03.2011, 14:58

Сообщение от Artishok

но суть задания в том чтобы из разных языков вызывать фукнции разными соглашениями.

ну все это дело легко переделать для __cdecl например. А вот с fastcall не знаю точно - вроде точного стандарта нет и в разных компиляторах реализуется по разному.

@Artishok · 22.03.2011, 21:36 **[ТС]**

Сообщение от vital792

ну все это дело легко переделать для __cdecl например. А вот с fastcall не знаю точно - вроде точного стандарта нет и в разных компиляторах реализуется по разному.

ну вот что написано в методичке

Code
1
2
3
4
Директива   Порядок передачи параметров    Очистка стека        Передача параметров через регистры
_fastcall      слева направо                 процедура               ECX,EDX,стек справо налево
_cdecl         справо налево             вызывающая программа                    нет
_stdcall       справо налево                 процедура                           нет

Мне неясно сно что происходит когда я вызываю функцию на асме

Добавлено через 37 минут
в коде на Asm ругается на 44 строку

чем отличается qword от dword?

Добавлено через 3 часа 7 минут
Ругается на faddp "invalid instruction operands" ...
То есть переменные не передаются или тип у них неверный?

Добавлено через 41 минуту
может аргумента нет?

@vital792 · 22.03.2011, 21:40

Artishok, какой транслятор используешь? Я использовал ml из visual studio 2008.

Сообщение от Artishok

чем отличается qword от dword?

qword - 8 байт. Как раз соответствует типу double в си. Для fpu это допустимый формат - длинное вещественное, не должно вызывать ошибки

Добавлено через 1 минуту

Сообщение от Artishok

может аргумента нет?

faddp без операндов — эквивалентно faddp st(1), st(0)

@Artishok · 23.03.2011, 22:21 **[ТС]**

Сообщение от vital792

Artishok, какой транслятор используешь? Я использовал ml из visual studio 2008.

я использовал ml из visual studio 2010 правда не факт что правильно настроил.ща переделываю под pelles C.
вот переделал код. вопросы в коде на асме.

Assembler
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
.686
.model flat
.data
.code
   Public _Addproc@32 
   extern @Cosinus@8
   extern _Sinus
 
 
_Addproc@32 proc
  push EBP
  mov EBP,ESP
  ;все элементы в стеке.
  ;передавалась a b c d -> в стеке d c b a
  ;esp+8--d esp+16--c esp+24--b  esp+32--a
  mov  ECX,dword ptr [esp+24];b
  fmul ECX,dword ptr [esp+16];c
  fadd ECX,dword ptr [esp+8];d
  fadd ECX,dword ptr [esp+32];a
  ;параметры через fastcall передаются через ECX
  call Cosinus
  ;....где теперь результат?в стеке?
  mov  EAX,dword ptr [esp+32] ;a
  fadd EAX, dword ptr [esp+24];b
  push EAX
  call Sinus
  ;и где результат опять?как его просуммировать   
  pop  EBP
  ret 8 
_Addproc@32 endp
 
end

C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
#include <stdlib.h>
#include <stdio.h>
#include <math.h>
 
extern "C" double _stdcall Addproc(double a,double b,double c,double d);
extern "C" double _cdecl Sinus(double x);
{
    return sin(x);
}
extern "C" double _fastcall Cosinus(double x)
{
    return cos(x);
}
 
int main(int argc, char *argv[])
{
    /* TODO: Enter code here */
    double x=Addproc(double a,double b,double c,double d);
    printf("Результат---%f\n",x);
    return 0;
}

мне это к завтра надо

Добавлено через 14 минут
-----

@vital792 · 24.03.2011, 11:48

Artishok, не совсем понятно из твоего кода, что должна делать функция Addproc. Я так понял ты хотел сделать cos(b*c+d+a) + sin(a+b). Вот код:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
#include "stdafx.h"
#include "math.h"
#include <iostream>
 
using namespace std;
 
extern "C" double _stdcall AddProc(double a,double b,double c,double d);
extern "C" double _cdecl Sinus(double x)
{
    return sin(x);
}
extern "C" double _fastcall Cosinus(double x)
{
    return cos(x);
}
 
int _tmain(int argc, _TCHAR* argv[])
{
    double x = AddProc(1.0, 2.0, 3.0, 4.0);
    return 0;
}

и функция на ассемблере, которая вычисляет эту формулу:

Assembler
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
.686
.model flat
 
.code
public _Addproc@32
extern _Sinus       : proc
extern @Cosinus@8   : proc
 
;   double _stdcall AddProc(double a, double b, double c, double d);
_AddProc@32 proc
    push    EBP
    mov EBP,ESP
    fld qword ptr [ebp+16]  ; b
    fmul    qword ptr [ebp+24]  ; b*c
    fadd    qword ptr [ebp+32]  ; b*c+d
    fadd    qword ptr [ebp+8]   ; b*c+d+a
    sub esp, 8
    fstp    qword ptr [esp]
    call    @Cosinus@8      ; st(0) = cos(b*c+d+a)
    fld qword ptr [ebp+8]   ; a
    fadd    qword ptr [ebp+16]  ; a+b
    sub esp, 8
    fstp    qword ptr [esp]
    call    _Sinus
    add esp, 8
    faddp
    pop EBP
    ret 32
_AddProc@32 endp
 
end

компилировал:
ml /Zf /c /Cx /coff addsin.asm

@Artishok · 24.03.2011, 13:03 **[ТС]**

попробуем запустить на visual studio 2008

@vital792 · 24.03.2011, 13:07

Сообщение от Artishok

попробуем запустить на visual studio 2008

вообще я думаю нет разницы 2008 или 2010 в данном случае. Единственно в чем я не уверен в данном коде - передача параметров при вызове _fastcall функции. По идее часть параметров должна передаваться через регистры, но я вызывал функцию в с++, посмотрел в дизассемблере и параметр передавался через стек. Поэтому сделал так же.

@Artishok · 24.03.2011, 13:35 **[ТС]**

fastcall два значения в регистры ECX EDX а оставшееся в стек.

Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
_AddProc@32 proc
        push    EBP
        mov     EBP,ESP
       ;для этих команд источник можно не писать.тогда они будут записывать все в st(0)
        fld     qword ptr [ebp+16]      ; b 
        fmul    qword ptr [ebp+24]      ; b*c 
        fadd    qword ptr [ebp+32]      ; b*c+d
        fadd    qword ptr [ebp+8]       ; b*c+d+a
        sub     esp, 8 ;отводим восемь байт под одну локальную переменную.зачем?
        fstp    qword ptr [esp] ;копирует значение из стека и выталкивает вершину освобождая st(0)
        call    @Cosinus@8              ; st(0) = cos(b*c+d+a)
        fld     qword ptr [ebp+8]       ; a
        fadd    qword ptr [ebp+16]      ; a+b
        sub     esp, 8
        fstp    qword ptr [esp];значение из стека St(0) записывает в esp
        call    _Sinus
        add     esp, 8;?
        faddp ;прибавляем st(0) к st(1) и выдвигаем вершину стека
        pop     EBP
        ret     32
_AddProc@32 endp
 
end

я тут покомментил код немного.но я не понял зачем надо add esp,8 и sub esp,8

Добавлено через 2 минуты

Сообщение от vital792

вообще я думаю нет разницы 2008 или 2010 в данном случае

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

Code
1
1>temp.obj : error LNK2001: unresolved external symbol _AddProc@32

Добавлено через 13 минут
вот так изменил

Assembler
1
2
3
4
call    @Cosinus@8              ; ECX = cos(b*c+d+a)
fld     qword ptr [ECX] ;значение косинуса из регистра в стек заносим
fld     qword ptr [ebp+8]       ; a  значение косинуса в st(1)
fadd    qword ptr [ebp+16]      ; a+b

Добавлено через 10 минут
так для чего собственно нужно было делать в начале

Assembler
1
sub esp,8

а в конце

Assembler
1
add esp,8

?

@vital792 · 24.03.2011, 13:46

Сообщение от Artishok

ну значит есть раз у вас компилится код а у меня все время одна и та же ошибка
Код
1>temp.obj : error LNK2001: unresolved external symbol _AddProc@32

я тоже долго не мог понять - у меня тоже вылазила эта ошибка. Оказалось проблема банальна - Addproc в твоем коде с маленькой буквой p, а регистр важен.

Сообщение от Artishok

fld * * qword ptr [ECX] ;значение косинуса из регистра в стек заносим

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

Сообщение от Artishok

так для чего собственно нужно было делать в начале
Код ASM
sub esp,8

а это чтоб загрузить значение в стек командой сопроцессора fstp. Вместо этого можно загрузить push по частям, начиная со старшей части

Сообщение от Artishok

а в конце
Код ASM
add esp,8

а это уже соглашение _cdecl - стек от параметров освобождает вызывающая процедура

@Artishok · 24.03.2011, 13:49 **[ТС]**

Сообщение от vital792

я тоже долго не мог понять - у меня тоже вылазила эта ошибка. Оказалось проблема банальна - Addproc в твоем коде с маленькой буквой p, а регистр важен.

так в том то и дело что я полностью твой код скопировал и там где public _AddProc@32 поставил

@vital792 · 24.03.2011, 13:52

а точно добавил obj файл в опциях линкера? Если нет будет та же ошибка

@Artishok · 24.03.2011, 13:57 **[ТС]**

Сообщение от vital792

а это чтоб загрузить значение в стек командой сопроцессора fstp. Вместо этого можно загрузить push по частям, начиная со старшей части

то есть дробное число?

Добавлено через 25 секунд

Сообщение от vital792

а точно добавил obj файл в опциях линкера?

что?где?какой линкер?

@vital792 · 24.03.2011, 14:08

Сообщение от Artishok

что?где?какой линкер?

компилируешь asm файл в obj и добавляешь его в опциях

Новые блоги и статьи Все статьи Все блоги /
Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .

murderer 4192 / 1839 / 222 Регистрация: 06.10.2010 Сообщений: 4,127
	21.03.2011, 12:40
	Что ещё за sec/cosec? Может лучше использовать fsincos? 0

@vital792 2014 / 1286 / 61 Регистрация: 05.06.2010 Сообщений: 2,213
	21.03.2011, 22:03
	Artishok, у тебя тип double, соответственно сложения, умножения и проч выполняются с fpu. И результат возвращается на вершине стека сопроцессора 0

@Artishok ЧакЭ одобряЭ 285 / 284 / 86 Регистрация: 27.12.2009 Сообщений: 1,767
	22.03.2011, 13:31 [ТС]
	Спасибо.но суть задания в том чтобы из разных языков вызывать фукнции разными соглашениями.буду разбираться 0

@Artishok ЧакЭ одобряЭ 285 / 284 / 86 Регистрация: 27.12.2009 Сообщений: 1,767
	24.03.2011, 13:03 [ТС]
	попробуем запустить на visual studio 2008 0

@vital792 2014 / 1286 / 61 Регистрация: 05.06.2010 Сообщений: 2,213
	24.03.2011, 13:52
	а точно добавил obj файл в опциях линкера? Если нет будет та же ошибка 0