पेजर कार्यक्रम जैसे कम, शीर्ष एन लाइनों को दोहराने में सक्षम


15

क्या lessप्रत्येक प्रदर्शित पृष्ठ पर प्रोग्राम रिपीट फर्स्ट लाइन (या पहली 2 लाइनें) बनाने का कोई तरीका है ?

क्या कोई अन्य पेजर प्रोग्राम है जो यह कर सकता है?

यह डेटाबेस टेबल ब्राउज़िंग, सोचने mysqlया psqlया के लिए एक हत्यारा-ऐप होगा gqlplus...

इस पृष्ठ के निचले भाग में स्क्रीनशॉट देखें । मैं हेडर लाइन + क्षैतिज ascii बार दोहराना चाहता हूं।


ओह लड़का, जो फ्रीज पेन बिंदु की तरह, कम के लिए एक विस्तार के लिए पूछता है। उदाहरण के लिए - 10 सेंट-हेडर कॉलम की 10 पंक्ति और 10 कॉलम पंक्ति हेडर के लिए फाइजर-पेन 10,2 रखना होगा। क्षैतिज और ऊर्ध्वाधर स्क्रॉल क्रमशः पंक्ति और कॉलम हेडर को संरक्षित करेंगे। यह वास्तव में एक psager पेजर के लिए उपयोग करने के लिए अच्छा होगा (merlinmoncure.blogspot.com/2007/10/better-psql-with-less.html)
गनथर स्क्रैडो

जवाबों:


12

विम का उपयोग करके एक समाधान है।

सबसे पहले, आपको एक विम मैक्रो की आवश्यकता है, जो अधिकांश काम करेगा। इसे इसमें सहेजें ~/.vim/plugin/less.vim:

