oldXMenu/FindSel.c

   1 /* Copyright    Massachusetts Institute of Technology    1985   */
   2
   3 #include "copyright.h"
   4
   5 /*
   6 Copyright (C) 2001-2011  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
  11 (at 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 <http://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
  35 int
  36 XMenuFindSelection(register XMenu *menu, int p_num, register char *label)
  37 {
  38     register XMPane *p_ptr;
  39     register XMSelect *s_ptr;
  40     register int i = 0;
  41
  42     /*
  43      * Check for NULL pointers!
  44      */
  45     if (label == NULL) {
  46         _XMErrorCode = XME_ARG_BOUNDS;
  47         return(XM_FAILURE);
  48     }
  49
  50     /*
  51      * Find the right pane.
  52      */
  53     p_ptr = _XMGetPanePtr(menu, p_num);
  54     if (p_ptr == NULL) return(XM_FAILURE);
  55
  56     /*
  57      * Find the right selection.
  58      */
  59     for (
  60         s_ptr = p_ptr->s_list->next;
  61         s_ptr != p_ptr->s_list;
  62         s_ptr = s_ptr->next
  63     ){
  64         if (s_ptr->label_length == 0) {
  65             if (*label == '\0') {
  66                 _XMErrorCode = XME_NO_ERROR;
  67                 return (i);
  68             }
  69         }
  70         else {
  71             if (strncmp (label, s_ptr->label, s_ptr->label_length) == 0) {
  72                 _XMErrorCode = XME_NO_ERROR;
  73                 return (i);
  74             }
  75         }
  76         i++;
  77     }
  78
  79     /*
  80      * If we get here then we have not found
  81      * a match.
  82      */
  83     _XMErrorCode = XME_S_NOT_FOUND;
  84     return (XM_FAILURE);
  85 }
  86