1 /* 2 * Copyright (c) 1997, 1998 Kungliga Tekniska H�gskolan 3 * (Royal Institute of Technology, Stockholm, Sweden). 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 17 * 3. All advertising materials mentioning features or use of this software 18 * must display the following acknowledgement: 19 * This product includes software developed by Kungliga Tekniska 20 * H�gskolan and its contributors. 21 * 22 * 4. Neither the name of the Institute nor the names of its contributors 23 * may be used to endorse or promote products derived from this software 24 * without specific prior written permission. 25 * 26 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND 27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 29 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE 30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 36 * SUCH DAMAGE. 37 */ 38 39 #ifdef HAVE_CONFIG_H 40 #include <config.h> 41 RCSID("$Id: error.c,v 1.13 1998/02/17 21:19:44 bg Exp $"); 42 #endif 43 #include <stdio.h> 44 #include <stdlib.h> 45 #include <string.h> 46 #include <com_right.h> 47 48 const char * 49 com_right(struct et_list *list, long code) 50 { 51 struct et_list *p; 52 for (p = list; p; p = p->next) { 53 if (code >= p->table->base && code < p->table->base + p->table->n_msgs) 54 return p->table->msgs[code - p->table->base]; 55 } 56 return NULL; 57 } 58 59 struct foobar { 60 struct et_list etl; 61 struct error_table et; 62 }; 63 64 void 65 initialize_error_table_r(struct et_list **list, 66 const char **messages, 67 int num_errors, 68 long base) 69 { 70 struct et_list *et; 71 struct foobar *f; 72 for (et = *list; et; et = et->next) 73 if (et->table->msgs == messages) 74 return; 75 f = malloc(sizeof(*f)); 76 if (f == NULL) 77 return; 78 et = &f->etl; 79 et->table = &f->et; 80 et->table->msgs = messages; 81 et->table->n_msgs = num_errors; 82 et->table->base = base; 83 et->next = *list; 84 *list = et; 85 } 86 87 88 void 89 free_error_table(struct et_list *et) 90 { 91 while(et){ 92 struct et_list *p = et; 93 et = et->next; 94 free(p); 95 } 96 } 97