Wyświetlanie numeru tygodnia w określonym formacie za pomocą ncal lub cal

16

Czy nie podoba ci się to, gdy każde z dwóch poleceń robi jedną rzecz, ale nie jedno i drugie?

To właśnie calrobi. Ładne formatowanie. Brakuje jednak numerów tygodni:

$ cal
    January 2012      
Su Mo Tu We Th Fr Sa  
 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              

To właśnie ncalrobi. Dziwne formatowanie, ale z numerami tygodni:

$ ncal -w
    January 2012      
Su  1  8 15 22 29   
Mo  2  9 16 23 30   
Tu  3 10 17 24 31   
We  4 11 18 25      
Th  5 12 19 26      
Fr  6 13 20 27      
Sa  7 14 21 28      
    1  2  3  4  5   

Rodzaj danych, które chcę, w rzeczywistości skrzyżowanie między cali ncal -w:

$ cal --magik-calendar-week-option
      January 2012      
   Su Mo Tu We Th Fr Sa  
1   1  2  3  4  5  6  7  
2   8  9 10 11 12 13 14  
3  15 16 17 18 19 20 21  
4  22 23 24 25 26 27 28  
5  29 30 31
k0pernikus
źródło

Odpowiedzi:

13

Jeśli żadne z tych poleceń nie odpowiada Twoim potrzebom, możesz gcalzamiast tego zrobić to, co chcesz.

Przykład

$ gcal -K

      April 2014
 Su Mo Tu We Th Fr Sa CW
        1  2  3  4  5 13
  6  7  8  9 10 11 12 14
 13 14 15 16 17 18 19 15
 20 21 22 23 24 25 26 16
 27 28 29 30          17

Drukuje numer tygodnia w ostatniej kolumnie po prawej stronie.

Bibliografia

slm
źródło
gcal --starting-day=Monday --with-week-numberbardziej odpowiada moim potrzebom, ale to narzędzie jest świetne.
k0pernikus
9

Podkreśla dzisiejszą datę i może być wyświetlana w dowolnym miesiącu $1w postaci: YYYY-mm-dd... Domyślnie jest to dzisiejsza data

Skonfigurowano go tak, aby wyświetlał numery tygodni ISO, a pierwszym dniem tygodnia jest poniedziałek.

