View source

'''DCL''', the '''DIGITAL Command Language''', is the standard command language
<!-- Note: CLI stands for Command Language Interpreter, not command line interface -->
adopted by most of the [[operating systems]] that were sold by the former [[Digital Equipment Corporation]] (which has since been acquired by [[Hewlett-Packard]]). It had its roots in the [[IAS]] and [[RSTS/E]] [[operating systems]] and was implemented as a standard across most of Digital's operating systems, notably [[RSX-11]], but took its most powerful form in the [[OpenVMS]] operating system.  

A [[scripting language]] that was written when the [[Fortran]] [[programming language]] was in heavy use, it supports several [[datatype]]s, including strings, [[Integer (computer science)|integers]], [[bit]] arrays, [[array]]s and booleans, but not [[floating point]] numbers. Access to [[OpenVMS]] ''system services'' ([[Kernel (computer science)|kernel]] [[API]]) is through lexical [[Function (programming)|functions]], which perform the same as their [[compiled language]] counterparts and allow scripts to get information on system state. DCL includes [[Conditional statement|IF-THEN-ELSE]], access to all the [[Record Management Services|RMS]] file types including stream, indexed, and sequential, but unfortunately lacks a [[While loop|DO-WHILE]] or other [[Program loop|looping]] construct, requiring users to make do with IF and [[GOTO]]-label statements instead.

For the OpenVMS implementation, the command line parser is a runtime [[Library (computer science)|library]] (<tt>CLI$</tt>) that can be compiled into user applications and therefore gives a consistent command line interface for both operating system supplied commands and user written commands. The command line must start with a verb and is then followed by arguments and/or position independent qualifiers (switches in [[Unix]] terminology), which can occur anywhere on the command line, or position dependent qualifiers which affect the parameter they appear after. Most qualifiers are position independent; that is, they can appear anywhere in the command line. Only the first most significant part of the verb and qualifier name is required. An example operating system command may look like:

    set audit/alarm/enable=(authorization, breakin=all)
    show device/files $1$DGA1424:

The second '''show''' command could also be typed as

    sho dev $1$DGA1424:/fil
(While DCL documentation usually shows all DCL commands in uppercase, DCL commands are case-insensitive and may be typed in upper-, lower-, or mixed-case.)

Unlike other systems which use '''[[Path (computing)|paths]]''' for locating commands, DCL requires commands to be defined explicitly, either via CLD (Command Language Definition) definitions or a '''foreign symbol'''.  Most [[OpenVMS]]-native commands are defined via CLD files; these are compiled by the CDU (Command Definition Utility) and added to a DCL 'table' -- <tt>SYS$LIBRARY:DCLTABLES.EXE</tt> by default, although processes are free to use their own tables -- and can then be invoked by the user.  For example, defining a command FOO that accepts the option "/BAR" and is implemented by the image <tt>SYS$SYSEXE:FOO.EXE</tt> could be done with a CLD file similar to:

 DEFINE VERB FOO
    IMAGE "SYS$SYSEXE:FOO.EXE"
    QUALIFIER BAR

The user can then type "<tt>FOO</tt>", or "<tt>FOO/BAR</tt>", and the FOO program will be invoked.  The command definition language supports many types of options, for example dates and file specifications, and allows a qualifier to change the image invoked -- for example "CREATE", to create a file, vs. "CREATE/DIRECTORY" to create a directory.

The other (simpler, but less flexible) method to define commands is via '''foreign commands'''.  This is more akin to the Unix method of invoking programs.  By giving the command:

 foo :== $sys$sysexe:foo.exe

the command 'FOO' will invoke FOO.EXE, and supply any additional arguments literally to the program, for example, "foo -v".  This method is generally used for programs ported from Unix and other non-native systems; for C programs using argc and argv command syntax.

Versions of [[OpenVMS]] DCL starting with V6.2 support the <tt>DCL$PATH</tT> logical name for establishing Unix-style command paths.  This mechanism is known as an Automatic Foreign Command.  DCL$PATH allows a list of directories to be specified, and these directories are then searched for DCL command procedures (command.COM) and then for executable images (command.EXE) with filenames that match the command that was input by the user.  Like traditional foreign commands, automatic foreign commands also allow Unix-style command input.

== Scripting ==

DCL scripts look much like any other scripting language, with some exceptions.  All DCL verbs in a script are preceded with a $ symbol; other lines are considered to be input to a command. (Actually only command lines beginning with THEN or ELSE require the $.)  For example, to use the TYPE command to print a paragraph onto the screen, one might use a script similar to:

 $ TYPE SYS$INPUT:
 This is an example of using the TYPE verb
 in the DCL language.
 $ EXIT

== Indirect Variable Referencing ==

It is possible to build arrays in DCL that are referenced through translated symbols.  This allows the programmer to build arbitrarily sized data structures using the data itself as an indexing function. 

  $ i = 1
  $ variable'i' = "blue"
  $ i = 2 
  $ variable'i' = "green"
  $ j = 1
  $ color = variable'j'
  $ rainbow'color' = "red"
  $ color = variable'i'
  $ rainbow'color' = "yellow"

In this example the variable <tt>rainbowblue</tt> is assigned the value "red", and <tt>rainbowgreen</tt> is assigned the value "yellow".

== External links ==
*[http://h71000.www7.hp.com/doc/732FINAL/9996/9996PRO.HTML HP OpenVMS DCL Dictionary]
*[http://dcl.openvms.org/ OpenVMS.org's DCL archive]
*[http://www.dcldialogue.com  Archive of DEC Professional/Digital Age magazine's DCL columns]
*[http://h71000.www7.hp.com/openvms/products/ips/xml/ XML-based new orientation for DCL and OpenVMS interface]