1 %token ARITH_NUM ARITH_LPAREN ARITH_RPAREN
8 %left ARITH_EQ ARITH_NE
9 %left ARITH_LT ARITH_GT ARITH_GE ARITH_LE
10 %left ARITH_LSHIFT ARITH_RSHIFT
11 %left ARITH_ADD ARITH_SUB
12 %left ARITH_MUL ARITH_DIV ARITH_REM
13 %left ARITH_UNARYMINUS ARITH_UNARYPLUS ARITH_NOT ARITH_BNOT
22 expr: ARITH_LPAREN expr ARITH_RPAREN { $$ = $2; }
23 | expr ARITH_OR expr { $$ = $1 ? $1 : $3 ? $3 : 0; }
24 | expr ARITH_AND expr { $$ = $1 ? ( $3 ? $3 : 0 ) : 0; }
25 | expr ARITH_BOR expr { $$ = $1 | $3; }
26 | expr ARITH_BXOR expr { $$ = $1 ^ $3; }
27 | expr ARITH_BAND expr { $$ = $1 & $3; }
28 | expr ARITH_EQ expr { $$ = $1 == $3; }
29 | expr ARITH_GT expr { $$ = $1 > $3; }
30 | expr ARITH_GE expr { $$ = $1 >= $3; }
31 | expr ARITH_LT expr { $$ = $1 < $3; }
32 | expr ARITH_LE expr { $$ = $1 <= $3; }
33 | expr ARITH_NE expr { $$ = $1 != $3; }
34 | expr ARITH_LSHIFT expr { $$ = $1 << $3; }
35 | expr ARITH_RSHIFT expr { $$ = $1 >> $3; }
36 | expr ARITH_ADD expr { $$ = $1 + $3; }
37 | expr ARITH_SUB expr { $$ = $1 - $3; }
38 | expr ARITH_MUL expr { $$ = $1 * $3; }
39 | expr ARITH_DIV expr {
41 yyerror("division by zero");
44 | expr ARITH_REM expr {
46 yyerror("division by zero");
49 | ARITH_NOT expr { $$ = !($2); }
50 | ARITH_BNOT expr { $$ = ~($2); }
51 | ARITH_SUB expr %prec ARITH_UNARYMINUS { $$ = -($2); }
52 | ARITH_ADD expr %prec ARITH_UNARYPLUS { $$ = $2; }
58 * The Regents of the University of California. All rights reserved.
60 * This code is derived from software contributed to Berkeley by
63 * Redistribution and use in source and binary forms, with or without
64 * modification, are permitted provided that the following conditions
66 * 1. Redistributions of source code must retain the above copyright
67 * notice, this list of conditions and the following disclaimer.
68 * 2. Redistributions in binary form must reproduce the above copyright
69 * notice, this list of conditions and the following disclaimer in the
70 * documentation and/or other materials provided with the distribution.
71 * 3. All advertising materials mentioning features or use of this software
72 * must display the following acknowledgement:
73 * This product includes software developed by the University of
74 * California, Berkeley and its contributors.
75 * 4. Neither the name of the University nor the names of its contributors
76 * may be used to endorse or promote products derived from this software
77 * without specific prior written permission.
79 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
80 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
81 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
82 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
83 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
84 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
85 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
86 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
87 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
88 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
91 * @(#)arith.y 8.3 (Berkeley) 5/4/95
92 * $FreeBSD: src/bin/sh/arith.y,v 1.10.2.2 2002/07/19 04:38:51 tjr Exp $
93 * $DragonFly: src/bin/sh/arith.y,v 1.4 2005/10/08 11:23:28 corecode Exp $
103 const char *arith_buf, *arith_startbuf;
104 extern void arith_lex_reset(void);
108 void yyerror(const char *s);
115 arith_buf = arith_startbuf = s;
119 arith_lex_reset(); /* reprime lex */
126 yyerror(const char *s)
131 arith_lex_reset(); /* reprime lex */
132 error("arithmetic expression: %s: \"%s\"", s, arith_startbuf);
136 * The exp(1) builtin.
139 expcmd(int argc, char **argv)
150 * concatenate arguments
152 STARTSTACKSTR(concat);
156 STPUTC(*p++, concat);
157 if ((p = *ap++) == NULL)
161 STPUTC('\0', concat);
162 p = grabstackstr(concat);
173 /*************************/
176 main(int argc, char *argv[])
178 printf("%d\n", exp(argv[1]));
183 fprintf(stderr, "exp: %s\n", s);