Вывести список файлов каталога, в которые разрешена запись

@GreenArrow · Регистрация: 23.02.2015

Студворк — интернет-сервис помощи студентам

Вывести для некоторого каталога имена текстовых файлов, для которых
разрешена запись. Имя каталога задается через параметр командной строки.

C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
#include <stdio.h>
#include <dirent.h>
#include <sys/stat.h>
#include <string.h> 
main(int argc, char *argv[])
{
 int i;
 struct stat buf;
 struct dirent *mydir;
 char bit[4]; 
 DIR *f;
 if((f = opendir(argv[1])) == NULL) {
  perror("Помилка відкриття каталогу");
  return 1;
 } 
 while((mydir = readdir(f)) != NULL)
  {
    if(strcmp(".",mydir->d_name)&&strcmp("..",mydir->d_name))
     {  
     lstat(mydir->d_name,&buf);
      if ((S_ISREG(buf.st_mode)) && ((buf.st_mode & S_IWUSR))!=0) {
        bit[3] = mydir->d_name[strlen(mydir->d_name)-1];
        bit[2] = mydir->d_name[strlen(mydir->d_name)-2];
        bit[1] = mydir->d_name[strlen(mydir->d_name)-3];
        bit[0] = '.';
        if (!strcmp(".txt",bit)) {printf("Файл - %s \n", mydir->d_name);}
          }
     }
  }
 puts("Кінець каталогу");
 closedir(f);
}

Работает все, но только для текущего каталога, как сделать что бы для любого католога работало? Помогите пожалуйста.

@schdub · 23.02.2015, 14:52

GreenArrow, lstat() нужно передавать абсолютный путь к файлу:

C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
#include <stdio.h>
#include <dirent.h>
#include <sys/stat.h>
#include <string.h> 
int main(int argc, char *argv[]) {
 int i, len;
 struct stat buf;
 struct dirent *mydir;
 char *dirpath = argv[1]; 
 char path[256];
 DIR *f;
 if((f = opendir(dirpath)) == NULL) {
  perror("Помилка відкриття каталогу");
  return 1;
 } 
 while((mydir = readdir(f)) != NULL) {
    if (strcmp(".", mydir->d_name) && strcmp("..", mydir->d_name)) {
      strcpy(path, dirpath);
      strcat(path, "/");
      strcat(path, mydir->d_name);
      lstat(path, &buf);
      if ((S_ISREG(buf.st_mode)) && ((buf.st_mode & S_IWUSR))!=0) {
        len = strlen(mydir->d_name);
        if (len > 4
            && mydir->d_name[len-4] == '.'
            && mydir->d_name[len-3] == 't'
            && mydir->d_name[len-2] == 'x'
            && mydir->d_name[len-1] == 't') {
          printf("Файл - %s \n", mydir->d_name);}
        }
     }
  }
 puts("Кінець каталогу");
 closedir(f);
}

@GreenArrow · 23.02.2015, 15:07 **[ТС]**

schdub, очень признателен.

Новые блоги и статьи Все статьи Все блоги /
Вывод данных через динамический список в справочнике Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Функция заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .

@GreenArrow 0 / 0 / 0 Регистрация: 23.02.2015 Сообщений: 3
	23.02.2015, 15:07 [ТС]
	schdub, очень признателен. 0

Опции темы