#!/bin/bash
# Input reference date is expected in  'YYYY-mm-dd' format
#
today=($(date '+%Y %m %d')); Y=0; m=1; d=2                # establish today's date
[[ -z $1 ]] && ref=(${today[@]}) || ref=(${1//-/ })       # get input date
dNbA=$(date --date="$(date +%Y-%m-01)" +'%u')             # day-number of 1st day of reference month
today[m]=$((10#${today[m]})); ref[m]=$((10#${ref[m]}))    # remove leading zero (octal clash)
today[d]=$((10#${today[d]})); ref[d]=$((10#${ref[d]}))    # remove leading zero (octal clash)
nxtm=$(( ref[m]==12 ?1       :ref[m]+1 ))                 # month-number of next month
nxtY=$(( ref[m]==12 ?ref[Y]+1:ref[Y]   ))                 # year-number of next month
nxtA="$nxtY-$nxtm-1"                                      # date of 1st day of next month
refZ=$(date --date "$(date +$nxtA) yesterday" +%Y-%m-%d)  # date of last day of reference  month
days=$(date --date="$refZ" '+%d')                         # days in reference month

h1="$(date --date="${ref[Y]}-${ref[m]}-${ref[d]}" '+%B %Y')" # header 1 
h2="Mo Tu We Th Fr Sa Su"                                    # header 2 
printf "    %$(((${#h2}-${#h1}-1)/2))s%s\n" " " "$h1"
printf "    %s\n" "$h2"
# print week rows   
printf "%2d  " "$((10#$(date -d "$(date +${ref[Y]}-${ref[m]}-01)" +'%V')))" # week-number (of year) with suppressed leading 0
printf "%$(((dNbA-1)*3))s"  # lead spaces (before start of month)
dNbW=$dNbA  # day-number of week
dNbM=1      # day-number of month
while ((dNbM <= days)) ;do
    if (( today[Y]==ref[Y] &&  
          today[m]==ref[m] && 
          today[d]==dNbM )) ;then
        printf "\x1b[7m%2d\x1b[0m " "$dNbM" # highlight today's date 
    else
        printf "%2d " "$dNbM"
    fi
    ((dNbM++))
    if ((dNbW  >=7)) ;then
        cdate=$((10#$(date -d "$(date +${ref[Y]}-${ref[m]}-$dNbM)" +'%V'))) # remove leading zero (octal clash)
        printf "\n%2d  " "$cdate" # week-number of year
        dNbW=0
    fi
    ((dNbW++))
done
printf "%$(((8-dNbW)*3))s\n" # trailing spaces (after end of month)

Oto pokaz z tego miesiąca (z 20podświetleniem)

       January 2012
    Mo Tu We Th Fr Sa Su
52                     1 
 1   2  3  4  5  6  7  8 
 2   9 10 11 12 13 14 15 
 3  16 17 18 19 20 21 22 
 4  23 24 25 26 27 28 29 
 5  30 31                
Peter.O
źródło
Nawet nie zauważyłem problemu z iso. To wystarczy :)
k0pernikus,
1
@ k0pernikus: Właśnie zmodyfikowałem skrypt .. (około 35 minut po opublikowaniu powyższego komentarza) .. Zostało to złapane 08i 09interpretowane jako ósemkowe zamiast dziesiętnego .. Teraz powinno być dobrze ...
Peter.O
7

Możesz użyć nldo numerowania linii (taki jest cel programu :). Ale musisz skądś wyodrębnić pierwszy tydzień w miesiącu. Można to zrobić zncal samodzielnie:

$ ncal -w 2 2012 | tail -1 | awk '{print $1}'
5

Wstawiamy to jako parametr do nlopcji-v (numer linii początkowej) i mówimy, aby numerowała tylko linie z liczbami lub spacjami.

$ cal 2 2012 | nl -bp'^[0-9 ]\+$' -w2 -s'  ' -v$(ncal -w 2 2012 | tail -1 | awk '{print $1}')
       February 2012
    Su Mo Tu We Th Fr Sa
 5            1  2  3  4
 6   5  6  7  8  9 10 11
 7  12 13 14 15 16 17 18
 8  19 20 21 22 23 24 25
 9  26 27 28 29

To wszystko jest okropnie kruche. W każdym razie, jeśli nie będziesz potrzebować calbardziej zaawansowanych opcji, zadziała. Możesz umieścić go w pliku i zastąpić"$@" tam, gdzie umieściłem 2 2012.


EDYCJA: Ale to jest ŹLE! Właśnie zauważyłem, że pierwszy tydzień stycznia może mieć numer 52 lub 53! Musimy więc zrobić wyjątek w styczniu lub po prostu wyodrębnić wszystkie liczby tygodni ncali zastosować je do wyniku cal.

To jest rozwiązanie, o którym myślałem pierwotnie, ale pomyślałem (błędnie), że uprościłem to przy użyciu nl . Używa paste, który łączy pliki obok siebie. Ponieważ nie ma żadnego pliku, musimy użyć bashizmu<(...) ; tego chciałem uniknąć.

Naszym pierwszym „plikiem” będzie lista numerów tygodni z dwoma pustymi wierszami na początku:

$ printf '   \n   \n' && printf '%2d \n' $(ncal -w 1 2011 | tail -1)


52
 1
 2
 3
 4
 5

Drugi, tylko wynik cal. Wszystko razem, jako parametry do paste:

$ paste -d' ' <(printf '   \n   \n' && printf '%2d \n' $(ncal -w 1 2011 | tail -1)) <(cal 1 2011)
        January 2011
    Su Mo Tu We Th Fr Sa
52                     1
 1   2  3  4  5  6  7  8
 2   9 10 11 12 13 14 15
 3  16 17 18 19 20 21 22
 4  23 24 25 26 27 28 29
 5  30 31

O wiele bardziej niechlujny i niezgodny niż ten drugi. En fin ...

angus
źródło
Nie za dobrze :-/. Zobacz moją edycję.
angus
7

Wygeneruj sekwencję tygodni ncali użyj, pasteaby mieć oba wyjścia obok siebie.

$ paste <(echo; echo; ncal -w | tail -1 | xargs -n1 printf '%2d\n') <(cal)

Jeśli nie lubisz używania tabulatorów jako ograniczników, po prostu dodaj coś takiego sed 's/\t/ /'


Edycja : znacznie prościej, nie musisz przejmować się kartami:

$ paste -d' ' <((echo -n '   '; ncal -w | tail -1 )| fold -w 3) <(cal)
funollet
źródło
Elegancki i ucieleśnia wiele z 17 zasad uniksowych ESR . Powinno być przyjętą odpowiedzią, ponieważ naprawdę łączy wyniki cali ncal(inne podejścia replikują zachowanie jednego callub dwóch ncal).
biskup
4

Jednym sposobem jest użycie Perla (moim językiem wyjściowym calpolecenia jest hiszpański, ale mam nadzieję, że wynik nie różni się od angielskiego):

$ cal | perl -pe 'if ( m/\A\s*\d/ ) { s/\A/++$i . qq[ ] x 2/e } else { s/\A/qq[ ] x 3/e }'

Wynik:

       enero de 2012   
   lu ma mi ju vi sá do
1                     1
2   2  3  4  5  6  7  8
3   9 10 11 12 13 14 15
4  16 17 18 19 20 21 22
5  23 24 25 26 27 28 29
6  30 31

Wyjaśnienie:

-pe                     # For every input line from previous pipe, execute  next
                        # instructions and print to output.
if ( m/\A\s*\d/ )       # If line begins with a digit omitting spaces...
s/\A/++$i . qq[ ] x 2/e # Insert at the beginning of the line a counter plus two spaces.
else                    # else...
s/\A/qq[ ] x 3/e        # Insert three spaces at the beginning of the line.
Birei
źródło
jak to będzie działać przez kolejne miesiące. Tygodnie lutowe nie zaczynają się od nowa 1, zaczynają się albo od 5 do 6 podobnie marzec będzie od 9/10.
Nikhil Mulley,
cal 02 2012, czy to się nie powiedzie?
Nikhil Mulley,
@Nikhil: Nie rozumiem, co masz na myśli. Czy możesz spróbować wyjaśnić to bardziej szczegółowo? Czy skrypt zawiedzie cal 02 2012? Wydawało się, że działa w moim teście.
Birei,
@Nikhil: Ach, ok. Nie rozumiem pytania. Oznacza bezwzględne liczby tygodni i nie odnosi się do każdego miesiąca. Za chwilę usunę złą odpowiedź.
Birei,
1
cool .. nie usuwaj odpowiedzi, zachowaj ją w celach informacyjnych.
Nikhil Mulley,
1

Bez wystarczającej liczby powtórzeń, aby skomentować odpowiedź przez slm, gcal można zainstalować w systemie Mac OS przy użyciubrew install gcal .

(Najpierw znalazłem odpowiedź tutaj, a potem tę odpowiedź na pytanie inaczej, ale w odpowiedzi na system unix brakowało wszystkich informacji potrzebnych do zainstalowania na komputerze Mac).

użytkownik3.1415927
źródło
0

Oto moje rozwiązanie, które ma krótszy kod i działa dobrze dla innych dat niż bieżący miesiąc. Przepraszamy za naród amerykański, używa formatu ISO, tzn. Pierwszy dzień tygodnia to poniedziałek. Odbywa się to za pomocą opcji -m dla cal i opcji% V dla daty

#!/bin/bash
if [ "$1" = "" ]
then
  when="now"
else
  when="$1"
fi
y=$(date --date "$when" +%Y )
if [ $? -ne 0 ]
then
  exit
fi
m=$(date --date "$when" +%m )
w=$(date --date $(printf %4d%02d01 $y $m) +%V)
cal -m $m $y |
  awk -v w=$w '
    NR>2{ww=w++}
    $0!=""{printf "%2s %s\n", ww , $0}
  '
Pistolet
źródło
0

Zrobiłem ten skrypt, aby wygenerować kalendarz dyżurów dla zespołów. Generuje kalendarz z numerami tygodni i przypisuje im nazwy (po prostu round-robin). Po wydrukowaniu wyniku wystarczy skopiować go do programu Excel i wykonać polecenie „tekst do kolumny” przez; i ponownie wykonaj „tekst do kolumny” w pierwszej kolumnie, używając opcji „naprawiono”. Zaletą tego kalendarza (w porównaniu z orientacją poziomą) jest to, że można użyć automatycznego filtrowania (Alt + dff) i znaleźć tylko tygodnie.

#! / usr / bin / ksh
y = 2017
set -A team1 Petars Justas Richard Jukka Jesper
set -A team2 Modestas Timo Mats Andreas

i1 = 0
i2 = 0
wn = 1
własny = 1

echo „WN Month Mo Tu We Th Fr Sa Su; Team1; Team2”
ycal = `dla mw 1 2 3 4 5 6 7 8 9 10 11 12
robić
IFS =
        cal -m $ m $ y | egrep -v "Mo | ^ $" | podczas odczytu linii
        robić
                echo $ linia | grep -q $ y && mname = $ linia || print $ mname $ line | sed 's /' $ y '//'
        gotowy
zrobione`
IFS =
echo "$ ycal" | podczas odczytu linii 2
robić
IFS =
        echo "$ line2" | grep -v "1 2 3 4 5 6 7" | egrep -q "* 1 | * 1 $" || niech wn ++
        [$ own -ne $ wn] && {\
                [$ i1 -eq $ {# team1 [@]} - 1] && i1 = 0 || niech i1 ++; \
                [$ i2 -eq $ {# team2 [@]} - 1] && i2 = 0 || niech i2 ++; }
        printf '% 2s% s;% s;% s \ n' $ wn $ line2 $ {team1 [$ i1]} $ {team2 [$ i2]}
        own = $ wn
gotowy

Przepraszamy, kod trochę nieprzyjemny ... i bez komentarzy ... ale działa dobrze;)

Petras L.
źródło
0

Naprawdę nie chcę instalować gcali nie mogłem sprawić, by działał poprawnie w moim systemie. Zatem bez gcal odpowiedź funolleta jest rzeczywiście najlepszym rozwiązaniem. Właśnie zmieniłem to trochę, aby zachowało także formatowanie, takie jak podświetlenie dnia , kolory itp. Za pomocą polecenia. Usunąłem również zbędne znaki, dzięki czemu nadaje się jako alias:script

alias today="paste -d' ' <((echo ' '{,};ncal -w|tail -1)|fold -w3) <(script /dev/null -qc cal)"

Lub zastąp calnową funkcją. Jednak z tym nie można robić takich rzeczy cal -3. Otrzymujesz prawidłowe tygodnie, ale nie są one odpowiednio wyrównane. Prostym, ale niepełnym rozwiązaniem jest sprawdzenie, czy caljest wywoływane bez argumentów, na przykład:

function cal {
    if [[ $# -eq 0 ]]; then
        paste -d' ' <((echo ' '{,};ncal -w $@|tail -1)|fold -w3) <(script /dev/null -qc "cal $@")
    else
        /usr/bin/cal "$@"
    fi
}
pięć
źródło