The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка  RSS
"поиск ссылок на файлы"
Вариант для распечатки  
Пред. тема | След. тема 
Форумы Программирование под UNIX (Public)
Изначальное сообщение [Проследить за развитием треда]

"поиск ссылок на файлы" 
Сообщение от edwin Искать по авторуВ закладки(??) on 29-Апр-05, 17:47  (MSK)
Задача: Найти в текущем каталоге все символьные ссылки на файлы, находящиеся не в текущем каталоге

помогите плз

  Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх

 Оглавление

Индекс форумов | Темы | Пред. тема | След. тема
Сообщения по теме

1. "поиск ссылок на файлы" 
Сообщение от VLazarenko emailИскать по авторуВ закладки(ok) on 29-Апр-05, 18:14  (MSK)
>Задача: Найти в текущем каталоге все символьные ссылки на файлы, находящиеся не
>в текущем каталоге
>
>помогите плз

Ну.. а чем помочь?.. собственно :-)
open,fstat.. etc.
В общем ман читай.

  Удалить Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх

2. "поиск ссылок на файлы" 
Сообщение от MaximKuznetsov Искать по авторуВ закладки on 29-Апр-05, 19:29  (MSK)
набросок на tcl..
#!/bin/tclsh
set wd [ pwd ]
foreach name [ glob -- * ] {
  if [ catch { file link $name } link ] {
    continue
  }
  if { [ file normalize [ file dirname $link ] ] != $wd } {
    puts "$name -> $link , target out of current dir."
  }
  # need more tests ?
  if { ! [ file exists $link ] } {
    puts "$name -> $link , not existing target"
  }
}
---
често заявляю - скрипт не тестил, после работы от tcl и так мозги сводит..


  Удалить Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх

3. "поиск ссылок на файлы" 
Сообщение от edwin Искать по авторуВ закладки(??) on 29-Апр-05, 20:36  (MSK)
кто-нибудь знает, как это сделать с помощью awk?
  Удалить Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх

4. "поиск ссылок на файлы" 
Сообщение от madskull Искать по авторуВ закладки(ok) on 29-Апр-05, 22:21  (MSK)
>кто-нибудь знает, как это сделать с помощью awk?


file * | awk -F: '/symbolic link to/{print$1}'

  Удалить Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх

6. "поиск ссылок на файлы" 
Сообщение от madskull Искать по авторуВ закладки(ok) on 29-Апр-05, 22:49  (MSK)
>>кто-нибудь знает, как это сделать с помощью awk?
>
>
>file * | awk -F: '/symbolic link to/{print$1}'

Не получилось с налету с авком
Вот без авка вариант
ls -l | grep '\->' | while read s; do
  [ "$PWD" = "$(dirname "${s##*-> }")" ] || echo ${s% ->*} | sed 's/^\(\S\+\s\+\)\{7\}//' ;
done

  Удалить Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх

5. "поиск ссылок на файлы" 
Сообщение от madskull Искать по авторуВ закладки(ok) on 29-Апр-05, 22:22  (MSK)
>набросок на tcl..
......
>често заявляю - скрипт не тестил, после работы от tcl и так
>мозги сводит..

Зачем же тогда так над собой издеваться?

  Удалить Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх

7. "поиск ссылок на файлы" 
Сообщение от MaximKuznetsov Искать по авторуВ закладки on 29-Апр-05, 22:53  (MSK)
>>набросок на tcl..
>......
>>често заявляю - скрипт не тестил, после работы от tcl и так
>>мозги сводит..
>
>Зачем же тогда так над собой издеваться?
почему-же издеваться ?
элементарно набросал 15 строчек..
издеваться это если реально потестить - наделать странных ссылок в каталоге и смотреть что будет в разных вариациях..
оставил сие занятие вопрошающему ;-)


  Удалить Правка | Высказать мнение | Ответить | Рекомендовать в FAQ | Cообщить модератору | Наверх


Архив | Удалить

Индекс форумов | Темы | Пред. тема | След. тема
Оцените тред (1=ужас, 5=супер)? [ 1 | 2 | 3 | 4 | 5 ]
Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2024 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру