开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 操作系统开发 > 查看源码
STRLST.C
资源名称：ertos.rar　[点击查看]
上传用户：sunrenlu
上传日期：2022-06-13
资源大小：1419k
文件大小：4k
源码类别：

操作系统开发

开发平台：

DOS

STRLST.C：源码内容
  1. /*
  2.  * String List Library
  3.  * Copyright (c) 1990, 1999 Erick Engelke
  4.  */
  5. #include <stdio.h>
  6. #include <string.h>
  7. #include <rtos.h>
  8. #include <strlst.h>
  10. stringlist *strlst_new( void )
  11. {
  12.     stringlist *sl;
  13.     if ( (sl = kcalloc( sizeof( stringlist ), 1 )) != NULL )
  14.         sl->sl_sig = _STRLST_SL_SIG;
  15.     return( sl );
  16. }
  18. /*
  19.  * returns the 1 based index of the new string, or 0 on failure
  20.  */
  21. int strlst_adddata( stringlist *sl, char *s, void *d )
  22. {
  23.     int i;
  24.     stringentry *se, *stemp;
  26.     if ( sl == NULL ) return( 0 );
  27.     if ( sl->sl_sig != _STRLST_SL_SIG ) return( 0 );
  29.     se = kcalloc( sizeof( stringentry ) , 1 );
  30.     if ( se == NULL ) goto fail;
  31.     se->se_sig = _STRLST_SE_SIG;
  34.     /* allocate space, even if orig string is zero length */
  35.     if ( (se->se_string = kstrdup( s )) == NULL ) goto fail;
  37.     se->se_data = d;
  38.     if ( sl->sl_list == NULL ) {
  39.         sl->sl_list = se;
  40.         return( 1 );
  41.     }
  42.     stemp = sl->sl_list;
  43.     i = 1;
  44.     while ( stemp->se_next ) {
  45.         stemp = stemp->se_next;
  46.         i++;
  47.     }
  48.     stemp->se_next = se;
  49.     return( i );
  51. fail:
  52.     if ( se != NULL ) {
  53.         if ( se->se_string != NULL ) kfree ( se->se_string);
  54.         kfree( se );
  55.     }
  56.     return( 0 );
  57. }
  59. int strlst_add( stringlist *sl, char *s )
  60. {
  61.     return( strlst_adddata( sl, s, NULL ));
  62. }
  64. static void free_entry( stringentry *se )
  65. {
  66.     if ( se != NULL ) {
  67.         if ( se->se_sig== _STRLST_SE_SIG ) {
  68.             if ( se->se_string != NULL ) kfree( se->se_string );
  69.             kfree( se );
  70.         }
  71.     }
  72. }
  74. void strlst_del( stringlist *sl, int index )
  75. {
  76.     stringentry *se, *sf;
  77.     int i;
  79.     if ( sl == NULL ) return;
  80.     if ( sl->sl_sig != _STRLST_SL_SIG ) return;
  82.     se = sl->sl_list;
  83.     if ( se == NULL ) return;
  84.     if ( se->se_sig != _STRLST_SE_SIG ) return;
  86.     i = 1;
  87.     if ( index == 1 ) {
  88.         sl->sl_list = se->se_next;
  89.         free_entry( se );
  90.         return;
  91.     }
  93.     while ( se != NULL ) {
  94.         sf = se->se_next;
  95.         if ( i == index - 1 ) {
  96.             if ( sf != NULL ) {
  97.                 se->se_next = sf->se_next;
  98.                 free_entry( sf );
  99.             } else
  100.                 se->se_next = NULL;
  101.             return;
  102.         }
  103.         i++;
  104.         se = sf;
  105.     }
  106.     return;
  107. }
  109. void strlst_freeall( stringlist *sl )
  110. {
  111.     stringentry *se, *sf;
  113.     if ( sl == NULL ) return;
  114.     if ( sl->sl_sig != _STRLST_SL_SIG ) return;
  115.     for ( se = sl->sl_list ; se != NULL ; se = sf ) {
  116.         sf = se->se_next;
  117.         if ( se->se_sig == _STRLST_SE_SIG )
  118.             free_entry( se );
  119.     }
  120.     kfree( sl );
  121. }
  124. char *strlst_getfirst( stringlist *sl, void **dummy, BYTE **data )
  125. {
  126.     stringentry *se;
  128.     if ( sl == NULL ) return( NULL );
  129.     se = sl->sl_list;
  130.     if ( se == NULL ) return( NULL );
  131.     if ( dummy ) *dummy = se->se_next;
  132.     if (data) *data = se->se_data;
  133.     return( se->se_string );
  134. }
  136. char *strlst_getnext( stringlist *sl, void **dummy, BYTE **data )
  137. {
  138.     stringentry *se;
  140.     se = *dummy;
  141.     if (se == NULL ) return( NULL );
  142.     *dummy = se->se_next;
  143.     if (data) *data = se->se_data;
  144.     return( se->se_string );
  145. }
  146. char *strlst_findfirst( stringlist *sl, char *text, void **dummy, BYTE **data )
  147. {
  148.     stringentry *se;
  150.     if ( sl == NULL ) return( NULL );
  151.     se = sl->sl_list;
  152.     while ( se != NULL ) {
  153.         if ( !strcmp( se->se_string, text )) {
  154.             if ( dummy ) *dummy = se->se_next;
  155.             if (data) *data = se->se_data;
  156.             return( se->se_string );
  157.         }
  158.         se = se->se_next;
  159.     }
  160.     return( NULL );
  161. }