flag.c
上传用户:xiejiait
上传日期:2007-01-06
资源大小:881k
文件大小:3k
源码类别:

SCSI/ASPI

开发平台:

MultiPlatform

  1. /* @(#)flag.c 2.5 98/09/05 Copyright 1986 J. Schilling */
  2. /*
  3.  * Copyright (c) 1986 J. Schilling
  4.  */
  5. /*
  6.  * This program is free software; you can redistribute it and/or modify
  7.  * it under the terms of the GNU General Public License as published by
  8.  * the Free Software Foundation; either version 2, or (at your option)
  9.  * any later version.
  10.  *
  11.  * This program is distributed in the hope that it will be useful,
  12.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.  * GNU General Public License for more details.
  15.  *
  16.  * You should have received a copy of the GNU General Public License
  17.  * along with this program; see the file COPYING.  If not, write to
  18.  * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  19.  */
  20. #include <stdio.h>
  21. #include "io.h"
  22. #include <stdxlib.h>
  23. #ifdef DO_MYFLAG
  24. #define FL_INIT 10
  25. int _io_glflag; /* global default flag */
  26. int _fl_inc = 10; /* increment for expanding flag struct */
  27. int _fl_max = FL_INIT; /* max fd currently in _io_myfl */
  28. _io_fl _io_smyfl[FL_INIT]; /* initial static space */
  29. _io_fl *_io_myfl = _io_smyfl; /* init to static space */
  30. LOCAL int _more_flags __PR((FILE * ));
  31. LOCAL int _more_flags(fp)
  32. FILE *fp;
  33. {
  34. register int f = fileno(fp);
  35. register int n = _fl_max;
  36. register _io_fl *np;
  37. while (n <= f)
  38. n += _fl_inc;
  39. if (_io_myfl == _io_smyfl) {
  40. np = (_io_fl *) malloc(n * sizeof(*np));
  41. fillbytes(np, n * sizeof(*np), '');
  42. movebytes(_io_smyfl, np, sizeof(_io_smyfl)/sizeof(*np));
  43. } else {
  44. np = (_io_fl *) realloc(_io_myfl, n * sizeof(*np));
  45. if (np)
  46. fillbytes(&np[_fl_max], (n-_fl_max)*sizeof(*np), '');
  47. }
  48. if (np) {
  49. _io_myfl = np;
  50. _fl_max = n;
  51. return (_io_get_my_flag(fp));
  52. } else {
  53. return (_IONORAISE);
  54. }
  55. }
  56. int _io_get_my_flag(fp)
  57. register FILE *fp;
  58. {
  59. register int f = fileno(fp);
  60. register _io_fl *fl;
  61. if (f >= _fl_max)
  62. return (_more_flags(fp));
  63. fl = &_io_myfl[f];
  64. if (fl->fl_io == 0 || fl->fl_io == fp)
  65. return (fl->fl_flags);
  66. while (fl && fl->fl_io != fp)
  67. fl = fl->fl_next;
  68. if (fl == 0)
  69. return (0);
  70. return (fl->fl_flags);
  71. }
  72. void _io_set_my_flag(fp, flag)
  73. FILE *fp;
  74. int flag;
  75. {
  76. register int f = fileno(fp);
  77. register _io_fl *fl;
  78. register _io_fl *fl2;
  79. if (f >= _fl_max)
  80. (void) _more_flags(fp);
  81. fl = &_io_myfl[f];
  82. if (fl->fl_io != (FILE *)0) {
  83. fl2 = fl;
  84. while (fl && fl->fl_io != fp)
  85. fl = fl->fl_next;
  86. if (fl == 0) {
  87. if ((fl = (_io_fl *) malloc(sizeof(*fl))) == 0)
  88. return;
  89. fl->fl_next = fl2->fl_next;
  90. fl2->fl_next = fl;
  91. }
  92. }
  93. fl->fl_io = fp;
  94. fl->fl_flags = flag;
  95. }
  96. void _io_add_my_flag(fp, flag)
  97. FILE *fp;
  98. int flag;
  99. {
  100. int oflag = _io_get_my_flag(fp);
  101. oflag |= flag;
  102. _io_set_my_flag(fp, oflag);
  103. }
  104. #endif /* DO_MYFLAG */