Update du6/list_ops.c

This commit is contained in:
Martin Kačmár 2025-04-17 20:02:33 +00:00
parent de7c9b398d
commit 4cb9c25dc1

View File

@ -1,14 +1,26 @@
#include <stdlib.h>
#include <stddef.h>
#include <stdbool.h> // pre bool
typedef int list_element_t;
typedef struct {
size_t length;
list_element_t elements[]; // flexibilné pole
list_element_t elements[];
} list_t;
// Vytvorí nový zoznam s danou dĺžkou a prvkami nastavenými na default_value
// ==== Deklarácie funkcií (tzv. prototypy) ====
list_t *new_list(size_t length, list_element_t default_value);
list_t *map_list(list_t *list, list_element_t (*map_fn)(list_element_t));
list_t *filter_list(list_t *list, bool (*filter_fn)(list_element_t));
list_element_t foldl_list(list_t *list, list_element_t initial, list_element_t (*fold_fn)(list_element_t, list_element_t));
list_element_t foldr_list(list_t *list, list_element_t initial, list_element_t (*fold_fn)(list_element_t, list_element_t));
list_t *reverse_list(list_t *list);
void delete_list(list_t *list);
// ==== Implementácie ====
list_t *new_list(size_t length, list_element_t default_value) {
list_t *list = malloc(sizeof(list_t) + length * sizeof(list_element_t));
if (list == NULL) {
@ -23,7 +35,6 @@ list_t *new_list(size_t length, list_element_t default_value) {
return list;
}
// Pridá každý prvok zoznamu cez mapovaciu funkciu a vráti nový zoznam
list_t *map_list(list_t *list, list_element_t (*map_fn)(list_element_t)) {
list_t *result = malloc(sizeof(list_t) + sizeof(list_element_t) * list->length);
if (result == NULL) {
@ -39,11 +50,9 @@ list_t *map_list(list_t *list, list_element_t (*map_fn)(list_element_t)) {
return result;
}
// Vytvorí nový zoznam s prvkami, ktoré spĺňajú filter podmienku
list_t *filter_list(list_t *list, bool (*filter_fn)(list_element_t)) {
size_t count = 0;
// Najprv zistíme koľko prvkov bude vo výsledku
for (size_t i = 0; i < list->length; i++) {
if (filter_fn(list->elements[i])) {
count++;
@ -68,7 +77,6 @@ list_t *filter_list(list_t *list, bool (*filter_fn)(list_element_t)) {
return result;
}
// Zredukuje zoznam zľava doprava pomocou fold funkcie
list_element_t foldl_list(list_t *list, list_element_t initial, list_element_t (*fold_fn)(list_element_t, list_element_t)) {
list_element_t acc = initial;
@ -79,11 +87,9 @@ list_element_t foldl_list(list_t *list, list_element_t initial, list_element_t (
return acc;
}
// Zredukuje zoznam sprava doľava pomocou fold funkcie
list_element_t foldr_list(list_t *list, list_element_t initial, list_element_t (*fold_fn)(list_element_t, list_element_t)) {
list_element_t acc = initial;
// Pozor: size_t je unsigned, preto treba použiť podmienku inak
for (size_t i = list->length; i > 0; i--) {
acc = fold_fn(list->elements[i - 1], acc);
}
@ -91,7 +97,6 @@ list_element_t foldr_list(list_t *list, list_element_t initial, list_element_t (
return acc;
}
// Otočí poradie prvkov v zozname
list_t *reverse_list(list_t *list) {
list_t *result = malloc(sizeof(list_t) + sizeof(list_element_t) * list->length);
if (result == NULL) {
@ -107,7 +112,6 @@ list_t *reverse_list(list_t *list) {
return result;
}
// Uvoľní pamäť alokovanú pre zoznam
void delete_list(list_t *list) {
free(list);
}