" :Less
" turn vim into a pager for psql aligned results 
fun! Less()
  set nocompatible
  set nowrap
  set scrollopt=hor
  set scrollbind
  set number
  execute 'above split'
  " resize upper window to one line; two lines are not needed because vim adds separating line
  execute 'resize 1'
  " switch to lower window and scroll 2 lines down 
  wincmd j
  execute 'norm! 2^E'
  " hide statusline in lower window
  set laststatus=0
  " hide contents of upper statusline. editor note: do not remove trailing spaces in next line!
  set statusline=\  
  " arrows do scrolling instead of moving
  nmap ^[OC zL
  nmap ^[OB ^E
  nmap ^[OD zH
  nmap ^[OA ^Y
  nmap <Space> <PageDown>
  " faster quit (I tend to forget about the upper panel)
  nmap q :qa^M
  nmap Q :qa^M
endfun
command! -nargs=0 Less call Less()

दूसरा, एक पेजर का अनुकरण करने के लिए, आपको विम का आह्वान करने की आवश्यकता है ताकि यह हो:

  • मानक इनपुट पढ़ें
  • लेकिन अगर कमांड लाइन पर तर्क दिया जाता है, तो वहां जो भी आता है उसे पढ़ें
  • केवल पढ़ने के लिए मोड में काम करते हैं
  • सभी init स्क्रिप्ट को छोड़ दें, लेकिन इसके बजाय ऊपर परिभाषित कम मैक्रो निष्पादित करें

मैंने इसे सहायक स्क्रिप्ट के रूप में एक साथ रखा ~/bin/vimpager:

#!/bin/bash
what=-
test "$@" && what="$@"
exec vim -u NONE -R -S ~/.vim/plugin/less.vim -c Less $what

स्क्रिप्ट को निष्पादन योग्य बनाएं chmod +x ~/bin/vimpager

तीसरा, आपको psql के लिए पेजर प्रोग्राम को ओवरराइड करने की आवश्यकता है। चर को PAGERविश्व स्तर पर सेट न करें , क्योंकि यह अन्य कार्यक्रमों को प्रभावित कर सकता है, न केवल psql। इसके बजाय, इसे अपनी ~/.psqlrcफ़ाइल में जोड़ें :

\setenv PAGER ~/bin/vimpager

वोइला ! अपनी प्रोफ़ाइल को फिर से लोड करने के बाद, आप परिणाम का आनंद ले सकते हैं, जिसे उम्मीद के मुताबिक व्यवहार करना चाहिए (तीर कुंजी दोनों लंबवत और क्षैतिज रूप से ब्राउज़ करें) और इस तरह दिखें कार्रवाई में vimpager:। इसके अलावा, विम की सारी शक्ति वहीं है जहां आपको इसकी आवश्यकता है।


यह प्यारा है, मैंने इसे आजमाया। अब अच्छा होगा अगर कोई इन पंक्ति संख्याओं के बजाय पंक्ति हेडर भी जोड़ सके।
गैंथर शादोव

4

क्या आपने Emacs / XEmacs में SQL मोड की कोशिश की है ?

यह निश्चित रूप से के रूप में moreया के रूप में उपयोग करने के लिए सरल नहीं है less, लेकिन यह क्या आपके लिए पूछ रहा है, एक हेडर पंक्ति छोड़ जबकि स्क्रॉल परिणाम लंबवत और क्षैतिज रूप से।


धन्यवाद, मैं Emacs नहीं जानता, लेकिन यह दिलचस्प लगता है। मुझे अंततः एक शेल स्क्रिप्ट की आवश्यकता होगी जो कि होगी: एमएसीएस शुरू करें, वहां psql चलाएं, (दिए गए कोन के साथ), sql- मोड को सक्षम करें और वह करें जो मैं चाहता हूं (हमेशा शीर्ष 2 पंक्तियों को फ्रीज करें जब स्क्रीन आकार से बड़ा परिणाम हो) । उस पर कोई संकेत?
फाइलमार्ट

3

यह स्वीकृत उत्तर से बहुत अधिक उधार लेता है , लेकिन जोड़ता है ...

  • तेजी से स्क्रॉल करना
  • हेडर में गलती से स्क्रॉल नहीं कर सकते
  • सिंटैक्स हाइलाइटिंग (कुछ क्रेडिट यहाँ है )
    • सकारात्मक / नकारात्मक संख्या, दिनांक, समय, NULLसत्य / गलत (और टी / एफ, वाई / एन, हाँ / नहीं)
    • पंक्ति संख्या, यदि आपके पास उन्हें पाइप चार से पहले है।
  • मदद पाठ
  • विंडोज के लिए Git के साथ शामिल Vim के लिए समर्थन
  • यदि स्टड बफर बदल जाता है तो दृश्य को अपडेट करने की धमकी न दें

कुछ अंशों को आपके विशिष्ट आउटपुट के लिए ट्विस्ट करना पड़ सकता है, क्योंकि मैं उपयोग नहीं करता हूं psql। मेरे उद्देश्यों के लिए मेरे पास थोड़ा अलग सहायक कार्य भी हैं, लेकिन वे स्वीकृत उत्तर के समान हैं

नमूना इनपुट

  | ID |   First   |     Last     | Member | Balance |
--+----+-----------+--------------+--------+---------+
 1|  4 | Tom       | Hanks        | False  |    0.00 |
 2| 12 | Susan     | Patterson    | True   |   10.00 |
 3| 23 | Harriet   | Langford-Wat | False  |    0.00 |
 4|  8 | Jerry     |     NULL     | True   | -382.94 |
[… More rows …]
10| 87 | Horace    | Weaver       | False  |   47.52 |

कोड

" :HeadPager
" Turn vim into a pager with a header row
" Adapted from /unix//a/27840/143088
fun! HeadPager()
    " If you didn't get three lines, shortcut out
    if line('$') < 3
        set nocompatible
        nmap <silent> q :qa!<c-M>
        nmap <silent> Q :qa!<c-M>
        return
    endif

    set noswapfile
    set nocompatible
    set nowrap
    set scrollopt=hor
    set scrollbind

    " Hide statusline in lower window
    set laststatus=0
    " Explain mapped chars in status line.
    set statusline=\ \ \ Q\ to\ quit\.\ Arrows\ or\ mousewheel\ to\ scroll\.\ \(Vim\ commands\ work\,\ too\.\)

    " Delete/copy header lines
    silent execute '1,2d'

    " Split screen with new buffer (opens at top)
    execute 'new'

    " Switch to upper split
    wincmd k

    " Paste the header over the blank line
    execute 'norm! Vp'

    " Header highlighting
    syn match Pipe "|"
    hi def Pipe ctermfg=blue
    syn match Any /[^|]\+/
    hi def Any ctermfg=yellow

    " Switch back to lower split for scrolling
    wincmd j

    " Set lower split height to maximum
    execute "norm! \<c-W>_"

    " Syntax highlighting
    syn cluster CellContents contains=None
    syn match Pipe "|" contained nextgroup=@CellContents skipwhite
    hi def Pipe ctermfg=blue

    " Start with newline or |. End right before next | or EOL
    syn region Cell start=/\v(^|\|)\s*/ end=/\v(\||$)\@=/ contains=LineNumber,Pipe

    syn match NumPos /\v\+?\d+(,?\d{3})*\.?\d*\ze *(\||$)\@=/ contained
    syn match NumNeg   /\v-\d+(,?\d{3})*\.?\d*\ze *(\||$)\@=/ contained
    syn match NumZero         /\v[+-]?0+\.?0*\ze *(\||$)\@=/  contained
    hi def NumPos ctermfg=cyan
    hi def NumNeg ctermfg=red
    hi def NumZero ctermfg=NONE
    syn cluster CellContents add=NumPos,NumNeg,NumZero

    syn match DateVal /\v\d{4}-\d{2}-\d{2}/ contained nextgroup=TimeVal skipwhite
    syn match TimeVal /\v\d{1,2}:\d{2}(:\d{2})?(\.\d+)?(Z| ?\c[AP]M)?\ze *(\||$)\@=/ contained
    hi def DateVal ctermfg=magenta
    hi def TimeVal ctermfg=magenta
    syn cluster CellContents add=DateVal,TimeVal

    syn match TrueVal /\v\c(t(rue)?|y(es)?)\ze *(\||$)\@=/ contained
    syn match FalseVal /\v\c(f(alse)?|no?)\ze *(\||$)\@=/ contained
    hi def TrueVal ctermfg=green
    hi def FalseVal ctermfg=red
    syn match NullVal /\v\cnull?\ze *(\||$)\@=/ contained
    hi def NullVal ctermbg=gray ctermfg=black
    syn cluster CellContents add=TrueVal,FalseVal,NullVal

    syn match LineNumber /^ *\d\+/ contained
    hi def LineNumber ctermfg=yellow

    " Arrows do scrolling instead of moving
    nmap <silent> <Up> 3<c-Y>
    nmap <silent> <Down> 3<c-E>
    nmap <silent> <Left> zH
    nmap <silent> <Right> zL
    nmap <Space> <PageDown>
    " Faster quit (I tend to forget about the upper panel)
    nmap <silent> q :qa!<c-M>
    nmap <silent> Q :qa!<c-M>

    " Ignore external updates to the buffer
    autocmd! FileChangedShell */fd/*
    autocmd! FileChangedRO */fd/*
endfun
command! -nargs=0 HeadPager call HeadPager()

2

आप इसमें कई 'क्षेत्रों' का उपयोग कर सकते हैं screen:

$ cat screenrc.sql
escape ^aa  # adjust as needed
bind q quit # to quickly exit
screen 0 less ${FILE}
screen 1 less ${FILE}
split  # create two regions
focus top # starting with the top region
resize 4  # make it four lines (one for screen line, one for less prompt)
select 0  # display window 0
focus bottom  # in the bottom region
select 1  # display window 1 and focus here

तब आपको बस $ FILE पर्यावरण चर सेट करने की आवश्यकता है:

$ FILE=$HOME/.bash_profile screen -mc screenrc.sql

1
यह लगभग वही है जो मैं चाहता था, लेकिन (ए) शीर्ष विंडो सही स्क्रॉल नहीं करती है, इसलिए यह व्यापक तालिकाओं के लिए बेकार है
फाइलप्रेम

सुनिश्चित नहीं हैं कि 'व्यापक तालिकाओं के लिए बेकार' से आपका क्या मतलब है; स्क्रीन टर्मिनल के आकार तक फैल सकती है (यदि यह fitस्क्रीन कमांड नहीं चलाती है )। मैंने सोचा था कि आप शीर्ष को स्क्रॉल नहीं करना चाहते थे। जब मैंने इसे अपने दम पर परखा, तो दोनों विंडो को स्क्रॉल करना चाहिए जैसा उन्हें चाहिए। शीर्ष दो पंक्तियों (1-2, 3-4, 5-6, आदि) और नीचे स्क्रॉल को आवश्यकतानुसार स्क्रॉल करता है। आपके द्वारा देखे गए व्यवहार को क्या है /
Arcege

0

आप 'फ़ॉरवर्ड' से पहले एक संख्या जोड़ सकते हैं और यह एन लाइन्स को स्क्रॉल करेगा, पूरी लंबाई नहीं। इसलिए यदि आपकी टर्मिनल विंडो 40 लाइन की है, तो 38fकेवल 38 लाइनों को स्क्रॉल करना शुरू करें, अंतिम 'पेज' से अंतिम 2 लाइन छोड़ दें। मैनपेज से:

   SPACE or ^V or f or ^F
          Scroll forward N  lines,  default  one  window  (see  option  -z
          below).   If  N  is  more  than  the screen size, only the final
          screenful is displayed.  Warning: some systems use ^V as a  spe‐
          cial literalization character.

   z      Like  SPACE,  but  if  N is specified, it becomes the new window
          size.

   b or ^B or ESC-v
          Scroll backward N lines,  default  one  window  (see  option  -z
          below).   If  N  is  more  than  the screen size, only the final
          screenful is displayed.

1
मुझे पहले रखने की आवश्यकता है , अंतिम एन लाइनों को नहीं। Google स्प्रेडशीट में "फ्रीज टॉप एन रो" के रूप में।
फाइलप्रेम

आह क्षमा करें। मुझे नहीं पता कि एक उपयोगिता जो ऐसा करेगी। फिर मेरा सुझाव है: दो पैन का उपयोग करें screenया tmuxबनाने के लिए, पहले एक से दो लाइनों ( resize 2) का आकार बदलें और फिर lessदूसरे फलक में, lessसामान्य रूप से चलाएं । आप इसे एक स्क्रिप्ट के रूप में सेट कर सकते हैं। वैकल्पिक उत्तर देखें।
Arsege
हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.