home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / x / volume10 / contool / part01 / load_icon.c < prev    next >
C/C++ Source or Header  |  1990-10-30  |  2KB  |  64 lines
  1. /************************************************************************/
  2. /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  3. /*                                    */
  4. /*    Permission to use, copy, modify, and distribute this software    */
  5. /*    and its documentation for any purpose and without fee is    */
  6. /*    hereby granted, provided that the above copyright notice    */
  7. /*    appear in all copies and that both that copyright notice and    */
  8. /*    this permission notice appear in supporting documentation, and    */
  9. /*    that the name of Chuck Musciano and Harris Corporation not be    */
  10. /*    used in advertising or publicity pertaining to distribution    */
  11. /*    of the software without specific, written prior permission.    */
  12. /*    Chuck Musciano and Harris Corporation make no representations    */
  13. /*    about the suitability of this software for any purpose.  It is    */
  14. /*    provided "as is" without express or implied warranty.  This     */
  15. /*    software may not be sold without the prior explicit permission    */
  16. /*    of Harris Corporation.                        */
  17. /************************************************************************/
  18.  
  19. #include    <stdio.h>
  20. #include    <sys/file.h>
  21.  
  22. #include    <xview/xview.h>
  23. #include    <xview/icon_load.h>
  24.  
  25. #include    "manifest.h"
  26. #include    "contool.h"
  27.  
  28. PUBLIC    char    *getenv();
  29.  
  30. /************************************************************************/
  31. EXPORT    Server_image    load_icon(path, message)
  32.  
  33. char    *path;
  34. char    *message;
  35.  
  36. {    char    *icon_path, new_path[1024], *p, *q;
  37.  
  38.     if (*path == '/')
  39.        return(icon_load_svrim(path, message));
  40.     else {
  41.        if ((p = getenv("ICON_PATH")) != NULL)
  42.           icon_path = strsave(p);
  43.        else
  44.           icon_path = strsave(ICON_PATH);
  45.        for (p = icon_path; *p; ) {
  46.           if (q = index(p, ':'))
  47.              *q = '\0';
  48.           strcpy(new_path, p);
  49.           strcat(new_path, "/");
  50.           strcat(new_path, path);
  51.           if (access(new_path, R_OK) == 0) {
  52.              free(icon_path);
  53.              return(icon_load_svrim(new_path, message));
  54.              }
  55.           else if (q != NULL)
  56.              p = q + 1;
  57.           else
  58.              break;
  59.           }
  60.        free(icon_path);
  61.        return(icon_load_svrim(path, message));
  62.        }
  63. }
  64.