-
Notifications
You must be signed in to change notification settings - Fork 0
/
opcodes_2.c
175 lines (146 loc) · 3.1 KB
/
opcodes_2.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
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
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
#include "monty.h"
void push(stack_t **stack, unsigned int line_number);
/**
* push - Pushes an element to the stack
* @stack: A pointer to a pointer to the head of the stack_t list
* @line_number: Line number processed
*/
void push(stack_t **stack, unsigned int line_number)
{
stack_t *new_node = malloc(sizeof(stack_t));
stack_t *temp = *stack;
(void)line_number;
if (!new_node)
{
fprintf(stderr, "Error: malloc failed\n");
if (*stack)
free_list(stack);
flag.opcode_flag = 0;
return;
}
new_node->n = flag.number;
if (flag.order)
{
new_node->prev = NULL;
new_node->next = *stack;
if (*stack)
(*stack)->prev = new_node;
*stack = new_node;
}
else
{
if (*stack)
{
while (temp->next)
temp = temp->next;
temp->next = new_node;
new_node->prev = temp;
new_node->next = NULL;
}
else
{
*stack = new_node;
new_node->next = NULL;
new_node->prev = NULL;
}
}
}
/**
* pint - Prints the value at the top of the stack, followed by a new line.
* @stack: A pointer to a pointer to the head of the stack_t list
* @line_number: Line number processed
*/
void pint(stack_t **stack, unsigned int line_number)
{
if (!*stack)
{
fprintf(stderr, "L%d: can't pint, stack empty\n", line_number);
flag.opcode_flag = 0;
return;
}
printf("%d\n", (*stack)->n);
}
/**
* sub - Subtracts the top element of the stack from the second top
* element of the stack.
* @stack: A pointer to a pointer to the head of the stack_t list
* @line_number: Line number processed
*/
void sub(stack_t **stack, unsigned int line_number)
{
stack_t *temp = *stack;
size_t len = 0;
while (temp)
{
len++;
temp = temp->next;
}
if (len < 2)
{
fprintf(stderr, "L%d: can't sub, stack too short\n", line_number);
flag.opcode_flag = 0;
return;
}
temp = *stack;
*stack = (*stack)->next;
(*stack)->n -= temp->n;
free(temp);
}
/**
* mydiv - divides the second top element of the stack
* by the top element of the stack.
* @stack: A pointer to a pointer to the head of the stack_t list
* @line_number: Line number processed currently.
*/
void mydiv(stack_t **stack, unsigned int line_number)
{
stack_t *temp = *stack;
size_t len = 0;
while (temp)
{
len++;
temp = temp->next;
}
if (len < 2)
{
fprintf(stderr, "L%d: can't div, stack too short\n", line_number);
flag.opcode_flag = 0;
return;
}
if ((*stack)->n == 0)
{
fprintf(stderr, "L%d: division by zero\n", line_number);
flag.opcode_flag = 0;
return;
}
temp = *stack;
*stack = (*stack)->next;
(*stack)->n /= temp->n;
free(temp);
}
/**
* mymul - Multiplies the second top element of the stack
* with the top element of the stack.
* @stack: A pointer to a pointer to the head of the stack_t list
* @line_number: Line number processed
*/
void mymul(stack_t **stack, unsigned int line_number)
{
stack_t *temp = *stack;
size_t len = 0;
while (temp)
{
len++;
temp = temp->next;
}
if (len < 2)
{
fprintf(stderr, "L%d: can't mul, stack too short\n", line_number);
flag.opcode_flag = 0;
return;
}
temp = *stack;
*stack = (*stack)->next;
(*stack)->n *= temp->n;
free(temp);
}