oldXMenu/FindSel.c

   1 /* Copyright    Massachusetts Institute of Technology    1985   */
   2
   3 #include "copyright.h"
   4
   5 /*
   6 Copyright (C) 2001-2018 Free Software Foundation, Inc.
   7
   8 This program is free software: you can redistribute it and/or modify
   9 it under the terms of the GNU General Public License as published by
  10 the Free Software Foundation, either version 3 of the License, or (at
  11 your option) any later version.
  12
  13 This program is distributed in the hope that it will be useful,
  14 but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16 GNU General Public License for more details.
  17
  18 You should have received a copy of the GNU General Public License
  19 along with this program.  If not, see <https://www.gnu.org/licenses/>.
  20 */
  21
  22 /*
  23  * XMenu:       MIT Project Athena, X Window system menu package
  24  *
  25  *      XMenuFindSelection - Find the first selection in a pane who's
  26  *                           label matches a particular string.
  27  *
  28  *      Author:         Tony Della Fera, DEC
  29  *                      January 22, 1986
  30  *
  31  */
  32
  33 #include "XMenuInt.h"
  34 #include <string.h>
  35
  36 int
  37 XMenuFindSelection(register XMenu *menu, int p_num, register char *label)
  38 {
  39     register XMPane *p_ptr;
  40     register XMSelect *s_ptr;
  41     register int i = 0;
  42
  43     /*
  44      * Check for NULL pointers!
  45      */
  46     if (label == NULL) {
  47         _XMErrorCode = XME_ARG_BOUNDS;
  48         return(XM_FAILURE);
  49     }
  50
  51     /*
  52      * Find the right pane.
  53      */
  54     p_ptr = _XMGetPanePtr(menu, p_num);
  55     if (p_ptr == NULL) return(XM_FAILURE);
  56
  57     /*
  58      * Find the right selection.
  59      */
  60     for (
  61         s_ptr = p_ptr->s_list->next;
  62         s_ptr != p_ptr->s_list;
  63         s_ptr = s_ptr->next
  64     ){
  65         if (s_ptr->label_length == 0) {
  66             if (*label == '\0') {
  67                 _XMErrorCode = XME_NO_ERROR;
  68                 return (i);
  69             }
  70         }
  71         else {
  72             if (strncmp (label, s_ptr->label, s_ptr->label_length) == 0) {
  73                 _XMErrorCode = XME_NO_ERROR;
  74                 return (i);
  75             }
  76         }
  77         i++;
  78     }
  79
  80     /*
  81      * If we get here then we have not found
  82      * a match.
  83      */
  84     _XMErrorCode = XME_S_NOT_FOUND;
  85     return (XM_FAILURE);
  86 }