DataMuseum.dk

Presents historical artifacts from the history of:

RC4000/8000/9000

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC4000/8000/9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦98ca972b4⟧ TextFile

    Length: 4608 (0x1200)
    Types: TextFile
    Names: »fnames      «

Derivation

└─⟦9ccaf6601⟧ Bits:30008165 Bånd med SW8000 kildetekst/release værktøjer
    └─⟦40b1eb8cd⟧ 
        └─⟦this⟧ »fnames      « 

TextFile

\f

;  tas 1.0 14.05.87                                   fnames    ...1...

;  @(#)fnames	1.3  (RC International)  7/10/90
;
; Terminal access system for rc8000 - A/S Regnecentralen
; Erik Poulsen 

m.  fnames  1.3

;  Revisions historie
;
;  87.01.15  release til betatest
;
;  87.05.14  release 1.0
;
;;
\f

;  tas 1.0 14.05.87                                   fnames    ...2...

; f - names in coroutine descriptor

      f0  = 0     ; saved ic  (skal være første ord )
      f1  = 2     ; priority
      f13 = 4     ; test mask
      f21 = 6     ; state
      f14 = 8     ; coroutine ident
      f2  = 10    ; activity next (active/timer queue)
      f3  = 12    ; activity prev
      f4  = 14    ; semaphore next (semaphor queue)
      f5  = 16    ; semaphore prev 
      f6  = 18    ; mailbox next (mailbox queue)
      f7  = 20    ; mailbox prev
      f8  = 22    ; timer (timeout value)
      f9  = 24    ; wait letter mask
      f10 = 26    ; w0 (result)
      f11 = 28    ; w1
      f12 = 30    ; w2
      f15 = 32    ; saved return from wait letter
      f16 = 34    ; letter addr.
      f17 = 36    ; saved pool addr.
      f18 = 38    ; saved return from wait buffer
      f22 = 40    ; main_mbx
      f25 = 48    ; lock_count
      f26 = 50    ; stop_sem, bruges af th coroutiner
      f27 = 56    ; create result
      f28 = 58    ; sem_wait_addr (adresse på sem coroutinen venter på)
      f20 = 60    ; længde af faste del af cdescr

; semaphore structure

      f30 = 0     ; next coroutine ( coroutine queue )
      f31 = 2     ; prev coroutine
      f32 = 4     ; value
      f33 = 6     ; semaphore size

\f

;  tas 1.0 14.05.87                                   fnames    ...3...


; mailbox structure

      f40 = 0     ; next coroutine ( coroutine queue )
      f41 = 2     ; prev coroutine
      f42 = 4     ; next letter ( letter queue )
      f43 = 6     ; prev letter
      f44 = 8     ; mailbox size


; pool head structure

      f50 = f30   ; next coroutine ( coroutine wait queue )
      f51 = f31   ; prev coroutine
      f52 = f32   ; value
      f53 = 6     ; first free 
      f54 = 8     ; size pool head

; link description structure

      f70 = 28    ; link description size
      f71 = 0     ; operation  : semaphor
      f72 = 6     ; reserve    : semaphor
      f73 = 12    ; free_seg   : semaphor
      f74 = 18    ; cur_op     
      f75 = 20    ; ident
      f76 = 22    ; first_used
      f77 = 24    ; first_free
      f78 = 26    ; segments

\f

;  tas 1.0 14.05.87                                   fnames    ...4...


; coretable entry

      f80 = 8     ; entry size
      f81 = 0     ; prio
      f82 = 1     ; type
      f83 = 2     ; segment_no
      f84 = 4     ; mcl_chain


; mcl program table entry

      f90 = 24    ; entry size
      f91 = 0     ; pda
      f92 = 2     ; prog. name + nte
      f96 = 14    ; name base interval
      f93 = 16    ; users
      f94 = 18    ; max segment no
      f95 = 20    ; chain head

\f

;  tas 1.0 14.05.87                                   fnames    ...5...

; terminal beskrivelse

      f100 = 62   ; længde af beskrivelse
      f101 = 0    ; next
      f102 = 2    ; head_session
      f103 = 4    ; cur_th
      f104 = 6    ; user id
      f105 = 16   ; cpw (andet ord)
      f106 = 18   ; uid
      f107 = 20   ; tpda
      f108 = 22   ; name + nte
      f109 = 32   ; type
      f110 = 34   ; ttda
      f111 = 36   ; termspec
      f112 = 52   ; ord med gemt term table type
      f113 = 54   ; s (status fra terminal)
      f114 = 56   ; sender (pda for proces der sidst har haft io)
      f115 = 58   ; th stopped (sættes af th til -1 når den stopper)
      f116 = 60   ; cth - current th i sm coroutine

\f

;  tas 1.0 14.05.87                                   fnames    ...6...


; terminal type beskrivelse

      f120 = 4 + 54     ; længde af terminal type beskrivelse
      f121 = 0          ; type
      f122 = 2          ; users
      f123 = 4          ; start typebeskrivelse fra tascat
      f134 = f123 + 3   ; terminal mode
      f124 = f123 + 4   ; antal tegn pr. linie
      f125 = f123 + 5   ; antal linier
      f126 = f123 + 6   ; sendes af cursor up
      f127 = f123 + 7   ; sendes af cursor down
      f128 = f123 + 8   ; sendes af cursor left
      f129 = f123 + 9   ; sendes af cursor right
      f130 = f123 + 12  ; clear to end of screan seq.
      f131 = f123 + 44  ; cursor addressing seq.
      f132 = f123 + 50  ; cursor up char
      f133 = f123 + 52  ; cursor left char

      
      
      
▶EOF◀