stardis-tbound-prog.c (2870B)
1 /* Copyright (C) 2018-2025 |Méso|Star> (contact@meso-star.com) 2 * 3 * This program is free software: you can redistribute it and/or modify 4 * it under the terms of the GNU General Public License as published by 5 * the Free Software Foundation, either version 3 of the License, or 6 * (at your option) any later version. 7 * 8 * This program is distributed in the hope that it will be useful, 9 * but WITHOUT ANY WARRANTY; without even the implied warranty of 10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 11 * GNU General Public License for more details. 12 * 13 * You should have received a copy of the GNU General Public License 14 * along with this program. If not, see <http://www.gnu.org/licenses/>. */ 15 16 #include "stardis-app.h" 17 #include "stardis-tbound-prog.h" 18 #include "stardis-prog-properties.h" 19 #include "stardis-intface.h" 20 21 #include <rsys/rsys.h> 22 #include <rsys/mem_allocator.h> 23 #include <rsys/str.h> 24 25 #include <sdis.h> 26 27 #include <limits.h> 28 29 /******************************************************************************* 30 * Public Functions 31 ******************************************************************************/ 32 res_T 33 init_t_boundary_prog 34 (struct mem_allocator* allocator, 35 struct t_boundary_prog** dst) 36 { 37 res_T res = RES_OK; 38 int str_initialized = 0; 39 ASSERT(allocator && dst && *dst == NULL); 40 *dst = MEM_CALLOC(allocator, 1, sizeof(**dst)); 41 if(! *dst) { 42 res = RES_MEM_ERR; 43 goto error; 44 } 45 str_init(allocator, &(*dst)->name); 46 str_init(allocator, &(*dst)->prog_name); 47 str_initialized = 1; 48 (*dst)->mat_id = UINT_MAX; 49 end: 50 return res; 51 error: 52 if(str_initialized) { 53 str_release(&(*dst)->name); 54 str_release(&(*dst)->prog_name); 55 } 56 if(*dst) MEM_RM(allocator, *dst); 57 goto end; 58 } 59 60 void 61 release_t_boundary_prog 62 (struct t_boundary_prog* bound, 63 struct mem_allocator* allocator) 64 { 65 size_t i; 66 ASSERT(bound && allocator); 67 str_release(&bound->name); 68 str_release(&bound->prog_name); 69 if(bound->prog_data) 70 bound->release(bound->prog_data); 71 for(i = 0; i < bound->argc; i++) MEM_RM(allocator, bound->argv[i]); 72 MEM_RM(allocator, bound->argv); 73 /* library_close call is managed at lib_data level */ 74 MEM_RM(allocator, bound); 75 } 76 77 res_T 78 str_print_t_boundary_prog 79 (struct str* str, 80 const struct t_boundary_prog* b) 81 { 82 res_T res = RES_OK; 83 ASSERT(str && b); 84 ASSERT(b->argc >= 1); /* At least one argument which is the program name */ 85 86 ERR(str_append_printf(str, 87 "programmed T boundary for solid '%s': lib='%s', " 88 "(using medium %u as external medium)", 89 str_cget(&b->name), str_cget(&b->prog_name), b->mat_id)); 90 if(b->argc > 1) { 91 size_t i; 92 ERR(str_append_printf(str, ", provided arguments:\n")); 93 for(i = 1; i < b->argc; i++) { 94 ERR(str_append_printf(str, (i+1 == b->argc ? "\t%s" : "\t%s\n"), b->argv[i])); 95 } 96 } 97 end: 98 return res; 99 error: 100 goto end; 101 } 102